4 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
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.
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).
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
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
27 * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
28 * Use is subject to license terms.
30 * Copyright (c) 2011, 2013, Intel Corporation.
33 * This file is part of Lustre, http://www.lustre.org/
34 * Lustre is a trademark of Sun Microsystems, Inc.
36 * lustre/fld/fld_request.c
38 * FLD (Fids Location Database)
40 * Author: Yury Umanets <umka@clusterfs.com>
43 #define DEBUG_SUBSYSTEM S_FLD
46 # include <libcfs/libcfs.h>
47 # include <linux/module.h>
48 # include <asm/div64.h>
49 #else /* __KERNEL__ */
50 # include <liblustre.h>
51 # include <libcfs/list.h>
55 #include <obd_class.h>
56 #include <obd_support.h>
57 #include <lprocfs_status.h>
58 #include <lustre_req_layout.h>
59 #include <lustre_fld.h>
60 #include <lustre_mdc.h>
61 #include "fld_internal.h"
63 /* TODO: these 3 functions are copies of flow-control code from mdc_lib.c
64 * It should be common thing. The same about mdc RPC lock */
65 static int fld_req_avail(struct client_obd *cli, struct mdc_cache_waiter *mcw)
69 client_obd_list_lock(&cli->cl_loi_list_lock);
70 rc = cfs_list_empty(&mcw->mcw_entry);
71 client_obd_list_unlock(&cli->cl_loi_list_lock);
75 static void fld_enter_request(struct client_obd *cli)
77 struct mdc_cache_waiter mcw;
78 struct l_wait_info lwi = { 0 };
80 client_obd_list_lock(&cli->cl_loi_list_lock);
81 if (cli->cl_r_in_flight >= cli->cl_max_rpcs_in_flight) {
82 cfs_list_add_tail(&mcw.mcw_entry, &cli->cl_cache_waiters);
83 cfs_waitq_init(&mcw.mcw_waitq);
84 client_obd_list_unlock(&cli->cl_loi_list_lock);
85 l_wait_event(mcw.mcw_waitq, fld_req_avail(cli, &mcw), &lwi);
87 cli->cl_r_in_flight++;
88 client_obd_list_unlock(&cli->cl_loi_list_lock);
92 static void fld_exit_request(struct client_obd *cli)
95 struct mdc_cache_waiter *mcw;
97 client_obd_list_lock(&cli->cl_loi_list_lock);
98 cli->cl_r_in_flight--;
99 cfs_list_for_each_safe(l, tmp, &cli->cl_cache_waiters) {
101 if (cli->cl_r_in_flight >= cli->cl_max_rpcs_in_flight) {
102 /* No free request slots anymore */
106 mcw = cfs_list_entry(l, struct mdc_cache_waiter, mcw_entry);
107 cfs_list_del_init(&mcw->mcw_entry);
108 cli->cl_r_in_flight++;
109 cfs_waitq_signal(&mcw->mcw_waitq);
111 client_obd_list_unlock(&cli->cl_loi_list_lock);
114 static int fld_rrb_hash(struct lu_client_fld *fld,
117 LASSERT(fld->lcf_count > 0);
118 return do_div(seq, fld->lcf_count);
121 static struct lu_fld_target *
122 fld_rrb_scan(struct lu_client_fld *fld, seqno_t seq)
124 struct lu_fld_target *target;
128 /* Because almost all of special sequence located in MDT0,
129 * it should go to index 0 directly, instead of calculating
130 * hash again, and also if other MDTs is not being connected,
131 * the fld lookup requests(for seq on MDT0) should not be
132 * blocked because of other MDTs */
133 if (fid_seq_is_norm(seq))
134 hash = fld_rrb_hash(fld, seq);
138 cfs_list_for_each_entry(target, &fld->lcf_targets, ft_chain) {
139 if (target->ft_idx == hash)
143 CERROR("%s: Can't find target by hash %d (seq "LPX64"). "
144 "Targets (%d):\n", fld->lcf_name, hash, seq,
147 cfs_list_for_each_entry(target, &fld->lcf_targets, ft_chain) {
148 const char *srv_name = target->ft_srv != NULL ?
149 target->ft_srv->lsf_name : "<null>";
150 const char *exp_name = target->ft_exp != NULL ?
151 (char *)target->ft_exp->exp_obd->obd_uuid.uuid :
154 CERROR(" exp: 0x%p (%s), srv: 0x%p (%s), idx: "LPU64"\n",
155 target->ft_exp, exp_name, target->ft_srv,
156 srv_name, target->ft_idx);
160 * If target is not found, there is logical error anyway, so here is
161 * LBUG() to catch this situation.
167 struct lu_fld_hash fld_hash[] = {
170 .fh_hash_func = fld_rrb_hash,
171 .fh_scan_func = fld_rrb_scan
178 static struct lu_fld_target *
179 fld_client_get_target(struct lu_client_fld *fld, seqno_t seq)
181 struct lu_fld_target *target;
184 LASSERT(fld->lcf_hash != NULL);
186 spin_lock(&fld->lcf_lock);
187 target = fld->lcf_hash->fh_scan_func(fld, seq);
188 spin_unlock(&fld->lcf_lock);
190 if (target != NULL) {
191 CDEBUG(D_INFO, "%s: Found target (idx "LPU64
192 ") by seq "LPX64"\n", fld->lcf_name,
193 target->ft_idx, seq);
200 * Add export to FLD. This is usually done by CMM and LMV as they are main users
203 int fld_client_add_target(struct lu_client_fld *fld,
204 struct lu_fld_target *tar)
207 struct lu_fld_target *target, *tmp;
210 LASSERT(tar != NULL);
211 name = fld_target_name(tar);
212 LASSERT(name != NULL);
213 LASSERT(tar->ft_srv != NULL || tar->ft_exp != NULL);
215 if (fld->lcf_flags != LUSTRE_FLD_INIT) {
216 CERROR("%s: Attempt to add target %s (idx "LPU64") "
217 "on fly - skip it\n", fld->lcf_name, name,
221 CDEBUG(D_INFO, "%s: Adding target %s (idx "
222 LPU64")\n", fld->lcf_name, name, tar->ft_idx);
225 OBD_ALLOC_PTR(target);
229 spin_lock(&fld->lcf_lock);
230 cfs_list_for_each_entry(tmp, &fld->lcf_targets, ft_chain) {
231 if (tmp->ft_idx == tar->ft_idx) {
232 spin_unlock(&fld->lcf_lock);
233 OBD_FREE_PTR(target);
234 CERROR("Target %s exists in FLD and known as %s:#"LPU64"\n",
235 name, fld_target_name(tmp), tmp->ft_idx);
240 target->ft_exp = tar->ft_exp;
241 if (target->ft_exp != NULL)
242 class_export_get(target->ft_exp);
243 target->ft_srv = tar->ft_srv;
244 target->ft_idx = tar->ft_idx;
246 cfs_list_add_tail(&target->ft_chain,
250 spin_unlock(&fld->lcf_lock);
254 EXPORT_SYMBOL(fld_client_add_target);
256 /* Remove export from FLD */
257 int fld_client_del_target(struct lu_client_fld *fld, __u64 idx)
259 struct lu_fld_target *target, *tmp;
262 spin_lock(&fld->lcf_lock);
263 cfs_list_for_each_entry_safe(target, tmp,
264 &fld->lcf_targets, ft_chain) {
265 if (target->ft_idx == idx) {
267 cfs_list_del(&target->ft_chain);
268 spin_unlock(&fld->lcf_lock);
270 if (target->ft_exp != NULL)
271 class_export_put(target->ft_exp);
273 OBD_FREE_PTR(target);
277 spin_unlock(&fld->lcf_lock);
280 EXPORT_SYMBOL(fld_client_del_target);
283 static int fld_client_proc_init(struct lu_client_fld *fld)
288 fld->lcf_proc_dir = lprocfs_register(fld->lcf_name,
292 if (IS_ERR(fld->lcf_proc_dir)) {
293 CERROR("%s: LProcFS failed in fld-init\n",
295 rc = PTR_ERR(fld->lcf_proc_dir);
299 rc = lprocfs_add_vars(fld->lcf_proc_dir,
300 fld_client_proc_list, fld);
302 CERROR("%s: Can't init FLD proc, rc %d\n",
304 GOTO(out_cleanup, rc);
310 fld_client_proc_fini(fld);
314 void fld_client_proc_fini(struct lu_client_fld *fld)
317 if (fld->lcf_proc_dir) {
318 if (!IS_ERR(fld->lcf_proc_dir))
319 lprocfs_remove(&fld->lcf_proc_dir);
320 fld->lcf_proc_dir = NULL;
325 static int fld_client_proc_init(struct lu_client_fld *fld)
330 void fld_client_proc_fini(struct lu_client_fld *fld)
336 EXPORT_SYMBOL(fld_client_proc_fini);
338 static inline int hash_is_sane(int hash)
340 return (hash >= 0 && hash < ARRAY_SIZE(fld_hash));
343 int fld_client_init(struct lu_client_fld *fld,
344 const char *prefix, int hash)
346 int cache_size, cache_threshold;
350 LASSERT(fld != NULL);
352 snprintf(fld->lcf_name, sizeof(fld->lcf_name),
355 if (!hash_is_sane(hash)) {
356 CERROR("%s: Wrong hash function %#x\n",
357 fld->lcf_name, hash);
362 spin_lock_init(&fld->lcf_lock);
363 fld->lcf_hash = &fld_hash[hash];
364 fld->lcf_flags = LUSTRE_FLD_INIT;
365 CFS_INIT_LIST_HEAD(&fld->lcf_targets);
367 cache_size = FLD_CLIENT_CACHE_SIZE /
368 sizeof(struct fld_cache_entry);
370 cache_threshold = cache_size *
371 FLD_CLIENT_CACHE_THRESHOLD / 100;
373 fld->lcf_cache = fld_cache_init(fld->lcf_name,
374 cache_size, cache_threshold);
375 if (IS_ERR(fld->lcf_cache)) {
376 rc = PTR_ERR(fld->lcf_cache);
377 fld->lcf_cache = NULL;
381 rc = fld_client_proc_init(fld);
387 fld_client_fini(fld);
389 CDEBUG(D_INFO, "%s: Using \"%s\" hash\n",
390 fld->lcf_name, fld->lcf_hash->fh_name);
393 EXPORT_SYMBOL(fld_client_init);
395 void fld_client_fini(struct lu_client_fld *fld)
397 struct lu_fld_target *target, *tmp;
400 spin_lock(&fld->lcf_lock);
401 cfs_list_for_each_entry_safe(target, tmp,
402 &fld->lcf_targets, ft_chain) {
404 cfs_list_del(&target->ft_chain);
405 if (target->ft_exp != NULL)
406 class_export_put(target->ft_exp);
407 OBD_FREE_PTR(target);
409 spin_unlock(&fld->lcf_lock);
411 if (fld->lcf_cache != NULL) {
412 if (!IS_ERR(fld->lcf_cache))
413 fld_cache_fini(fld->lcf_cache);
414 fld->lcf_cache = NULL;
419 EXPORT_SYMBOL(fld_client_fini);
421 int fld_client_rpc(struct obd_export *exp,
422 struct lu_seq_range *range, __u32 fld_op)
424 struct ptlrpc_request *req;
425 struct lu_seq_range *prange;
428 struct obd_import *imp;
431 LASSERT(exp != NULL);
433 imp = class_exp2cliimp(exp);
434 req = ptlrpc_request_alloc_pack(imp, &RQF_FLD_QUERY, LUSTRE_MDS_VERSION,
439 op = req_capsule_client_get(&req->rq_pill, &RMF_FLD_OPC);
442 prange = req_capsule_client_get(&req->rq_pill, &RMF_FLD_MDFLD);
445 ptlrpc_request_set_replen(req);
446 req->rq_request_portal = FLD_REQUEST_PORTAL;
447 ptlrpc_at_set_req_timeout(req);
449 if (fld_op == FLD_LOOKUP &&
450 imp->imp_connect_flags_orig & OBD_CONNECT_MDS_MDS)
451 req->rq_allow_replay = 1;
453 if (fld_op != FLD_LOOKUP)
454 mdc_get_rpc_lock(exp->exp_obd->u.cli.cl_rpc_lock, NULL);
455 fld_enter_request(&exp->exp_obd->u.cli);
456 rc = ptlrpc_queue_wait(req);
457 fld_exit_request(&exp->exp_obd->u.cli);
458 if (fld_op != FLD_LOOKUP)
459 mdc_put_rpc_lock(exp->exp_obd->u.cli.cl_rpc_lock, NULL);
463 prange = req_capsule_server_get(&req->rq_pill, &RMF_FLD_MDFLD);
465 GOTO(out_req, rc = -EFAULT);
469 ptlrpc_req_finished(req);
473 int fld_client_lookup(struct lu_client_fld *fld, seqno_t seq, mdsno_t *mds,
474 __u32 flags, const struct lu_env *env)
476 struct lu_seq_range res = { 0 };
477 struct lu_fld_target *target;
481 fld->lcf_flags |= LUSTRE_FLD_RUN;
483 rc = fld_cache_lookup(fld->lcf_cache, seq, &res);
485 *mds = res.lsr_index;
489 /* Can not find it in the cache */
490 target = fld_client_get_target(fld, seq);
491 LASSERT(target != NULL);
493 CDEBUG(D_INFO, "%s: Lookup fld entry (seq: "LPX64") on "
494 "target %s (idx "LPU64")\n", fld->lcf_name, seq,
495 fld_target_name(target), target->ft_idx);
498 fld_range_set_type(&res, flags);
500 #if defined(__KERNEL__) && defined(HAVE_SERVER_SUPPORT)
501 if (target->ft_srv != NULL) {
502 LASSERT(env != NULL);
503 rc = fld_server_lookup(env, target->ft_srv, seq, &res);
507 rc = fld_client_rpc(target->ft_exp, &res, FLD_LOOKUP);
511 *mds = res.lsr_index;
512 fld_cache_insert(fld->lcf_cache, &res);
517 EXPORT_SYMBOL(fld_client_lookup);
519 void fld_client_flush(struct lu_client_fld *fld)
521 fld_cache_flush(fld->lcf_cache);
523 EXPORT_SYMBOL(fld_client_flush);
527 struct proc_dir_entry *fld_type_proc_dir;
529 static int __init fld_mod_init(void)
531 fld_type_proc_dir = lprocfs_register(LUSTRE_FLD_NAME,
534 if (IS_ERR(fld_type_proc_dir))
535 return PTR_ERR(fld_type_proc_dir);
537 #ifdef HAVE_SERVER_SUPPORT
538 fld_server_mod_init();
544 static void __exit fld_mod_exit(void)
546 #ifdef HAVE_SERVER_SUPPORT
547 fld_server_mod_exit();
550 if (fld_type_proc_dir != NULL && !IS_ERR(fld_type_proc_dir)) {
551 lprocfs_remove(&fld_type_proc_dir);
552 fld_type_proc_dir = NULL;
556 MODULE_AUTHOR("Sun Microsystems, Inc. <http://www.lustre.org/>");
557 MODULE_DESCRIPTION("Lustre FLD");
558 MODULE_LICENSE("GPL");
560 cfs_module(mdd, LUSTRE_VERSION_STRING, fld_mod_init, fld_mod_exit);
561 #endif /* __KERNEL__ */