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 
lov_req_completion(const struct lu_env * env,const struct cl_req_slice * slice,int ioret)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 
lov_key_init(const struct lu_context * ctx,struct lu_context_key * key)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 
lov_key_fini(const struct lu_context * ctx,struct lu_context_key * key,void * data)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 
lov_session_key_init(const struct lu_context * ctx,struct lu_context_key * key)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 
lov_session_key_fini(const struct lu_context * ctx,struct lu_context_key * key,void * data)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 
lov_device_fini(const struct lu_env * env,struct lu_device * d)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 
lov_device_init(const struct lu_env * env,struct lu_device * d,const char * name,struct lu_device * next)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 
lov_req_init(const struct lu_env * env,struct cl_device * dev,struct cl_req * req)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 
lov_emerg_free(struct lov_device_emerg ** emrg,int nr)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 
lov_device_free(const struct lu_env * env,struct lu_device * d)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 
lov_cl_del_target(const struct lu_env * env,struct lu_device * dev,__u32 index)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 
lov_emerg_alloc(int nr)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 
lov_expand_targets(const struct lu_env * env,struct lov_device * dev)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 
lov_cl_add_target(const struct lu_env * env,struct lu_device * dev,__u32 index)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 
lov_process_config(const struct lu_env * env,struct lu_device * d,struct lustre_cfg * cfg)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 
lov_device_alloc(const struct lu_env * env,struct lu_device_type * t,struct lustre_cfg * cfg)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 */
529