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