Whamcloud - gitweb
Call cmm_device_free() in the failure path of cmm_device_alloc().
[fs/lustre-release.git] / lustre / cmm / cmm_device.c
1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
2  * vim:expandtab:shiftwidth=8:tabstop=8:
3  *
4  * GPL HEADER START
5  *
6  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License version 2 only,
10  * as published by the Free Software Foundation.
11  *
12  * This program is distributed in the hope that it will be useful, but
13  * WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * General Public License version 2 for more details (a copy is included
16  * in the LICENSE file that accompanied this code).
17  *
18  * You should have received a copy of the GNU General Public License
19  * version 2 along with this program; If not, see
20  * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
21  *
22  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
23  * CA 95054 USA or visit www.sun.com if you need additional information or
24  * have any questions.
25  *
26  * GPL HEADER END
27  */
28 /*
29  * Copyright  2008 Sun Microsystems, Inc. All rights reserved
30  * Use is subject to license terms.
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/cmm/cmm_device.c
37  *
38  * Lustre Cluster Metadata Manager (cmm)
39  *
40  * Author: Mike Pershin <tappro@clusterfs.com>
41  */
42
43 #ifndef EXPORT_SYMTAB
44 # define EXPORT_SYMTAB
45 #endif
46 #define DEBUG_SUBSYSTEM S_MDS
47
48 #include <linux/module.h>
49
50 #include <obd.h>
51 #include <obd_class.h>
52 #include <lprocfs_status.h>
53 #include <lustre_ver.h>
54 #include "cmm_internal.h"
55 #include "mdc_internal.h"
56
57 static struct obd_ops cmm_obd_device_ops = {
58         .o_owner           = THIS_MODULE
59 };
60
61 static struct lu_device_operations cmm_lu_ops;
62
63 static inline int lu_device_is_cmm(struct lu_device *d)
64 {
65         return ergo(d != NULL && d->ld_ops != NULL, d->ld_ops == &cmm_lu_ops);
66 }
67
68 int cmm_root_get(const struct lu_env *env, struct md_device *md,
69                  struct lu_fid *fid)
70 {
71         struct cmm_device *cmm_dev = md2cmm_dev(md);
72         /* valid only on master MDS */
73         if (cmm_dev->cmm_local_num == 0)
74                 return cmm_child_ops(cmm_dev)->mdo_root_get(env,
75                                      cmm_dev->cmm_child, fid);
76         else
77                 return -EINVAL;
78 }
79
80 static int cmm_statfs(const struct lu_env *env, struct md_device *md,
81                       struct kstatfs *sfs)
82 {
83         struct cmm_device *cmm_dev = md2cmm_dev(md);
84         int rc;
85
86         ENTRY;
87         rc = cmm_child_ops(cmm_dev)->mdo_statfs(env,
88                                                 cmm_dev->cmm_child, sfs);
89         RETURN (rc);
90 }
91
92 static int cmm_maxsize_get(const struct lu_env *env, struct md_device *md,
93                            int *md_size, int *cookie_size)
94 {
95         struct cmm_device *cmm_dev = md2cmm_dev(md);
96         int rc;
97         ENTRY;
98         rc = cmm_child_ops(cmm_dev)->mdo_maxsize_get(env, cmm_dev->cmm_child,
99                                                      md_size, cookie_size);
100         RETURN(rc);
101 }
102
103 static int cmm_init_capa_ctxt(const struct lu_env *env, struct md_device *md,
104                               int mode , unsigned long timeout, __u32 alg,
105                               struct lustre_capa_key *keys)
106 {
107         struct cmm_device *cmm_dev = md2cmm_dev(md);
108         int rc;
109         ENTRY;
110         LASSERT(cmm_child_ops(cmm_dev)->mdo_init_capa_ctxt);
111         rc = cmm_child_ops(cmm_dev)->mdo_init_capa_ctxt(env, cmm_dev->cmm_child,
112                                                         mode, timeout, alg,
113                                                         keys);
114         RETURN(rc);
115 }
116
117 static int cmm_update_capa_key(const struct lu_env *env,
118                                struct md_device *md,
119                                struct lustre_capa_key *key)
120 {
121         struct cmm_device *cmm_dev = md2cmm_dev(md);
122         int rc;
123         ENTRY;
124         rc = cmm_child_ops(cmm_dev)->mdo_update_capa_key(env,
125                                                          cmm_dev->cmm_child,
126                                                          key);
127         RETURN(rc);
128 }
129
130 static struct md_device_operations cmm_md_ops = {
131         .mdo_statfs          = cmm_statfs,
132         .mdo_root_get        = cmm_root_get,
133         .mdo_maxsize_get     = cmm_maxsize_get,
134         .mdo_init_capa_ctxt  = cmm_init_capa_ctxt,
135         .mdo_update_capa_key = cmm_update_capa_key,
136 };
137
138 extern struct lu_device_type mdc_device_type;
139
140 static int cmm_post_init_mdc(const struct lu_env *env,
141                              struct cmm_device *cmm)
142 {
143         int max_mdsize, max_cookiesize, rc;
144         struct mdc_device *mc, *tmp;
145
146         /* get the max mdsize and cookiesize from lower layer */
147         rc = cmm_maxsize_get(env, &cmm->cmm_md_dev, &max_mdsize,
148                                                 &max_cookiesize);
149         if (rc)
150                 RETURN(rc);
151
152         spin_lock(&cmm->cmm_tgt_guard);
153         list_for_each_entry_safe(mc, tmp, &cmm->cmm_targets,
154                                  mc_linkage) {
155                 cmm_mdc_init_ea_size(env, mc, max_mdsize, max_cookiesize);
156         }
157         spin_unlock(&cmm->cmm_tgt_guard);
158         RETURN(rc);
159 }
160
161 /* --- cmm_lu_operations --- */
162 /* add new MDC to the CMM, create MDC lu_device and connect it to mdc_obd */
163 static int cmm_add_mdc(const struct lu_env *env,
164                        struct cmm_device *cm, struct lustre_cfg *cfg)
165 {
166         struct lu_device_type *ldt = &mdc_device_type;
167         char *p, *num = lustre_cfg_string(cfg, 2);
168         struct mdc_device *mc, *tmp;
169         struct lu_fld_target target;
170         struct lu_device *ld;
171         mdsno_t mdc_num;
172         int rc;
173         ENTRY;
174
175         /* find out that there is no such mdc */
176         LASSERT(num);
177         mdc_num = simple_strtol(num, &p, 10);
178         if (*p) {
179                 CERROR("Invalid index in lustre_cgf, offset 2\n");
180                 RETURN(-EINVAL);
181         }
182
183         spin_lock(&cm->cmm_tgt_guard);
184         list_for_each_entry_safe(mc, tmp, &cm->cmm_targets,
185                                  mc_linkage) {
186                 if (mc->mc_num == mdc_num) {
187                         spin_unlock(&cm->cmm_tgt_guard);
188                         RETURN(-EEXIST);
189                 }
190         }
191         spin_unlock(&cm->cmm_tgt_guard);
192         ld = ldt->ldt_ops->ldto_device_alloc(env, ldt, cfg);
193         if (IS_ERR(ld))
194                 RETURN(PTR_ERR(ld));
195
196         ld->ld_site = cmm2lu_dev(cm)->ld_site;
197
198         rc = ldt->ldt_ops->ldto_device_init(env, ld, NULL, NULL);
199         if (rc) {
200                 ldt->ldt_ops->ldto_device_free(env, ld);
201                 RETURN(rc);
202         }
203         /* pass config to the just created MDC */
204         rc = ld->ld_ops->ldo_process_config(env, ld, cfg);
205         if (rc) {
206                 ldt->ldt_ops->ldto_device_fini(env, ld);
207                 ldt->ldt_ops->ldto_device_free(env, ld);
208                 RETURN(rc);
209         }
210
211         spin_lock(&cm->cmm_tgt_guard);
212         list_for_each_entry_safe(mc, tmp, &cm->cmm_targets,
213                                  mc_linkage) {
214                 if (mc->mc_num == mdc_num) {
215                         spin_unlock(&cm->cmm_tgt_guard);
216                         ldt->ldt_ops->ldto_device_fini(env, ld);
217                         ldt->ldt_ops->ldto_device_free(env, ld);
218                         RETURN(-EEXIST);
219                 }
220         }
221         mc = lu2mdc_dev(ld);
222         list_add_tail(&mc->mc_linkage, &cm->cmm_targets);
223         cm->cmm_tgt_count++;
224         spin_unlock(&cm->cmm_tgt_guard);
225
226         lu_device_get(cmm2lu_dev(cm));
227
228         target.ft_srv = NULL;
229         target.ft_idx = mc->mc_num;
230         target.ft_exp = mc->mc_desc.cl_exp;
231         fld_client_add_target(cm->cmm_fld, &target);
232
233         /* Set max md size for the mdc. */
234         rc = cmm_post_init_mdc(env, cm);
235         RETURN(rc);
236 }
237
238 static void cmm_device_shutdown(const struct lu_env *env,
239                                 struct cmm_device *cm,
240                                 struct lustre_cfg *cfg)
241 {
242         struct mdc_device *mc, *tmp;
243         ENTRY;
244
245         /* Remove local target from FLD. */
246         fld_client_del_target(cm->cmm_fld, cm->cmm_local_num);
247
248         /* Finish all mdc devices. */
249         spin_lock(&cm->cmm_tgt_guard);
250         list_for_each_entry_safe(mc, tmp, &cm->cmm_targets, mc_linkage) {
251                 struct lu_device *ld_m = mdc2lu_dev(mc);
252                 fld_client_del_target(cm->cmm_fld, mc->mc_num);
253                 ld_m->ld_ops->ldo_process_config(env, ld_m, cfg);
254         }
255         spin_unlock(&cm->cmm_tgt_guard);
256
257         /* remove upcall device*/
258         md_upcall_fini(&cm->cmm_md_dev);
259
260         EXIT;
261 }
262
263 static int cmm_device_mount(const struct lu_env *env,
264                             struct cmm_device *m, struct lustre_cfg *cfg)
265 {
266         const char *index = lustre_cfg_string(cfg, 2);
267         char *p;
268
269         LASSERT(index != NULL);
270
271         m->cmm_local_num = simple_strtol(index, &p, 10);
272         if (*p) {
273                 CERROR("Invalid index in lustre_cgf\n");
274                 RETURN(-EINVAL);
275         }
276
277         RETURN(0);
278 }
279
280 static int cmm_process_config(const struct lu_env *env,
281                               struct lu_device *d, struct lustre_cfg *cfg)
282 {
283         struct cmm_device *m = lu2cmm_dev(d);
284         struct lu_device *next = md2lu_dev(m->cmm_child);
285         int err;
286         ENTRY;
287
288         switch(cfg->lcfg_command) {
289         case LCFG_ADD_MDC:
290                 /* On first ADD_MDC add also local target. */
291                 if (!(m->cmm_flags & CMM_INITIALIZED)) {
292                         struct lu_site *ls = cmm2lu_dev(m)->ld_site;
293                         struct lu_fld_target target;
294
295                         target.ft_srv = ls->ls_server_fld;
296                         target.ft_idx = m->cmm_local_num;
297                         target.ft_exp = NULL;
298
299                         fld_client_add_target(m->cmm_fld, &target);
300                 }
301                 err = cmm_add_mdc(env, m, cfg);
302
303                 /* The first ADD_MDC can be counted as setup is finished. */
304                 if (!(m->cmm_flags & CMM_INITIALIZED))
305                         m->cmm_flags |= CMM_INITIALIZED;
306
307                 break;
308         case LCFG_SETUP:
309         {
310                 /* lower layers should be set up at first */
311                 err = next->ld_ops->ldo_process_config(env, next, cfg);
312                 if (err == 0)
313                         err = cmm_device_mount(env, m, cfg);
314                 break;
315         }
316         case LCFG_CLEANUP:
317         {
318                 cmm_device_shutdown(env, m, cfg);
319         }
320         default:
321                 err = next->ld_ops->ldo_process_config(env, next, cfg);
322         }
323         RETURN(err);
324 }
325
326 static int cmm_recovery_complete(const struct lu_env *env,
327                                  struct lu_device *d)
328 {
329         struct cmm_device *m = lu2cmm_dev(d);
330         struct lu_device *next = md2lu_dev(m->cmm_child);
331         int rc;
332         ENTRY;
333         rc = next->ld_ops->ldo_recovery_complete(env, next);
334         RETURN(rc);
335 }
336
337 static struct lu_device_operations cmm_lu_ops = {
338         .ldo_object_alloc      = cmm_object_alloc,
339         .ldo_process_config    = cmm_process_config,
340         .ldo_recovery_complete = cmm_recovery_complete
341 };
342
343 /* --- lu_device_type operations --- */
344 int cmm_upcall(const struct lu_env *env, struct md_device *md,
345                enum md_upcall_event ev)
346 {
347         int rc;
348         ENTRY;
349
350         switch (ev) {
351                 case MD_LOV_SYNC:
352                         rc = cmm_post_init_mdc(env, md2cmm_dev(md));
353                         if (rc)
354                                 CERROR("can not init md size %d\n", rc);
355                         /* fall through */
356                 default:
357                         rc = md_do_upcall(env, md, ev);
358         }
359         RETURN(rc);
360 }
361
362 static struct lu_device *cmm_device_free(const struct lu_env *env,
363                                          struct lu_device *d)
364 {
365         struct cmm_device *m = lu2cmm_dev(d);
366         struct lu_device  *next = md2lu_dev(m->cmm_child);
367         ENTRY;
368
369         LASSERT(m->cmm_tgt_count == 0);
370         LASSERT(list_empty(&m->cmm_targets));
371         if (m->cmm_fld != NULL) {
372                 OBD_FREE_PTR(m->cmm_fld);
373                 m->cmm_fld = NULL;
374         }
375         md_device_fini(&m->cmm_md_dev);
376         OBD_FREE_PTR(m);
377         RETURN(next);
378 }
379
380 static struct lu_device *cmm_device_alloc(const struct lu_env *env,
381                                           struct lu_device_type *t,
382                                           struct lustre_cfg *cfg)
383 {
384         struct lu_device  *l;
385         struct cmm_device *m;
386         ENTRY;
387
388         OBD_ALLOC_PTR(m);
389         if (m == NULL) {
390                 l = ERR_PTR(-ENOMEM);
391         } else {
392                 md_device_init(&m->cmm_md_dev, t);
393                 m->cmm_md_dev.md_ops = &cmm_md_ops;
394                 md_upcall_init(&m->cmm_md_dev, cmm_upcall);
395                 l = cmm2lu_dev(m);
396                 l->ld_ops = &cmm_lu_ops;
397
398                 OBD_ALLOC_PTR(m->cmm_fld);
399                 if (!m->cmm_fld) {
400                         cmm_device_free(env, l);
401                         l = ERR_PTR(-ENOMEM);
402         }
403         }
404         RETURN(l);
405 }
406
407 /* context key constructor/destructor: cmm_key_init, cmm_key_fini */
408 LU_KEY_INIT_FINI(cmm, struct cmm_thread_info);
409
410 /* context key: cmm_thread_key */
411 LU_CONTEXT_KEY_DEFINE(cmm, LCT_MD_THREAD);
412
413 struct cmm_thread_info *cmm_env_info(const struct lu_env *env)
414 {
415         struct cmm_thread_info *info;
416
417         info = lu_context_key_get(&env->le_ctx, &cmm_thread_key);
418         LASSERT(info != NULL);
419         return info;
420 }
421
422 /* type constructor/destructor: cmm_type_init/cmm_type_fini */
423 LU_TYPE_INIT_FINI(cmm, &cmm_thread_key);
424
425 static int cmm_device_init(const struct lu_env *env, struct lu_device *d,
426                            const char *name, struct lu_device *next)
427 {
428         struct cmm_device *m = lu2cmm_dev(d);
429         struct lu_site *ls;
430         int err = 0;
431         ENTRY;
432
433         spin_lock_init(&m->cmm_tgt_guard);
434         CFS_INIT_LIST_HEAD(&m->cmm_targets);
435         m->cmm_tgt_count = 0;
436         m->cmm_child = lu2md_dev(next);
437
438         err = fld_client_init(m->cmm_fld, name,
439                               LUSTRE_CLI_FLD_HASH_DHT);
440         if (err) {
441                 CERROR("Can't init FLD, err %d\n", err);
442                 RETURN(err);
443         }
444
445         /* Assign site's fld client ref, needed for asserts in osd. */
446         ls = cmm2lu_dev(m)->ld_site;
447         ls->ls_client_fld = m->cmm_fld;
448         err = cmm_procfs_init(m, name);
449         
450         RETURN(err);
451 }
452
453 static struct lu_device *cmm_device_fini(const struct lu_env *env,
454                                          struct lu_device *ld)
455 {
456         struct cmm_device *cm = lu2cmm_dev(ld);
457         struct mdc_device *mc, *tmp;
458         struct lu_site *ls;
459         ENTRY;
460
461         /* Finish all mdc devices */
462         spin_lock(&cm->cmm_tgt_guard);
463         list_for_each_entry_safe(mc, tmp, &cm->cmm_targets, mc_linkage) {
464                 struct lu_device *ld_m = mdc2lu_dev(mc);
465
466                 list_del_init(&mc->mc_linkage);
467                 lu_device_put(cmm2lu_dev(cm));
468                 ld_m->ld_type->ldt_ops->ldto_device_fini(env, ld_m);
469                 ld_m->ld_type->ldt_ops->ldto_device_free(env, ld_m);
470                 cm->cmm_tgt_count--;
471         }
472         spin_unlock(&cm->cmm_tgt_guard);
473
474         fld_client_fini(cm->cmm_fld);
475         ls = cmm2lu_dev(cm)->ld_site;
476         ls->ls_client_fld = NULL;
477         cmm_procfs_fini(cm);
478
479         RETURN (md2lu_dev(cm->cmm_child));
480 }
481
482 static struct lu_device_type_operations cmm_device_type_ops = {
483         .ldto_init = cmm_type_init,
484         .ldto_fini = cmm_type_fini,
485
486         .ldto_device_alloc = cmm_device_alloc,
487         .ldto_device_free  = cmm_device_free,
488
489         .ldto_device_init = cmm_device_init,
490         .ldto_device_fini = cmm_device_fini
491 };
492
493 static struct lu_device_type cmm_device_type = {
494         .ldt_tags     = LU_DEVICE_MD,
495         .ldt_name     = LUSTRE_CMM_NAME,
496         .ldt_ops      = &cmm_device_type_ops,
497         .ldt_ctx_tags = LCT_MD_THREAD | LCT_DT_THREAD
498 };
499
500 struct lprocfs_vars lprocfs_cmm_obd_vars[] = {
501         { 0 }
502 };
503
504 struct lprocfs_vars lprocfs_cmm_module_vars[] = {
505         { 0 }
506 };
507
508 static void lprocfs_cmm_init_vars(struct lprocfs_static_vars *lvars)
509 {
510     lvars->module_vars  = lprocfs_cmm_module_vars;
511     lvars->obd_vars     = lprocfs_cmm_obd_vars;
512 }
513
514 static int __init cmm_mod_init(void)
515 {
516         struct lprocfs_static_vars lvars;
517
518         lprocfs_cmm_init_vars(&lvars);
519         return class_register_type(&cmm_obd_device_ops, NULL, lvars.module_vars,
520                                    LUSTRE_CMM_NAME, &cmm_device_type);
521 }
522
523 static void __exit cmm_mod_exit(void)
524 {
525         class_unregister_type(LUSTRE_CMM_NAME);
526 }
527
528 MODULE_AUTHOR("Sun Microsystems, Inc. <http://www.lustre.org/>");
529 MODULE_DESCRIPTION("Lustre Clustered Metadata Manager ("LUSTRE_CMM_NAME")");
530 MODULE_LICENSE("GPL");
531
532 cfs_module(cmm, "0.1.0", cmm_mod_init, cmm_mod_exit);