Whamcloud - gitweb
LU-3101 mgs: deregister the mount for failed case
[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.sun.com/software/products/lustre/docs/GPLv2.pdf
19  *
20  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
21  * CA 95054 USA or visit www.sun.com if you need additional information or
22  * have any questions.
23  *
24  * GPL HEADER END
25  */
26 /*
27  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
28  * Use is subject to license terms.
29  *
30  * Copyright (c) 2013, Intel Corporation.
31  */
32 /*
33  * This file is part of Lustre, http://www.lustre.org/
34  * Lustre is a trademark of Sun Microsystems, Inc.
35  *
36  * lustre/obdclass/obd_mount_server.c
37  *
38  * Server mount routines
39  *
40  * Author: Nathan Rutman <nathan@clusterfs.com>
41  */
42
43
44 #define DEBUG_SUBSYSTEM S_CLASS
45 #define D_MOUNT (D_SUPER | D_CONFIG /* | D_WARNING */)
46 #define PRINT_CMD CDEBUG
47 #define PRINT_MASK (D_SUPER | D_CONFIG)
48
49 #include <obd.h>
50 #include <lvfs.h>
51 #include <lustre_fsfilt.h>
52 #include <obd_class.h>
53 #include <lustre/lustre_user.h>
54 #include <linux/version.h>
55 #include <lustre_log.h>
56 #include <lustre_disk.h>
57 #include <lustre_param.h>
58 #ifdef HAVE_KERNEL_LOCKED
59 #include <linux/smp_lock.h>
60 #endif
61
62 /*********** mount lookup *********/
63
64 DEFINE_MUTEX(lustre_mount_info_lock);
65 static CFS_LIST_HEAD(server_mount_info_list);
66
67 static struct lustre_mount_info *server_find_mount(const char *name)
68 {
69         cfs_list_t *tmp;
70         struct lustre_mount_info *lmi;
71         ENTRY;
72
73         cfs_list_for_each(tmp, &server_mount_info_list) {
74                 lmi = cfs_list_entry(tmp, struct lustre_mount_info,
75                                      lmi_list_chain);
76                 if (strcmp(name, lmi->lmi_name) == 0)
77                         RETURN(lmi);
78         }
79         RETURN(NULL);
80 }
81
82 /* we must register an obd for a mount before we call the setup routine.
83  *_setup will call lustre_get_mount to get the mnt struct
84  by obd_name, since we can't pass the pointer to setup. */
85 static int server_register_mount(const char *name, struct super_block *sb,
86                                  struct vfsmount *mnt)
87 {
88         struct lustre_mount_info *lmi;
89         char *name_cp;
90         ENTRY;
91
92         LASSERT(sb);
93
94         OBD_ALLOC(lmi, sizeof(*lmi));
95         if (!lmi)
96                 RETURN(-ENOMEM);
97         OBD_ALLOC(name_cp, strlen(name) + 1);
98         if (!name_cp) {
99                 OBD_FREE(lmi, sizeof(*lmi));
100                 RETURN(-ENOMEM);
101         }
102         strcpy(name_cp, name);
103
104         mutex_lock(&lustre_mount_info_lock);
105
106         if (server_find_mount(name)) {
107                 mutex_unlock(&lustre_mount_info_lock);
108                 OBD_FREE(lmi, sizeof(*lmi));
109                 OBD_FREE(name_cp, strlen(name) + 1);
110                 CERROR("Already registered %s\n", name);
111                 RETURN(-EEXIST);
112         }
113         lmi->lmi_name = name_cp;
114         lmi->lmi_sb = sb;
115         lmi->lmi_mnt = mnt;
116         cfs_list_add(&lmi->lmi_list_chain, &server_mount_info_list);
117
118         mutex_unlock(&lustre_mount_info_lock);
119
120         CDEBUG(D_MOUNT, "reg_mnt %p from %s\n", lmi->lmi_mnt, name);
121
122         RETURN(0);
123 }
124
125 /* when an obd no longer needs a mount */
126 static int server_deregister_mount(const char *name)
127 {
128         struct lustre_mount_info *lmi;
129         ENTRY;
130
131         mutex_lock(&lustre_mount_info_lock);
132         lmi = server_find_mount(name);
133         if (!lmi) {
134                 mutex_unlock(&lustre_mount_info_lock);
135                 CERROR("%s not registered\n", name);
136                 RETURN(-ENOENT);
137         }
138
139         CDEBUG(D_MOUNT, "dereg_mnt %p from %s\n", lmi->lmi_mnt, name);
140
141         OBD_FREE(lmi->lmi_name, strlen(lmi->lmi_name) + 1);
142         cfs_list_del(&lmi->lmi_list_chain);
143         OBD_FREE(lmi, sizeof(*lmi));
144         mutex_unlock(&lustre_mount_info_lock);
145
146         RETURN(0);
147 }
148
149 /* obd's look up a registered mount using their obdname. This is just
150    for initial obd setup to find the mount struct.  It should not be
151    called every time you want to mntget. */
152 struct lustre_mount_info *server_get_mount(const char *name)
153 {
154         struct lustre_mount_info *lmi;
155         struct lustre_sb_info *lsi;
156         ENTRY;
157
158         mutex_lock(&lustre_mount_info_lock);
159         lmi = server_find_mount(name);
160         mutex_unlock(&lustre_mount_info_lock);
161         if (!lmi) {
162                 CERROR("Can't find mount for %s\n", name);
163                 RETURN(NULL);
164         }
165         lsi = s2lsi(lmi->lmi_sb);
166
167         cfs_atomic_inc(&lsi->lsi_mounts);
168
169         CDEBUG(D_MOUNT, "get_mnt %p from %s, refs=%d\n", lmi->lmi_mnt,
170                name, cfs_atomic_read(&lsi->lsi_mounts));
171
172         RETURN(lmi);
173 }
174 EXPORT_SYMBOL(server_get_mount);
175
176 /*
177  * Used by mdt to get mount_info from obdname.
178  * There are no blocking when using the mount_info.
179  * Do not use server_get_mount for this purpose.
180  */
181 struct lustre_mount_info *server_get_mount_2(const char *name)
182 {
183         struct lustre_mount_info *lmi;
184         ENTRY;
185
186         mutex_lock(&lustre_mount_info_lock);
187         lmi = server_find_mount(name);
188         mutex_unlock(&lustre_mount_info_lock);
189         if (!lmi)
190                 CERROR("Can't find mount for %s\n", name);
191
192         RETURN(lmi);
193 }
194 EXPORT_SYMBOL(server_get_mount_2);
195
196 /* to be called from obd_cleanup methods */
197 int server_put_mount(const char *name, struct vfsmount *mnt)
198 {
199         struct lustre_mount_info *lmi;
200         struct lustre_sb_info *lsi;
201         ENTRY;
202
203         mutex_lock(&lustre_mount_info_lock);
204         lmi = server_find_mount(name);
205         mutex_unlock(&lustre_mount_info_lock);
206         if (!lmi) {
207                 CERROR("Can't find mount for %s\n", name);
208                 RETURN(-ENOENT);
209         }
210         lsi = s2lsi(lmi->lmi_sb);
211
212         CDEBUG(D_MOUNT, "put_mnt %p from %s, refs=%d\n",
213                lmi->lmi_mnt, name, cfs_atomic_read(&lsi->lsi_mounts));
214
215         if (lustre_put_lsi(lmi->lmi_sb))
216                 CDEBUG(D_MOUNT, "Last put of mnt %p from %s\n",
217                        lmi->lmi_mnt, name);
218
219         /* this obd should never need the mount again */
220         server_deregister_mount(name);
221
222         RETURN(0);
223 }
224 EXPORT_SYMBOL(server_put_mount);
225
226 /* Corresponding to server_get_mount_2 */
227 int server_put_mount_2(const char *name, struct vfsmount *mnt)
228 {
229         ENTRY;
230         RETURN(0);
231 }
232 EXPORT_SYMBOL(server_put_mount_2);
233
234 /* Set up a MGS to serve startup logs */
235 static int server_start_mgs(struct super_block *sb)
236 {
237         struct lustre_sb_info    *lsi = s2lsi(sb);
238         struct vfsmount   *mnt = lsi->lsi_srv_mnt;
239         struct lustre_mount_info *lmi;
240         int    rc = 0;
241         ENTRY;
242
243         /* It is impossible to have more than 1 MGS per node, since
244            MGC wouldn't know which to connect to */
245         lmi = server_find_mount(LUSTRE_MGS_OBDNAME);
246         if (lmi) {
247                 lsi = s2lsi(lmi->lmi_sb);
248                 LCONSOLE_ERROR_MSG(0x15d, "The MGS service was already started"
249                                    " from server\n");
250                 RETURN(-EALREADY);
251         }
252
253         CDEBUG(D_CONFIG, "Start MGS service %s\n", LUSTRE_MGS_OBDNAME);
254
255         rc = server_register_mount(LUSTRE_MGS_OBDNAME, sb, mnt);
256
257         if (!rc) {
258                 rc = lustre_start_simple(LUSTRE_MGS_OBDNAME, LUSTRE_MGS_NAME,
259                                          LUSTRE_MGS_OBDNAME, 0, 0,
260                                          lsi->lsi_osd_obdname, 0);
261                 /* server_deregister_mount() is not called previously, for lsi
262                  * and other stuff can't be freed cleanly when mgs calls
263                  * server_put_mount() in error handling case (see b=17758),
264                  * this problem is caused by a bug in mgs_init0, which forgot
265                  * calling server_put_mount in error case. */
266
267                 if (rc)
268                         server_deregister_mount(LUSTRE_MGS_OBDNAME);
269         }
270
271         if (rc)
272                 LCONSOLE_ERROR_MSG(0x15e, "Failed to start MGS '%s' (%d). "
273                                    "Is the 'mgs' module loaded?\n",
274                                    LUSTRE_MGS_OBDNAME, rc);
275         RETURN(rc);
276 }
277
278 static int server_stop_mgs(struct super_block *sb)
279 {
280         struct obd_device *obd;
281         int rc;
282         ENTRY;
283
284         CDEBUG(D_MOUNT, "Stop MGS service %s\n", LUSTRE_MGS_OBDNAME);
285
286         /* There better be only one MGS */
287         obd = class_name2obd(LUSTRE_MGS_OBDNAME);
288         if (!obd) {
289                 CDEBUG(D_CONFIG, "mgs %s not running\n", LUSTRE_MGS_OBDNAME);
290                 RETURN(-EALREADY);
291         }
292
293         /* The MGS should always stop when we say so */
294         obd->obd_force = 1;
295         rc = class_manual_cleanup(obd);
296         RETURN(rc);
297 }
298
299 /* Since there's only one mgc per node, we have to change it's fs to get
300    access to the right disk. */
301 static int server_mgc_set_fs(struct obd_device *mgc, struct super_block *sb)
302 {
303         struct lustre_sb_info *lsi = s2lsi(sb);
304         int rc;
305         ENTRY;
306
307         CDEBUG(D_MOUNT, "Set mgc disk for %s\n", lsi->lsi_lmd->lmd_dev);
308
309         /* cl_mgc_sem in mgc insures we sleep if the mgc_fs is busy */
310         rc = obd_set_info_async(NULL, mgc->obd_self_export,
311                                 sizeof(KEY_SET_FS), KEY_SET_FS,
312                                 sizeof(*sb), sb, NULL);
313         if (rc != 0)
314                 CERROR("can't set_fs %d\n", rc);
315
316         RETURN(rc);
317 }
318
319 static int server_mgc_clear_fs(struct obd_device *mgc)
320 {
321         int rc;
322         ENTRY;
323
324         CDEBUG(D_MOUNT, "Unassign mgc disk\n");
325
326         rc = obd_set_info_async(NULL, mgc->obd_self_export,
327                                 sizeof(KEY_CLEAR_FS), KEY_CLEAR_FS,
328                                 0, NULL, NULL);
329         RETURN(rc);
330 }
331
332 static int is_mdc_device(const char *devname)
333 {
334         char *ptr;
335
336         ptr = strrchr(devname, '-');
337         if (ptr != NULL && strcmp(ptr, "-mdc") == 0)
338                 return 1;
339
340         return 0;
341 }
342
343 static inline int tgt_is_mdt0(const char *tgtname)
344 {
345         __u32 idx;
346         int   type;
347
348         type = server_name2index(tgtname, &idx, NULL);
349         if (type != LDD_F_SV_TYPE_MDT)
350                 return 0;
351
352         return idx == 0;
353 }
354
355 static inline int is_mdc_for_mdt0(const char *devname)
356 {
357         char   *ptr;
358
359         if (!is_mdc_device(devname))
360                 return 0;
361
362         ptr = strrchr(devname, '-');
363         if (ptr == NULL)
364                 return 0;
365
366         *ptr = 0;
367         if (tgt_is_mdt0(devname)) {
368                 *ptr = '-';
369                 return 1;
370         }
371         *ptr = '-';
372         return 0;
373 }
374
375 /**
376  * Convert OST/MDT name(fsname-OSTxxxx) to a lwp name
377  * (fsname-MDT0000-lwp-OSTxxxx)
378  **/
379 int tgt_name2lwpname(const char *svname, char *lwpname)
380 {
381         char            *fsname;
382         const char      *tgt;
383         int             rc;
384         ENTRY;
385
386         OBD_ALLOC(fsname, MTI_NAME_MAXLEN);
387         if (fsname == NULL)
388                 RETURN(-ENOMEM);
389
390         rc = server_name2fsname(svname, fsname, &tgt);
391         if (rc != 0) {
392                 CERROR("%s: failed to get fsname from svname. %d\n",
393                        svname, rc);
394                 GOTO(cleanup, rc);
395         }
396
397         if (*tgt != '-' && *tgt != ':') {
398                 CERROR("%s: invalid svname name!\n", svname);
399                 GOTO(cleanup, rc = -EINVAL);
400         }
401
402         tgt++;
403         if (strncmp(tgt, "OST", 3) != 0 && strncmp(tgt, "MDT", 3) != 0) {
404                 CERROR("%s is not an OST or MDT target!\n", svname);
405                 GOTO(cleanup, rc = -EINVAL);
406         }
407         sprintf(lwpname, "%s-MDT0000-%s-%s", fsname, LUSTRE_LWP_NAME, tgt);
408 cleanup:
409         if (fsname != NULL)
410                 OBD_FREE(fsname, MTI_NAME_MAXLEN);
411         RETURN(rc);
412 }
413 EXPORT_SYMBOL(tgt_name2lwpname);
414
415 static CFS_LIST_HEAD(lwp_register_list);
416 DEFINE_MUTEX(lwp_register_list_lock);
417
418 int lustre_register_lwp_item(const char *lwpname, struct obd_export **exp,
419                              register_lwp_cb cb_func, void *cb_data)
420 {
421         struct obd_device        *lwp;
422         struct lwp_register_item *lri;
423         ENTRY;
424
425         LASSERTF(strlen(lwpname) < MTI_NAME_MAXLEN, "lwpname is too long %s\n",
426                  lwpname);
427         LASSERT(exp != NULL && *exp == NULL);
428
429         OBD_ALLOC_PTR(lri);
430         if (lri == NULL)
431                 RETURN(-ENOMEM);
432
433         mutex_lock(&lwp_register_list_lock);
434
435         lwp = class_name2obd(lwpname);
436         if (lwp != NULL && lwp->obd_set_up == 1) {
437                 struct obd_uuid *uuid;
438
439                 OBD_ALLOC_PTR(uuid);
440                 if (uuid == NULL) {
441                         mutex_unlock(&lwp_register_list_lock);
442                         OBD_FREE_PTR(lri);
443                         RETURN(-ENOMEM);
444                 }
445                 memcpy(uuid->uuid, lwpname, strlen(lwpname));
446                 *exp = cfs_hash_lookup(lwp->obd_uuid_hash, uuid);
447                 OBD_FREE_PTR(uuid);
448         }
449
450         memcpy(lri->lri_name, lwpname, strlen(lwpname));
451         lri->lri_exp = exp;
452         lri->lri_cb_func = cb_func;
453         lri->lri_cb_data = cb_data;
454         CFS_INIT_LIST_HEAD(&lri->lri_list);
455         cfs_list_add(&lri->lri_list, &lwp_register_list);
456
457         if (*exp != NULL && cb_func != NULL)
458                 cb_func(cb_data);
459
460         mutex_unlock(&lwp_register_list_lock);
461         RETURN(0);
462 }
463 EXPORT_SYMBOL(lustre_register_lwp_item);
464
465 void lustre_deregister_lwp_item(struct obd_export **exp)
466 {
467         struct lwp_register_item *lri, *tmp;
468
469         mutex_lock(&lwp_register_list_lock);
470         cfs_list_for_each_entry_safe(lri, tmp, &lwp_register_list, lri_list) {
471                 if (exp == lri->lri_exp) {
472                         if (*exp)
473                                 class_export_put(*exp);
474                         cfs_list_del(&lri->lri_list);
475                         OBD_FREE_PTR(lri);
476                         break;
477                 }
478         }
479         mutex_unlock(&lwp_register_list_lock);
480 }
481 EXPORT_SYMBOL(lustre_deregister_lwp_item);
482
483 static void lustre_notify_lwp_list(struct obd_export *exp)
484 {
485         struct lwp_register_item *lri, *tmp;
486         LASSERT(exp != NULL);
487
488         mutex_lock(&lwp_register_list_lock);
489         cfs_list_for_each_entry_safe(lri, tmp, &lwp_register_list, lri_list) {
490                 if (strcmp(exp->exp_obd->obd_name, lri->lri_name))
491                         continue;
492                 if (*lri->lri_exp != NULL)
493                         continue;
494                 *lri->lri_exp = class_export_get(exp);
495                 if (lri->lri_cb_func != NULL)
496                         lri->lri_cb_func(lri->lri_cb_data);
497         }
498         mutex_unlock(&lwp_register_list_lock);
499 }
500
501 static int lustre_lwp_connect(struct obd_device *lwp)
502 {
503         struct lu_env            env;
504         struct lu_context        session_ctx;
505         struct obd_export       *exp;
506         struct obd_uuid         *uuid = NULL;
507         struct obd_connect_data *data = NULL;
508         int                      rc;
509         ENTRY;
510
511         /* log has been fully processed, let clients connect */
512         rc = lu_env_init(&env, lwp->obd_lu_dev->ld_type->ldt_ctx_tags);
513         if (rc != 0)
514                 RETURN(rc);
515
516         lu_context_init(&session_ctx, LCT_SESSION);
517         session_ctx.lc_thread = NULL;
518         lu_context_enter(&session_ctx);
519         env.le_ses = &session_ctx;
520
521         OBD_ALLOC_PTR(data);
522         if (data == NULL)
523                 GOTO(out, rc = -ENOMEM);
524
525         data->ocd_connect_flags = OBD_CONNECT_VERSION | OBD_CONNECT_INDEX;
526         data->ocd_version = LUSTRE_VERSION_CODE;
527         data->ocd_connect_flags |= OBD_CONNECT_MDS_MDS | OBD_CONNECT_FID |
528                 OBD_CONNECT_AT | OBD_CONNECT_LRU_RESIZE |
529                 OBD_CONNECT_FULL20 | OBD_CONNECT_LVB_TYPE |
530                 OBD_CONNECT_LIGHTWEIGHT;
531         OBD_ALLOC_PTR(uuid);
532         if (uuid == NULL)
533                 GOTO(out, rc = -ENOMEM);
534
535         if (strlen(lwp->obd_name) > sizeof(uuid->uuid)) {
536                 CERROR("%s: Too long lwp name %s, max_size is %d\n",
537                        lwp->obd_name, lwp->obd_name, (int)sizeof(uuid->uuid));
538                 GOTO(out, rc = -EINVAL);
539         }
540
541         /* Use lwp name as the uuid, so we find the export by lwp name later */
542         memcpy(uuid->uuid, lwp->obd_name, strlen(lwp->obd_name));
543         rc = obd_connect(&env, &exp, lwp, uuid, data, NULL);
544         if (rc != 0)
545                 CERROR("%s: connect failed: rc = %d\n", lwp->obd_name, rc);
546         else
547                 lustre_notify_lwp_list(exp);
548
549 out:
550         if (data != NULL)
551                 OBD_FREE_PTR(data);
552         if (uuid != NULL)
553                 OBD_FREE_PTR(uuid);
554
555         lu_env_fini(&env);
556         lu_context_exit(&session_ctx);
557         lu_context_fini(&session_ctx);
558
559         RETURN(rc);
560 }
561
562 /**
563  * lwp is used by slaves (Non-MDT0 targets) to manage the connection
564  * to MDT0.
565  **/
566 static int lustre_lwp_setup(struct lustre_cfg *lcfg, struct lustre_sb_info *lsi)
567 {
568         struct obd_connect_data *data = NULL;
569         struct obd_device       *obd;
570         char                    *lwpname = NULL;
571         char                    *lwpuuid = NULL;
572         int                      rc;
573         ENTRY;
574
575         rc = class_add_uuid(lustre_cfg_string(lcfg, 1),
576                             lcfg->lcfg_nid);
577         if (rc) {
578                 CERROR("%s: Can't add uuid: rc =%d\n", lsi->lsi_svname, rc);
579                 GOTO(out, rc);
580         }
581
582         OBD_ALLOC(lwpname, MTI_NAME_MAXLEN);
583         if (lwpname == NULL)
584                 GOTO(out, rc = -ENOMEM);
585
586         rc = tgt_name2lwpname(lsi->lsi_svname, lwpname);
587         if (rc != 0) {
588                 CERROR("%s: failed to generate lwp name. %d\n",
589                        lsi->lsi_svname, rc);
590                 GOTO(out, rc);
591         }
592
593         OBD_ALLOC(lwpuuid, MTI_NAME_MAXLEN);
594         if (lwpuuid == NULL)
595                 GOTO(out, rc = -ENOMEM);
596
597         sprintf(lwpuuid, "%s_UUID", lwpname);
598         rc = lustre_start_simple(lwpname, LUSTRE_LWP_NAME,
599                                  lwpuuid, lustre_cfg_string(lcfg, 1),
600                                  0, 0, 0);
601         if (rc) {
602                 CERROR("%s: setup up failed: rc %d\n", lwpname, rc);
603                 GOTO(out, rc);
604         }
605
606         obd = class_name2obd(lwpname);
607         LASSERT(obd != NULL);
608
609         rc = lustre_lwp_connect(obd);
610         if (rc != 0)
611                 CERROR("%s: connect failed: rc = %d\n", lwpname, rc);
612 out:
613         if (data != NULL)
614                 OBD_FREE_PTR(data);
615         if (lwpname != NULL)
616                 OBD_FREE(lwpname, MTI_NAME_MAXLEN);
617         if (lwpuuid != NULL)
618                 OBD_FREE(lwpuuid, MTI_NAME_MAXLEN);
619
620         RETURN(rc);
621 }
622
623 /* the caller is responsible for memory free */
624 static struct obd_device *lustre_find_lwp(struct lustre_sb_info *lsi,
625                                           char **lwpname, char **logname)
626 {
627         struct obd_device       *lwp;
628         int                      rc = 0;
629         ENTRY;
630
631         LASSERT(lwpname != NULL);
632         LASSERT(IS_OST(lsi) || IS_MDT(lsi));
633
634         OBD_ALLOC(*lwpname, MTI_NAME_MAXLEN);
635         if (*lwpname == NULL)
636                 RETURN(ERR_PTR(-ENOMEM));
637
638         if (logname != NULL) {
639                 OBD_ALLOC(*logname, MTI_NAME_MAXLEN);
640                 if (*logname == NULL)
641                         GOTO(out, rc = -ENOMEM);
642                 rc = server_name2fsname(lsi->lsi_svname, *lwpname, NULL);
643                 if (rc != 0) {
644                         CERROR("%s: failed to get fsname from svname. %d\n",
645                                lsi->lsi_svname, rc);
646                         GOTO(out, rc = -EINVAL);
647                 }
648                 sprintf(*logname, "%s-client", *lwpname);
649         }
650
651         rc = tgt_name2lwpname(lsi->lsi_svname, *lwpname);
652         if (rc != 0) {
653                 CERROR("%s: failed to generate lwp name. %d\n",
654                        lsi->lsi_svname, rc);
655                 GOTO(out, rc = -EINVAL);
656         }
657
658         lwp = class_name2obd(*lwpname);
659
660 out:
661         if (rc != 0) {
662                 if (*lwpname != NULL) {
663                         OBD_FREE(*lwpname, MTI_NAME_MAXLEN);
664                         *lwpname = NULL;
665                 }
666                 if (logname != NULL && *logname != NULL) {
667                         OBD_FREE(*logname, MTI_NAME_MAXLEN);
668                         *logname = NULL;
669                 }
670                 lwp = ERR_PTR(rc);
671         }
672
673         RETURN(lwp != NULL ? lwp : ERR_PTR(-ENOENT));
674 }
675
676 static int lustre_lwp_add_conn(struct lustre_cfg *cfg,
677                                struct lustre_sb_info *lsi)
678 {
679         struct lustre_cfg_bufs *bufs = NULL;
680         struct lustre_cfg      *lcfg = NULL;
681         char                   *lwpname = NULL;
682         struct obd_device      *lwp;
683         int                     rc;
684         ENTRY;
685
686         lwp = lustre_find_lwp(lsi, &lwpname, NULL);
687         if (IS_ERR(lwp)) {
688                 CERROR("%s: can't find lwp device.\n", lsi->lsi_svname);
689                 GOTO(out, rc = PTR_ERR(lwp));
690         }
691         LASSERT(lwpname != NULL);
692
693         OBD_ALLOC_PTR(bufs);
694         if (bufs == NULL)
695                 GOTO(out, rc = -ENOMEM);
696
697         lustre_cfg_bufs_reset(bufs, lwpname);
698         lustre_cfg_bufs_set_string(bufs, 1,
699                                    lustre_cfg_string(cfg, 1));
700
701         lcfg = lustre_cfg_new(LCFG_ADD_CONN, bufs);
702
703         rc = class_add_conn(lwp, lcfg);
704         if (rc)
705                 CERROR("%s: can't add conn: rc = %d\n", lwpname, rc);
706
707 out:
708         if (bufs != NULL)
709                 OBD_FREE_PTR(bufs);
710         if (lcfg != NULL)
711                 lustre_cfg_free(lcfg);
712         if (lwpname != NULL)
713                 OBD_FREE(lwpname, MTI_NAME_MAXLEN);
714         RETURN(rc);
715 }
716
717 /**
718  * Retrieve MDT nids from the client log, then start the lwp device.
719  * there are only two scenarios which would include mdt nid.
720  * 1.
721  * marker   5 (flags=0x01, v2.1.54.0) lustre-MDT0000  'add mdc' xxx-
722  * add_uuid  nid=192.168.122.162@tcp(0x20000c0a87aa2)  0:  1:192.168.122.162@tcp
723  * attach    0:lustre-MDT0000-mdc  1:mdc  2:lustre-clilmv_UUID
724  * setup     0:lustre-MDT0000-mdc  1:lustre-MDT0000_UUID  2:192.168.122.162@tcp
725  * add_uuid  nid=192.168.172.1@tcp(0x20000c0a8ac01)  0:  1:192.168.172.1@tcp
726  * add_conn  0:lustre-MDT0000-mdc  1:192.168.172.1@tcp
727  * modify_mdc_tgts add 0:lustre-clilmv  1:lustre-MDT0000_UUID xxxx
728  * marker   5 (flags=0x02, v2.1.54.0) lustre-MDT0000  'add mdc' xxxx-
729  * 2.
730  * marker   7 (flags=0x01, v2.1.54.0) lustre-MDT0000  'add failnid' xxxx-
731  * add_uuid  nid=192.168.122.2@tcp(0x20000c0a87a02)  0:  1:192.168.122.2@tcp
732  * add_conn  0:lustre-MDT0000-mdc  1:192.168.122.2@tcp
733  * marker   7 (flags=0x02, v2.1.54.0) lustre-MDT0000  'add failnid' xxxx-
734  **/
735 static int client_lwp_config_process(const struct lu_env *env,
736                                      struct llog_handle *handle,
737                                      struct llog_rec_hdr *rec, void *data)
738 {
739         struct config_llog_instance *clli = data;
740         int                          cfg_len = rec->lrh_len;
741         char                        *cfg_buf = (char *) (rec + 1);
742         struct lustre_cfg           *lcfg = NULL;
743         struct lustre_sb_info       *lsi;
744         int                          rc = 0, swab = 0;
745         ENTRY;
746
747         if (rec->lrh_type != OBD_CFG_REC) {
748                 CERROR("Unknown llog record type %#x encountered\n",
749                        rec->lrh_type);
750                 RETURN(-EINVAL);
751         }
752
753         LASSERT(clli->cfg_sb != NULL);
754         lsi = s2lsi(clli->cfg_sb);
755
756         lcfg = (struct lustre_cfg *)cfg_buf;
757         if (lcfg->lcfg_version == __swab32(LUSTRE_CFG_VERSION)) {
758                 lustre_swab_lustre_cfg(lcfg);
759                 swab = 1;
760         }
761
762         rc = lustre_cfg_sanity_check(cfg_buf, cfg_len);
763         if (rc)
764                 GOTO(out, rc);
765
766         switch (lcfg->lcfg_command) {
767         case LCFG_MARKER: {
768                 struct cfg_marker *marker = lustre_cfg_buf(lcfg, 1);
769
770                 lustre_swab_cfg_marker(marker, swab,
771                                        LUSTRE_CFG_BUFLEN(lcfg, 1));
772                 if (marker->cm_flags & CM_SKIP ||
773                     marker->cm_flags & CM_EXCLUDE)
774                         GOTO(out, rc = 0);
775
776                 if (!tgt_is_mdt0(marker->cm_tgtname))
777                         GOTO(out, rc = 0);
778
779                 if (!strncmp(marker->cm_comment, "add mdc", 7) ||
780                     !strncmp(marker->cm_comment, "add failnid", 11)) {
781                         if (marker->cm_flags & CM_START) {
782                                 clli->cfg_flags = CFG_F_MARKER;
783                                 /* This hack is to differentiate the
784                                  * ADD_UUID is come from "add mdc" record
785                                  * or from "add failnid" record. */
786                                 if (!strncmp(marker->cm_comment,
787                                              "add failnid", 11))
788                                         clli->cfg_flags |= CFG_F_SKIP;
789                         } else if (marker->cm_flags & CM_END) {
790                                 clli->cfg_flags = 0;
791                         }
792                 }
793                 break;
794         }
795         case LCFG_ADD_UUID: {
796                 if (clli->cfg_flags == CFG_F_MARKER) {
797                         rc = lustre_lwp_setup(lcfg, lsi);
798                         /* XXX: process only the first nid as
799                          * we don't need another instance of lwp */
800                         clli->cfg_flags |= CFG_F_SKIP;
801                 } else if (clli->cfg_flags == (CFG_F_MARKER | CFG_F_SKIP)) {
802                         rc = class_add_uuid(lustre_cfg_string(lcfg, 1),
803                                             lcfg->lcfg_nid);
804                         if (rc)
805                                 CERROR("%s: Fail to add uuid, rc:%d\n",
806                                        lsi->lsi_svname, rc);
807                 }
808                 break;
809         }
810         case LCFG_ADD_CONN: {
811                 if (is_mdc_for_mdt0(lustre_cfg_string(lcfg, 0)))
812                         rc = lustre_lwp_add_conn(lcfg, lsi);
813                 break;
814         }
815         default:
816                 break;
817         }
818 out:
819         RETURN(rc);
820 }
821
822 static int lustre_disconnect_lwp(struct super_block *sb)
823 {
824         struct lustre_sb_info           *lsi = s2lsi(sb);
825         struct obd_device               *lwp;
826         char                            *lwpname = NULL;
827         char                            *logname = NULL;
828         struct lustre_cfg               *lcfg = NULL;
829         struct lustre_cfg_bufs          *bufs = NULL;
830         struct config_llog_instance     *cfg = NULL;
831         int                              rc;
832         ENTRY;
833
834         lwp = lustre_find_lwp(lsi, &lwpname, &logname);
835         if (IS_ERR(lwp) && PTR_ERR(lwp) != -ENOENT)
836                 GOTO(out, rc = PTR_ERR(lwp));
837
838         LASSERT(lwpname != NULL);
839         LASSERT(logname != NULL);
840
841         OBD_ALLOC_PTR(cfg);
842         if (cfg == NULL)
843                 GOTO(out, rc = -ENOMEM);
844
845         /* end log first */
846         cfg->cfg_instance = sb;
847         rc = lustre_end_log(sb, logname, cfg);
848         if (rc != 0) {
849                 CERROR("%s: Can't end config log %s.\n", lwpname, logname);
850                 GOTO(out, rc);
851         }
852
853         if (PTR_ERR(lwp) == -ENOENT) {
854                 CDEBUG(D_CONFIG, "%s: lwp device wasn't started.\n",
855                        lsi->lsi_svname);
856                 GOTO(out, rc = 0);
857         }
858
859         OBD_ALLOC_PTR(bufs);
860         if (bufs == NULL)
861                 GOTO(out, rc = -ENOMEM);
862
863         lustre_cfg_bufs_reset(bufs, lwp->obd_name);
864         lustre_cfg_bufs_set_string(bufs, 1, NULL);
865         lcfg = lustre_cfg_new(LCFG_CLEANUP, bufs);
866         if (!lcfg)
867                 GOTO(out, rc = -ENOMEM);
868
869         /* Disconnect import first. NULL is passed for the '@env', since
870          * it will not be used. */
871         rc = lwp->obd_lu_dev->ld_ops->ldo_process_config(NULL, lwp->obd_lu_dev,
872                                                          lcfg);
873 out:
874         if (lcfg)
875                 lustre_cfg_free(lcfg);
876         if (bufs)
877                 OBD_FREE_PTR(bufs);
878         if (cfg)
879                 OBD_FREE_PTR(cfg);
880         if (lwpname)
881                 OBD_FREE(lwpname, MTI_NAME_MAXLEN);
882         if (logname)
883                 OBD_FREE(logname, MTI_NAME_MAXLEN);
884         RETURN(rc);
885 }
886
887 /**
888  * Stop the lwp for an OST/MDT target.
889  **/
890 static int lustre_stop_lwp(struct super_block *sb)
891 {
892         struct lustre_sb_info   *lsi = s2lsi(sb);
893         struct obd_device       *lwp = NULL;
894         char                    *lwpname = NULL;
895         int                      rc = 0;
896         ENTRY;
897
898         lwp = lustre_find_lwp(lsi, &lwpname, NULL);
899         if (IS_ERR(lwp)) {
900                 CDEBUG(PTR_ERR(lwp) == -ENOENT ? D_CONFIG : D_ERROR,
901                        "%s: lwp wasn't started.\n", lsi->lsi_svname);
902                 GOTO(out, rc = 0);
903         }
904
905         lwp->obd_force = 1;
906         rc = class_manual_cleanup(lwp);
907
908 out:
909         if (lwpname != NULL)
910                 OBD_FREE(lwpname, MTI_NAME_MAXLEN);
911         RETURN(rc);
912 }
913
914 /**
915  * Start the lwp(fsname-MDT0000-lwp-OSTxxxx) for an OST or MDT target,
916  * which would be used to establish connection from OST to MDT0.
917  **/
918 static int lustre_start_lwp(struct super_block *sb)
919 {
920         struct lustre_sb_info       *lsi = s2lsi(sb);
921         struct config_llog_instance *cfg = NULL;
922         struct obd_device           *lwp;
923         char                        *lwpname = NULL;
924         char                        *logname = NULL;
925         int                          rc;
926         ENTRY;
927
928         lwp = lustre_find_lwp(lsi, &lwpname, &logname);
929
930         /* the lwp device already stared */
931         if (lwp && !IS_ERR(lwp))
932                 GOTO(out, rc = 0);
933
934         if (PTR_ERR(lwp) != -ENOENT)
935                 GOTO(out, rc = PTR_ERR(lwp));
936
937         LASSERT(lwpname != NULL);
938         LASSERT(logname != NULL);
939
940         OBD_ALLOC_PTR(cfg);
941         if (cfg == NULL)
942                 GOTO(out, rc = -ENOMEM);
943
944         cfg->cfg_callback = client_lwp_config_process;
945         cfg->cfg_instance = sb;
946
947         rc = lustre_process_log(sb, logname, cfg);
948 out:
949         if (lwpname != NULL)
950                 OBD_FREE(lwpname, MTI_NAME_MAXLEN);
951         if (logname != NULL)
952                 OBD_FREE(logname, MTI_NAME_MAXLEN);
953         if (cfg != NULL)
954                 OBD_FREE_PTR(cfg);
955         RETURN(rc);
956 }
957
958 DEFINE_MUTEX(server_start_lock);
959
960 /* Stop MDS/OSS if nobody is using them */
961 static int server_stop_servers(int lsiflags)
962 {
963         struct obd_device *obd = NULL;
964         struct obd_type *type = NULL;
965         int rc = 0;
966         ENTRY;
967
968         mutex_lock(&server_start_lock);
969
970         /* Either an MDT or an OST or neither  */
971         /* if this was an MDT, and there are no more MDT's, clean up the MDS */
972         if (lsiflags & LDD_F_SV_TYPE_MDT) {
973                 obd = class_name2obd(LUSTRE_MDS_OBDNAME);
974                 if (obd != NULL)
975                         type = class_search_type(LUSTRE_MDT_NAME);
976         }
977
978         /* if this was an OST, and there are no more OST's, clean up the OSS */
979         if (lsiflags & LDD_F_SV_TYPE_OST) {
980                 obd = class_name2obd(LUSTRE_OSS_OBDNAME);
981                 if (obd != NULL)
982                         type = class_search_type(LUSTRE_OST_NAME);
983         }
984
985         if (obd != NULL && (type == NULL || type->typ_refcnt == 0)) {
986                 obd->obd_force = 1;
987                 /* obd_fail doesn't mean much on a server obd */
988                 rc = class_manual_cleanup(obd);
989         }
990
991         mutex_unlock(&server_start_lock);
992
993         RETURN(rc);
994 }
995
996 int server_mti_print(const char *title, struct mgs_target_info *mti)
997 {
998         PRINT_CMD(PRINT_MASK, "mti %s\n", title);
999         PRINT_CMD(PRINT_MASK, "server: %s\n", mti->mti_svname);
1000         PRINT_CMD(PRINT_MASK, "fs:     %s\n", mti->mti_fsname);
1001         PRINT_CMD(PRINT_MASK, "uuid:   %s\n", mti->mti_uuid);
1002         PRINT_CMD(PRINT_MASK, "ver: %d  flags: %#x\n",
1003                   mti->mti_config_ver, mti->mti_flags);
1004         return 0;
1005 }
1006 EXPORT_SYMBOL(server_mti_print);
1007
1008 /* Generate data for registration */
1009 static int server_lsi2mti(struct lustre_sb_info *lsi,
1010                           struct mgs_target_info *mti)
1011 {
1012         lnet_process_id_t id;
1013         int rc, i = 0;
1014         int cplen = 0;
1015         ENTRY;
1016
1017         if (!IS_SERVER(lsi))
1018                 RETURN(-EINVAL);
1019
1020         if (strlcpy(mti->mti_svname, lsi->lsi_svname, sizeof(mti->mti_svname))
1021             >= sizeof(mti->mti_svname))
1022                 RETURN(-E2BIG);
1023
1024         mti->mti_nid_count = 0;
1025         while (LNetGetId(i++, &id) != -ENOENT) {
1026                 if (LNET_NETTYP(LNET_NIDNET(id.nid)) == LOLND)
1027                         continue;
1028
1029                 /* server use --servicenode param, only allow specified
1030                  * nids be registered */
1031                 if ((lsi->lsi_lmd->lmd_flags & LMD_FLG_NO_PRIMNODE) != 0 &&
1032                     class_match_nid(lsi->lsi_lmd->lmd_params,
1033                                     PARAM_FAILNODE, id.nid) < 1)
1034                         continue;
1035
1036                 /* match specified network */
1037                 if (!class_match_net(lsi->lsi_lmd->lmd_params,
1038                                      PARAM_NETWORK, LNET_NIDNET(id.nid)))
1039                         continue;
1040
1041                 mti->mti_nids[mti->mti_nid_count] = id.nid;
1042                 mti->mti_nid_count++;
1043                 if (mti->mti_nid_count >= MTI_NIDS_MAX) {
1044                         CWARN("Only using first %d nids for %s\n",
1045                               mti->mti_nid_count, mti->mti_svname);
1046                         break;
1047                 }
1048         }
1049
1050         mti->mti_lustre_ver = LUSTRE_VERSION_CODE;
1051         mti->mti_config_ver = 0;
1052
1053         rc = server_name2fsname(lsi->lsi_svname, mti->mti_fsname, NULL);
1054         if (rc != 0)
1055                 return rc;
1056
1057         rc = server_name2index(lsi->lsi_svname, &mti->mti_stripe_index, NULL);
1058         if (rc < 0)
1059                 return rc;
1060         /* Orion requires index to be set */
1061         LASSERT(!(rc & LDD_F_NEED_INDEX));
1062         /* keep only LDD flags */
1063         mti->mti_flags = lsi->lsi_flags & LDD_F_MASK;
1064         if (mti->mti_flags & (LDD_F_WRITECONF | LDD_F_VIRGIN))
1065                 mti->mti_flags |= LDD_F_UPDATE;
1066         cplen = strlcpy(mti->mti_params, lsi->lsi_lmd->lmd_params,
1067                         sizeof(mti->mti_params));
1068         if (cplen >= sizeof(mti->mti_params))
1069                 return -E2BIG;
1070         return 0;
1071 }
1072
1073 /* Register an old or new target with the MGS. If needed MGS will construct
1074    startup logs and assign index */
1075 static int server_register_target(struct lustre_sb_info *lsi)
1076 {
1077         struct obd_device *mgc = lsi->lsi_mgc;
1078         struct mgs_target_info *mti = NULL;
1079         bool writeconf;
1080         int rc;
1081         ENTRY;
1082
1083         LASSERT(mgc);
1084
1085         if (!IS_SERVER(lsi))
1086                 RETURN(-EINVAL);
1087
1088         OBD_ALLOC_PTR(mti);
1089         if (!mti)
1090                 RETURN(-ENOMEM);
1091
1092         rc = server_lsi2mti(lsi, mti);
1093         if (rc)
1094                 GOTO(out, rc);
1095
1096         CDEBUG(D_MOUNT, "Registration %s, fs=%s, %s, index=%04x, flags=%#x\n",
1097                mti->mti_svname, mti->mti_fsname,
1098                libcfs_nid2str(mti->mti_nids[0]), mti->mti_stripe_index,
1099                mti->mti_flags);
1100
1101         /* if write_conf is true, the registration must succeed */
1102         writeconf = !!(lsi->lsi_flags & (LDD_F_NEED_INDEX | LDD_F_UPDATE));
1103         mti->mti_flags |= LDD_F_OPC_REG;
1104
1105         /* Register the target */
1106         /* FIXME use mgc_process_config instead */
1107         rc = obd_set_info_async(NULL, mgc->u.cli.cl_mgc_mgsexp,
1108                                 sizeof(KEY_REGISTER_TARGET),
1109                                 KEY_REGISTER_TARGET,
1110                                 sizeof(*mti), mti, NULL);
1111         if (rc) {
1112                 if (mti->mti_flags & LDD_F_ERROR) {
1113                         LCONSOLE_ERROR_MSG(0x160,
1114                                 "%s: the MGS refuses to allow this server "
1115                                 "to start: rc = %d. Please see messages on "
1116                                 "the MGS.\n", lsi->lsi_svname, rc);
1117                 } else if (writeconf) {
1118                         LCONSOLE_ERROR_MSG(0x15f,
1119                                 "%s: cannot register this server with the MGS: "
1120                                 "rc = %d. Is the MGS running?\n",
1121                                 lsi->lsi_svname, rc);
1122                 } else {
1123                         CERROR("%s: error registering with the MGS: rc = %d "
1124                                "(not fatal)\n", lsi->lsi_svname, rc);
1125                         /* reset the error code for non-fatal error. */
1126                         rc = 0;
1127                 }
1128                 GOTO(out, rc);
1129         }
1130
1131 out:
1132         if (mti)
1133                 OBD_FREE_PTR(mti);
1134         RETURN(rc);
1135 }
1136
1137 /**
1138  * Notify the MGS that this target is ready.
1139  * Used by IR - if the MGS receives this message, it will notify clients.
1140  */
1141 static int server_notify_target(struct super_block *sb, struct obd_device *obd)
1142 {
1143         struct lustre_sb_info *lsi = s2lsi(sb);
1144         struct obd_device *mgc = lsi->lsi_mgc;
1145         struct mgs_target_info *mti = NULL;
1146         int rc;
1147         ENTRY;
1148
1149         LASSERT(mgc);
1150
1151         if (!(IS_SERVER(lsi)))
1152                 RETURN(-EINVAL);
1153
1154         OBD_ALLOC_PTR(mti);
1155         if (!mti)
1156                 RETURN(-ENOMEM);
1157         rc = server_lsi2mti(lsi, mti);
1158         if (rc)
1159                 GOTO(out, rc);
1160
1161         mti->mti_instance = obd->u.obt.obt_instance;
1162         mti->mti_flags |= LDD_F_OPC_READY;
1163
1164         /* FIXME use mgc_process_config instead */
1165         rc = obd_set_info_async(NULL, mgc->u.cli.cl_mgc_mgsexp,
1166                                 sizeof(KEY_REGISTER_TARGET),
1167                                 KEY_REGISTER_TARGET,
1168                                 sizeof(*mti), mti, NULL);
1169
1170         /* Imperative recovery: if the mgs informs us to use IR? */
1171         if (!rc && !(mti->mti_flags & LDD_F_ERROR) &&
1172             (mti->mti_flags & LDD_F_IR_CAPABLE))
1173                 lsi->lsi_flags |= LDD_F_IR_CAPABLE;
1174
1175 out:
1176         if (mti)
1177                 OBD_FREE_PTR(mti);
1178         RETURN(rc);
1179
1180 }
1181
1182 /** Start server targets: MDTs and OSTs
1183  */
1184 static int server_start_targets(struct super_block *sb, struct vfsmount *mnt)
1185 {
1186         struct obd_device *obd;
1187         struct lustre_sb_info *lsi = s2lsi(sb);
1188         struct config_llog_instance cfg;
1189         struct lu_env env;
1190         struct lu_device *dev;
1191         int rc;
1192         ENTRY;
1193
1194         CDEBUG(D_MOUNT, "starting target %s\n", lsi->lsi_svname);
1195
1196         if (IS_MDT(lsi)) {
1197                 /* make sure the MDS is started */
1198                 mutex_lock(&server_start_lock);
1199                 obd = class_name2obd(LUSTRE_MDS_OBDNAME);
1200                 if (!obd) {
1201                         rc = lustre_start_simple(LUSTRE_MDS_OBDNAME,
1202                                                  LUSTRE_MDS_NAME,
1203                                                  LUSTRE_MDS_OBDNAME"_uuid",
1204                                                  0, 0, 0, 0);
1205                         if (rc) {
1206                                 mutex_unlock(&server_start_lock);
1207                                 CERROR("failed to start MDS: %d\n", rc);
1208                                 RETURN(rc);
1209                         }
1210                 }
1211                 mutex_unlock(&server_start_lock);
1212         }
1213
1214         /* If we're an OST, make sure the global OSS is running */
1215         if (IS_OST(lsi)) {
1216                 /* make sure OSS is started */
1217                 mutex_lock(&server_start_lock);
1218                 obd = class_name2obd(LUSTRE_OSS_OBDNAME);
1219                 if (!obd) {
1220                         rc = lustre_start_simple(LUSTRE_OSS_OBDNAME,
1221                                                  LUSTRE_OSS_NAME,
1222                                                  LUSTRE_OSS_OBDNAME"_uuid",
1223                                                  0, 0, 0, 0);
1224                         if (rc) {
1225                                 mutex_unlock(&server_start_lock);
1226                                 CERROR("failed to start OSS: %d\n", rc);
1227                                 RETURN(rc);
1228                         }
1229                 }
1230                 mutex_unlock(&server_start_lock);
1231         }
1232
1233         /* Set the mgc fs to our server disk.  This allows the MGC to
1234          * read and write configs locally, in case it can't talk to the MGS. */
1235         if (lsi->lsi_srv_mnt) {
1236                 rc = server_mgc_set_fs(lsi->lsi_mgc, sb);
1237                 if (rc)
1238                         GOTO(out_stop_service, rc);
1239         }
1240
1241         /* Register with MGS */
1242         rc = server_register_target(lsi);
1243         if (rc)
1244                 GOTO(out_mgc, rc);
1245
1246         /* Let the target look up the mount using the target's name
1247            (we can't pass the sb or mnt through class_process_config.) */
1248         rc = server_register_mount(lsi->lsi_svname, sb, mnt);
1249         if (rc)
1250                 GOTO(out_mgc, rc);
1251
1252         /* Start targets using the llog named for the target */
1253         memset(&cfg, 0, sizeof(cfg));
1254         cfg.cfg_callback = class_config_llog_handler;
1255         rc = lustre_process_log(sb, lsi->lsi_svname, &cfg);
1256         if (rc) {
1257                 CERROR("failed to start server %s: %d\n",
1258                        lsi->lsi_svname, rc);
1259                 /* Do NOT call server_deregister_mount() here. This makes it
1260                  * impossible to find mount later in cleanup time and leaves
1261                  * @lsi and othder stuff leaked. -umka */
1262                 GOTO(out_mgc, rc);
1263         }
1264
1265         obd = class_name2obd(lsi->lsi_svname);
1266         if (!obd) {
1267                 CERROR("no server named %s was started\n", lsi->lsi_svname);
1268                 GOTO(out_mgc, rc = -ENXIO);
1269         }
1270
1271         if (IS_OST(lsi) || IS_MDT(lsi)) {
1272                 rc = lustre_start_lwp(sb);
1273                 if (rc) {
1274                         CERROR("%s: failed to start LWP: %d\n",
1275                                lsi->lsi_svname, rc);
1276                         GOTO(out_mgc, rc);
1277                 }
1278         }
1279
1280         server_notify_target(sb, obd);
1281
1282         /* calculate recovery timeout, do it after lustre_process_log */
1283         server_calc_timeout(lsi, obd);
1284
1285         /* log has been fully processed */
1286         obd_notify(obd, NULL, OBD_NOTIFY_CONFIG, (void *)CONFIG_LOG);
1287
1288         /* log has been fully processed, let clients connect */
1289         dev = obd->obd_lu_dev;
1290         if (dev && dev->ld_ops->ldo_prepare) {
1291                 rc = lu_env_init(&env, dev->ld_type->ldt_ctx_tags);
1292                 if (rc == 0) {
1293                         struct lu_context  session_ctx;
1294
1295                         lu_context_init(&session_ctx, LCT_SESSION);
1296                         session_ctx.lc_thread = NULL;
1297                         lu_context_enter(&session_ctx);
1298                         env.le_ses = &session_ctx;
1299
1300                         rc = dev->ld_ops->ldo_prepare(&env, NULL, dev);
1301
1302                         lu_env_fini(&env);
1303                         lu_context_exit(&session_ctx);
1304                         lu_context_fini(&session_ctx);
1305                 }
1306         }
1307
1308         /* abort recovery only on the complete stack:
1309          * many devices can be involved */
1310         if ((lsi->lsi_lmd->lmd_flags & LMD_FLG_ABORT_RECOV) &&
1311             (OBP(obd, iocontrol))) {
1312                 obd_iocontrol(OBD_IOC_ABORT_RECOVERY, obd->obd_self_export, 0,
1313                               NULL, NULL);
1314         }
1315
1316 out_mgc:
1317         /* Release the mgc fs for others to use */
1318         if (lsi->lsi_srv_mnt)
1319                 server_mgc_clear_fs(lsi->lsi_mgc);
1320
1321 out_stop_service:
1322         if (rc != 0)
1323                 server_stop_servers(lsi->lsi_flags);
1324
1325         RETURN(rc);
1326 }
1327
1328 static int lsi_prepare(struct lustre_sb_info *lsi)
1329 {
1330         __u32 index;
1331         int rc;
1332         ENTRY;
1333
1334         LASSERT(lsi);
1335         LASSERT(lsi->lsi_lmd);
1336
1337         /* The server name is given as a mount line option */
1338         if (lsi->lsi_lmd->lmd_profile == NULL) {
1339                 LCONSOLE_ERROR("Can't determine server name\n");
1340                 RETURN(-EINVAL);
1341         }
1342
1343         if (strlen(lsi->lsi_lmd->lmd_profile) >= sizeof(lsi->lsi_svname))
1344                 RETURN(-ENAMETOOLONG);
1345
1346         strcpy(lsi->lsi_svname, lsi->lsi_lmd->lmd_profile);
1347
1348         /* Determine osd type */
1349         if (lsi->lsi_lmd->lmd_osd_type != NULL) {
1350                 if (strlen(lsi->lsi_lmd->lmd_osd_type) >=
1351                     sizeof(lsi->lsi_osd_type))
1352                         RETURN(-ENAMETOOLONG);
1353
1354                 strcpy(lsi->lsi_osd_type, lsi->lsi_lmd->lmd_osd_type);
1355         } else {
1356                 strcpy(lsi->lsi_osd_type, LUSTRE_OSD_LDISKFS_NAME);
1357         }
1358
1359         /* XXX: a temp. solution for components using fsfilt
1360          *      to be removed in one of the subsequent patches */
1361         if (!strcmp(lsi->lsi_lmd->lmd_osd_type, "osd-ldiskfs"))
1362                 strcpy(lsi->lsi_fstype, "ldiskfs");
1363         else
1364                 strcpy(lsi->lsi_fstype, lsi->lsi_lmd->lmd_osd_type);
1365
1366         /* Determine server type */
1367         rc = server_name2index(lsi->lsi_svname, &index, NULL);
1368         if (rc < 0) {
1369                 if (lsi->lsi_lmd->lmd_flags & LMD_FLG_MGS) {
1370                         /* Assume we're a bare MGS */
1371                         rc = 0;
1372                         lsi->lsi_lmd->lmd_flags |= LMD_FLG_NOSVC;
1373                 } else {
1374                         LCONSOLE_ERROR("Can't determine server type of '%s'\n",
1375                                        lsi->lsi_svname);
1376                         RETURN(rc);
1377                 }
1378         }
1379         lsi->lsi_flags |= rc;
1380
1381         /* Add mount line flags that used to be in ldd:
1382          * writeconf, mgs, anything else?
1383          */
1384         lsi->lsi_flags |= (lsi->lsi_lmd->lmd_flags & LMD_FLG_WRITECONF) ?
1385                 LDD_F_WRITECONF : 0;
1386         lsi->lsi_flags |= (lsi->lsi_lmd->lmd_flags & LMD_FLG_VIRGIN) ?
1387                 LDD_F_VIRGIN : 0;
1388         lsi->lsi_flags |= (lsi->lsi_lmd->lmd_flags & LMD_FLG_UPDATE) ?
1389                 LDD_F_UPDATE : 0;
1390         lsi->lsi_flags |= (lsi->lsi_lmd->lmd_flags & LMD_FLG_MGS) ?
1391                 LDD_F_SV_TYPE_MGS : 0;
1392         lsi->lsi_flags |= (lsi->lsi_lmd->lmd_flags & LMD_FLG_NO_PRIMNODE) ?
1393                 LDD_F_NO_PRIMNODE : 0;
1394
1395         RETURN(0);
1396 }
1397
1398 /*************** server mount ******************/
1399
1400 /** Start the shutdown of servers at umount.
1401  */
1402 static void server_put_super(struct super_block *sb)
1403 {
1404         struct lustre_sb_info *lsi = s2lsi(sb);
1405         struct obd_device     *obd;
1406         char *tmpname, *extraname = NULL;
1407         int tmpname_sz;
1408         int lsiflags = lsi->lsi_flags;
1409         ENTRY;
1410
1411         LASSERT(IS_SERVER(lsi));
1412
1413         tmpname_sz = strlen(lsi->lsi_svname) + 1;
1414         OBD_ALLOC(tmpname, tmpname_sz);
1415         memcpy(tmpname, lsi->lsi_svname, tmpname_sz);
1416         CDEBUG(D_MOUNT, "server put_super %s\n", tmpname);
1417         if (IS_MDT(lsi) && (lsi->lsi_lmd->lmd_flags & LMD_FLG_NOSVC))
1418                 snprintf(tmpname, tmpname_sz, "MGS");
1419
1420         /* disconnect the lwp first to drain off the inflight request */
1421         if (IS_OST(lsi) || IS_MDT(lsi)) {
1422                 int     rc;
1423
1424                 rc = lustre_disconnect_lwp(sb);
1425                 if (rc && rc != ETIMEDOUT)
1426                         CERROR("%s: failed to disconnect lwp. (rc=%d)\n",
1427                                tmpname, rc);
1428         }
1429
1430         /* Stop the target */
1431         if (!(lsi->lsi_lmd->lmd_flags & LMD_FLG_NOSVC) &&
1432             (IS_MDT(lsi) || IS_OST(lsi))) {
1433                 struct lustre_profile *lprof = NULL;
1434
1435                 /* tell the mgc to drop the config log */
1436                 lustre_end_log(sb, lsi->lsi_svname, NULL);
1437
1438                 /* COMPAT_146 - profile may get deleted in mgc_cleanup.
1439                    If there are any setup/cleanup errors, save the lov
1440                    name for safety cleanup later. */
1441                 lprof = class_get_profile(lsi->lsi_svname);
1442                 if (lprof && lprof->lp_dt) {
1443                         OBD_ALLOC(extraname, strlen(lprof->lp_dt) + 1);
1444                         strcpy(extraname, lprof->lp_dt);
1445                 }
1446
1447                 obd = class_name2obd(lsi->lsi_svname);
1448                 if (obd) {
1449                         CDEBUG(D_MOUNT, "stopping %s\n", obd->obd_name);
1450                         if (lsiflags & LSI_UMOUNT_FAILOVER)
1451                                 obd->obd_fail = 1;
1452                         /* We can't seem to give an error return code
1453                          * to .put_super, so we better make sure we clean up! */
1454                         obd->obd_force = 1;
1455                         class_manual_cleanup(obd);
1456                 } else {
1457                         CERROR("no obd %s\n", lsi->lsi_svname);
1458                         server_deregister_mount(lsi->lsi_svname);
1459                 }
1460         }
1461
1462         /* If they wanted the mgs to stop separately from the mdt, they
1463            should have put it on a different device. */
1464         if (IS_MGS(lsi)) {
1465                 /* if MDS start with --nomgs, don't stop MGS then */
1466                 if (!(lsi->lsi_lmd->lmd_flags & LMD_FLG_NOMGS))
1467                         server_stop_mgs(sb);
1468         }
1469
1470         if (IS_OST(lsi) || IS_MDT(lsi)) {
1471                 if (lustre_stop_lwp(sb) < 0)
1472                         CERROR("%s: failed to stop lwp!\n", tmpname);
1473         }
1474
1475         /* Clean the mgc and sb */
1476         lustre_common_put_super(sb);
1477
1478         /* wait till all in-progress cleanups are done
1479          * specifically we're interested in ofd cleanup
1480          * as it pins OSS */
1481         obd_zombie_barrier();
1482
1483         /* Stop the servers (MDS, OSS) if no longer needed.  We must wait
1484            until the target is really gone so that our type refcount check
1485            is right. */
1486         server_stop_servers(lsiflags);
1487
1488         /* In case of startup or cleanup err, stop related obds */
1489         if (extraname) {
1490                 obd = class_name2obd(extraname);
1491                 if (obd) {
1492                         CWARN("Cleaning orphaned obd %s\n", extraname);
1493                         obd->obd_force = 1;
1494                         class_manual_cleanup(obd);
1495                 }
1496                 OBD_FREE(extraname, strlen(extraname) + 1);
1497         }
1498
1499         LCONSOLE_WARN("server umount %s complete\n", tmpname);
1500         OBD_FREE(tmpname, tmpname_sz);
1501         EXIT;
1502 }
1503
1504 /** Called only for 'umount -f'
1505  */
1506 static void server_umount_begin(struct super_block *sb)
1507 {
1508         struct lustre_sb_info *lsi = s2lsi(sb);
1509         ENTRY;
1510
1511         CDEBUG(D_MOUNT, "umount -f\n");
1512         /* umount = failover
1513            umount -f = force
1514            no third way to do non-force, non-failover */
1515         lsi->lsi_flags &= ~LSI_UMOUNT_FAILOVER;
1516         EXIT;
1517 }
1518
1519 static int server_statfs(struct dentry *dentry, struct kstatfs *buf)
1520 {
1521         struct super_block *sb = dentry->d_sb;
1522         struct lustre_sb_info *lsi = s2lsi(sb);
1523         struct obd_statfs statfs;
1524         int rc;
1525         ENTRY;
1526
1527         if (lsi->lsi_dt_dev) {
1528                 rc = dt_statfs(NULL, lsi->lsi_dt_dev, &statfs);
1529                 if (rc == 0) {
1530                         statfs_unpack(buf, &statfs);
1531                         buf->f_type = sb->s_magic;
1532                         RETURN(0);
1533                 }
1534         }
1535
1536         /* just return 0 */
1537         buf->f_type = sb->s_magic;
1538         buf->f_bsize = sb->s_blocksize;
1539         buf->f_blocks = 1;
1540         buf->f_bfree = 0;
1541         buf->f_bavail = 0;
1542         buf->f_files = 1;
1543         buf->f_ffree = 0;
1544         buf->f_namelen = NAME_MAX;
1545         RETURN(0);
1546 }
1547
1548 /** The operations we support directly on the superblock:
1549  * mount, umount, and df.
1550  */
1551 static struct super_operations server_ops = {
1552         .put_super      = server_put_super,
1553         .umount_begin   = server_umount_begin, /* umount -f */
1554         .statfs         = server_statfs,
1555 };
1556
1557 #define log2(n) ffz(~(n))
1558 #define LUSTRE_SUPER_MAGIC 0x0BD00BD1
1559
1560 static int server_fill_super_common(struct super_block *sb)
1561 {
1562         struct inode *root = 0;
1563         ENTRY;
1564
1565         CDEBUG(D_MOUNT, "Server sb, dev=%d\n", (int)sb->s_dev);
1566
1567         sb->s_blocksize = 4096;
1568         sb->s_blocksize_bits = log2(sb->s_blocksize);
1569         sb->s_magic = LUSTRE_SUPER_MAGIC;
1570         sb->s_maxbytes = 0; /* we don't allow file IO on server mountpoints */
1571         sb->s_flags |= MS_RDONLY;
1572         sb->s_op = &server_ops;
1573
1574         root = new_inode(sb);
1575         if (!root) {
1576                 CERROR("Can't make root inode\n");
1577                 RETURN(-EIO);
1578         }
1579
1580         /* returns -EIO for every operation */
1581         /* make_bad_inode(root); -- badness - can't umount */
1582         /* apparently we need to be a directory for the mount to finish */
1583         root->i_mode = S_IFDIR;
1584
1585         sb->s_root = d_make_root(root);
1586         if (!sb->s_root) {
1587                 CERROR("%s: can't make root dentry\n", sb->s_id);
1588                 RETURN(-EIO);
1589         }
1590
1591         RETURN(0);
1592 }
1593
1594 static int osd_start(struct lustre_sb_info *lsi, unsigned long mflags)
1595 {
1596         struct lustre_mount_data *lmd = lsi->lsi_lmd;
1597         struct obd_device        *obd;
1598         struct dt_device_param    p;
1599         char                      flagstr[16];
1600         int                       rc;
1601         ENTRY;
1602
1603         CDEBUG(D_MOUNT,
1604                "Attempting to start %s, type=%s, lsifl=%x, mountfl=%lx\n",
1605                lsi->lsi_svname, lsi->lsi_osd_type, lsi->lsi_flags, mflags);
1606
1607         sprintf(lsi->lsi_osd_obdname, "%s-osd", lsi->lsi_svname);
1608         strcpy(lsi->lsi_osd_uuid, lsi->lsi_osd_obdname);
1609         strcat(lsi->lsi_osd_uuid, "_UUID");
1610         sprintf(flagstr, "%lu:%lu", mflags, (unsigned long) lmd->lmd_flags);
1611
1612         obd = class_name2obd(lsi->lsi_osd_obdname);
1613         if (obd == NULL) {
1614                 rc = lustre_start_simple(lsi->lsi_osd_obdname,
1615                                          lsi->lsi_osd_type,
1616                                          lsi->lsi_osd_uuid, lmd->lmd_dev,
1617                                          flagstr, lsi->lsi_lmd->lmd_opts,
1618                                          lsi->lsi_svname);
1619                 if (rc)
1620                         GOTO(out, rc);
1621                 obd = class_name2obd(lsi->lsi_osd_obdname);
1622                 LASSERT(obd);
1623         }
1624
1625         rc = obd_connect(NULL, &lsi->lsi_osd_exp,
1626                          obd, &obd->obd_uuid, NULL, NULL);
1627         if (rc) {
1628                 obd->obd_force = 1;
1629                 class_manual_cleanup(obd);
1630                 lsi->lsi_dt_dev = NULL;
1631         }
1632
1633         /* XXX: to keep support old components relying on lsi_srv_mnt
1634          *      we get this info from OSD just started */
1635         LASSERT(obd->obd_lu_dev);
1636         lsi->lsi_dt_dev = lu2dt_dev(obd->obd_lu_dev);
1637         LASSERT(lsi->lsi_dt_dev);
1638
1639         dt_conf_get(NULL, lsi->lsi_dt_dev, &p);
1640
1641         lsi->lsi_srv_mnt = p.ddp_mnt;
1642
1643 out:
1644         RETURN(rc);
1645 }
1646
1647 /** Fill in the superblock info for a Lustre server.
1648  * Mount the device with the correct options.
1649  * Read the on-disk config file.
1650  * Start the services.
1651  */
1652 int server_fill_super(struct super_block *sb)
1653 {
1654         struct lustre_sb_info *lsi = s2lsi(sb);
1655         int rc;
1656         ENTRY;
1657
1658         rc = lsi_prepare(lsi);
1659         if (rc)
1660                 RETURN(rc);
1661
1662         /* Start low level OSD */
1663         rc = osd_start(lsi, sb->s_flags);
1664         if (rc) {
1665                 CERROR("Unable to start osd on %s: %d\n",
1666                        lsi->lsi_lmd->lmd_dev, rc);
1667                 lustre_put_lsi(sb);
1668                 RETURN(rc);
1669         }
1670
1671         CDEBUG(D_MOUNT, "Found service %s on device %s\n",
1672                lsi->lsi_svname, lsi->lsi_lmd->lmd_dev);
1673
1674         if (class_name2obd(lsi->lsi_svname)) {
1675                 LCONSOLE_ERROR_MSG(0x161, "The target named %s is already "
1676                                    "running. Double-mount may have compromised"
1677                                    " the disk journal.\n",
1678                                    lsi->lsi_svname);
1679                 lustre_put_lsi(sb);
1680                 RETURN(-EALREADY);
1681         }
1682
1683         /* Start MGS before MGC */
1684         if (IS_MGS(lsi) && !(lsi->lsi_lmd->lmd_flags & LMD_FLG_NOMGS)) {
1685                 rc = server_start_mgs(sb);
1686                 if (rc)
1687                         GOTO(out_mnt, rc);
1688         }
1689
1690         /* Start MGC before servers */
1691         rc = lustre_start_mgc(sb);
1692         if (rc)
1693                 GOTO(out_mnt, rc);
1694
1695         /* Set up all obd devices for service */
1696         if (!(lsi->lsi_lmd->lmd_flags & LMD_FLG_NOSVC) &&
1697             (IS_OST(lsi) || IS_MDT(lsi))) {
1698                 rc = server_start_targets(sb, lsi->lsi_srv_mnt);
1699                 if (rc < 0) {
1700                         CERROR("Unable to start targets: %d\n", rc);
1701                         GOTO(out_mnt, rc);
1702                 }
1703                 /* FIXME overmount client here, or can we just start a
1704                  * client log and client_fill_super on this sb?  We
1705                  * need to make sure server_put_super gets called too
1706                  * - ll_put_super calls lustre_common_put_super; check
1707                  * there for LSI_SERVER flag, call s_p_s if so.
1708                  *
1709                  * Probably should start client from new thread so we
1710                  * can return.  Client will not finish until all
1711                  * servers are connected.  Note - MGS-only server does
1712                  * NOT get a client, since there is no lustre fs
1713                  * associated - the MGS is for all lustre fs's */
1714         }
1715
1716         rc = server_fill_super_common(sb);
1717         if (rc)
1718                 GOTO(out_mnt, rc);
1719
1720         RETURN(0);
1721 out_mnt:
1722         /* We jump here in case of failure while starting targets or MGS.
1723          * In this case we can't just put @mnt and have to do real cleanup
1724          * with stoping targets, etc. */
1725         server_put_super(sb);
1726         return rc;
1727 }
1728
1729 /*
1730  * Calculate timeout value for a target.
1731  */
1732 void server_calc_timeout(struct lustre_sb_info *lsi, struct obd_device *obd)
1733 {
1734         struct lustre_mount_data *lmd;
1735         int soft = 0;
1736         int hard = 0;
1737         int factor = 0;
1738         bool has_ir = !!(lsi->lsi_flags & LDD_F_IR_CAPABLE);
1739         int min = OBD_RECOVERY_TIME_MIN;
1740
1741         LASSERT(IS_SERVER(lsi));
1742
1743         lmd = lsi->lsi_lmd;
1744         if (lmd) {
1745                 soft   = lmd->lmd_recovery_time_soft;
1746                 hard   = lmd->lmd_recovery_time_hard;
1747                 has_ir = has_ir && !(lmd->lmd_flags & LMD_FLG_NOIR);
1748                 obd->obd_no_ir = !has_ir;
1749         }
1750
1751         if (soft == 0)
1752                 soft = OBD_RECOVERY_TIME_SOFT;
1753         if (hard == 0)
1754                 hard = OBD_RECOVERY_TIME_HARD;
1755
1756         /* target may have ir_factor configured. */
1757         factor = OBD_IR_FACTOR_DEFAULT;
1758         if (obd->obd_recovery_ir_factor)
1759                 factor = obd->obd_recovery_ir_factor;
1760
1761         if (has_ir) {
1762                 int new_soft = soft;
1763                 int new_hard = hard;
1764
1765                 /* adjust timeout value by imperative recovery */
1766
1767                 new_soft = (soft * factor) / OBD_IR_FACTOR_MAX;
1768                 new_hard = (hard * factor) / OBD_IR_FACTOR_MAX;
1769
1770                 /* make sure the timeout is not too short */
1771                 new_soft = max(min, new_soft);
1772                 new_hard = max(new_soft, new_hard);
1773
1774                 LCONSOLE_INFO("%s: Imperative Recovery enabled, recovery "
1775                               "window shrunk from %d-%d down to %d-%d\n",
1776                               obd->obd_name, soft, hard, new_soft, new_hard);
1777
1778                 soft = new_soft;
1779                 hard = new_hard;
1780         }
1781
1782         /* we're done */
1783         obd->obd_recovery_timeout   = max(obd->obd_recovery_timeout, soft);
1784         obd->obd_recovery_time_hard = hard;
1785         obd->obd_recovery_ir_factor = factor;
1786 }
1787 EXPORT_SYMBOL(server_calc_timeout);