Add the rt linux 4.1.3-rt3 as base
[kvmfornfv.git] / kernel / drivers / staging / lustre / lustre / lov / lov_dev.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) 2008, 2010, Oracle and/or its affiliates. All rights reserved.
28  * Use is subject to license terms.
29  *
30  * Copyright (c) 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  * Implementation of cl_device and cl_device_type for LOV layer.
37  *
38  *   Author: Nikita Danilov <nikita.danilov@sun.com>
39  */
40
41 #define DEBUG_SUBSYSTEM S_LOV
42
43 /* class_name2obd() */
44 #include "../include/obd_class.h"
45
46 #include "lov_cl_internal.h"
47 #include "lov_internal.h"
48
49
50 struct kmem_cache *lov_lock_kmem;
51 struct kmem_cache *lov_object_kmem;
52 struct kmem_cache *lov_thread_kmem;
53 struct kmem_cache *lov_session_kmem;
54 struct kmem_cache *lov_req_kmem;
55
56 struct kmem_cache *lovsub_lock_kmem;
57 struct kmem_cache *lovsub_object_kmem;
58 struct kmem_cache *lovsub_req_kmem;
59
60 struct kmem_cache *lov_lock_link_kmem;
61
62 /** Lock class of lov_device::ld_mutex. */
63 static struct lock_class_key cl_lov_device_mutex_class;
64
65 struct lu_kmem_descr lov_caches[] = {
66         {
67                 .ckd_cache = &lov_lock_kmem,
68                 .ckd_name  = "lov_lock_kmem",
69                 .ckd_size  = sizeof(struct lov_lock)
70         },
71         {
72                 .ckd_cache = &lov_object_kmem,
73                 .ckd_name  = "lov_object_kmem",
74                 .ckd_size  = sizeof(struct lov_object)
75         },
76         {
77                 .ckd_cache = &lov_thread_kmem,
78                 .ckd_name  = "lov_thread_kmem",
79                 .ckd_size  = sizeof(struct lov_thread_info)
80         },
81         {
82                 .ckd_cache = &lov_session_kmem,
83                 .ckd_name  = "lov_session_kmem",
84                 .ckd_size  = sizeof(struct lov_session)
85         },
86         {
87                 .ckd_cache = &lov_req_kmem,
88                 .ckd_name  = "lov_req_kmem",
89                 .ckd_size  = sizeof(struct lov_req)
90         },
91         {
92                 .ckd_cache = &lovsub_lock_kmem,
93                 .ckd_name  = "lovsub_lock_kmem",
94                 .ckd_size  = sizeof(struct lovsub_lock)
95         },
96         {
97                 .ckd_cache = &lovsub_object_kmem,
98                 .ckd_name  = "lovsub_object_kmem",
99                 .ckd_size  = sizeof(struct lovsub_object)
100         },
101         {
102                 .ckd_cache = &lovsub_req_kmem,
103                 .ckd_name  = "lovsub_req_kmem",
104                 .ckd_size  = sizeof(struct lovsub_req)
105         },
106         {
107                 .ckd_cache = &lov_lock_link_kmem,
108                 .ckd_name  = "lov_lock_link_kmem",
109                 .ckd_size  = sizeof(struct lov_lock_link)
110         },
111         {
112                 .ckd_cache = NULL
113         }
114 };
115
116 /*****************************************************************************
117  *
118  * Lov transfer operations.
119  *
120  */
121
122 static void lov_req_completion(const struct lu_env *env,
123                                const struct cl_req_slice *slice, int ioret)
124 {
125         struct lov_req *lr;
126
127         lr = cl2lov_req(slice);
128         OBD_SLAB_FREE_PTR(lr, lov_req_kmem);
129 }
130
131 static const struct cl_req_operations lov_req_ops = {
132         .cro_completion = lov_req_completion
133 };
134
135 /*****************************************************************************
136  *
137  * Lov device and device type functions.
138  *
139  */
140
141 static void *lov_key_init(const struct lu_context *ctx,
142                           struct lu_context_key *key)
143 {
144         struct lov_thread_info *info;
145
146         OBD_SLAB_ALLOC_PTR_GFP(info, lov_thread_kmem, GFP_NOFS);
147         if (info != NULL)
148                 INIT_LIST_HEAD(&info->lti_closure.clc_list);
149         else
150                 info = ERR_PTR(-ENOMEM);
151         return info;
152 }
153
154 static void lov_key_fini(const struct lu_context *ctx,
155                          struct lu_context_key *key, void *data)
156 {
157         struct lov_thread_info *info = data;
158         LINVRNT(list_empty(&info->lti_closure.clc_list));
159         OBD_SLAB_FREE_PTR(info, lov_thread_kmem);
160 }
161
162 struct lu_context_key lov_key = {
163         .lct_tags = LCT_CL_THREAD,
164         .lct_init = lov_key_init,
165         .lct_fini = lov_key_fini
166 };
167
168 static void *lov_session_key_init(const struct lu_context *ctx,
169                                   struct lu_context_key *key)
170 {
171         struct lov_session *info;
172
173         OBD_SLAB_ALLOC_PTR_GFP(info, lov_session_kmem, GFP_NOFS);
174         if (info == NULL)
175                 info = ERR_PTR(-ENOMEM);
176         return info;
177 }
178
179 static void lov_session_key_fini(const struct lu_context *ctx,
180                                  struct lu_context_key *key, void *data)
181 {
182         struct lov_session *info = data;
183         OBD_SLAB_FREE_PTR(info, lov_session_kmem);
184 }
185
186 struct lu_context_key lov_session_key = {
187         .lct_tags = LCT_SESSION,
188         .lct_init = lov_session_key_init,
189         .lct_fini = lov_session_key_fini
190 };
191
192 /* type constructor/destructor: lov_type_{init,fini,start,stop}() */
193 LU_TYPE_INIT_FINI(lov, &lov_key, &lov_session_key);
194
195 static struct lu_device *lov_device_fini(const struct lu_env *env,
196                                          struct lu_device *d)
197 {
198         int i;
199         struct lov_device *ld = lu2lov_dev(d);
200
201         LASSERT(ld->ld_lov != NULL);
202         if (ld->ld_target == NULL)
203                 return NULL;
204
205         lov_foreach_target(ld, i) {
206                 struct lovsub_device *lsd;
207
208                 lsd = ld->ld_target[i];
209                 if (lsd != NULL) {
210                         cl_stack_fini(env, lovsub2cl_dev(lsd));
211                         ld->ld_target[i] = NULL;
212                 }
213         }
214         return NULL;
215 }
216
217 static int lov_device_init(const struct lu_env *env, struct lu_device *d,
218                            const char *name, struct lu_device *next)
219 {
220         struct lov_device *ld = lu2lov_dev(d);
221         int i;
222         int rc = 0;
223
224         LASSERT(d->ld_site != NULL);
225         if (ld->ld_target == NULL)
226                 return rc;
227
228         lov_foreach_target(ld, i) {
229                 struct lovsub_device *lsd;
230                 struct cl_device     *cl;
231                 struct lov_tgt_desc  *desc;
232
233                 desc = ld->ld_lov->lov_tgts[i];
234                 if (desc == NULL)
235                         continue;
236
237                 cl = cl_type_setup(env, d->ld_site, &lovsub_device_type,
238                                    desc->ltd_obd->obd_lu_dev);
239                 if (IS_ERR(cl)) {
240                         rc = PTR_ERR(cl);
241                         break;
242                 }
243                 lsd = cl2lovsub_dev(cl);
244                 lsd->acid_idx = i;
245                 lsd->acid_super = ld;
246                 ld->ld_target[i] = lsd;
247         }
248
249         if (rc)
250                 lov_device_fini(env, d);
251         else
252                 ld->ld_flags |= LOV_DEV_INITIALIZED;
253
254         return rc;
255 }
256
257 static int lov_req_init(const struct lu_env *env, struct cl_device *dev,
258                         struct cl_req *req)
259 {
260         struct lov_req *lr;
261         int result;
262
263         OBD_SLAB_ALLOC_PTR_GFP(lr, lov_req_kmem, GFP_NOFS);
264         if (lr != NULL) {
265                 cl_req_slice_add(req, &lr->lr_cl, dev, &lov_req_ops);
266                 result = 0;
267         } else
268                 result = -ENOMEM;
269         return result;
270 }
271
272 static const struct cl_device_operations lov_cl_ops = {
273         .cdo_req_init = lov_req_init
274 };
275
276 static void lov_emerg_free(struct lov_device_emerg **emrg, int nr)
277 {
278         int i;
279
280         for (i = 0; i < nr; ++i) {
281                 struct lov_device_emerg *em;
282
283                 em = emrg[i];
284                 if (em != NULL) {
285                         LASSERT(em->emrg_page_list.pl_nr == 0);
286                         if (em->emrg_env != NULL)
287                                 cl_env_put(em->emrg_env, &em->emrg_refcheck);
288                         OBD_FREE_PTR(em);
289                 }
290         }
291         OBD_FREE(emrg, nr * sizeof(emrg[0]));
292 }
293
294 static struct lu_device *lov_device_free(const struct lu_env *env,
295                                          struct lu_device *d)
296 {
297         struct lov_device *ld = lu2lov_dev(d);
298         const int         nr = ld->ld_target_nr;
299
300         cl_device_fini(lu2cl_dev(d));
301         if (ld->ld_target != NULL)
302                 OBD_FREE(ld->ld_target, nr * sizeof(ld->ld_target[0]));
303         if (ld->ld_emrg != NULL)
304                 lov_emerg_free(ld->ld_emrg, nr);
305         OBD_FREE_PTR(ld);
306         return NULL;
307 }
308
309 static void lov_cl_del_target(const struct lu_env *env, struct lu_device *dev,
310                               __u32 index)
311 {
312         struct lov_device *ld = lu2lov_dev(dev);
313
314         if (ld->ld_target[index] != NULL) {
315                 cl_stack_fini(env, lovsub2cl_dev(ld->ld_target[index]));
316                 ld->ld_target[index] = NULL;
317         }
318 }
319
320 static struct lov_device_emerg **lov_emerg_alloc(int nr)
321 {
322         struct lov_device_emerg **emerg;
323         int i;
324         int result;
325
326         OBD_ALLOC(emerg, nr * sizeof(emerg[0]));
327         if (emerg == NULL)
328                 return ERR_PTR(-ENOMEM);
329         for (result = i = 0; i < nr && result == 0; i++) {
330                 struct lov_device_emerg *em;
331
332                 OBD_ALLOC_PTR(em);
333                 if (em != NULL) {
334                         emerg[i] = em;
335                         cl_page_list_init(&em->emrg_page_list);
336                         em->emrg_env = cl_env_alloc(&em->emrg_refcheck,
337                                                     LCT_REMEMBER|LCT_NOREF);
338                         if (!IS_ERR(em->emrg_env))
339                                 em->emrg_env->le_ctx.lc_cookie = 0x2;
340                         else {
341                                 result = PTR_ERR(em->emrg_env);
342                                 em->emrg_env = NULL;
343                         }
344                 } else
345                         result = -ENOMEM;
346         }
347         if (result != 0) {
348                 lov_emerg_free(emerg, nr);
349                 emerg = ERR_PTR(result);
350         }
351         return emerg;
352 }
353
354 static int lov_expand_targets(const struct lu_env *env, struct lov_device *dev)
355 {
356         int   result;
357         __u32 tgt_size;
358         __u32 sub_size;
359
360         result = 0;
361         tgt_size = dev->ld_lov->lov_tgt_size;
362         sub_size = dev->ld_target_nr;
363         if (sub_size < tgt_size) {
364                 struct lovsub_device    **newd;
365                 struct lov_device_emerg **emerg;
366                 const size_t          sz   = sizeof(newd[0]);
367
368                 emerg = lov_emerg_alloc(tgt_size);
369                 if (IS_ERR(emerg))
370                         return PTR_ERR(emerg);
371
372                 OBD_ALLOC(newd, tgt_size * sz);
373                 if (newd != NULL) {
374                         mutex_lock(&dev->ld_mutex);
375                         if (sub_size > 0) {
376                                 memcpy(newd, dev->ld_target, sub_size * sz);
377                                 OBD_FREE(dev->ld_target, sub_size * sz);
378                         }
379                         dev->ld_target    = newd;
380                         dev->ld_target_nr = tgt_size;
381
382                         if (dev->ld_emrg != NULL)
383                                 lov_emerg_free(dev->ld_emrg, sub_size);
384                         dev->ld_emrg = emerg;
385                         mutex_unlock(&dev->ld_mutex);
386                 } else {
387                         lov_emerg_free(emerg, tgt_size);
388                         result = -ENOMEM;
389                 }
390         }
391         return result;
392 }
393
394 static int lov_cl_add_target(const struct lu_env *env, struct lu_device *dev,
395                              __u32 index)
396 {
397         struct obd_device    *obd = dev->ld_obd;
398         struct lov_device    *ld  = lu2lov_dev(dev);
399         struct lov_tgt_desc  *tgt;
400         struct lovsub_device *lsd;
401         struct cl_device     *cl;
402         int rc;
403
404         obd_getref(obd);
405
406         tgt = obd->u.lov.lov_tgts[index];
407         LASSERT(tgt != NULL);
408         LASSERT(tgt->ltd_obd != NULL);
409
410         if (!tgt->ltd_obd->obd_set_up) {
411                 CERROR("Target %s not set up\n", obd_uuid2str(&tgt->ltd_uuid));
412                 return -EINVAL;
413         }
414
415         rc = lov_expand_targets(env, ld);
416         if (rc == 0 && ld->ld_flags & LOV_DEV_INITIALIZED) {
417                 LASSERT(dev->ld_site != NULL);
418
419                 cl = cl_type_setup(env, dev->ld_site, &lovsub_device_type,
420                                    tgt->ltd_obd->obd_lu_dev);
421                 if (!IS_ERR(cl)) {
422                         lsd = cl2lovsub_dev(cl);
423                         lsd->acid_idx = index;
424                         lsd->acid_super = ld;
425                         ld->ld_target[index] = lsd;
426                 } else {
427                         CERROR("add failed (%d), deleting %s\n", rc,
428                                obd_uuid2str(&tgt->ltd_uuid));
429                         lov_cl_del_target(env, dev, index);
430                         rc = PTR_ERR(cl);
431                 }
432         }
433         obd_putref(obd);
434         return rc;
435 }
436
437 static int lov_process_config(const struct lu_env *env,
438                               struct lu_device *d, struct lustre_cfg *cfg)
439 {
440         struct obd_device *obd = d->ld_obd;
441         int cmd;
442         int rc;
443         int gen;
444         __u32 index;
445
446         obd_getref(obd);
447
448         cmd = cfg->lcfg_command;
449         rc = lov_process_config_base(d->ld_obd, cfg, &index, &gen);
450         if (rc == 0) {
451                 switch (cmd) {
452                 case LCFG_LOV_ADD_OBD:
453                 case LCFG_LOV_ADD_INA:
454                         rc = lov_cl_add_target(env, d, index);
455                         if (rc != 0)
456                                 lov_del_target(d->ld_obd, index, NULL, 0);
457                         break;
458                 case LCFG_LOV_DEL_OBD:
459                         lov_cl_del_target(env, d, index);
460                         break;
461                 }
462         }
463         obd_putref(obd);
464         return rc;
465 }
466
467 static const struct lu_device_operations lov_lu_ops = {
468         .ldo_object_alloc      = lov_object_alloc,
469         .ldo_process_config    = lov_process_config,
470 };
471
472 static struct lu_device *lov_device_alloc(const struct lu_env *env,
473                                           struct lu_device_type *t,
474                                           struct lustre_cfg *cfg)
475 {
476         struct lu_device *d;
477         struct lov_device *ld;
478         struct obd_device *obd;
479         int rc;
480
481         OBD_ALLOC_PTR(ld);
482         if (ld == NULL)
483                 return ERR_PTR(-ENOMEM);
484
485         cl_device_init(&ld->ld_cl, t);
486         d = lov2lu_dev(ld);
487         d->ld_ops       = &lov_lu_ops;
488         ld->ld_cl.cd_ops = &lov_cl_ops;
489
490         mutex_init(&ld->ld_mutex);
491         lockdep_set_class(&ld->ld_mutex, &cl_lov_device_mutex_class);
492
493         /* setup the LOV OBD */
494         obd = class_name2obd(lustre_cfg_string(cfg, 0));
495         LASSERT(obd != NULL);
496         rc = lov_setup(obd, cfg);
497         if (rc) {
498                 lov_device_free(env, d);
499                 return ERR_PTR(rc);
500         }
501
502         ld->ld_lov = &obd->u.lov;
503         return d;
504 }
505
506 static const struct lu_device_type_operations lov_device_type_ops = {
507         .ldto_init = lov_type_init,
508         .ldto_fini = lov_type_fini,
509
510         .ldto_start = lov_type_start,
511         .ldto_stop  = lov_type_stop,
512
513         .ldto_device_alloc = lov_device_alloc,
514         .ldto_device_free  = lov_device_free,
515
516         .ldto_device_init    = lov_device_init,
517         .ldto_device_fini    = lov_device_fini
518 };
519
520 struct lu_device_type lov_device_type = {
521         .ldt_tags     = LU_DEVICE_CL,
522         .ldt_name     = LUSTRE_LOV_NAME,
523         .ldt_ops      = &lov_device_type_ops,
524         .ldt_ctx_tags = LCT_CL_THREAD
525 };
526 EXPORT_SYMBOL(lov_device_type);
527
528 /** @} lov */