Whamcloud - gitweb
LU-14108 mount: prevent if --network and discovery
[fs/lustre-release.git] / lustre / target / tgt_mount.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) 2013, 2017, Intel Corporation.
27  */
28 /*
29  * This file is part of Lustre, http://www.lustre.org/
30  *
31  * lustre/obdclass/obd_mount_server.c
32  *
33  * Server mount routines
34  *
35  * Author: Nathan Rutman <nathan@clusterfs.com>
36  */
37
38
39 #define DEBUG_SUBSYSTEM S_CLASS
40 #define D_MOUNT (D_SUPER | D_CONFIG /* | D_WARNING */)
41 #define PRINT_CMD CDEBUG
42 #define PRINT_MASK (D_SUPER | D_CONFIG)
43
44 #include <linux/types.h>
45 #ifdef HAVE_LINUX_SELINUX_IS_ENABLED
46 #include <linux/selinux.h>
47 #endif
48 #include <linux/statfs.h>
49 #include <linux/version.h>
50 #include <linux/delay.h>
51
52 #include <llog_swab.h>
53 #include <lustre_disk.h>
54 #include <uapi/linux/lustre/lustre_ioctl.h>
55 #include <lustre_log.h>
56 #include <uapi/linux/lustre/lustre_param.h>
57 #include <obd.h>
58 #include <obd_class.h>
59
60 /*********** mount lookup *********/
61
62 static DEFINE_MUTEX(lustre_mount_info_lock);
63 static LIST_HEAD(server_mount_info_list);
64
65 static struct lustre_mount_info *server_find_mount(const char *name)
66 {
67         struct list_head *tmp;
68         struct lustre_mount_info *lmi;
69
70         ENTRY;
71         list_for_each(tmp, &server_mount_info_list) {
72                 lmi = list_entry(tmp, struct lustre_mount_info,
73                                  lmi_list_chain);
74                 if (strcmp(name, lmi->lmi_name) == 0)
75                         RETURN(lmi);
76         }
77         RETURN(NULL);
78 }
79
80 /* we must register an obd for a mount before we call the setup routine.
81  *_setup will call lustre_get_mount to get the mnt struct
82  * by obd_name, since we can't pass the pointer to setup.
83  */
84 static int server_register_mount(const char *name, struct super_block *sb)
85 {
86         struct lustre_mount_info *lmi;
87         char *name_cp;
88
89         ENTRY;
90         LASSERT(sb);
91
92         OBD_ALLOC(lmi, sizeof(*lmi));
93         if (!lmi)
94                 RETURN(-ENOMEM);
95         OBD_ALLOC(name_cp, strlen(name) + 1);
96         if (!name_cp) {
97                 OBD_FREE(lmi, sizeof(*lmi));
98                 RETURN(-ENOMEM);
99         }
100         strcpy(name_cp, name);
101
102         mutex_lock(&lustre_mount_info_lock);
103
104         if (server_find_mount(name)) {
105                 mutex_unlock(&lustre_mount_info_lock);
106                 OBD_FREE(lmi, sizeof(*lmi));
107                 OBD_FREE(name_cp, strlen(name) + 1);
108                 CERROR("Already registered %s\n", name);
109                 RETURN(-EEXIST);
110         }
111         lmi->lmi_name = name_cp;
112         lmi->lmi_sb = sb;
113         list_add(&lmi->lmi_list_chain, &server_mount_info_list);
114
115         mutex_unlock(&lustre_mount_info_lock);
116
117         CDEBUG(D_MOUNT, "register mount %p from %s\n", sb, name);
118
119         RETURN(0);
120 }
121
122 /* when an obd no longer needs a mount */
123 static int server_deregister_mount(const char *name)
124 {
125         struct lustre_mount_info *lmi;
126
127         ENTRY;
128         mutex_lock(&lustre_mount_info_lock);
129         lmi = server_find_mount(name);
130         if (!lmi) {
131                 mutex_unlock(&lustre_mount_info_lock);
132                 CERROR("%s not registered\n", name);
133                 RETURN(-ENOENT);
134         }
135
136         CDEBUG(D_MOUNT, "deregister mount %p from %s\n", lmi->lmi_sb, name);
137
138         OBD_FREE(lmi->lmi_name, strlen(lmi->lmi_name) + 1);
139         list_del(&lmi->lmi_list_chain);
140         OBD_FREE(lmi, sizeof(*lmi));
141         mutex_unlock(&lustre_mount_info_lock);
142
143         OBD_RACE(OBD_FAIL_MDS_LLOG_UMOUNT_RACE);
144         RETURN(0);
145 }
146
147 /* obd's look up a registered mount using their obdname. This is just
148  * for initial obd setup to find the mount struct.  It should not be
149  * called every time you want to mntget.
150  */
151 struct lustre_mount_info *server_get_mount(const char *name)
152 {
153         struct lustre_mount_info *lmi;
154         struct lustre_sb_info *lsi;
155
156         ENTRY;
157         mutex_lock(&lustre_mount_info_lock);
158         lmi = server_find_mount(name);
159         mutex_unlock(&lustre_mount_info_lock);
160         if (!lmi) {
161                 CERROR("Can't find mount for %s\n", name);
162                 RETURN(NULL);
163         }
164         lsi = s2lsi(lmi->lmi_sb);
165
166         atomic_inc(&lsi->lsi_mounts);
167
168         CDEBUG(D_MOUNT, "get mount %p from %s, refs=%d\n", lmi->lmi_sb,
169                name, atomic_read(&lsi->lsi_mounts));
170
171         RETURN(lmi);
172 }
173 EXPORT_SYMBOL(server_get_mount);
174
175 /**
176  * server_put_mount: to be called from obd_cleanup methods
177  * @name:       obd name
178  * @dereg_mnt:  0 or 1 depending on whether the mount is to be deregistered or
179  * not
180  *
181  * The caller decides whether server_deregister_mount() needs to be called or
182  * not. Calling of server_deregister_mount() does not depend on refcounting on
183  * lsi because we could have say the mgs and mds on the same node and we
184  * unmount the mds, then the ref on the lsi would still be non-zero but we
185  * would still want to deregister the mds mount.
186  */
187 int server_put_mount(const char *name, bool dereg_mnt)
188 {
189         struct lustre_mount_info *lmi;
190         struct lustre_sb_info *lsi;
191
192         ENTRY;
193         mutex_lock(&lustre_mount_info_lock);
194         lmi = server_find_mount(name);
195         mutex_unlock(&lustre_mount_info_lock);
196         if (!lmi) {
197                 CERROR("Can't find mount for %s\n", name);
198                 RETURN(-ENOENT);
199         }
200         lsi = s2lsi(lmi->lmi_sb);
201
202         CDEBUG(D_MOUNT, "put mount %p from %s, refs=%d\n",
203                lmi->lmi_sb, name, atomic_read(&lsi->lsi_mounts));
204
205         if (lustre_put_lsi(lmi->lmi_sb))
206                 CDEBUG(D_MOUNT, "Last put of mount %p from %s\n",
207                        lmi->lmi_sb, name);
208
209         if (dereg_mnt)
210                 /* this obd should never need the mount again */
211                 server_deregister_mount(name);
212
213         RETURN(0);
214 }
215 EXPORT_SYMBOL(server_put_mount);
216
217 /* Set up a MGS to serve startup logs */
218 static int server_start_mgs(struct super_block *sb)
219 {
220         struct lustre_sb_info *lsi = s2lsi(sb);
221         struct lustre_mount_info *lmi;
222         int rc = 0;
223
224         ENTRY;
225         /* It is impossible to have more than 1 MGS per node, since
226          * MGC wouldn't know which to connect to
227          */
228         lmi = server_find_mount(LUSTRE_MGS_OBDNAME);
229         if (lmi) {
230                 lsi = s2lsi(lmi->lmi_sb);
231                 LCONSOLE_ERROR_MSG(0x15d,
232                                    "The MGS service was already started from server\n");
233                 RETURN(-EALREADY);
234         }
235
236         CDEBUG(D_CONFIG, "Start MGS service %s\n", LUSTRE_MGS_OBDNAME);
237
238         rc = server_register_mount(LUSTRE_MGS_OBDNAME, sb);
239         if (rc < 0)
240                 GOTO(report_err, rc);
241
242         rc = lustre_start_simple(LUSTRE_MGS_OBDNAME, LUSTRE_MGS_NAME,
243                                  LUSTRE_MGS_OBDNAME, NULL, NULL,
244                                  lsi->lsi_osd_obdname, NULL);
245         /* server_deregister_mount() is not called previously, for lsi
246          * and other stuff can't be freed cleanly when mgs calls
247          * server_put_mount() in error handling case (see b=17758),
248          * this problem is caused by a bug in mgs_init0, which forgot
249          * calling server_put_mount in error case.
250          */
251         if (rc < 0) {
252                 server_deregister_mount(LUSTRE_MGS_OBDNAME);
253 report_err:
254                 LCONSOLE_ERROR_MSG(0x15e,
255                                    "Failed to start MGS '%s' (%d). Is the 'mgs' module loaded?\n",
256                                    LUSTRE_MGS_OBDNAME, rc);
257         }
258         RETURN(rc);
259 }
260
261 static int server_stop_mgs(struct super_block *sb)
262 {
263         struct obd_device *obd;
264         int rc;
265         struct lustre_mount_info *lmi;
266
267         ENTRY;
268         /* Do not stop MGS if this device is not the running MGT */
269         lmi = server_find_mount(LUSTRE_MGS_OBDNAME);
270         if (lmi && lmi->lmi_sb != sb)
271                 RETURN(0);
272
273         CDEBUG(D_MOUNT, "Stop MGS service %s\n", LUSTRE_MGS_OBDNAME);
274
275         /* There better be only one MGS */
276         obd = class_name2obd(LUSTRE_MGS_OBDNAME);
277         if (!obd) {
278                 CDEBUG(D_CONFIG, "mgs %s not running\n", LUSTRE_MGS_OBDNAME);
279                 RETURN(-EALREADY);
280         }
281
282         /* The MGS should always stop when we say so */
283         obd->obd_force = 1;
284         rc = class_manual_cleanup(obd);
285         RETURN(rc);
286 }
287
288 /* Since there's only one mgc per node, we have to change it's fs to get
289  * access to the right disk.
290  */
291 static int server_mgc_set_fs(const struct lu_env *env,
292                              struct obd_device *mgc, struct super_block *sb)
293 {
294         struct lustre_sb_info *lsi = s2lsi(sb);
295         int rc;
296
297         ENTRY;
298         CDEBUG(D_MOUNT, "Set mgc disk for %s\n", lsi->lsi_lmd->lmd_dev);
299
300         /* cl_mgc_sem in mgc insures we sleep if the mgc_fs is busy */
301         rc = obd_set_info_async(env, mgc->obd_self_export,
302                                 sizeof(KEY_SET_FS), KEY_SET_FS,
303                                 sizeof(*sb), sb, NULL);
304         if (rc != 0)
305                 CERROR("can't set_fs %d\n", rc);
306
307         RETURN(rc);
308 }
309
310 static int server_mgc_clear_fs(const struct lu_env *env,
311                                struct obd_device *mgc)
312 {
313         int rc;
314
315         ENTRY;
316         CDEBUG(D_MOUNT, "Unassign mgc disk\n");
317         rc = obd_set_info_async(env, mgc->obd_self_export,
318                                 sizeof(KEY_CLEAR_FS), KEY_CLEAR_FS,
319                                 0, NULL, NULL);
320         RETURN(rc);
321 }
322
323 static inline bool is_mdc_device(const char *devname)
324 {
325         char *ptr;
326
327         ptr = strrchr(devname, '-');
328         return ptr && strcmp(ptr, "-mdc") == 0;
329 }
330
331 static inline bool tgt_is_mdt(const char *tgtname, u32 *idx)
332 {
333         int type;
334
335         type = server_name2index(tgtname, idx, NULL);
336
337         return type == LDD_F_SV_TYPE_MDT;
338 }
339
340 /*
341  * Convert OST/MDT name(fsname-{MDT,OST}xxxx) to a lwp name with the @idx:yyyy
342  * (fsname-MDTyyyy-lwp-{MDT,OST}xxxx)
343  */
344 int tgt_name2lwp_name(const char *tgt_name, char *lwp_name, int len, u32 idx)
345 {
346         char *fsname;
347         const char *tgt;
348         int rc;
349
350         ENTRY;
351         OBD_ALLOC(fsname, MTI_NAME_MAXLEN);
352         if (fsname == NULL)
353                 RETURN(-ENOMEM);
354
355         rc = server_name2fsname(tgt_name, fsname, &tgt);
356         if (rc != 0) {
357                 CERROR("%s: failed to get fsname from tgt_name: rc = %d\n",
358                        tgt_name, rc);
359                 GOTO(cleanup, rc);
360         }
361
362         if (*tgt != '-' && *tgt != ':') {
363                 CERROR("%s: invalid tgt_name name!\n", tgt_name);
364                 GOTO(cleanup, rc = -EINVAL);
365         }
366
367         tgt++;
368         if (strncmp(tgt, "OST", 3) != 0 && strncmp(tgt, "MDT", 3) != 0) {
369                 CERROR("%s is not an OST or MDT target!\n", tgt_name);
370                 GOTO(cleanup, rc = -EINVAL);
371         }
372         snprintf(lwp_name, len, "%s-MDT%04x-%s-%s",
373                  fsname, idx, LUSTRE_LWP_NAME, tgt);
374
375         GOTO(cleanup, rc = 0);
376
377 cleanup:
378         if (fsname != NULL)
379                 OBD_FREE(fsname, MTI_NAME_MAXLEN);
380
381         return rc;
382 }
383 EXPORT_SYMBOL(tgt_name2lwp_name);
384
385 static LIST_HEAD(lwp_register_list);
386 static DEFINE_SPINLOCK(lwp_register_list_lock);
387
388 static void lustre_put_lwp_item(struct lwp_register_item *lri)
389 {
390         if (atomic_dec_and_test(&lri->lri_ref)) {
391                 LASSERT(list_empty(&lri->lri_list));
392
393                 if (*lri->lri_exp)
394                         class_export_put(*lri->lri_exp);
395                 OBD_FREE_PTR(lri);
396         }
397 }
398
399 int lustre_register_lwp_item(const char *lwpname, struct obd_export **exp,
400                              register_lwp_cb cb_func, void *cb_data)
401 {
402         struct obd_device *lwp;
403         struct lwp_register_item *lri;
404         bool cb = false;
405
406         ENTRY;
407         LASSERTF(strlen(lwpname) < MTI_NAME_MAXLEN, "lwpname is too long %s\n",
408                  lwpname);
409         LASSERT(exp && !*exp);
410
411         OBD_ALLOC_PTR(lri);
412         if (lri == NULL)
413                 RETURN(-ENOMEM);
414
415         lwp = class_name2obd(lwpname);
416         if (lwp && lwp->obd_set_up == 1) {
417                 struct obd_uuid *uuid;
418
419                 OBD_ALLOC_PTR(uuid);
420                 if (uuid == NULL) {
421                         OBD_FREE_PTR(lri);
422                         RETURN(-ENOMEM);
423                 }
424                 memcpy(uuid->uuid, lwpname, strlen(lwpname));
425                 *exp = obd_uuid_lookup(lwp, uuid);
426                 OBD_FREE_PTR(uuid);
427         }
428
429         memcpy(lri->lri_name, lwpname, strlen(lwpname));
430         lri->lri_exp = exp;
431         lri->lri_cb_func = cb_func;
432         lri->lri_cb_data = cb_data;
433         INIT_LIST_HEAD(&lri->lri_list);
434         /*
435          * Initialize the lri_ref at 2, one will be released before
436          * current function returned via lustre_put_lwp_item(), the
437          * other will be released in lustre_deregister_lwp_item().
438          */
439         atomic_set(&lri->lri_ref, 2);
440
441         spin_lock(&lwp_register_list_lock);
442         list_add(&lri->lri_list, &lwp_register_list);
443         if (*exp)
444                 cb = true;
445         spin_unlock(&lwp_register_list_lock);
446
447         if (cb && cb_func)
448                 cb_func(cb_data);
449         lustre_put_lwp_item(lri);
450
451         RETURN(0);
452 }
453 EXPORT_SYMBOL(lustre_register_lwp_item);
454
455 void lustre_deregister_lwp_item(struct obd_export **exp)
456 {
457         struct lwp_register_item *lri;
458         bool removed = false;
459         int repeat = 0;
460
461         spin_lock(&lwp_register_list_lock);
462         list_for_each_entry(lri, &lwp_register_list, lri_list) {
463                 if (exp == lri->lri_exp) {
464                         list_del_init(&lri->lri_list);
465                         removed = true;
466                         break;
467                 }
468         }
469         spin_unlock(&lwp_register_list_lock);
470
471         if (!removed)
472                 return;
473
474         /* See lustre_notify_lwp_list(), in some extreme race conditions,
475          * the notify callback could be still on the fly, we need to wait
476          * for the callback done before moving on to free the data used
477          * by callback.
478          */
479         while (atomic_read(&lri->lri_ref) > 1) {
480                 CDEBUG(D_MOUNT, "lri reference count %u, repeat: %d\n",
481                        atomic_read(&lri->lri_ref), repeat);
482                 repeat++;
483                 schedule_timeout_interruptible(cfs_time_seconds(1));
484         }
485         lustre_put_lwp_item(lri);
486 }
487 EXPORT_SYMBOL(lustre_deregister_lwp_item);
488
489 struct obd_export *lustre_find_lwp_by_index(const char *dev, u32 idx)
490 {
491         struct lustre_mount_info *lmi;
492         struct lustre_sb_info *lsi;
493         struct obd_device *lwp;
494         struct obd_export *exp = NULL;
495         char fsname[16];
496         char lwp_name[24];
497         int rc;
498
499         lmi = server_get_mount(dev);
500         if (lmi == NULL)
501                 return NULL;
502
503         lsi = s2lsi(lmi->lmi_sb);
504         rc = server_name2fsname(lsi->lsi_svname, fsname, NULL);
505         if (rc != 0) {
506                 CERROR("%s: failed to get fsname: rc = %d\n",
507                        lsi->lsi_svname, rc);
508                 goto err_lmi;
509         }
510
511         snprintf(lwp_name, sizeof(lwp_name), "%s-MDT%04x", fsname, idx);
512         mutex_lock(&lsi->lsi_lwp_mutex);
513         list_for_each_entry(lwp, &lsi->lsi_lwp_list, obd_lwp_list) {
514                 char *ptr = strstr(lwp->obd_name, lwp_name);
515
516                 if (ptr && lwp->obd_lwp_export) {
517                         exp = class_export_get(lwp->obd_lwp_export);
518                         break;
519                 }
520         }
521         mutex_unlock(&lsi->lsi_lwp_mutex);
522
523 err_lmi:
524         server_put_mount(dev, false);
525
526         return exp;
527 }
528 EXPORT_SYMBOL(lustre_find_lwp_by_index);
529
530 void lustre_notify_lwp_list(struct obd_export *exp)
531 {
532         struct lwp_register_item *lri;
533
534         LASSERT(exp);
535 again:
536         spin_lock(&lwp_register_list_lock);
537         list_for_each_entry(lri, &lwp_register_list, lri_list) {
538                 if (strcmp(exp->exp_obd->obd_name, lri->lri_name))
539                         continue;
540                 if (*lri->lri_exp)
541                         continue;
542                 *lri->lri_exp = class_export_get(exp);
543                 if (!lri->lri_cb_func)
544                         continue;
545                 atomic_inc(&lri->lri_ref);
546                 spin_unlock(&lwp_register_list_lock);
547
548                 lri->lri_cb_func(lri->lri_cb_data);
549                 lustre_put_lwp_item(lri);
550
551                 /* Others may have changed the list after we unlock, we have
552                  * to rescan the list from the beginning. Usually, the list
553                  * 'lwp_register_list' is very short, and there is 'guard'
554                  * lri::lri_exp that will prevent the callback to be done
555                  * repeatedly. So rescanning the list has no problem.
556                  */
557                 goto again;
558         }
559         spin_unlock(&lwp_register_list_lock);
560 }
561 EXPORT_SYMBOL(lustre_notify_lwp_list);
562
563 static int lustre_lwp_connect(struct obd_device *lwp, bool is_mdt)
564 {
565         struct lu_env env;
566         struct lu_context session_ctx;
567         struct obd_export *exp;
568         struct obd_uuid *uuid = NULL;
569         struct obd_connect_data *data = NULL;
570         int rc;
571
572         ENTRY;
573         /* log has been fully processed, let clients connect */
574         rc = lu_env_init(&env, lwp->obd_lu_dev->ld_type->ldt_ctx_tags);
575         if (rc != 0)
576                 RETURN(rc);
577
578         lu_context_init(&session_ctx, LCT_SERVER_SESSION);
579         session_ctx.lc_thread = NULL;
580         lu_context_enter(&session_ctx);
581         env.le_ses = &session_ctx;
582
583         OBD_ALLOC_PTR(data);
584         if (data == NULL)
585                 GOTO(out, rc = -ENOMEM);
586
587         data->ocd_connect_flags = OBD_CONNECT_VERSION | OBD_CONNECT_INDEX;
588         data->ocd_version = LUSTRE_VERSION_CODE;
589         data->ocd_connect_flags |= OBD_CONNECT_FID | OBD_CONNECT_AT |
590                 OBD_CONNECT_LRU_RESIZE | OBD_CONNECT_FULL20 |
591                 OBD_CONNECT_LVB_TYPE | OBD_CONNECT_LIGHTWEIGHT |
592                 OBD_CONNECT_LFSCK | OBD_CONNECT_BULK_MBITS;
593
594         if (is_mdt)
595                 data->ocd_connect_flags |= OBD_CONNECT_MDS_MDS;
596
597         OBD_ALLOC_PTR(uuid);
598         if (uuid == NULL)
599                 GOTO(out, rc = -ENOMEM);
600
601         if (strlen(lwp->obd_name) > sizeof(uuid->uuid)) {
602                 CERROR("%s: Too long lwp name %s, max_size is %d\n",
603                        lwp->obd_name, lwp->obd_name, (int)sizeof(uuid->uuid));
604                 GOTO(out, rc = -EINVAL);
605         }
606
607         /* Use lwp name as the uuid, so we find the export by lwp name later */
608         memcpy(uuid->uuid, lwp->obd_name, strlen(lwp->obd_name));
609         rc = obd_connect(&env, &exp, lwp, uuid, data, NULL);
610         if (rc != 0) {
611                 CERROR("%s: connect failed: rc = %d\n", lwp->obd_name, rc);
612         } else {
613                 if (unlikely(lwp->obd_lwp_export))
614                         class_export_put(lwp->obd_lwp_export);
615                 lwp->obd_lwp_export = class_export_get(exp);
616         }
617
618         GOTO(out, rc);
619
620 out:
621         if (data != NULL)
622                 OBD_FREE_PTR(data);
623         if (uuid != NULL)
624                 OBD_FREE_PTR(uuid);
625
626         lu_env_fini(&env);
627         lu_context_exit(&session_ctx);
628         lu_context_fini(&session_ctx);
629
630         return rc;
631 }
632
633 /**
634  * lwp is used by slaves (Non-MDT0 targets) to manage the connection to MDT0,
635  * or from the OSTx to MDTy.
636  **/
637 static int lustre_lwp_setup(struct lustre_cfg *lcfg, struct lustre_sb_info *lsi,
638                             u32 idx)
639 {
640         struct obd_device *obd;
641         char *lwpname = NULL;
642         char *lwpuuid = NULL;
643         int rc;
644
645         ENTRY;
646         rc = class_add_uuid(lustre_cfg_string(lcfg, 1),
647                             lcfg->lcfg_nid);
648         if (rc != 0) {
649                 CERROR("%s: Can't add uuid: rc =%d\n", lsi->lsi_svname, rc);
650                 RETURN(rc);
651         }
652
653         OBD_ALLOC(lwpname, MTI_NAME_MAXLEN);
654         if (lwpname == NULL)
655                 GOTO(out, rc = -ENOMEM);
656
657         rc = tgt_name2lwp_name(lsi->lsi_svname, lwpname, MTI_NAME_MAXLEN, idx);
658         if (rc != 0) {
659                 CERROR("%s: failed to generate lwp name: rc = %d\n",
660                        lsi->lsi_svname, rc);
661                 GOTO(out, rc);
662         }
663
664         OBD_ALLOC(lwpuuid, MTI_NAME_MAXLEN);
665         if (!lwpuuid)
666                 GOTO(out, rc = -ENOMEM);
667
668         sprintf(lwpuuid, "%s_UUID", lwpname);
669         rc = lustre_start_simple(lwpname, LUSTRE_LWP_NAME,
670                                  lwpuuid, lustre_cfg_string(lcfg, 1),
671                                  NULL, NULL, NULL);
672         if (rc < 0) {
673                 CERROR("%s: setup up failed: rc %d\n", lwpname, rc);
674                 GOTO(out, rc);
675         }
676
677         obd = class_name2obd(lwpname);
678         LASSERT(obd);
679
680         rc = lustre_lwp_connect(obd, strstr(lsi->lsi_svname, "-MDT") != NULL);
681         if (rc < 0) {
682                 CERROR("%s: connect failed: rc = %d\n", lwpname, rc);
683                 GOTO(out, rc);
684         }
685
686         obd->u.cli.cl_max_mds_easize = MAX_MD_SIZE;
687         mutex_lock(&lsi->lsi_lwp_mutex);
688         list_add_tail(&obd->obd_lwp_list, &lsi->lsi_lwp_list);
689         mutex_unlock(&lsi->lsi_lwp_mutex);
690 out:
691         if (lwpname)
692                 OBD_FREE(lwpname, MTI_NAME_MAXLEN);
693         if (lwpuuid)
694                 OBD_FREE(lwpuuid, MTI_NAME_MAXLEN);
695
696         return rc;
697 }
698
699 /* the caller is responsible for memory free */
700 static struct obd_device *lustre_find_lwp(struct lustre_sb_info *lsi,
701                                           char **lwpname, u32 idx)
702 {
703         struct obd_device *lwp;
704         int rc = 0;
705
706         ENTRY;
707         LASSERT(lwpname);
708         LASSERT(IS_OST(lsi) || IS_MDT(lsi));
709
710         OBD_ALLOC(*lwpname, MTI_NAME_MAXLEN);
711         if (*lwpname == NULL)
712                 RETURN(ERR_PTR(-ENOMEM));
713
714         rc = tgt_name2lwp_name(lsi->lsi_svname, *lwpname, MTI_NAME_MAXLEN, idx);
715         if (rc != 0) {
716                 CERROR("%s: failed to generate lwp name: rc = %d\n",
717                        lsi->lsi_svname, rc);
718                 GOTO(out, rc = -EINVAL);
719         }
720
721         lwp = class_name2obd(*lwpname);
722
723 out:
724         if (rc != 0) {
725                 if (*lwpname != NULL) {
726                         OBD_FREE(*lwpname, MTI_NAME_MAXLEN);
727                         *lwpname = NULL;
728                 }
729                 lwp = ERR_PTR(rc);
730         }
731
732         RETURN(lwp ? lwp : ERR_PTR(-ENOENT));
733 }
734
735 static int lustre_lwp_add_conn(struct lustre_cfg *cfg,
736                                struct lustre_sb_info *lsi, u32 idx)
737 {
738         struct lustre_cfg_bufs *bufs = NULL;
739         struct lustre_cfg *lcfg = NULL;
740         char *lwpname = NULL;
741         struct obd_device *lwp;
742         int rc;
743
744         ENTRY;
745         lwp = lustre_find_lwp(lsi, &lwpname, idx);
746         if (IS_ERR(lwp)) {
747                 CERROR("%s: can't find lwp device.\n", lsi->lsi_svname);
748                 GOTO(out, rc = PTR_ERR(lwp));
749         }
750         LASSERT(lwpname);
751
752         OBD_ALLOC_PTR(bufs);
753         if (bufs == NULL)
754                 GOTO(out, rc = -ENOMEM);
755
756         lustre_cfg_bufs_reset(bufs, lwpname);
757         lustre_cfg_bufs_set_string(bufs, 1,
758                                    lustre_cfg_string(cfg, 1));
759
760         OBD_ALLOC(lcfg, lustre_cfg_len(bufs->lcfg_bufcount, bufs->lcfg_buflen));
761         if (!lcfg)
762                 GOTO(out_cfg, rc = -ENOMEM);
763         lustre_cfg_init(lcfg, LCFG_ADD_CONN, bufs);
764
765         rc = class_add_conn(lwp, lcfg);
766         if (rc < 0)
767                 CERROR("%s: can't add conn: rc = %d\n", lwpname, rc);
768
769         if (lcfg)
770                 OBD_FREE(lcfg, lustre_cfg_len(lcfg->lcfg_bufcount,
771                                               lcfg->lcfg_buflens));
772 out_cfg:
773         if (bufs)
774                 OBD_FREE_PTR(bufs);
775 out:
776         if (lwpname)
777                 OBD_FREE(lwpname, MTI_NAME_MAXLEN);
778         RETURN(rc);
779 }
780
781 /**
782  * Retrieve MDT nids from the client log, then start the lwp device.
783  * there are only two scenarios which would include mdt nid.
784  * 1.
785  * marker   5 (flags=0x01, v2.1.54.0) lustre-MDTyyyy  'add mdc' xxx-
786  * add_uuid  nid=192.168.122.162@tcp(0x20000c0a87aa2)  0:  1:192.168.122.162@tcp
787  * attach    0:lustre-MDTyyyy-mdc  1:mdc  2:lustre-clilmv_UUID
788  * setup     0:lustre-MDTyyyy-mdc  1:lustre-MDTyyyy_UUID  2:192.168.122.162@tcp
789  * add_uuid  nid=192.168.172.1@tcp(0x20000c0a8ac01)  0:  1:192.168.172.1@tcp
790  * add_conn  0:lustre-MDTyyyy-mdc  1:192.168.172.1@tcp
791  * modify_mdc_tgts add 0:lustre-clilmv  1:lustre-MDTyyyy_UUID xxxx
792  * marker   5 (flags=0x02, v2.1.54.0) lustre-MDTyyyy  'add mdc' xxxx-
793  * 2.
794  * marker   7 (flags=0x01, v2.1.54.0) lustre-MDTyyyy  'add failnid' xxxx-
795  * add_uuid  nid=192.168.122.2@tcp(0x20000c0a87a02)  0:  1:192.168.122.2@tcp
796  * add_conn  0:lustre-MDTyyyy-mdc  1:192.168.122.2@tcp
797  * marker   7 (flags=0x02, v2.1.54.0) lustre-MDTyyyy  'add failnid' xxxx-
798  **/
799 static int client_lwp_config_process(const struct lu_env *env,
800                                      struct llog_handle *handle,
801                                      struct llog_rec_hdr *rec, void *data)
802 {
803         struct config_llog_instance *cfg = data;
804         int cfg_len = rec->lrh_len;
805         char *cfg_buf = (char *) (rec + 1);
806         struct lustre_cfg *lcfg = NULL;
807         struct lustre_sb_info *lsi;
808         int rc = 0, swab = 0;
809
810         ENTRY;
811         if (rec->lrh_type != OBD_CFG_REC) {
812                 CERROR("Unknown llog record type %#x encountered\n",
813                        rec->lrh_type);
814                 RETURN(-EINVAL);
815         }
816
817         if (!cfg->cfg_sb)
818                 GOTO(out, rc = -EINVAL);
819         lsi = s2lsi(cfg->cfg_sb);
820
821         lcfg = (struct lustre_cfg *)cfg_buf;
822         if (lcfg->lcfg_version == __swab32(LUSTRE_CFG_VERSION)) {
823                 lustre_swab_lustre_cfg(lcfg);
824                 swab = 1;
825         }
826
827         rc = lustre_cfg_sanity_check(cfg_buf, cfg_len);
828         if (rc < 0)
829                 GOTO(out, rc);
830
831         switch (lcfg->lcfg_command) {
832         case LCFG_MARKER: {
833                 struct cfg_marker *marker = lustre_cfg_buf(lcfg, 1);
834
835                 lustre_swab_cfg_marker(marker, swab,
836                                        LUSTRE_CFG_BUFLEN(lcfg, 1));
837                 if (marker->cm_flags & CM_SKIP ||
838                     marker->cm_flags & CM_EXCLUDE)
839                         GOTO(out, rc = 0);
840
841                 if (!tgt_is_mdt(marker->cm_tgtname, &cfg->cfg_lwp_idx))
842                         GOTO(out, rc = 0);
843
844                 if (IS_MDT(lsi) && cfg->cfg_lwp_idx != 0)
845                         GOTO(out, rc = 0);
846
847                 if (!strncmp(marker->cm_comment, "add mdc", 7) ||
848                     !strncmp(marker->cm_comment, "add failnid", 11)) {
849                         if (marker->cm_flags & CM_START) {
850                                 cfg->cfg_flags = CFG_F_MARKER;
851                                 /* This hack is to differentiate the
852                                  * ADD_UUID is come from "add mdc" record
853                                  * or from "add failnid" record.
854                                  */
855                                 if (!strncmp(marker->cm_comment,
856                                              "add failnid", 11))
857                                         cfg->cfg_flags |= CFG_F_SKIP;
858                         } else if (marker->cm_flags & CM_END) {
859                                 cfg->cfg_flags = 0;
860                         }
861                 }
862                 break;
863         }
864         case LCFG_ADD_UUID: {
865                 if (cfg->cfg_flags == CFG_F_MARKER) {
866                         rc = lustre_lwp_setup(lcfg, lsi, cfg->cfg_lwp_idx);
867                         /* XXX: process only the first nid as
868                          * we don't need another instance of lwp
869                          */
870                         cfg->cfg_flags |= CFG_F_SKIP;
871                 } else if (cfg->cfg_flags == (CFG_F_MARKER | CFG_F_SKIP)) {
872                         rc = class_add_uuid(lustre_cfg_string(lcfg, 1),
873                                             lcfg->lcfg_nid);
874                         if (rc < 0)
875                                 CERROR("%s: Fail to add uuid, rc:%d\n",
876                                        lsi->lsi_svname, rc);
877                 }
878                 break;
879         }
880         case LCFG_ADD_CONN: {
881                 char *devname = lustre_cfg_string(lcfg, 0);
882                 char *ptr;
883                 u32 idx = 0;
884
885                 if (!is_mdc_device(devname))
886                         break;
887
888                 if (!(cfg->cfg_flags & CFG_F_MARKER)) {
889                         CDEBUG(D_CONFIG, "Skipping add_conn for %s, rec %d\n",
890                                devname, rec->lrh_index);
891                         break;
892                 }
893
894                 /* add_conn should follow by add_uuid. This
895                  * guarantee lwp device was created
896                  */
897                 if (!(cfg->cfg_flags & CFG_F_SKIP)) {
898                         CWARN("Error at config for %s rec %d, add_conn should follow by add_uuid\n",
899                               devname, rec->lrh_index);
900                         break;
901                 }
902                 ptr = strrchr(devname, '-');
903                 if (ptr == NULL)
904                         break;
905
906                 *ptr = 0;
907                 if (!tgt_is_mdt(devname, &idx)) {
908                         *ptr = '-';
909                         break;
910                 }
911                 *ptr = '-';
912
913                 if (IS_MDT(lsi) && idx != 0)
914                         break;
915
916                 rc = lustre_lwp_add_conn(lcfg, lsi, idx);
917                 break;
918         }
919         default:
920                 break;
921         }
922 out:
923         RETURN(rc);
924 }
925
926 static int lustre_disconnect_lwp(struct super_block *sb)
927 {
928         struct lustre_sb_info *lsi = s2lsi(sb);
929         struct obd_device *lwp;
930         char *logname = NULL;
931         struct lustre_cfg_bufs *bufs = NULL;
932         struct config_llog_instance *cfg = NULL;
933         int rc = 0;
934         int rc1 = 0;
935
936         ENTRY;
937         if (likely(lsi->lsi_lwp_started)) {
938                 OBD_ALLOC(logname, MTI_NAME_MAXLEN);
939                 if (logname == NULL)
940                         RETURN(-ENOMEM);
941
942                 rc = server_name2fsname(lsi->lsi_svname, logname, NULL);
943                 if (rc != 0) {
944                         CERROR("%s: failed to get fsname from svname: rc = %d\n",
945                                lsi->lsi_svname, rc);
946                         GOTO(out, rc = -EINVAL);
947                 }
948
949                 strcat(logname, "-client");
950                 OBD_ALLOC_PTR(cfg);
951                 if (cfg == NULL)
952                         GOTO(out, rc = -ENOMEM);
953
954                 /* end log first */
955                 cfg->cfg_instance = ll_get_cfg_instance(sb);
956                 rc = lustre_end_log(sb, logname, cfg);
957                 if (rc != 0 && rc != -ENOENT)
958                         GOTO(out, rc);
959
960                 lsi->lsi_lwp_started = 0;
961         }
962
963         OBD_ALLOC_PTR(bufs);
964         if (bufs == NULL)
965                 GOTO(out, rc = -ENOMEM);
966
967         mutex_lock(&lsi->lsi_lwp_mutex);
968         list_for_each_entry(lwp, &lsi->lsi_lwp_list, obd_lwp_list) {
969                 struct lustre_cfg *lcfg;
970
971                 if (likely(lwp->obd_lwp_export)) {
972                         class_export_put(lwp->obd_lwp_export);
973                         lwp->obd_lwp_export = NULL;
974                 }
975
976                 lustre_cfg_bufs_reset(bufs, lwp->obd_name);
977                 lustre_cfg_bufs_set_string(bufs, 1, NULL);
978                 OBD_ALLOC(lcfg, lustre_cfg_len(bufs->lcfg_bufcount,
979                                                bufs->lcfg_buflen));
980                 if (!lcfg) {
981                         rc = -ENOMEM;
982                         break;
983                 }
984                 lustre_cfg_init(lcfg, LCFG_CLEANUP, bufs);
985
986                 /* Disconnect import first. NULL is passed for the '@env',
987                  * since it will not be used.
988                  */
989                 rc = lwp->obd_lu_dev->ld_ops->ldo_process_config(NULL,
990                                                         lwp->obd_lu_dev, lcfg);
991                 OBD_FREE(lcfg, lustre_cfg_len(lcfg->lcfg_bufcount,
992                                               lcfg->lcfg_buflens));
993                 if (rc != 0 && rc != -ETIMEDOUT) {
994                         CERROR("%s: fail to disconnect LWP: rc = %d\n",
995                                lwp->obd_name, rc);
996                         rc1 = rc;
997                 }
998         }
999         mutex_unlock(&lsi->lsi_lwp_mutex);
1000
1001         GOTO(out, rc);
1002
1003 out:
1004         if (bufs)
1005                 OBD_FREE_PTR(bufs);
1006         if (cfg)
1007                 OBD_FREE_PTR(cfg);
1008         if (logname)
1009                 OBD_FREE(logname, MTI_NAME_MAXLEN);
1010
1011         return rc1 != 0 ? rc1 : rc;
1012 }
1013
1014 /**
1015  * Stop the lwp for an OST/MDT target.
1016  **/
1017 static int lustre_stop_lwp(struct super_block *sb)
1018 {
1019         struct lustre_sb_info *lsi = s2lsi(sb);
1020         struct obd_device *lwp;
1021         int rc = 0;
1022         int rc1 = 0;
1023
1024         ENTRY;
1025         mutex_lock(&lsi->lsi_lwp_mutex);
1026         while (!list_empty(&lsi->lsi_lwp_list)) {
1027                 lwp = list_entry(lsi->lsi_lwp_list.next, struct obd_device,
1028                                  obd_lwp_list);
1029                 list_del_init(&lwp->obd_lwp_list);
1030                 lwp->obd_force = 1;
1031                 mutex_unlock(&lsi->lsi_lwp_mutex);
1032
1033                 rc = class_manual_cleanup(lwp);
1034                 if (rc != 0) {
1035                         CERROR("%s: fail to stop LWP: rc = %d\n",
1036                                lwp->obd_name, rc);
1037                         rc1 = rc;
1038                 }
1039                 mutex_lock(&lsi->lsi_lwp_mutex);
1040         }
1041         mutex_unlock(&lsi->lsi_lwp_mutex);
1042
1043         RETURN(rc1 != 0 ? rc1 : rc);
1044 }
1045
1046 /**
1047  * Start the lwp(fsname-MDTyyyy-lwp-{MDT,OST}xxxx) for a MDT/OST or MDT target.
1048  **/
1049 static int lustre_start_lwp(struct super_block *sb)
1050 {
1051         struct lustre_sb_info *lsi = s2lsi(sb);
1052         struct config_llog_instance *cfg = NULL;
1053         char *logname;
1054         int rc;
1055
1056         ENTRY;
1057         if (unlikely(lsi->lsi_lwp_started))
1058                 RETURN(0);
1059
1060         OBD_ALLOC(logname, MTI_NAME_MAXLEN);
1061         if (logname == NULL)
1062                 RETURN(-ENOMEM);
1063
1064         rc = server_name2fsname(lsi->lsi_svname, logname, NULL);
1065         if (rc != 0) {
1066                 CERROR("%s: failed to get fsname from svname: rc = %d\n",
1067                        lsi->lsi_svname, rc);
1068                 GOTO(out, rc = -EINVAL);
1069         }
1070
1071         strcat(logname, "-client");
1072         OBD_ALLOC_PTR(cfg);
1073         if (cfg == NULL)
1074                 GOTO(out, rc = -ENOMEM);
1075
1076         cfg->cfg_callback = client_lwp_config_process;
1077         cfg->cfg_instance = ll_get_cfg_instance(sb);
1078         rc = lustre_process_log(sb, logname, cfg);
1079         /* need to remove config llog from mgc */
1080         lsi->lsi_lwp_started = 1;
1081
1082         GOTO(out, rc);
1083
1084 out:
1085         OBD_FREE(logname, MTI_NAME_MAXLEN);
1086         if (cfg)
1087                 OBD_FREE_PTR(cfg);
1088
1089         return rc;
1090 }
1091
1092 static DEFINE_MUTEX(server_start_lock);
1093
1094 /* Stop MDS/OSS if nobody is using them */
1095 static int server_stop_servers(int lsiflags)
1096 {
1097         struct obd_device *obd = NULL;
1098         struct obd_type *type = NULL;
1099         int rc = 0;
1100         bool type_last;
1101
1102         ENTRY;
1103         mutex_lock(&server_start_lock);
1104
1105         /* Either an MDT or an OST or neither  */
1106         /* if this was an MDT, and there are no more MDT's, clean up the MDS */
1107         if (lsiflags & LDD_F_SV_TYPE_MDT) {
1108                 obd = class_name2obd(LUSTRE_MDS_OBDNAME);
1109                 type = class_search_type(LUSTRE_MDT_NAME);
1110         } else if (lsiflags & LDD_F_SV_TYPE_OST) {
1111         /* if this was an OST, and there are no more OST's, clean up the OSS */
1112                 obd = class_name2obd(LUSTRE_OSS_OBDNAME);
1113                 type = class_search_type(LUSTRE_OST_NAME);
1114         }
1115
1116         /* server_stop_servers is a pair of server_start_targets
1117          * Here we put type which was taken at server_start_targets.
1118          * If type is NULL then there is a wrong logic around type or
1119          * type reference.
1120          */
1121         LASSERTF(type, "Server flags %d, obd %s\n", lsiflags,
1122                  obd ? obd->obd_name : "NULL");
1123
1124         type_last = (atomic_read(&type->typ_refcnt) == 1);
1125
1126         class_put_type(type);
1127         if (obd && type_last) {
1128                 obd->obd_force = 1;
1129                 /* obd_fail doesn't mean much on a server obd */
1130                 rc = class_manual_cleanup(obd);
1131         }
1132
1133         /* put reference taken by class_search_type */
1134         kobject_put(&type->typ_kobj);
1135
1136         mutex_unlock(&server_start_lock);
1137
1138         RETURN(rc);
1139 }
1140
1141 int server_mti_print(const char *title, struct mgs_target_info *mti)
1142 {
1143         PRINT_CMD(PRINT_MASK, "mti %s\n", title);
1144         PRINT_CMD(PRINT_MASK, "server: %s\n", mti->mti_svname);
1145         PRINT_CMD(PRINT_MASK, "fs:     %s\n", mti->mti_fsname);
1146         PRINT_CMD(PRINT_MASK, "uuid:   %s\n", mti->mti_uuid);
1147         PRINT_CMD(PRINT_MASK, "ver: %d  flags: %#x\n",
1148                   mti->mti_config_ver, mti->mti_flags);
1149         return 0;
1150 }
1151
1152 /* Generate data for registration */
1153 static int server_lsi2mti(struct lustre_sb_info *lsi,
1154                           struct mgs_target_info *mti)
1155 {
1156         struct lnet_processid id;
1157         int rc, i = 0;
1158         int cplen = 0;
1159
1160         ENTRY;
1161         if (!IS_SERVER(lsi))
1162                 RETURN(-EINVAL);
1163
1164         if (strlcpy(mti->mti_svname, lsi->lsi_svname, sizeof(mti->mti_svname))
1165             >= sizeof(mti->mti_svname))
1166                 RETURN(-E2BIG);
1167
1168         mti->mti_nid_count = 0;
1169         while (LNetGetId(i++, &id) != -ENOENT) {
1170                 if (nid_is_lo0(&id.nid))
1171                         continue;
1172
1173                 /* server use --servicenode param, only allow specified
1174                  * nids be registered
1175                  */
1176                 if ((lsi->lsi_lmd->lmd_flags & LMD_FLG_NO_PRIMNODE) != 0 &&
1177                     class_match_nid(lsi->lsi_lmd->lmd_params,
1178                                     PARAM_FAILNODE,
1179                                     lnet_nid_to_nid4(&id.nid)) < 1)
1180                         continue;
1181
1182                 if (!class_find_param(lsi->lsi_lmd->lmd_params,
1183                                         PARAM_NETWORK, NULL)) {
1184                         if (LNetGetPeerDiscoveryStatus()) {
1185                                 CERROR("LNet Dynamic Peer Discovery is enabled"
1186                                        " on this node. 'network' option used in"
1187                                        " mkfs.lustre cannot be taken into"
1188                                        " account.\n");
1189                                 RETURN(-EINVAL);
1190                         }
1191                 }
1192
1193                 /* match specified network */
1194                 if (!class_match_net(lsi->lsi_lmd->lmd_params,
1195                                      PARAM_NETWORK, LNET_NID_NET(&id.nid)))
1196                         continue;
1197
1198                 mti->mti_nids[mti->mti_nid_count] = lnet_nid_to_nid4(&id.nid);
1199                 mti->mti_nid_count++;
1200                 if (mti->mti_nid_count >= MTI_NIDS_MAX) {
1201                         CWARN("Only using first %d nids for %s\n",
1202                               mti->mti_nid_count, mti->mti_svname);
1203                         break;
1204                 }
1205         }
1206
1207         if (mti->mti_nid_count == 0) {
1208                 CERROR("Failed to get NID for server %s, please check whether the target is specifed with improper --servicenode or --network options.\n",
1209                        mti->mti_svname);
1210                 RETURN(-EINVAL);
1211         }
1212
1213         mti->mti_lustre_ver = LUSTRE_VERSION_CODE;
1214         mti->mti_config_ver = 0;
1215
1216         rc = server_name2fsname(lsi->lsi_svname, mti->mti_fsname, NULL);
1217         if (rc != 0)
1218                 return rc;
1219
1220         rc = server_name2index(lsi->lsi_svname, &mti->mti_stripe_index, NULL);
1221         if (rc < 0)
1222                 return rc;
1223         /* Orion requires index to be set */
1224         LASSERT(!(rc & LDD_F_NEED_INDEX));
1225         /* keep only LDD flags */
1226         mti->mti_flags = lsi->lsi_flags & LDD_F_MASK;
1227         if (mti->mti_flags & (LDD_F_WRITECONF | LDD_F_VIRGIN))
1228                 mti->mti_flags |= LDD_F_UPDATE;
1229         cplen = strlcpy(mti->mti_params, lsi->lsi_lmd->lmd_params,
1230                         sizeof(mti->mti_params));
1231         if (cplen >= sizeof(mti->mti_params))
1232                 return -E2BIG;
1233         return 0;
1234 }
1235
1236 /* Register an old or new target with the MGS. If needed MGS will construct
1237  * startup logs and assign index
1238  */
1239 static int server_register_target(struct lustre_sb_info *lsi)
1240 {
1241         struct obd_device *mgc = lsi->lsi_mgc;
1242         struct mgs_target_info *mti = NULL;
1243         bool must_succeed;
1244         int rc;
1245         int tried = 0;
1246
1247         ENTRY;
1248         LASSERT(mgc);
1249
1250         if (!IS_SERVER(lsi))
1251                 RETURN(-EINVAL);
1252
1253         OBD_ALLOC_PTR(mti);
1254         if (!mti)
1255                 RETURN(-ENOMEM);
1256
1257         rc = server_lsi2mti(lsi, mti);
1258         if (rc < 0)
1259                 GOTO(out, rc);
1260
1261         CDEBUG(D_MOUNT, "Registration %s, fs=%s, %s, index=%04x, flags=%#x\n",
1262                mti->mti_svname, mti->mti_fsname,
1263                libcfs_nid2str(mti->mti_nids[0]), mti->mti_stripe_index,
1264                mti->mti_flags);
1265
1266         /* we cannot ignore registration failure if MGS logs must be updated. */
1267         must_succeed = !!(lsi->lsi_flags &
1268                     (LDD_F_NEED_INDEX | LDD_F_UPDATE | LDD_F_WRITECONF |
1269                      LDD_F_VIRGIN));
1270         mti->mti_flags |= LDD_F_OPC_REG;
1271
1272 again:
1273         /* Register the target */
1274         /* FIXME use mgc_process_config instead */
1275         rc = obd_set_info_async(NULL, mgc->u.cli.cl_mgc_mgsexp,
1276                                 sizeof(KEY_REGISTER_TARGET),
1277                                 KEY_REGISTER_TARGET,
1278                                 sizeof(*mti), mti, NULL);
1279         if (rc < 0) {
1280                 if (mti->mti_flags & LDD_F_ERROR) {
1281                         LCONSOLE_ERROR_MSG(0x160,
1282                                            "%s: the MGS refuses to allow this server to start: rc = %d. Please see messages on the MGS.\n",
1283                                            lsi->lsi_svname, rc);
1284                 } else if (must_succeed) {
1285                         if ((rc == -ESHUTDOWN || rc == -EIO) && ++tried < 5) {
1286                                 /* The connection with MGS is not established.
1287                                  * Try again after 2 seconds. Interruptable.
1288                                  */
1289                                 schedule_timeout_interruptible(cfs_time_seconds(2));
1290                                 if (!signal_pending(current))
1291                                         goto again;
1292                         }
1293
1294                         LCONSOLE_ERROR_MSG(0x15f,
1295                                            "%s: cannot register this server with the MGS: rc = %d. Is the MGS running?\n",
1296                                            lsi->lsi_svname, rc);
1297                 } else {
1298                         CDEBUG(D_HA,
1299                                "%s: error registering with the MGS: rc = %d (not fatal)\n",
1300                                lsi->lsi_svname, rc);
1301                         /* reset the error code for non-fatal error. */
1302                         rc = 0;
1303                 }
1304                 GOTO(out, rc);
1305         }
1306
1307 out:
1308         if (mti)
1309                 OBD_FREE_PTR(mti);
1310         RETURN(rc);
1311 }
1312
1313 /**
1314  * Notify the MGS that this target is ready.
1315  * Used by IR - if the MGS receives this message, it will notify clients.
1316  */
1317 static int server_notify_target(struct super_block *sb, struct obd_device *obd)
1318 {
1319         struct lustre_sb_info *lsi = s2lsi(sb);
1320         struct obd_device *mgc = lsi->lsi_mgc;
1321         struct mgs_target_info *mti = NULL;
1322         int rc;
1323
1324         ENTRY;
1325         LASSERT(mgc);
1326
1327         if (!(IS_SERVER(lsi)))
1328                 RETURN(-EINVAL);
1329
1330         OBD_ALLOC_PTR(mti);
1331         if (!mti)
1332                 RETURN(-ENOMEM);
1333         rc = server_lsi2mti(lsi, mti);
1334         if (rc < 0)
1335                 GOTO(out, rc);
1336
1337         mti->mti_instance = obd->u.obt.obt_instance;
1338         mti->mti_flags |= LDD_F_OPC_READY;
1339
1340         /* FIXME use mgc_process_config instead */
1341         rc = obd_set_info_async(NULL, mgc->u.cli.cl_mgc_mgsexp,
1342                                 sizeof(KEY_REGISTER_TARGET),
1343                                 KEY_REGISTER_TARGET,
1344                                 sizeof(*mti), mti, NULL);
1345
1346         /* Imperative recovery: if the mgs informs us to use IR? */
1347         if (!rc && !(mti->mti_flags & LDD_F_ERROR) &&
1348             (mti->mti_flags & LDD_F_IR_CAPABLE))
1349                 lsi->lsi_flags |= LDD_F_IR_CAPABLE;
1350
1351 out:
1352         if (mti)
1353                 OBD_FREE_PTR(mti);
1354         RETURN(rc);
1355
1356 }
1357
1358 /* Start server targets: MDTs and OSTs */
1359 static int server_start_targets(struct super_block *sb)
1360 {
1361         struct obd_device *obd;
1362         struct lustre_sb_info *lsi = s2lsi(sb);
1363         struct config_llog_instance cfg;
1364         struct lu_env mgc_env;
1365         struct lu_device *dev;
1366         char *name_service, *obd_name_service = NULL;
1367         struct obd_type *type = NULL;
1368         int rc;
1369
1370         ENTRY;
1371         CDEBUG(D_MOUNT, "starting target %s\n", lsi->lsi_svname);
1372
1373         LASSERTF(IS_MDT(lsi) || IS_OST(lsi), "designed for MDT or OST only\n");
1374
1375         if (IS_MDT(lsi)) {
1376                 obd_name_service = LUSTRE_MDS_OBDNAME;
1377                 name_service = LUSTRE_MDS_NAME;
1378         } else {
1379                 obd_name_service = LUSTRE_OSS_OBDNAME;
1380                 name_service = LUSTRE_OSS_NAME;
1381         }
1382
1383         /* make sure MDS/OSS is started */
1384         mutex_lock(&server_start_lock);
1385         obd = class_name2obd(obd_name_service);
1386         if (!obd) {
1387                 rc = lustre_start_simple(obd_name_service, name_service,
1388                                          (IS_MDT(lsi) ?
1389                                           LUSTRE_MDS_OBDNAME"_uuid" :
1390                                           LUSTRE_OSS_OBDNAME"_uuid"),
1391                                          NULL, NULL, NULL, NULL);
1392                 if (rc < 0) {
1393                         mutex_unlock(&server_start_lock);
1394                         CERROR("failed to start %s: %d\n",
1395                                obd_name_service, rc);
1396                         RETURN(rc);
1397                 }
1398         }
1399         /* hold a type reference and put it at server_stop_servers */
1400         type = class_get_type(IS_MDT(lsi) ?
1401                               LUSTRE_MDT_NAME : LUSTRE_OST_NAME);
1402         if (!type) {
1403                 mutex_unlock(&server_start_lock);
1404                 GOTO(out_stop_service, rc = -ENODEV);
1405         }
1406         lsi->lsi_server_started = 1;
1407         mutex_unlock(&server_start_lock);
1408         if (OBD_FAIL_PRECHECK(OBD_FAIL_OBD_STOP_MDS_RACE) &&
1409             IS_MDT(lsi)) {
1410                 OBD_RACE(OBD_FAIL_OBD_STOP_MDS_RACE);
1411                 msleep(2 * MSEC_PER_SEC);
1412         }
1413
1414         rc = lu_env_init(&mgc_env, LCT_MG_THREAD);
1415         if (rc != 0)
1416                 GOTO(out_stop_service, rc);
1417
1418         /* Set the mgc fs to our server disk.  This allows the MGC to
1419          * read and write configs locally, in case it can't talk to the MGS.
1420          */
1421         rc = server_mgc_set_fs(&mgc_env, lsi->lsi_mgc, sb);
1422         if (rc < 0)
1423                 GOTO(out_env, rc);
1424
1425         /* Register with MGS */
1426         rc = server_register_target(lsi);
1427         if (rc < 0)
1428                 GOTO(out_mgc, rc);
1429
1430         /* Let the target look up the mount using the target's name
1431          * (we can't pass the sb or mnt through class_process_config.)
1432          */
1433         rc = server_register_mount(lsi->lsi_svname, sb);
1434         if (rc < 0)
1435                 GOTO(out_mgc, rc);
1436
1437         /* Start targets using the llog named for the target */
1438         memset(&cfg, 0, sizeof(cfg));
1439         cfg.cfg_callback = class_config_llog_handler;
1440         cfg.cfg_sub_clds = CONFIG_SUB_SERVER;
1441         rc = lustre_process_log(sb, lsi->lsi_svname, &cfg);
1442         if (rc < 0) {
1443                 CERROR("failed to start server %s: %d\n",
1444                        lsi->lsi_svname, rc);
1445                 /* Do NOT call server_deregister_mount() here. This makes it
1446                  * impossible to find mount later in cleanup time and leaves
1447                  * @lsi and othder stuff leaked. -umka
1448                  */
1449                 GOTO(out_mgc, rc);
1450         }
1451
1452         obd = class_name2obd(lsi->lsi_svname);
1453         if (!obd) {
1454                 CERROR("no server named %s was started\n", lsi->lsi_svname);
1455                 GOTO(out_mgc, rc = -ENXIO);
1456         }
1457
1458         if (IS_OST(lsi) || IS_MDT(lsi)) {
1459                 rc = lustre_start_lwp(sb);
1460                 if (rc < 0) {
1461                         CERROR("%s: failed to start LWP: %d\n",
1462                                lsi->lsi_svname, rc);
1463                         GOTO(out_mgc, rc);
1464                 }
1465         }
1466
1467         server_notify_target(sb, obd);
1468
1469         /* calculate recovery timeout, do it after lustre_process_log */
1470         server_calc_timeout(lsi, obd);
1471
1472         /* log has been fully processed, let clients connect */
1473         dev = obd->obd_lu_dev;
1474         if (dev && dev->ld_ops->ldo_prepare) {
1475                 struct lu_env env;
1476
1477                 rc = lu_env_init(&env, dev->ld_type->ldt_ctx_tags);
1478                 if (rc == 0) {
1479                         struct lu_context  session_ctx;
1480
1481                         lu_context_init(&session_ctx, LCT_SERVER_SESSION);
1482                         session_ctx.lc_thread = NULL;
1483                         lu_context_enter(&session_ctx);
1484                         env.le_ses = &session_ctx;
1485
1486                         rc = dev->ld_ops->ldo_prepare(&env, NULL, dev);
1487
1488                         lu_env_fini(&env);
1489                         lu_context_exit(&session_ctx);
1490                         lu_context_fini(&session_ctx);
1491                 }
1492         }
1493
1494         /* abort recovery only on the complete stack:
1495          * many devices can be involved
1496          */
1497         if ((lsi->lsi_lmd->lmd_flags &
1498              (LMD_FLG_ABORT_RECOV | LMD_FLG_ABORT_RECOV_MDT)) &&
1499             (OBP(obd, iocontrol))) {
1500                 struct obd_ioctl_data karg = {
1501                         .ioc_type = lsi->lsi_lmd->lmd_flags,
1502                 };
1503
1504                 obd_iocontrol(OBD_IOC_ABORT_RECOVERY, obd->obd_self_export, 0,
1505                               &karg, NULL);
1506         }
1507
1508 out_mgc:
1509         /* Release the mgc fs for others to use */
1510         server_mgc_clear_fs(&mgc_env, lsi->lsi_mgc);
1511 out_env:
1512         lu_env_fini(&mgc_env);
1513 out_stop_service:
1514         /* in case of error upper function call
1515          * server_put_super->server_stop_servers()
1516          */
1517
1518         RETURN(rc);
1519 }
1520
1521 static int lsi_prepare(struct lustre_sb_info *lsi)
1522 {
1523         const char *osd_type;
1524         const char *fstype;
1525         u32 index;
1526         int rc;
1527
1528         ENTRY;
1529         LASSERT(lsi);
1530         LASSERT(lsi->lsi_lmd);
1531
1532         /* The server name is given as a mount line option */
1533         if (!lsi->lsi_lmd->lmd_profile) {
1534                 LCONSOLE_ERROR("Can't determine server name\n");
1535                 RETURN(-EINVAL);
1536         }
1537
1538         /* Determine osd type */
1539         if (!lsi->lsi_lmd->lmd_osd_type) {
1540                 osd_type = LUSTRE_OSD_LDISKFS_NAME;
1541                 fstype = "ldiskfs";
1542         } else {
1543                 osd_type = lsi->lsi_lmd->lmd_osd_type;
1544                 fstype = lsi->lsi_lmd->lmd_osd_type;
1545         }
1546
1547         if (strlen(lsi->lsi_lmd->lmd_profile) >= sizeof(lsi->lsi_svname) ||
1548             strlen(osd_type) >= sizeof(lsi->lsi_osd_type) ||
1549             strlen(fstype) >= sizeof(lsi->lsi_fstype))
1550                 RETURN(-ENAMETOOLONG);
1551
1552         strlcpy(lsi->lsi_svname, lsi->lsi_lmd->lmd_profile,
1553                 sizeof(lsi->lsi_svname));
1554         strlcpy(lsi->lsi_osd_type, osd_type, sizeof(lsi->lsi_osd_type));
1555         /* XXX: a temp. solution for components using ldiskfs
1556          *      to be removed in one of the subsequent patches
1557          */
1558         strlcpy(lsi->lsi_fstype, fstype, sizeof(lsi->lsi_fstype));
1559
1560         /* Determine server type */
1561         rc = server_name2index(lsi->lsi_svname, &index, NULL);
1562         if (rc < 0) {
1563                 if (lsi->lsi_lmd->lmd_flags & LMD_FLG_MGS) {
1564                         /* Assume we're a bare MGS */
1565                         rc = 0;
1566                         lsi->lsi_lmd->lmd_flags |= LMD_FLG_NOSVC;
1567                 } else {
1568                         LCONSOLE_ERROR("Can't determine server type of '%s'\n",
1569                                        lsi->lsi_svname);
1570                         RETURN(rc);
1571                 }
1572         }
1573         lsi->lsi_flags |= rc;
1574
1575         /* Add mount line flags that used to be in ldd:
1576          * writeconf, mgs, anything else?
1577          */
1578         lsi->lsi_flags |= (lsi->lsi_lmd->lmd_flags & LMD_FLG_WRITECONF) ?
1579                 LDD_F_WRITECONF : 0;
1580         lsi->lsi_flags |= (lsi->lsi_lmd->lmd_flags & LMD_FLG_NO_LOCAL_LOGS) ?
1581                 LDD_F_NO_LOCAL_LOGS : 0;
1582         lsi->lsi_flags |= (lsi->lsi_lmd->lmd_flags & LMD_FLG_VIRGIN) ?
1583                 LDD_F_VIRGIN : 0;
1584         lsi->lsi_flags |= (lsi->lsi_lmd->lmd_flags & LMD_FLG_UPDATE) ?
1585                 LDD_F_UPDATE : 0;
1586         lsi->lsi_flags |= (lsi->lsi_lmd->lmd_flags & LMD_FLG_MGS) ?
1587                 LDD_F_SV_TYPE_MGS : 0;
1588         lsi->lsi_flags |= (lsi->lsi_lmd->lmd_flags & LMD_FLG_NO_PRIMNODE) ?
1589                 LDD_F_NO_PRIMNODE : 0;
1590
1591         RETURN(0);
1592 }
1593
1594 /*************** server mount ******************/
1595
1596 /** Start the shutdown of servers at umount.
1597  */
1598 static void server_put_super(struct super_block *sb)
1599 {
1600         struct lustre_sb_info *lsi = s2lsi(sb);
1601         struct obd_device *obd;
1602         char *tmpname, *extraname = NULL;
1603         int tmpname_sz;
1604         int lsiflags = lsi->lsi_flags;
1605         bool stop_servers = lsi->lsi_server_started;
1606
1607         ENTRY;
1608         LASSERT(IS_SERVER(lsi));
1609
1610         tmpname_sz = strlen(lsi->lsi_svname) + 1;
1611         OBD_ALLOC(tmpname, tmpname_sz);
1612         memcpy(tmpname, lsi->lsi_svname, tmpname_sz);
1613         CDEBUG(D_MOUNT, "server put_super %s\n", tmpname);
1614         if (IS_MDT(lsi) && (lsi->lsi_lmd->lmd_flags & LMD_FLG_NOSVC))
1615                 snprintf(tmpname, tmpname_sz, "MGS");
1616
1617         /* disconnect the lwp first to drain off the inflight request */
1618         if (IS_OST(lsi) || IS_MDT(lsi)) {
1619                 int     rc;
1620
1621                 rc = lustre_disconnect_lwp(sb);
1622                 if (rc != 0 && rc != -ETIMEDOUT &&
1623                     rc != -ENOTCONN && rc != -ESHUTDOWN)
1624                         CWARN("%s: failed to disconnect lwp: rc= %d\n",
1625                               tmpname, rc);
1626         }
1627
1628         /* Stop the target */
1629         if (!(lsi->lsi_lmd->lmd_flags & LMD_FLG_NOSVC) &&
1630             (IS_MDT(lsi) || IS_OST(lsi))) {
1631                 struct lustre_profile *lprof = NULL;
1632
1633                 /* tell the mgc to drop the config log */
1634                 lustre_end_log(sb, lsi->lsi_svname, NULL);
1635
1636                 /* COMPAT_146 - profile may get deleted in mgc_cleanup.
1637                  * If there are any setup/cleanup errors, save the lov
1638                  * name for safety cleanup later.
1639                  */
1640                 lprof = class_get_profile(lsi->lsi_svname);
1641                 if (lprof) {
1642                         if (lprof->lp_dt) {
1643                                 OBD_ALLOC(extraname, strlen(lprof->lp_dt) + 1);
1644                                 strncpy(extraname, lprof->lp_dt,
1645                                         strlen(lprof->lp_dt) + 1);
1646                         }
1647                         class_put_profile(lprof);
1648                 }
1649
1650                 obd = class_name2obd(lsi->lsi_svname);
1651                 if (obd) {
1652                         CDEBUG(D_MOUNT, "stopping %s\n", obd->obd_name);
1653                         if (lsiflags & LSI_UMOUNT_FAILOVER)
1654                                 obd->obd_fail = 1;
1655                         /* We can't seem to give an error return code
1656                          * to .put_super, so we better make sure we clean up!
1657                          */
1658                         obd->obd_force = 1;
1659                         class_manual_cleanup(obd);
1660                         if (OBD_FAIL_PRECHECK(OBD_FAIL_OBD_STOP_MDS_RACE)) {
1661                                 int idx;
1662
1663                                 server_name2index(lsi->lsi_svname, &idx, NULL);
1664                                 /* sleeping for MDT0001 */
1665                                 if (idx == 1)
1666                                         OBD_RACE(OBD_FAIL_OBD_STOP_MDS_RACE);
1667                         }
1668                 } else {
1669                         CERROR("no obd %s\n", lsi->lsi_svname);
1670                         server_deregister_mount(lsi->lsi_svname);
1671                 }
1672         }
1673
1674         /* If they wanted the mgs to stop separately from the mdt, they
1675          * should have put it on a different device.
1676          */
1677         if (IS_MGS(lsi)) {
1678                 /* if MDS start with --nomgs, don't stop MGS then */
1679                 if (!(lsi->lsi_lmd->lmd_flags & LMD_FLG_NOMGS))
1680                         server_stop_mgs(sb);
1681         }
1682
1683         if (IS_OST(lsi) || IS_MDT(lsi)) {
1684                 if (lustre_stop_lwp(sb) < 0)
1685                         CERROR("%s: failed to stop lwp!\n", tmpname);
1686         }
1687
1688         /* Clean the mgc and sb */
1689         lustre_common_put_super(sb);
1690
1691         /* wait till all in-progress cleanups are done
1692          * specifically we're interested in ofd cleanup
1693          * as it pins OSS
1694          */
1695         obd_zombie_barrier();
1696
1697         /* Stop the servers (MDS, OSS) if no longer needed.  We must wait
1698          * until the target is really gone so that our type refcount check
1699          * is right.
1700          */
1701         if (stop_servers)
1702                 server_stop_servers(lsiflags);
1703
1704         /* In case of startup or cleanup err, stop related obds */
1705         if (extraname) {
1706                 obd = class_name2obd(extraname);
1707                 if (obd) {
1708                         CWARN("Cleaning orphaned obd %s\n", extraname);
1709                         obd->obd_force = 1;
1710                         class_manual_cleanup(obd);
1711                 }
1712                 OBD_FREE(extraname, strlen(extraname) + 1);
1713         }
1714
1715         LCONSOLE_WARN("server umount %s complete\n", tmpname);
1716         OBD_FREE(tmpname, tmpname_sz);
1717         EXIT;
1718 }
1719
1720 /* Called only for 'umount -f' */
1721 static void server_umount_begin(struct super_block *sb)
1722 {
1723         struct lustre_sb_info *lsi = s2lsi(sb);
1724
1725         ENTRY;
1726         CDEBUG(D_MOUNT, "umount -f\n");
1727         /* umount = failover
1728          * umount -f = force
1729          * no third way to do non-force, non-failover
1730          */
1731         lsi->lsi_flags &= ~LSI_UMOUNT_FAILOVER;
1732         EXIT;
1733 }
1734
1735 static int server_statfs(struct dentry *dentry, struct kstatfs *buf)
1736 {
1737         struct super_block *sb = dentry->d_sb;
1738         struct lustre_sb_info *lsi = s2lsi(sb);
1739         struct obd_statfs statfs;
1740         int rc;
1741
1742         ENTRY;
1743         if (lsi->lsi_dt_dev) {
1744                 rc = dt_statfs(NULL, lsi->lsi_dt_dev, &statfs);
1745                 if (rc == 0) {
1746                         statfs_unpack(buf, &statfs);
1747                         buf->f_type = sb->s_magic;
1748                         RETURN(0);
1749                 }
1750         }
1751
1752         /* just return 0 */
1753         buf->f_type = sb->s_magic;
1754         buf->f_bsize = sb->s_blocksize;
1755         buf->f_blocks = 1;
1756         buf->f_bfree = 0;
1757         buf->f_bavail = 0;
1758         buf->f_files = 1;
1759         buf->f_ffree = 0;
1760         buf->f_namelen = NAME_MAX;
1761         RETURN(0);
1762 }
1763
1764 int server_show_options(struct seq_file *seq, struct dentry *dentry)
1765 {
1766         struct lustre_sb_info *lsi;
1767         struct lustre_mount_data *lmd;
1768
1769         LASSERT(seq && dentry);
1770         lsi = s2lsi(dentry->d_sb);
1771         lmd = lsi->lsi_lmd;
1772         seq_printf(seq, ",svname=%s", lmd->lmd_profile);
1773
1774         if  (lmd->lmd_flags & LMD_FLG_ABORT_RECOV)
1775                 seq_puts(seq, ",abort_recov");
1776
1777         if (lmd->lmd_flags & LMD_FLG_NOIR)
1778                 seq_puts(seq, ",noir");
1779
1780         if (lmd->lmd_flags & LMD_FLG_NOSVC)
1781                 seq_puts(seq, ",nosvc");
1782
1783         if (lmd->lmd_flags & LMD_FLG_NOMGS)
1784                 seq_puts(seq, ",nomgs");
1785
1786         if (lmd->lmd_flags & LMD_FLG_NOSCRUB)
1787                 seq_puts(seq, ",noscrub");
1788         if (lmd->lmd_flags & LMD_FLG_SKIP_LFSCK)
1789                 seq_puts(seq, ",skip_lfsck");
1790
1791         if (lmd->lmd_flags & LMD_FLG_DEV_RDONLY)
1792                 seq_puts(seq, ",rdonly_dev");
1793
1794         if (lmd->lmd_flags & LMD_FLG_MGS)
1795                 seq_puts(seq, ",mgs");
1796
1797         if (lmd->lmd_mgs)
1798                 seq_printf(seq, ",mgsnode=%s", lmd->lmd_mgs);
1799
1800         if (lmd->lmd_osd_type)
1801                 seq_printf(seq, ",osd=%s", lmd->lmd_osd_type);
1802
1803         if (lmd->lmd_opts) {
1804                 seq_putc(seq, ',');
1805                 seq_puts(seq, lmd->lmd_opts);
1806         }
1807
1808         RETURN(0);
1809 }
1810
1811 /** The operations we support directly on the superblock:
1812  * mount, umount, and df.
1813  */
1814 static const struct super_operations server_ops = {
1815         .put_super      = server_put_super,
1816         .umount_begin   = server_umount_begin, /* umount -f */
1817         .statfs         = server_statfs,
1818         .show_options   = server_show_options,
1819 };
1820
1821 /*
1822  * Xattr support for Lustre servers
1823  */
1824 #ifdef HAVE_IOP_XATTR
1825 static ssize_t lustre_getxattr(struct dentry *dentry, const char *name,
1826                                 void *buffer, size_t size)
1827 {
1828         if (!selinux_is_enabled())
1829                 return -EOPNOTSUPP;
1830         return -ENODATA;
1831 }
1832
1833 static int lustre_setxattr(struct dentry *dentry, const char *name,
1834                             const void *value, size_t size, int flags)
1835 {
1836         return -EOPNOTSUPP;
1837 }
1838 #endif
1839
1840 static ssize_t lustre_listxattr(struct dentry *d_entry, char *name,
1841                                 size_t size)
1842 {
1843         return -EOPNOTSUPP;
1844 }
1845
1846 static bool is_cmd_supported(unsigned int command)
1847 {
1848         switch (command) {
1849         case FITRIM:
1850                 return true;
1851         default:
1852                 return false;
1853         }
1854
1855         return false;
1856 }
1857
1858 static long server_ioctl(struct file *filp, unsigned int command,
1859                          unsigned long arg)
1860 {
1861         struct file active_filp;
1862         struct inode *inode = file_inode(filp);
1863         struct lustre_sb_info *lsi = s2lsi(inode->i_sb);
1864         struct super_block *dd_sb = dt_mnt_sb_get(lsi->lsi_dt_dev);
1865         struct inode *active_inode;
1866         int err = -EOPNOTSUPP;
1867
1868         if (IS_ERR(dd_sb) || !is_cmd_supported(command))
1869                 return err;
1870
1871         active_inode = igrab(dd_sb->s_root->d_inode);
1872         if (!active_inode)
1873                 return -EACCES;
1874
1875         active_filp.f_inode = active_inode;
1876         if (active_inode->i_fop && active_inode->i_fop->unlocked_ioctl)
1877                 err = active_inode->i_fop->unlocked_ioctl(&active_filp,
1878                                                           command, arg);
1879         iput(active_inode);
1880         return err;
1881 }
1882
1883 static const struct inode_operations server_inode_operations = {
1884 #ifdef HAVE_IOP_XATTR
1885         .setxattr       = lustre_setxattr,
1886         .getxattr       = lustre_getxattr,
1887 #endif
1888         .listxattr      = lustre_listxattr,
1889 };
1890
1891 static const struct file_operations server_file_operations = {
1892         .unlocked_ioctl = server_ioctl,
1893 };
1894
1895 #define log2(n) ffz(~(n))
1896 #define LUSTRE_SUPER_MAGIC 0x0BD00BD1
1897
1898 static int server_fill_super_common(struct super_block *sb)
1899 {
1900         struct inode *root = NULL;
1901
1902         ENTRY;
1903         CDEBUG(D_MOUNT, "Server sb, dev=%d\n", (int)sb->s_dev);
1904
1905         sb->s_blocksize = 4096;
1906         sb->s_blocksize_bits = log2(sb->s_blocksize);
1907         sb->s_magic = LUSTRE_SUPER_MAGIC;
1908         sb->s_maxbytes = 0; /* we don't allow file IO on server mountpoints */
1909         sb->s_flags |= SB_RDONLY;
1910         sb->s_op = &server_ops;
1911
1912         root = new_inode(sb);
1913         if (!root) {
1914                 CERROR("Can't make root inode\n");
1915                 RETURN(-EIO);
1916         }
1917
1918         /* returns -EIO for every operation */
1919         /* make_bad_inode(root); -- badness - can't umount */
1920         /* apparently we need to be a directory for the mount to finish */
1921         root->i_mode = S_IFDIR;
1922         root->i_op = &server_inode_operations;
1923         root->i_fop = &server_file_operations;
1924         sb->s_root = d_make_root(root);
1925         if (!sb->s_root) {
1926                 CERROR("%s: can't make root dentry\n", sb->s_id);
1927                 RETURN(-EIO);
1928         }
1929
1930         RETURN(0);
1931 }
1932
1933 static int osd_start(struct lustre_sb_info *lsi, unsigned long mflags)
1934 {
1935         struct lustre_mount_data *lmd = lsi->lsi_lmd;
1936         struct obd_device *obd;
1937         struct dt_device_param p;
1938         char flagstr[20 + 1 + 10 + 1];
1939         int rc;
1940
1941         ENTRY;
1942         CDEBUG(D_MOUNT,
1943                "Attempting to start %s, type=%s, lsifl=%x, mountfl=%lx\n",
1944                lsi->lsi_svname, lsi->lsi_osd_type, lsi->lsi_flags, mflags);
1945
1946         sprintf(lsi->lsi_osd_obdname, "%s-osd", lsi->lsi_svname);
1947         strcpy(lsi->lsi_osd_uuid, lsi->lsi_osd_obdname);
1948         strcat(lsi->lsi_osd_uuid, "_UUID");
1949         snprintf(flagstr, sizeof(flagstr), "%lu:%u", mflags, lmd->lmd_flags);
1950
1951         obd = class_name2obd(lsi->lsi_osd_obdname);
1952         if (!obd) {
1953                 rc = lustre_start_simple(lsi->lsi_osd_obdname,
1954                                          lsi->lsi_osd_type,
1955                                          lsi->lsi_osd_uuid, lmd->lmd_dev,
1956                                          flagstr, lsi->lsi_lmd->lmd_opts,
1957                                          lsi->lsi_svname);
1958                 if (rc < 0)
1959                         GOTO(out, rc);
1960                 obd = class_name2obd(lsi->lsi_osd_obdname);
1961                 LASSERT(obd);
1962         } else {
1963                 CDEBUG(D_MOUNT, "%s already started\n", lsi->lsi_osd_obdname);
1964                 /* but continue setup to allow special case of MDT and internal
1965                  * MGT being started separately.
1966                  */
1967                 if (!((IS_MGS(lsi) && (lsi->lsi_lmd->lmd_flags &
1968                                       LMD_FLG_NOMGS)) ||
1969                      (IS_MDT(lsi) && (lsi->lsi_lmd->lmd_flags &
1970                                       LMD_FLG_NOSVC))))
1971                         RETURN(-EALREADY);
1972         }
1973
1974         rc = obd_connect(NULL, &lsi->lsi_osd_exp,
1975                          obd, &obd->obd_uuid, NULL, NULL);
1976
1977         if (rc < 0) {
1978                 obd->obd_force = 1;
1979                 class_manual_cleanup(obd);
1980                 lsi->lsi_dt_dev = NULL;
1981                 RETURN(rc);
1982         }
1983
1984         LASSERT(obd->obd_lu_dev);
1985         lu_device_get(obd->obd_lu_dev);
1986         lsi->lsi_dt_dev = lu2dt_dev(obd->obd_lu_dev);
1987         LASSERT(lsi->lsi_dt_dev);
1988
1989         /* set disk context for llog usage */
1990         OBD_SET_CTXT_MAGIC(&obd->obd_lvfs_ctxt);
1991         obd->obd_lvfs_ctxt.dt = lsi->lsi_dt_dev;
1992
1993         dt_conf_get(NULL, lsi->lsi_dt_dev, &p);
1994 out:
1995         RETURN(rc);
1996 }
1997
1998 /** Fill in the superblock info for a Lustre server.
1999  * Mount the device with the correct options.
2000  * Read the on-disk config file.
2001  * Start the services.
2002  */
2003 int server_fill_super(struct super_block *sb)
2004 {
2005         struct lustre_sb_info *lsi = s2lsi(sb);
2006         int rc;
2007
2008         ENTRY;
2009         /* to simulate target mount race */
2010         OBD_RACE(OBD_FAIL_TGT_MOUNT_RACE);
2011
2012         rc = lsi_prepare(lsi);
2013         if (rc < 0) {
2014                 lustre_put_lsi(sb);
2015                 RETURN(rc);
2016         }
2017
2018         /* Start low level OSD */
2019         rc = osd_start(lsi, sb->s_flags);
2020         if (rc < 0) {
2021                 CERROR("Unable to start osd on %s: %d\n",
2022                        lsi->lsi_lmd->lmd_dev, rc);
2023                 lustre_put_lsi(sb);
2024                 RETURN(rc);
2025         }
2026
2027         CDEBUG(D_MOUNT, "Found service %s on device %s\n",
2028                lsi->lsi_svname, lsi->lsi_lmd->lmd_dev);
2029
2030         if (class_name2obd(lsi->lsi_svname)) {
2031                 LCONSOLE_ERROR_MSG(0x161,
2032                                    "The target named %s is already running. Double-mount may have compromised the disk journal.\n",
2033                                    lsi->lsi_svname);
2034                 lustre_put_lsi(sb);
2035                 RETURN(-EALREADY);
2036         }
2037
2038         /* Start MGS before MGC */
2039         if (IS_MGS(lsi) && !(lsi->lsi_lmd->lmd_flags & LMD_FLG_NOMGS)) {
2040                 rc = server_start_mgs(sb);
2041                 if (rc < 0)
2042                         GOTO(out_mnt, rc);
2043         }
2044
2045         /* Start MGC before servers */
2046         rc = lustre_start_mgc(sb);
2047         if (rc < 0)
2048                 GOTO(out_mnt, rc);
2049
2050         /* Set up all obd devices for service */
2051         if (!(lsi->lsi_lmd->lmd_flags & LMD_FLG_NOSVC) &&
2052             (IS_OST(lsi) || IS_MDT(lsi))) {
2053                 rc = server_start_targets(sb);
2054                 if (rc < 0) {
2055                         CERROR("Unable to start targets: %d\n", rc);
2056                         GOTO(out_mnt, rc);
2057                 }
2058                 /* FIXME overmount client here, or can we just start a
2059                  * client log and client_fill_super on this sb?  We
2060                  * need to make sure server_put_super gets called too
2061                  * - ll_put_super calls lustre_common_put_super; check
2062                  * there for LSI_SERVER flag, call s_p_s if so.
2063                  *
2064                  * Probably should start client from new thread so we
2065                  * can return.  Client will not finish until all
2066                  * servers are connected.  Note - MGS-only server does
2067                  * NOT get a client, since there is no lustre fs
2068                  * associated - the MGS is for all lustre fs's
2069                  */
2070         }
2071
2072         rc = server_fill_super_common(sb);
2073         if (rc < 0)
2074                 GOTO(out_mnt, rc);
2075
2076         RETURN(0);
2077 out_mnt:
2078         /* We jump here in case of failure while starting targets or MGS.
2079          * In this case we can't just put @mnt and have to do real cleanup
2080          * with stoping targets, etc.
2081          */
2082         server_put_super(sb);
2083         return rc;
2084 }
2085 EXPORT_SYMBOL(server_fill_super);
2086
2087 /*
2088  * Calculate timeout value for a target.
2089  */
2090 void server_calc_timeout(struct lustre_sb_info *lsi, struct obd_device *obd)
2091 {
2092         struct lustre_mount_data *lmd;
2093         int soft = 0;
2094         int hard = 0;
2095         int factor = 0;
2096         bool has_ir = !!(lsi->lsi_flags & LDD_F_IR_CAPABLE);
2097         int min = OBD_RECOVERY_TIME_MIN;
2098
2099         LASSERT(IS_SERVER(lsi));
2100
2101         lmd = lsi->lsi_lmd;
2102         if (lmd) {
2103                 soft   = lmd->lmd_recovery_time_soft;
2104                 hard   = lmd->lmd_recovery_time_hard;
2105                 has_ir = has_ir && !(lmd->lmd_flags & LMD_FLG_NOIR);
2106                 obd->obd_no_ir = !has_ir;
2107         }
2108
2109         if (soft == 0)
2110                 soft = OBD_RECOVERY_TIME_SOFT;
2111         if (hard == 0)
2112                 hard = OBD_RECOVERY_TIME_HARD;
2113
2114         /* target may have ir_factor configured. */
2115         factor = OBD_IR_FACTOR_DEFAULT;
2116         if (obd->obd_recovery_ir_factor)
2117                 factor = obd->obd_recovery_ir_factor;
2118
2119         if (has_ir) {
2120                 int new_soft = soft;
2121
2122                 /* adjust timeout value by imperative recovery */
2123                 new_soft = (soft * factor) / OBD_IR_FACTOR_MAX;
2124                 /* make sure the timeout is not too short */
2125                 new_soft = max(min, new_soft);
2126
2127                 LCONSOLE_INFO("%s: Imperative Recovery enabled, recovery window shrunk from %d-%d down to %d-%d\n",
2128                               obd->obd_name, soft, hard, new_soft, hard);
2129
2130                 soft = new_soft;
2131         } else {
2132                 LCONSOLE_INFO("%s: Imperative Recovery not enabled, recovery window %d-%d\n",
2133                               obd->obd_name, soft, hard);
2134         }
2135
2136         /* we're done */
2137         obd->obd_recovery_timeout = max_t(time64_t, obd->obd_recovery_timeout,
2138                                           soft);
2139         obd->obd_recovery_time_hard = hard;
2140         obd->obd_recovery_ir_factor = factor;
2141 }
2142
2143 /**
2144  * This is the entry point for the mount call into Lustre.
2145  * This is called when a server target is mounted,
2146  * and this is where we start setting things up.
2147  * @param data Mount options (e.g. -o flock,abort_recov)
2148  */
2149 static int lustre_tgt_fill_super(struct super_block *sb, void *lmd2_data,
2150                                  int silent)
2151 {
2152         struct lustre_mount_data *lmd;
2153         struct lustre_sb_info *lsi;
2154         int rc;
2155
2156         ENTRY;
2157         CDEBUG(D_MOUNT|D_VFSTRACE, "VFS Op: sb %p\n", sb);
2158
2159         lsi = lustre_init_lsi(sb);
2160         if (!lsi)
2161                 RETURN(-ENOMEM);
2162         lmd = lsi->lsi_lmd;
2163
2164         /*
2165          * Disable lockdep during mount, because mount locking patterns are
2166          * 'special'.
2167          */
2168         lockdep_off();
2169
2170         /*
2171          * LU-639: the OBD cleanup of last mount may not finish yet, wait here.
2172          */
2173         obd_zombie_barrier();
2174
2175         /* Figure out the lmd from the mount options */
2176         if (lmd_parse(lmd2_data, lmd)) {
2177                 lustre_put_lsi(sb);
2178                 GOTO(out, rc = -EINVAL);
2179         }
2180
2181         if (lmd_is_client(lmd)) {
2182                 rc = -ENODEV;
2183                 CERROR("%s: attempting to mount a client with -t lustre_tgt' which is only for server-side mounts: rc = %d\n",
2184                        lmd->lmd_dev, rc);
2185                 lustre_put_lsi(sb);
2186                 GOTO(out, rc);
2187         }
2188
2189         CDEBUG(D_MOUNT, "Mounting server from %s\n", lmd->lmd_dev);
2190         rc = server_fill_super(sb);
2191         /*
2192          * server_fill_super calls lustre_start_mgc after the mount
2193          * because we need the MGS NIDs which are stored on disk.
2194          * Plus, we may need to start the MGS first.
2195          *
2196          * server_fill_super will call server_put_super on failure
2197          *
2198          * If error happens in fill_super() call, @lsi will be killed there.
2199          * This is why we do not put it here.
2200          */
2201 out:
2202         if (rc) {
2203                 CERROR("Unable to mount %s (%d)\n",
2204                        s2lsi(sb) ? lmd->lmd_dev : "", rc);
2205         } else {
2206                 CDEBUG(D_SUPER, "Mount %s complete\n",
2207                        lmd->lmd_dev);
2208         }
2209         lockdep_on();
2210         return rc;
2211 }
2212
2213 /***************** FS registration ******************/
2214 static struct dentry *lustre_tgt_mount(struct file_system_type *fs_type,
2215                                        int flags, const char *devname,
2216                                        void *data)
2217 {
2218         return mount_nodev(fs_type, flags, data, lustre_tgt_fill_super);
2219 }
2220
2221 /* Register the "lustre_tgt" fs type.
2222  *
2223  * Right now this isn't any different than the normal "lustre" filesystem
2224  * type, but it is added so that there is some compatibility to allow
2225  * changing documentation and scripts to start using the "lustre_tgt" type
2226  * at mount time. That will simplify test interop, and in case of upgrades
2227  * that change to the new type and then need to roll back for some reason.
2228  *
2229  * The long-term goal is to disentangle the client and server mount code.
2230  */
2231 static struct file_system_type lustre_tgt_fstype = {
2232         .owner          = THIS_MODULE,
2233         .name           = "lustre_tgt",
2234         .mount          = lustre_tgt_mount,
2235         .kill_sb        = kill_anon_super,
2236         .fs_flags       = FS_REQUIRES_DEV | FS_RENAME_DOES_D_MOVE,
2237 };
2238 MODULE_ALIAS_FS("lustre_tgt");
2239
2240 int lustre_tgt_register_fs(void)
2241 {
2242         return register_filesystem(&lustre_tgt_fstype);
2243 }
2244
2245 void lustre_tgt_unregister_fs(void)
2246 {
2247         unregister_filesystem(&lustre_tgt_fstype);
2248 }