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