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