X-Git-Url: https://git.whamcloud.com/?a=blobdiff_plain;f=lustre%2Fldlm%2Fldlm_lockd.c;h=5789e8cb5ba978f30437030e27740a9add74dfaf;hb=e5abcf83c0575b8a79594c1eb9ea727739d91522;hp=2f7fb324cde078fd88376849efae88c121d419a8;hpb=233576b564b713ad765d908629b5b290acdabc1e;p=fs%2Flustre-release.git diff --git a/lustre/ldlm/ldlm_lockd.c b/lustre/ldlm/ldlm_lockd.c index 2f7fb32..5789e8c 100644 --- a/lustre/ldlm/ldlm_lockd.c +++ b/lustre/ldlm/ldlm_lockd.c @@ -15,11 +15,7 @@ * * You should have received a copy of the GNU General Public License * version 2 along with this program; If not, see - * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf - * - * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara, - * CA 95054 USA or visit www.sun.com if you need additional information or - * have any questions. + * http://www.gnu.org/licenses/gpl-2.0.html * * GPL HEADER END */ @@ -27,7 +23,7 @@ * Copyright (c) 2002, 2010, Oracle and/or its affiliates. All rights reserved. * Use is subject to license terms. * - * Copyright (c) 2010, 2013, Intel Corporation. + * Copyright (c) 2010, 2017, Intel Corporation. */ /* * This file is part of Lustre, http://www.lustre.org/ @@ -41,99 +37,92 @@ #define DEBUG_SUBSYSTEM S_LDLM -#ifdef __KERNEL__ -# include -#else -# include -#endif - +#include +#include +#include +#include #include #include -#include #include "ldlm_internal.h" static int ldlm_num_threads; -CFS_MODULE_PARM(ldlm_num_threads, "i", int, 0444, - "number of DLM service threads to start"); +module_param(ldlm_num_threads, int, 0444); +MODULE_PARM_DESC(ldlm_num_threads, "number of DLM service threads to start"); + +static unsigned int ldlm_cpu_bind = 1; +module_param(ldlm_cpu_bind, uint, 0444); +MODULE_PARM_DESC(ldlm_cpu_bind, + "bind DLM service threads to particular CPU partitions"); static char *ldlm_cpts; -CFS_MODULE_PARM(ldlm_cpts, "s", charp, 0444, - "CPU partitions ldlm threads should run on"); +module_param(ldlm_cpts, charp, 0444); +MODULE_PARM_DESC(ldlm_cpts, "CPU partitions ldlm threads should run on"); -extern struct kmem_cache *ldlm_resource_slab; -extern struct kmem_cache *ldlm_lock_slab; -static struct mutex ldlm_ref_mutex; +static DEFINE_MUTEX(ldlm_ref_mutex); static int ldlm_refcount; -struct ldlm_cb_async_args { - struct ldlm_cb_set_arg *ca_set_arg; - struct ldlm_lock *ca_lock; -}; +struct kobject *ldlm_kobj; +struct kset *ldlm_ns_kset; +struct kset *ldlm_svc_kset; /* LDLM state */ static struct ldlm_state *ldlm_state; -inline cfs_time_t round_timeout(cfs_time_t timeout) -{ - return cfs_time_seconds((int)cfs_duration_sec(cfs_time_sub(timeout, 0)) + 1); -} - -/* timeout for initial callback (AST) reply (bz10399) */ -static inline unsigned int ldlm_get_rq_timeout(void) +/* timeout for initial callback (AST) reply (bz10399) + * Due to having to send a 32 bit time value over the + * wire return it as time_t instead of time64_t + */ +static inline time_t ldlm_get_rq_timeout(void) { - /* Non-AT value */ - unsigned int timeout = min(ldlm_timeout, obd_timeout / 3); + /* Non-AT value */ + time_t timeout = min(ldlm_timeout, obd_timeout / 3); - return timeout < 1 ? 1 : timeout; + return timeout < 1 ? 1 : timeout; } -#define ELT_STOPPED 0 -#define ELT_READY 1 -#define ELT_TERMINATE 2 - struct ldlm_bl_pool { spinlock_t blp_lock; - /* - * blp_prio_list is used for callbacks that should be handled - * as a priority. It is used for LDLM_FL_DISCARD_DATA requests. - * see bug 13843 - */ - cfs_list_t blp_prio_list; - - /* - * blp_list is used for all other callbacks which are likely - * to take longer to process. - */ - cfs_list_t blp_list; - - cfs_waitq_t blp_waitq; - struct completion blp_comp; - cfs_atomic_t blp_num_threads; - cfs_atomic_t blp_busy_threads; - int blp_min_threads; - int blp_max_threads; + /* + * blp_prio_list is used for callbacks that should be handled + * as a priority. It is used for LDLM_FL_DISCARD_DATA requests. + * see bug 13843 + */ + struct list_head blp_prio_list; + + /* + * blp_list is used for all other callbacks which are likely + * to take longer to process. + */ + struct list_head blp_list; + + wait_queue_head_t blp_waitq; + struct completion blp_comp; + atomic_t blp_num_threads; + atomic_t blp_busy_threads; + int blp_min_threads; + int blp_max_threads; }; struct ldlm_bl_work_item { - cfs_list_t blwi_entry; - struct ldlm_namespace *blwi_ns; - struct ldlm_lock_desc blwi_ld; - struct ldlm_lock *blwi_lock; - cfs_list_t blwi_head; - int blwi_count; - struct completion blwi_comp; - ldlm_cancel_flags_t blwi_flags; - int blwi_mem_pressure; + struct list_head blwi_entry; + struct ldlm_namespace *blwi_ns; + struct ldlm_lock_desc blwi_ld; + struct ldlm_lock *blwi_lock; + struct list_head blwi_head; + int blwi_count; + struct completion blwi_comp; + enum ldlm_cancel_flags blwi_flags; + int blwi_mem_pressure; }; -#if defined(HAVE_SERVER_SUPPORT) && defined(__KERNEL__) +#ifdef HAVE_SERVER_SUPPORT /** * Protects both waiting_locks_list and expired_lock_thread. */ -static spinlock_t waiting_locks_spinlock; /* BH lock (timer) */ +static DEFINE_SPINLOCK(waiting_locks_spinlock); /* BH lock (timer) */ /** * List for contended locks. @@ -146,15 +135,24 @@ static spinlock_t waiting_locks_spinlock; /* BH lock (timer) */ * * All access to it should be under waiting_locks_spinlock. */ -static cfs_list_t waiting_locks_list; -static cfs_timer_t waiting_locks_timer; +static LIST_HEAD(waiting_locks_list); +static void waiting_locks_callback(TIMER_DATA_TYPE unused); +static CFS_DEFINE_TIMER(waiting_locks_timer, waiting_locks_callback, 0, 0); + +enum elt_state { + ELT_STOPPED, + ELT_READY, + ELT_TERMINATE, +}; + +static DECLARE_WAIT_QUEUE_HEAD(expired_lock_wait_queue); +static enum elt_state expired_lock_thread_state = ELT_STOPPED; +static int expired_lock_dump; +static LIST_HEAD(expired_lock_list); -static struct expired_lock_thread { - cfs_waitq_t elt_waitq; - int elt_state; - int elt_dump; - cfs_list_t elt_expired_locks; -} expired_lock_thread; +static int ldlm_lock_busy(struct ldlm_lock *lock); +static int ldlm_add_waiting_lock(struct ldlm_lock *lock, time64_t timeout); +static int __ldlm_add_waiting_lock(struct ldlm_lock *lock, time64_t seconds); static inline int have_expired_locks(void) { @@ -162,7 +160,7 @@ static inline int have_expired_locks(void) ENTRY; spin_lock_bh(&waiting_locks_spinlock); - need_to_run = !cfs_list_empty(&expired_lock_thread.elt_expired_locks); + need_to_run = !list_empty(&expired_lock_list); spin_unlock_bh(&waiting_locks_spinlock); RETURN(need_to_run); @@ -173,67 +171,62 @@ static inline int have_expired_locks(void) */ static int expired_lock_main(void *arg) { - cfs_list_t *expired = &expired_lock_thread.elt_expired_locks; - struct l_wait_info lwi = { 0 }; - int do_dump; + struct list_head *expired = &expired_lock_list; + struct l_wait_info lwi = { 0 }; + int do_dump; - ENTRY; + ENTRY; - expired_lock_thread.elt_state = ELT_READY; - cfs_waitq_signal(&expired_lock_thread.elt_waitq); + expired_lock_thread_state = ELT_READY; + wake_up(&expired_lock_wait_queue); - while (1) { - l_wait_event(expired_lock_thread.elt_waitq, - have_expired_locks() || - expired_lock_thread.elt_state == ELT_TERMINATE, - &lwi); + while (1) { + l_wait_event(expired_lock_wait_queue, + have_expired_locks() || + expired_lock_thread_state == ELT_TERMINATE, + &lwi); spin_lock_bh(&waiting_locks_spinlock); - if (expired_lock_thread.elt_dump) { - struct libcfs_debug_msg_data msgdata = { - .msg_file = __FILE__, - .msg_fn = "waiting_locks_callback", - .msg_line = expired_lock_thread.elt_dump }; + if (expired_lock_dump) { spin_unlock_bh(&waiting_locks_spinlock); /* from waiting_locks_callback, but not in timer */ libcfs_debug_dumplog(); - libcfs_run_lbug_upcall(&msgdata); spin_lock_bh(&waiting_locks_spinlock); - expired_lock_thread.elt_dump = 0; - } + expired_lock_dump = 0; + } - do_dump = 0; + do_dump = 0; - while (!cfs_list_empty(expired)) { - struct obd_export *export; - struct ldlm_lock *lock; + while (!list_empty(expired)) { + struct obd_export *export; + struct ldlm_lock *lock; - lock = cfs_list_entry(expired->next, struct ldlm_lock, - l_pending_chain); - if ((void *)lock < LP_POISON + PAGE_CACHE_SIZE && + lock = list_entry(expired->next, struct ldlm_lock, + l_pending_chain); + if ((void *)lock < LP_POISON + PAGE_SIZE && (void *)lock >= LP_POISON) { spin_unlock_bh(&waiting_locks_spinlock); CERROR("free lock on elt list %p\n", lock); LBUG(); } - cfs_list_del_init(&lock->l_pending_chain); + list_del_init(&lock->l_pending_chain); if ((void *)lock->l_export < - LP_POISON + PAGE_CACHE_SIZE && - (void *)lock->l_export >= LP_POISON) { - CERROR("lock with free export on elt list %p\n", - lock->l_export); - lock->l_export = NULL; - LDLM_ERROR(lock, "free export"); - /* release extra ref grabbed by - * ldlm_add_waiting_lock() or - * ldlm_failed_ast() */ - LDLM_LOCK_RELEASE(lock); - continue; - } + LP_POISON + PAGE_SIZE && + (void *)lock->l_export >= LP_POISON) { + CERROR("lock with free export on elt list %p\n", + lock->l_export); + lock->l_export = NULL; + LDLM_ERROR(lock, "free export"); + /* release extra ref grabbed by + * ldlm_add_waiting_lock() or + * ldlm_failed_ast() */ + LDLM_LOCK_RELEASE(lock); + continue; + } - if (lock->l_flags & LDLM_FL_DESTROYED) { + if (ldlm_is_destroyed(lock)) { /* release the lock refcount where * waiting_locks_callback() founds */ LDLM_LOCK_RELEASE(lock); @@ -242,10 +235,30 @@ static int expired_lock_main(void *arg) export = class_export_lock_get(lock->l_export, lock); spin_unlock_bh(&waiting_locks_spinlock); - do_dump++; - class_fail_export(export); + /* Check if we need to prolong timeout */ + if (!OBD_FAIL_CHECK(OBD_FAIL_PTLRPC_HPREQ_TIMEOUT) && + lock->l_callback_timeout != 0 && /* not AST error */ + ldlm_lock_busy(lock)) { + LDLM_DEBUG(lock, "prolong the busy lock"); + lock_res_and_lock(lock); + ldlm_add_waiting_lock(lock, + ldlm_bl_timeout(lock) >> 1); + unlock_res_and_lock(lock); + } else { + spin_lock_bh(&export->exp_bl_list_lock); + list_del_init(&lock->l_exp_list); + spin_unlock_bh(&export->exp_bl_list_lock); + + LDLM_ERROR(lock, + "lock callback timer expired after %llds: evicting client at %s ", + ktime_get_real_seconds() - + lock->l_blast_sent, + obd_export_nid2str(export)); + ldlm_lock_to_ns(lock)->ns_timeouts++; + do_dump++; + class_fail_export(export); + } class_export_lock_put(export, lock); - /* release extra ref grabbed by ldlm_add_waiting_lock() * or ldlm_failed_ast() */ LDLM_LOCK_RELEASE(lock); @@ -254,23 +267,20 @@ static int expired_lock_main(void *arg) } spin_unlock_bh(&waiting_locks_spinlock); - if (do_dump && obd_dump_on_eviction) { - CERROR("dump the log upon eviction\n"); - libcfs_debug_dumplog(); - } + if (do_dump && obd_dump_on_eviction) { + CERROR("dump the log upon eviction\n"); + libcfs_debug_dumplog(); + } - if (expired_lock_thread.elt_state == ELT_TERMINATE) - break; - } + if (expired_lock_thread_state == ELT_TERMINATE) + break; + } - expired_lock_thread.elt_state = ELT_STOPPED; - cfs_waitq_signal(&expired_lock_thread.elt_waitq); - RETURN(0); + expired_lock_thread_state = ELT_STOPPED; + wake_up(&expired_lock_wait_queue); + RETURN(0); } -static int ldlm_add_waiting_lock(struct ldlm_lock *lock); -static int __ldlm_add_waiting_lock(struct ldlm_lock *lock, int seconds); - /** * Check if there is a request in the export request list * which prevents the lock canceling. @@ -284,8 +294,8 @@ static int ldlm_lock_busy(struct ldlm_lock *lock) if (lock->l_export == NULL) return 0; - spin_lock_bh(&lock->l_export->exp_rpc_lock); - cfs_list_for_each_entry(req, &lock->l_export->exp_hp_rpcs, + spin_lock(&lock->l_export->exp_rpc_lock); + list_for_each_entry(req, &lock->l_export->exp_hp_rpcs, rq_exp_list) { if (req->rq_ops->hpreq_lock_match) { match = req->rq_ops->hpreq_lock_match(req, lock); @@ -293,83 +303,51 @@ static int ldlm_lock_busy(struct ldlm_lock *lock) break; } } - spin_unlock_bh(&lock->l_export->exp_rpc_lock); + spin_unlock(&lock->l_export->exp_rpc_lock); RETURN(match); } /* This is called from within a timer interrupt and cannot schedule */ -static void waiting_locks_callback(unsigned long unused) +static void waiting_locks_callback(TIMER_DATA_TYPE unused) { struct ldlm_lock *lock; int need_dump = 0; spin_lock_bh(&waiting_locks_spinlock); - while (!cfs_list_empty(&waiting_locks_list)) { - lock = cfs_list_entry(waiting_locks_list.next, struct ldlm_lock, - l_pending_chain); - if (cfs_time_after(lock->l_callback_timeout, - cfs_time_current()) || - (lock->l_req_mode == LCK_GROUP)) - break; - - /* Check if we need to prolong timeout */ - if (!OBD_FAIL_CHECK(OBD_FAIL_PTLRPC_HPREQ_TIMEOUT) && - ldlm_lock_busy(lock)) { - int cont = 1; - - if (lock->l_pending_chain.next == &waiting_locks_list) - cont = 0; - - LDLM_LOCK_GET(lock); - - spin_unlock_bh(&waiting_locks_spinlock); - LDLM_DEBUG(lock, "prolong the busy lock"); - ldlm_refresh_waiting_lock(lock, - ldlm_get_enq_timeout(lock)); - spin_lock_bh(&waiting_locks_spinlock); - - if (!cont) { - LDLM_LOCK_RELEASE(lock); - break; - } - - LDLM_LOCK_RELEASE(lock); - continue; - } - ldlm_lock_to_ns(lock)->ns_timeouts++; - LDLM_ERROR(lock, "lock callback timer expired after %lds: " - "evicting client at %s ", - cfs_time_current_sec()- lock->l_last_activity, - libcfs_nid2str( - lock->l_export->exp_connection->c_peer.nid)); + while (!list_empty(&waiting_locks_list)) { + lock = list_entry(waiting_locks_list.next, struct ldlm_lock, + l_pending_chain); + if (lock->l_callback_timeout > ktime_get_seconds() || + lock->l_req_mode == LCK_GROUP) + break; /* no needs to take an extra ref on the lock since it was in * the waiting_locks_list and ldlm_add_waiting_lock() * already grabbed a ref */ - cfs_list_del(&lock->l_pending_chain); - cfs_list_add(&lock->l_pending_chain, - &expired_lock_thread.elt_expired_locks); + list_del(&lock->l_pending_chain); + list_add(&lock->l_pending_chain, &expired_lock_list); need_dump = 1; } - if (!cfs_list_empty(&expired_lock_thread.elt_expired_locks)) { + if (!list_empty(&expired_lock_list)) { if (obd_dump_on_timeout && need_dump) - expired_lock_thread.elt_dump = __LINE__; + expired_lock_dump = __LINE__; - cfs_waitq_signal(&expired_lock_thread.elt_waitq); + wake_up(&expired_lock_wait_queue); } - /* - * Make sure the timer will fire again if we have any locks - * left. - */ - if (!cfs_list_empty(&waiting_locks_list)) { - cfs_time_t timeout_rounded; - lock = cfs_list_entry(waiting_locks_list.next, struct ldlm_lock, - l_pending_chain); - timeout_rounded = (cfs_time_t)round_timeout(lock->l_callback_timeout); - cfs_timer_arm(&waiting_locks_timer, timeout_rounded); - } + /* + * Make sure the timer will fire again if we have any locks + * left. + */ + if (!list_empty(&waiting_locks_list)) { + unsigned long timeout_jiffies; + + lock = list_entry(waiting_locks_list.next, struct ldlm_lock, + l_pending_chain); + timeout_jiffies = cfs_time_seconds(lock->l_callback_timeout); + mod_timer(&waiting_locks_timer, timeout_jiffies); + } spin_unlock_bh(&waiting_locks_spinlock); } @@ -385,76 +363,104 @@ static void waiting_locks_callback(unsigned long unused) * * Called with the namespace lock held. */ -static int __ldlm_add_waiting_lock(struct ldlm_lock *lock, int seconds) +static int __ldlm_add_waiting_lock(struct ldlm_lock *lock, time64_t seconds) { - cfs_time_t timeout; - cfs_time_t timeout_rounded; + unsigned long timeout_jiffies; + time64_t timeout; - if (!cfs_list_empty(&lock->l_pending_chain)) + if (!list_empty(&lock->l_pending_chain)) return 0; if (OBD_FAIL_CHECK(OBD_FAIL_PTLRPC_HPREQ_NOTIMEOUT) || OBD_FAIL_CHECK(OBD_FAIL_PTLRPC_HPREQ_TIMEOUT)) seconds = 1; - timeout = cfs_time_shift(seconds); - if (likely(cfs_time_after(timeout, lock->l_callback_timeout))) + timeout = ktime_get_seconds() + seconds; + if (likely(timeout > lock->l_callback_timeout)) lock->l_callback_timeout = timeout; - timeout_rounded = round_timeout(lock->l_callback_timeout); + timeout_jiffies = cfs_time_seconds(lock->l_callback_timeout); - if (cfs_time_before(timeout_rounded, - cfs_timer_deadline(&waiting_locks_timer)) || - !cfs_timer_is_armed(&waiting_locks_timer)) { - cfs_timer_arm(&waiting_locks_timer, timeout_rounded); - } - /* if the new lock has a shorter timeout than something earlier on - the list, we'll wait the longer amount of time; no big deal. */ - /* FIFO */ - cfs_list_add_tail(&lock->l_pending_chain, &waiting_locks_list); - return 1; + if (time_before(timeout_jiffies, waiting_locks_timer.expires) || + !timer_pending(&waiting_locks_timer)) + mod_timer(&waiting_locks_timer, timeout_jiffies); + + /* if the new lock has a shorter timeout than something earlier on + * the list, we'll wait the longer amount of time; no big deal. + */ + /* FIFO */ + list_add_tail(&lock->l_pending_chain, &waiting_locks_list); + return 1; +} + +static void ldlm_add_blocked_lock(struct ldlm_lock *lock) +{ + spin_lock_bh(&lock->l_export->exp_bl_list_lock); + if (list_empty(&lock->l_exp_list)) { + if (lock->l_granted_mode != lock->l_req_mode) + list_add_tail(&lock->l_exp_list, + &lock->l_export->exp_bl_list); + else + list_add(&lock->l_exp_list, + &lock->l_export->exp_bl_list); + } + spin_unlock_bh(&lock->l_export->exp_bl_list_lock); + + /* A blocked lock is added. Adjust the position in + * the stale list if the export is in the list. + * If export is stale and not in the list - it is being + * processed and will be placed on the right position + * on obd_stale_export_put(). */ + if (!list_empty(&lock->l_export->exp_stale_list)) + obd_stale_export_adjust(lock->l_export); } -static int ldlm_add_waiting_lock(struct ldlm_lock *lock) +static int ldlm_add_waiting_lock(struct ldlm_lock *lock, time64_t timeout) { int ret; - int timeout = ldlm_get_enq_timeout(lock); /* NB: must be called with hold of lock_res_and_lock() */ - LASSERT(lock->l_flags & LDLM_FL_RES_LOCKED); - lock->l_flags |= LDLM_FL_WAITED; + LASSERT(ldlm_is_res_locked(lock)); + LASSERT(!ldlm_is_cancel_on_block(lock)); - LASSERT(!(lock->l_flags & LDLM_FL_CANCEL_ON_BLOCK)); + /* Do not put cross-MDT lock in the waiting list, since we + * will not evict it due to timeout for now */ + if (lock->l_export != NULL && + (exp_connect_flags(lock->l_export) & OBD_CONNECT_MDS_MDS)) + return 0; spin_lock_bh(&waiting_locks_spinlock); - if (lock->l_flags & LDLM_FL_DESTROYED) { - static cfs_time_t next; + if (ldlm_is_cancel(lock)) { spin_unlock_bh(&waiting_locks_spinlock); - LDLM_ERROR(lock, "not waiting on destroyed lock (bug 5653)"); - if (cfs_time_after(cfs_time_current(), next)) { - next = cfs_time_shift(14400); - libcfs_debug_dumpstack(NULL); - } - return 0; - } + return 0; + } - ret = __ldlm_add_waiting_lock(lock, timeout); - if (ret) { - /* grab ref on the lock if it has been added to the - * waiting list */ - LDLM_LOCK_GET(lock); - } - spin_unlock_bh(&waiting_locks_spinlock); + if (ldlm_is_destroyed(lock)) { + static time64_t next; + + spin_unlock_bh(&waiting_locks_spinlock); + LDLM_ERROR(lock, "not waiting on destroyed lock (bug 5653)"); + if (ktime_get_seconds() > next) { + next = ktime_get_seconds() + 14400; + libcfs_debug_dumpstack(NULL); + } + return 0; + } + ldlm_set_waited(lock); + lock->l_blast_sent = ktime_get_real_seconds(); + ret = __ldlm_add_waiting_lock(lock, timeout); if (ret) { - spin_lock_bh(&lock->l_export->exp_bl_list_lock); - if (cfs_list_empty(&lock->l_exp_list)) - cfs_list_add(&lock->l_exp_list, - &lock->l_export->exp_bl_list); - spin_unlock_bh(&lock->l_export->exp_bl_list_lock); + /* grab ref on the lock if it has been added to the + * waiting list */ + LDLM_LOCK_GET(lock); } + spin_unlock_bh(&waiting_locks_spinlock); + + if (ret) + ldlm_add_blocked_lock(lock); - LDLM_DEBUG(lock, "%sadding to wait list(timeout: %d, AT: %s)", + LDLM_DEBUG(lock, "%sadding to wait list(timeout: %lld, AT: %s)", ret == 0 ? "not re-" : "", timeout, AT_OFF ? "off" : "on"); return ret; @@ -471,9 +477,9 @@ static int ldlm_add_waiting_lock(struct ldlm_lock *lock) */ static int __ldlm_del_waiting_lock(struct ldlm_lock *lock) { - cfs_list_t *list_next; + struct list_head *list_next; - if (cfs_list_empty(&lock->l_pending_chain)) + if (list_empty(&lock->l_pending_chain)) return 0; list_next = lock->l_pending_chain.next; @@ -481,16 +487,17 @@ static int __ldlm_del_waiting_lock(struct ldlm_lock *lock) /* Removing the head of the list, adjust timer. */ if (list_next == &waiting_locks_list) { /* No more, just cancel. */ - cfs_timer_disarm(&waiting_locks_timer); + del_timer(&waiting_locks_timer); } else { struct ldlm_lock *next; - next = cfs_list_entry(list_next, struct ldlm_lock, - l_pending_chain); - cfs_timer_arm(&waiting_locks_timer, - round_timeout(next->l_callback_timeout)); + + next = list_entry(list_next, struct ldlm_lock, + l_pending_chain); + mod_timer(&waiting_locks_timer, + cfs_time_seconds(next->l_callback_timeout)); } } - cfs_list_del_init(&lock->l_pending_chain); + list_del_init(&lock->l_pending_chain); return 1; } @@ -507,11 +514,12 @@ int ldlm_del_waiting_lock(struct ldlm_lock *lock) spin_lock_bh(&waiting_locks_spinlock); ret = __ldlm_del_waiting_lock(lock); + ldlm_clear_waited(lock); spin_unlock_bh(&waiting_locks_spinlock); /* remove the lock out of export blocking list */ spin_lock_bh(&lock->l_export->exp_bl_list_lock); - cfs_list_del_init(&lock->l_exp_list); + list_del_init(&lock->l_exp_list); spin_unlock_bh(&lock->l_export->exp_bl_list_lock); if (ret) { @@ -523,14 +531,13 @@ int ldlm_del_waiting_lock(struct ldlm_lock *lock) LDLM_DEBUG(lock, "%s", ret == 0 ? "wasn't waiting" : "removed"); return ret; } -EXPORT_SYMBOL(ldlm_del_waiting_lock); /** * Prolong the contended lock waiting time. * * Called with namespace lock held. */ -int ldlm_refresh_waiting_lock(struct ldlm_lock *lock, int timeout) +int ldlm_refresh_waiting_lock(struct ldlm_lock *lock, time64_t timeout) { if (lock->l_export == NULL) { /* We don't have a "waiting locks list" on clients. */ @@ -538,9 +545,15 @@ int ldlm_refresh_waiting_lock(struct ldlm_lock *lock, int timeout) return 0; } + if (exp_connect_flags(lock->l_export) & OBD_CONNECT_MDS_MDS) { + /* We don't have a "waiting locks list" on OSP. */ + LDLM_DEBUG(lock, "MDS-MDS lock: no-op"); + return 0; + } + spin_lock_bh(&waiting_locks_spinlock); - if (cfs_list_empty(&lock->l_pending_chain)) { + if (list_empty(&lock->l_pending_chain)) { spin_unlock_bh(&waiting_locks_spinlock); LDLM_DEBUG(lock, "wasn't waiting"); return 0; @@ -557,30 +570,46 @@ int ldlm_refresh_waiting_lock(struct ldlm_lock *lock, int timeout) } EXPORT_SYMBOL(ldlm_refresh_waiting_lock); -#else /* !HAVE_SERVER_SUPPORT || !__KERNEL__ */ +#else /* HAVE_SERVER_SUPPORT */ int ldlm_del_waiting_lock(struct ldlm_lock *lock) { RETURN(0); } -int ldlm_refresh_waiting_lock(struct ldlm_lock *lock, int timeout) +int ldlm_refresh_waiting_lock(struct ldlm_lock *lock, time64_t timeout) { RETURN(0); } -# ifdef HAVE_SERVER_SUPPORT -static int ldlm_add_waiting_lock(struct ldlm_lock *lock) +#endif /* !HAVE_SERVER_SUPPORT */ + +#ifdef HAVE_SERVER_SUPPORT + +/** + * Calculate the per-export Blocking timeout (covering BL AST, data flush, + * lock cancel, and their replies). Used for lock callback timeout and AST + * re-send period. + * + * \param[in] lock lock which is getting the blocking callback + * + * \retval timeout in seconds to wait for the client reply + */ +time64_t ldlm_bl_timeout(struct ldlm_lock *lock) { - LASSERT((lock->l_flags & (LDLM_FL_RES_LOCKED|LDLM_FL_CANCEL_ON_BLOCK)) - == LDLM_FL_RES_LOCKED); - RETURN(1); -} + time64_t timeout; -# endif -#endif /* HAVE_SERVER_SUPPORT && __KERNEL__ */ + if (AT_OFF) + return obd_timeout / 2; -#ifdef HAVE_SERVER_SUPPORT + /* Since these are non-updating timeouts, we should be conservative. + * Take more than usually, 150% + * It would be nice to have some kind of "early reply" mechanism for + * lock callbacks too... */ + timeout = at_get(&lock->l_export->exp_bl_lock_at); + return max(timeout + (timeout >> 1), (time64_t)ldlm_enqueue_min); +} +EXPORT_SYMBOL(ldlm_bl_timeout); /** * Perform lock cleanup if AST sending failed. @@ -595,79 +624,88 @@ static void ldlm_failed_ast(struct ldlm_lock *lock, int rc, if (obd_dump_on_timeout) libcfs_debug_dumplog(); -#ifdef __KERNEL__ spin_lock_bh(&waiting_locks_spinlock); if (__ldlm_del_waiting_lock(lock) == 0) /* the lock was not in any list, grab an extra ref before adding * the lock to the expired list */ LDLM_LOCK_GET(lock); - cfs_list_add(&lock->l_pending_chain, - &expired_lock_thread.elt_expired_locks); - cfs_waitq_signal(&expired_lock_thread.elt_waitq); + lock->l_callback_timeout = 0; /* differentiate it from expired locks */ + list_add(&lock->l_pending_chain, &expired_lock_list); + wake_up(&expired_lock_wait_queue); spin_unlock_bh(&waiting_locks_spinlock); -#else - class_fail_export(lock->l_export); -#endif } /** * Perform lock cleanup if AST reply came with error. */ -static int ldlm_handle_ast_error(struct ldlm_lock *lock, - struct ptlrpc_request *req, int rc, - const char *ast_type) -{ - lnet_process_id_t peer = req->rq_import->imp_connection->c_peer; - - if (rc == -ETIMEDOUT || rc == -EINTR || rc == -ENOTCONN) { - LASSERT(lock->l_export); - if (lock->l_export->exp_libclient) { - LDLM_DEBUG(lock, "%s AST to liblustre client (nid %s)" - " timeout, just cancelling lock", ast_type, - libcfs_nid2str(peer.nid)); - ldlm_lock_cancel(lock); - rc = -ERESTART; - } else if (lock->l_flags & LDLM_FL_CANCEL) { - LDLM_DEBUG(lock, "%s AST timeout from nid %s, but " - "cancel was received (AST reply lost?)", - ast_type, libcfs_nid2str(peer.nid)); - ldlm_lock_cancel(lock); - rc = -ERESTART; - } else { - ldlm_del_waiting_lock(lock); - ldlm_failed_ast(lock, rc, ast_type); - } - } else if (rc) { - if (rc == -EINVAL) { - struct ldlm_resource *res = lock->l_resource; - LDLM_DEBUG(lock, "client (nid %s) returned %d" - " from %s AST - normal race", - libcfs_nid2str(peer.nid), - req->rq_repmsg ? - lustre_msg_get_status(req->rq_repmsg) : -1, - ast_type); - if (res) { - /* update lvbo to return proper attributes. - * see bug 23174 */ - ldlm_resource_getref(res); - ldlm_res_lvbo_update(res, NULL, 1); - ldlm_resource_putref(res); - } +static int ldlm_handle_ast_error(const struct lu_env *env, + struct ldlm_lock *lock, + struct ptlrpc_request *req, int rc, + const char *ast_type) +{ + struct lnet_process_id peer = req->rq_import->imp_connection->c_peer; + + if (!req->rq_replied || (rc && rc != -EINVAL)) { + if (ldlm_is_cancel(lock)) { + LDLM_DEBUG(lock, + "%s AST (req@%p x%llu) timeout from nid %s, but cancel was received (AST reply lost?)", + ast_type, req, req->rq_xid, + libcfs_nid2str(peer.nid)); + ldlm_lock_cancel(lock); + rc = -ERESTART; + } else if (rc == -ENODEV || rc == -ESHUTDOWN || + (rc == -EIO && + req->rq_import->imp_state == LUSTRE_IMP_CLOSED)) { + /* Upon umount process the AST fails because cannot be + * sent. This shouldn't lead to the client eviction. + * -ENODEV error is returned by ptl_send_rpc() for + * new request in such import. + * -SHUTDOWN is returned by ptlrpc_import_delay_req() + * if imp_invalid is set or obd_no_recov. + * Meanwhile there is also check for LUSTRE_IMP_CLOSED + * in ptlrpc_import_delay_req() as well with -EIO code. + * In all such cases errors are ignored. + */ + LDLM_DEBUG(lock, "%s AST can't be sent due to a server" + " %s failure or umount process: rc = %d\n", + ast_type, + req->rq_import->imp_obd->obd_name, rc); + } else { + LDLM_ERROR(lock, + "client (nid %s) %s %s AST (req@%p x%llu status %d rc %d), evict it", + libcfs_nid2str(peer.nid), + req->rq_replied ? "returned error from" : + "failed to reply to", + ast_type, req, req->rq_xid, + (req->rq_repmsg != NULL) ? + lustre_msg_get_status(req->rq_repmsg) : 0, + rc); + ldlm_failed_ast(lock, rc, ast_type); + } + return rc; + } - } else { - LDLM_ERROR(lock, "client (nid %s) returned %d " - "from %s AST", libcfs_nid2str(peer.nid), - (req->rq_repmsg != NULL) ? - lustre_msg_get_status(req->rq_repmsg) : 0, - ast_type); - } - ldlm_lock_cancel(lock); - /* Server-side AST functions are called from ldlm_reprocess_all, - * which needs to be told to please restart its reprocessing. */ - rc = -ERESTART; - } + if (rc == -EINVAL) { + struct ldlm_resource *res = lock->l_resource; + + LDLM_DEBUG(lock, + "client (nid %s) returned %d from %s AST (req@%p x%llu) - normal race", + libcfs_nid2str(peer.nid), + req->rq_repmsg ? + lustre_msg_get_status(req->rq_repmsg) : -1, + ast_type, req, req->rq_xid); + if (res) { + /* update lvbo to return proper attributes. + * see bug 23174 */ + ldlm_resource_getref(res); + ldlm_lvbo_update(env, res, lock, NULL, 1); + ldlm_resource_putref(res); + } + ldlm_lock_cancel(lock); + rc = -ERESTART; + } - return rc; + return rc; } static int ldlm_cb_interpret(const struct lu_env *env, @@ -690,23 +728,29 @@ static int ldlm_cb_interpret(const struct lu_env *env, * - Glimpse callback of remote lock might return * -ELDLM_NO_LOCK_DATA when inode is cleared. LU-274 */ - if (rc == -ELDLM_NO_LOCK_DATA) { + if (unlikely(arg->gl_interpret_reply)) { + rc = arg->gl_interpret_reply(env, req, data, rc); + } else if (rc == -ELDLM_NO_LOCK_DATA) { LDLM_DEBUG(lock, "lost race - client has a lock but no " "inode"); - ldlm_res_lvbo_update(lock->l_resource, NULL, 1); + ldlm_lvbo_update(env, lock->l_resource, lock, NULL, 1); } else if (rc != 0) { - rc = ldlm_handle_ast_error(lock, req, rc, "glimpse"); + rc = ldlm_handle_ast_error(env, lock, req, + rc, "glimpse"); } else { - rc = ldlm_res_lvbo_update(lock->l_resource, req, 1); + rc = ldlm_lvbo_update(env, lock->l_resource, + lock, req, 1); } break; case LDLM_BL_CALLBACK: if (rc != 0) - rc = ldlm_handle_ast_error(lock, req, rc, "blocking"); + rc = ldlm_handle_ast_error(env, lock, req, + rc, "blocking"); break; case LDLM_CP_CALLBACK: if (rc != 0) - rc = ldlm_handle_ast_error(lock, req, rc, "completion"); + rc = ldlm_handle_ast_error(env, lock, req, + rc, "completion"); break; default: LDLM_ERROR(lock, "invalid opcode for lock callback %d", @@ -718,9 +762,17 @@ static int ldlm_cb_interpret(const struct lu_env *env, LDLM_LOCK_RELEASE(lock); if (rc == -ERESTART) - cfs_atomic_inc(&arg->restart); + atomic_inc(&arg->restart); - RETURN(0); + RETURN(0); +} + +static void ldlm_update_resend(struct ptlrpc_request *req, void *data) +{ + struct ldlm_cb_async_args *ca = data; + struct ldlm_lock *lock = ca->ca_lock; + + ldlm_refresh_waiting_lock(lock, ldlm_bl_timeout(lock)); } static inline int ldlm_ast_fini(struct ptlrpc_request *req, @@ -735,7 +787,7 @@ static inline int ldlm_ast_fini(struct ptlrpc_request *req, rc = ptl_send_rpc(req, 1); ptlrpc_req_finished(req); if (rc == 0) - cfs_atomic_inc(&arg->restart); + atomic_inc(&arg->restart); } else { LDLM_LOCK_GET(lock); ptlrpc_set_add_req(arg->set, req); @@ -758,9 +810,9 @@ static void ldlm_lock_reorder_req(struct ldlm_lock *lock) RETURN_EXIT; } - spin_lock_bh(&lock->l_export->exp_rpc_lock); - cfs_list_for_each_entry(req, &lock->l_export->exp_hp_rpcs, - rq_exp_list) { + spin_lock(&lock->l_export->exp_rpc_lock); + list_for_each_entry(req, &lock->l_export->exp_hp_rpcs, + rq_exp_list) { /* Do not process requests that were not yet added to there * incoming queue or were already removed from there for * processing. We evaluate ptlrpc_nrs_req_can_move() without @@ -772,7 +824,7 @@ static void ldlm_lock_reorder_req(struct ldlm_lock *lock) req->rq_ops->hpreq_lock_match(req, lock)) ptlrpc_nrs_req_hp_move(req); } - spin_unlock_bh(&lock->l_export->exp_rpc_lock); + spin_unlock(&lock->l_export->exp_rpc_lock); EXIT; } @@ -799,6 +851,11 @@ int ldlm_server_blocking_ast(struct ldlm_lock *lock, /* Don't need to do anything here. */ RETURN(0); + if (OBD_FAIL_PRECHECK(OBD_FAIL_LDLM_SRV_BL_AST)) { + LDLM_DEBUG(lock, "dropping BL AST"); + RETURN(0); + } + LASSERT(lock); LASSERT(data != NULL); if (lock->l_export->exp_obd->obd_recovering != 0) @@ -806,56 +863,64 @@ int ldlm_server_blocking_ast(struct ldlm_lock *lock, ldlm_lock_reorder_req(lock); - req = ptlrpc_request_alloc_pack(lock->l_export->exp_imp_reverse, - &RQF_LDLM_BL_CALLBACK, - LUSTRE_DLM_VERSION, LDLM_BL_CALLBACK); - if (req == NULL) - RETURN(-ENOMEM); + req = ptlrpc_request_alloc_pack(lock->l_export->exp_imp_reverse, + &RQF_LDLM_BL_CALLBACK, + LUSTRE_DLM_VERSION, LDLM_BL_CALLBACK); + if (req == NULL) + RETURN(-ENOMEM); - CLASSERT(sizeof(*ca) <= sizeof(req->rq_async_args)); - ca = ptlrpc_req_async_args(req); - ca->ca_set_arg = arg; - ca->ca_lock = lock; + CLASSERT(sizeof(*ca) <= sizeof(req->rq_async_args)); + ca = ptlrpc_req_async_args(req); + ca->ca_set_arg = arg; + ca->ca_lock = lock; - req->rq_interpret_reply = ldlm_cb_interpret; - req->rq_no_resend = 1; + req->rq_interpret_reply = ldlm_cb_interpret; lock_res_and_lock(lock); - if (lock->l_granted_mode != lock->l_req_mode) { - /* this blocking AST will be communicated as part of the - * completion AST instead */ + if (ldlm_is_destroyed(lock)) { + /* What's the point? */ unlock_res_and_lock(lock); - ptlrpc_req_finished(req); - LDLM_DEBUG(lock, "lock not granted, not sending blocking AST"); RETURN(0); } - if (lock->l_flags & LDLM_FL_DESTROYED) { - /* What's the point? */ + if (lock->l_granted_mode != lock->l_req_mode) { + /* this blocking AST will be communicated as part of the + * completion AST instead */ + ldlm_add_blocked_lock(lock); + ldlm_set_waited(lock); unlock_res_and_lock(lock); + ptlrpc_req_finished(req); + LDLM_DEBUG(lock, "lock not granted, not sending blocking AST"); RETURN(0); } - if (lock->l_flags & LDLM_FL_CANCEL_ON_BLOCK) + if (ldlm_is_cancel_on_block(lock)) instant_cancel = 1; body = req_capsule_client_get(&req->rq_pill, &RMF_DLM_REQ); body->lock_handle[0] = lock->l_remote_handle; body->lock_desc = *desc; - body->lock_flags |= ldlm_flags_to_wire(lock->l_flags & LDLM_AST_FLAGS); + body->lock_flags |= ldlm_flags_to_wire(lock->l_flags & LDLM_FL_AST_MASK); LDLM_DEBUG(lock, "server preparing blocking AST"); ptlrpc_request_set_replen(req); + ldlm_set_cbpending(lock); if (instant_cancel) { unlock_res_and_lock(lock); ldlm_lock_cancel(lock); + + req->rq_no_resend = 1; } else { LASSERT(lock->l_granted_mode == lock->l_req_mode); - ldlm_add_waiting_lock(lock); + ldlm_add_waiting_lock(lock, ldlm_bl_timeout(lock)); unlock_res_and_lock(lock); + + /* Do not resend after lock callback timeout */ + req->rq_delay_limit = ldlm_bl_timeout(lock); + req->rq_resend_cb = ldlm_update_resend; } req->rq_send_state = LUSTRE_IMP_FULL; @@ -872,7 +937,6 @@ int ldlm_server_blocking_ast(struct ldlm_lock *lock, RETURN(rc); } -EXPORT_SYMBOL(ldlm_server_blocking_ast); /** * ->l_completion_ast callback for a remote lock in server namespace. @@ -887,7 +951,6 @@ int ldlm_server_completion_ast(struct ldlm_lock *lock, __u64 flags, void *data) struct ldlm_request *body; struct ptlrpc_request *req; struct ldlm_cb_async_args *ca; - long total_enqueue_wait; int instant_cancel = 0; int rc = 0; int lvb_len; @@ -896,8 +959,10 @@ int ldlm_server_completion_ast(struct ldlm_lock *lock, __u64 flags, void *data) LASSERT(lock != NULL); LASSERT(data != NULL); - total_enqueue_wait = cfs_time_sub(cfs_time_current_sec(), - lock->l_last_activity); + if (OBD_FAIL_PRECHECK(OBD_FAIL_LDLM_SRV_CP_AST)) { + LDLM_DEBUG(lock, "dropping CP AST"); + RETURN(0); + } req = ptlrpc_request_alloc(lock->l_export->exp_imp_reverse, &RQF_LDLM_CP_CALLBACK); @@ -914,28 +979,31 @@ int ldlm_server_completion_ast(struct ldlm_lock *lock, __u64 flags, void *data) lvb_len = 0; req_capsule_set_size(&req->rq_pill, &RMF_DLM_LVB, RCL_CLIENT, lvb_len); - rc = ptlrpc_request_pack(req, LUSTRE_DLM_VERSION, LDLM_CP_CALLBACK); - if (rc) { - ptlrpc_request_free(req); - RETURN(rc); - } + rc = ptlrpc_request_pack(req, LUSTRE_DLM_VERSION, LDLM_CP_CALLBACK); + if (rc) { + ptlrpc_request_free(req); + RETURN(rc); + } - CLASSERT(sizeof(*ca) <= sizeof(req->rq_async_args)); - ca = ptlrpc_req_async_args(req); - ca->ca_set_arg = arg; - ca->ca_lock = lock; + CLASSERT(sizeof(*ca) <= sizeof(req->rq_async_args)); + ca = ptlrpc_req_async_args(req); + ca->ca_set_arg = arg; + ca->ca_lock = lock; - req->rq_interpret_reply = ldlm_cb_interpret; - req->rq_no_resend = 1; - body = req_capsule_client_get(&req->rq_pill, &RMF_DLM_REQ); + req->rq_interpret_reply = ldlm_cb_interpret; + body = req_capsule_client_get(&req->rq_pill, &RMF_DLM_REQ); - body->lock_handle[0] = lock->l_remote_handle; + body->lock_handle[0] = lock->l_remote_handle; body->lock_flags = ldlm_flags_to_wire(flags); ldlm_lock2desc(lock, &body->lock_desc); if (lvb_len > 0) { void *lvb = req_capsule_client_get(&req->rq_pill, &RMF_DLM_LVB); + const struct lu_env *env = NULL; - lvb_len = ldlm_lvbo_fill(lock, lvb, lvb_len); + if (req->rq_svc_thread) + env = req->rq_svc_thread->t_env; + + lvb_len = ldlm_lvbo_fill(env, lock, lvb, &lvb_len); if (lvb_len < 0) { /* We still need to send the RPC to wake up the blocked * enqueue thread on the client. @@ -952,23 +1020,7 @@ int ldlm_server_completion_ast(struct ldlm_lock *lock, __u64 flags, void *data) } } - LDLM_DEBUG(lock, "server preparing completion AST (after %lds wait)", - total_enqueue_wait); - - /* Server-side enqueue wait time estimate, used in - __ldlm_add_waiting_lock to set future enqueue timers */ - if (total_enqueue_wait < ldlm_get_enq_timeout(lock)) - at_measured(ldlm_lock_to_ns_at(lock), - total_enqueue_wait); - else - /* bz18618. Don't add lock enqueue time we spend waiting for a - previous callback to fail. Locks waiting legitimately will - get extended by ldlm_refresh_waiting_lock regardless of the - estimate, so it's okay to underestimate here. */ - LDLM_DEBUG(lock, "lock completed after %lus; estimate was %ds. " - "It is likely that a previous callback timed out.", - total_enqueue_wait, - at_get(ldlm_lock_to_ns_at(lock))); + LDLM_DEBUG(lock, "server preparing completion AST"); ptlrpc_request_set_replen(req); @@ -979,11 +1031,11 @@ int ldlm_server_completion_ast(struct ldlm_lock *lock, __u64 flags, void *data) /* We only send real blocking ASTs after the lock is granted */ lock_res_and_lock(lock); - if (lock->l_flags & LDLM_FL_AST_SENT) { + if (ldlm_is_ast_sent(lock)) { body->lock_flags |= ldlm_flags_to_wire(LDLM_FL_AST_SENT); /* Copy AST flags like LDLM_FL_DISCARD_DATA. */ body->lock_flags |= ldlm_flags_to_wire(lock->l_flags & - LDLM_AST_FLAGS); + LDLM_FL_AST_MASK); /* We might get here prior to ldlm_handle_enqueue setting * LDLM_FL_CANCEL_ON_BLOCK flag. Then we will put this lock @@ -991,15 +1043,21 @@ int ldlm_server_completion_ast(struct ldlm_lock *lock, __u64 flags, void *data) * ldlm_handle_enqueue will call ldlm_lock_cancel() still, * that would not only cancel the lock, but will also remove * it from waiting list */ - if (lock->l_flags & LDLM_FL_CANCEL_ON_BLOCK) { - unlock_res_and_lock(lock); - ldlm_lock_cancel(lock); - instant_cancel = 1; - lock_res_and_lock(lock); - } else { - /* start the lock-timeout clock */ - ldlm_add_waiting_lock(lock); - } + if (ldlm_is_cancel_on_block(lock)) { + unlock_res_and_lock(lock); + ldlm_lock_cancel(lock); + + instant_cancel = 1; + req->rq_no_resend = 1; + + lock_res_and_lock(lock); + } else { + /* start the lock-timeout clock */ + ldlm_add_waiting_lock(lock, ldlm_bl_timeout(lock)); + /* Do not resend after lock callback timeout */ + req->rq_delay_limit = ldlm_bl_timeout(lock); + req->rq_resend_cb = ldlm_update_resend; + } } unlock_res_and_lock(lock); @@ -1012,7 +1070,6 @@ int ldlm_server_completion_ast(struct ldlm_lock *lock, __u64 flags, void *data) RETURN(lvb_len < 0 ? lvb_len : rc); } -EXPORT_SYMBOL(ldlm_server_completion_ast); /** * Server side ->l_glimpse_ast handler for client locks. @@ -1034,7 +1091,7 @@ int ldlm_server_glimpse_ast(struct ldlm_lock *lock, void *data) if (arg->gl_desc != NULL) /* There is a glimpse descriptor to pack */ - req_fmt = &RQF_LDLM_GL_DESC_CALLBACK; + req_fmt = &RQF_LDLM_GL_CALLBACK_DESC; else req_fmt = &RQF_LDLM_GL_CALLBACK; @@ -1052,9 +1109,9 @@ int ldlm_server_glimpse_ast(struct ldlm_lock *lock, void *data) *desc = *arg->gl_desc; } - body = req_capsule_client_get(&req->rq_pill, &RMF_DLM_REQ); - body->lock_handle[0] = lock->l_remote_handle; - ldlm_lock2desc(lock, &body->lock_desc); + body = req_capsule_client_get(&req->rq_pill, &RMF_DLM_REQ); + body->lock_handle[0] = lock->l_remote_handle; + ldlm_lock2desc(lock, &body->lock_desc); CLASSERT(sizeof(*ca) <= sizeof(req->rq_async_args)); ca = ptlrpc_req_async_args(req); @@ -1084,7 +1141,8 @@ int ldlm_server_glimpse_ast(struct ldlm_lock *lock, void *data) } EXPORT_SYMBOL(ldlm_server_glimpse_ast); -int ldlm_glimpse_locks(struct ldlm_resource *res, cfs_list_t *gl_work_list) +int ldlm_glimpse_locks(struct ldlm_resource *res, + struct list_head *gl_work_list) { int rc; ENTRY; @@ -1114,65 +1172,35 @@ struct ldlm_lock *ldlm_request_lock(struct ptlrpc_request *req) } EXPORT_SYMBOL(ldlm_request_lock); -static void ldlm_svc_get_eopc(const struct ldlm_request *dlm_req, - struct lprocfs_stats *srv_stats) -{ - int lock_type = 0, op = 0; - - lock_type = dlm_req->lock_desc.l_resource.lr_type; - - switch (lock_type) { - case LDLM_PLAIN: - op = PTLRPC_LAST_CNTR + LDLM_PLAIN_ENQUEUE; - break; - case LDLM_EXTENT: - if (dlm_req->lock_flags & LDLM_FL_HAS_INTENT) - op = PTLRPC_LAST_CNTR + LDLM_GLIMPSE_ENQUEUE; - else - op = PTLRPC_LAST_CNTR + LDLM_EXTENT_ENQUEUE; - break; - case LDLM_FLOCK: - op = PTLRPC_LAST_CNTR + LDLM_FLOCK_ENQUEUE; - break; - case LDLM_IBITS: - op = PTLRPC_LAST_CNTR + LDLM_IBITS_ENQUEUE; - break; - default: - op = 0; - break; - } - - if (op) - lprocfs_counter_incr(srv_stats, op); - - return; -} - /** * Main server-side entry point into LDLM for enqueue. This is called by ptlrpc * service threads to carry out client lock enqueueing requests. */ int ldlm_handle_enqueue0(struct ldlm_namespace *ns, - struct ptlrpc_request *req, - const struct ldlm_request *dlm_req, - const struct ldlm_callback_suite *cbs) + struct ptlrpc_request *req, + const struct ldlm_request *dlm_req, + const struct ldlm_callback_suite *cbs) { - struct ldlm_reply *dlm_rep; + struct ldlm_reply *dlm_rep; __u64 flags; - ldlm_error_t err = ELDLM_OK; - struct ldlm_lock *lock = NULL; - void *cookie = NULL; - int rc = 0; - ENTRY; + enum ldlm_error err = ELDLM_OK; + struct ldlm_lock *lock = NULL; + void *cookie = NULL; + int rc = 0; + struct ldlm_resource *res = NULL; + const struct lu_env *env = req->rq_svc_thread->t_env; + ENTRY; - LDLM_DEBUG_NOLOCK("server-side enqueue handler START"); + LDLM_DEBUG_NOLOCK("server-side enqueue handler START"); - ldlm_request_cancel(req, dlm_req, LDLM_ENQUEUE_CANCEL_OFF); + ldlm_request_cancel(req, dlm_req, LDLM_ENQUEUE_CANCEL_OFF, LATF_SKIP); flags = ldlm_flags_from_wire(dlm_req->lock_flags); - LASSERT(req->rq_export); + LASSERT(req->rq_export); - if (ptlrpc_req2svc(req)->srv_stats != NULL) + /* for intent enqueue the stat will be updated inside intent policy */ + if (ptlrpc_req2svc(req)->srv_stats != NULL && + !(dlm_req->lock_flags & LDLM_FL_HAS_INTENT)) ldlm_svc_get_eopc(dlm_req, ptlrpc_req2svc(req)->srv_stats); if (req->rq_export && req->rq_export->exp_nid_stats && @@ -1196,38 +1224,8 @@ int ldlm_handle_enqueue0(struct ldlm_namespace *ns, GOTO(out, rc = -EFAULT); } - if (exp_connect_flags(req->rq_export) & OBD_CONNECT_IBITS) { - if (unlikely(dlm_req->lock_desc.l_resource.lr_type == - LDLM_PLAIN)) { - DEBUG_REQ(D_ERROR, req, - "PLAIN lock request from IBITS client?"); - GOTO(out, rc = -EPROTO); - } - } else if (unlikely(dlm_req->lock_desc.l_resource.lr_type == - LDLM_IBITS)) { - DEBUG_REQ(D_ERROR, req, - "IBITS lock request from unaware client?"); - GOTO(out, rc = -EPROTO); - } - -#if 0 - /* FIXME this makes it impossible to use LDLM_PLAIN locks -- check - against server's _CONNECT_SUPPORTED flags? (I don't want to use - ibits for mgc/mgs) */ - - /* INODEBITS_INTEROP: Perform conversion from plain lock to - * inodebits lock if client does not support them. */ - if (!(exp_connect_flags(req->rq_export) & OBD_CONNECT_IBITS) && - (dlm_req->lock_desc.l_resource.lr_type == LDLM_PLAIN)) { - dlm_req->lock_desc.l_resource.lr_type = LDLM_IBITS; - dlm_req->lock_desc.l_policy_data.l_inodebits.bits = - MDS_INODELOCK_LOOKUP | MDS_INODELOCK_UPDATE; - if (dlm_req->lock_desc.l_req_mode == LCK_PR) - dlm_req->lock_desc.l_req_mode = LCK_CR; - } -#endif - - if (unlikely(flags & LDLM_FL_REPLAY)) { + if (unlikely((flags & LDLM_FL_REPLAY) || + (lustre_msg_get_flags(req->rq_reqmsg) & MSG_RESENT))) { /* Find an existing lock in the per-export lock hash */ /* In the function below, .hs_keycmp resolves to * ldlm_export_lock_keycmp() */ @@ -1235,24 +1233,49 @@ int ldlm_handle_enqueue0(struct ldlm_namespace *ns, lock = cfs_hash_lookup(req->rq_export->exp_lock_hash, (void *)&dlm_req->lock_handle[0]); if (lock != NULL) { - DEBUG_REQ(D_DLMTRACE, req, "found existing lock cookie " - LPX64, lock->l_handle.h_cookie); + DEBUG_REQ(D_DLMTRACE, req, "found existing lock cookie %#llx", + lock->l_handle.h_cookie); + flags |= LDLM_FL_RESENT; GOTO(existing_lock, rc = 0); - } - } + } + } else { + if (ldlm_reclaim_full()) { + DEBUG_REQ(D_DLMTRACE, req, "Too many granted locks, " + "reject current enqueue request and let the " + "client retry later.\n"); + GOTO(out, rc = -EINPROGRESS); + } + } - /* The lock's callback data might be set in the policy function */ - lock = ldlm_lock_create(ns, &dlm_req->lock_desc.l_resource.lr_name, - dlm_req->lock_desc.l_resource.lr_type, - dlm_req->lock_desc.l_req_mode, + /* The lock's callback data might be set in the policy function */ + lock = ldlm_lock_create(ns, &dlm_req->lock_desc.l_resource.lr_name, + dlm_req->lock_desc.l_resource.lr_type, + dlm_req->lock_desc.l_req_mode, cbs, NULL, 0, LVB_T_NONE); - if (!lock) - GOTO(out, rc = -ENOMEM); + if (IS_ERR(lock)) { + rc = PTR_ERR(lock); + lock = NULL; + GOTO(out, rc); + } - lock->l_last_activity = cfs_time_current_sec(); lock->l_remote_handle = dlm_req->lock_handle[0]; LDLM_DEBUG(lock, "server-side enqueue handler, new lock created"); + /* Initialize resource lvb but not for a lock being replayed since + * Client already got lvb sent in this case. + * This must occur early since some policy methods assume resource + * lvb is available (lr_lvb_data != NULL). + */ + res = lock->l_resource; + if (!(flags & LDLM_FL_REPLAY)) { + /* non-replayed lock, delayed lvb init may need to be done */ + rc = ldlm_lvbo_init(env, res); + if (rc < 0) { + LDLM_DEBUG(lock, "delayed lvb init failed (rc %d)", rc); + GOTO(out, rc); + } + } + OBD_FAIL_TIMEOUT(OBD_FAIL_LDLM_ENQUEUE_BLOCKED, obd_timeout * 2); /* Don't enqueue a lock onto the export if it is been disonnected * due to eviction (bug 3822) or server umount (bug 24324). @@ -1269,8 +1292,20 @@ int ldlm_handle_enqueue0(struct ldlm_namespace *ns, &lock->l_remote_handle, &lock->l_exp_hash); -existing_lock: + /* Inherit the enqueue flags before the operation, because we do not + * keep the res lock on return and next operations (BL AST) may proceed + * without them. */ + lock->l_flags |= ldlm_flags_from_wire(dlm_req->lock_flags & + LDLM_FL_INHERIT_MASK); + + ldlm_convert_policy_to_local(req->rq_export, + dlm_req->lock_desc.l_resource.lr_type, + &dlm_req->lock_desc.l_policy_data, + &lock->l_policy_data); + if (dlm_req->lock_desc.l_resource.lr_type == LDLM_EXTENT) + lock->l_req_extent = lock->l_policy_data.l_extent; +existing_lock: if (flags & LDLM_FL_HAS_INTENT) { /* In this case, the reply buffer is allocated deep in * local_lock_enqueue by the policy function. */ @@ -1282,34 +1317,28 @@ existing_lock: req_capsule_set_size(&req->rq_pill, &RMF_DLM_LVB, RCL_SERVER, ldlm_lvbo_size(lock)); - if (OBD_FAIL_CHECK(OBD_FAIL_LDLM_ENQUEUE_EXTENT_ERR)) - GOTO(out, rc = -ENOMEM); + if (OBD_FAIL_CHECK(OBD_FAIL_LDLM_ENQUEUE_EXTENT_ERR)) + GOTO(out, rc = -ENOMEM); - rc = req_capsule_server_pack(&req->rq_pill); - if (rc) - GOTO(out, rc); - } - - if (dlm_req->lock_desc.l_resource.lr_type != LDLM_PLAIN) - ldlm_convert_policy_to_local(req->rq_export, - dlm_req->lock_desc.l_resource.lr_type, - &dlm_req->lock_desc.l_policy_data, - &lock->l_policy_data); - if (dlm_req->lock_desc.l_resource.lr_type == LDLM_EXTENT) - lock->l_req_extent = lock->l_policy_data.l_extent; + rc = req_capsule_server_pack(&req->rq_pill); + if (rc) + GOTO(out, rc); + } - err = ldlm_lock_enqueue(ns, &lock, cookie, &flags); + err = ldlm_lock_enqueue(env, ns, &lock, cookie, &flags); if (err) { if ((int)err < 0) rc = (int)err; GOTO(out, err); } - dlm_rep = req_capsule_server_get(&req->rq_pill, &RMF_DLM_REP); - dlm_rep->lock_flags = ldlm_flags_to_wire(flags); + dlm_rep = req_capsule_server_get(&req->rq_pill, &RMF_DLM_REP); + + ldlm_lock2desc(lock, &dlm_rep->lock_desc); + ldlm_lock2handle(lock, &dlm_rep->lock_handle); - ldlm_lock2desc(lock, &dlm_rep->lock_desc); - ldlm_lock2handle(lock, &dlm_rep->lock_handle); + if (lock && lock->l_resource->lr_type == LDLM_EXTENT) + OBD_FAIL_TIMEOUT(OBD_FAIL_LDLM_BL_EVICT, 6); /* We never send a blocking AST until the lock is granted, but * we can tell it right now */ @@ -1317,9 +1346,8 @@ existing_lock: /* Now take into account flags to be inherited from original lock request both in reply to client and in our own lock flags. */ - dlm_rep->lock_flags |= dlm_req->lock_flags & LDLM_INHERIT_FLAGS; - lock->l_flags |= ldlm_flags_from_wire(dlm_req->lock_flags & - LDLM_INHERIT_FLAGS); + dlm_rep->lock_flags = ldlm_flags_to_wire(flags); + lock->l_flags |= flags & LDLM_FL_INHERIT_MASK; /* Don't move a pending lock onto the export if it has already been * disconnected due to eviction (bug 5683) or server umount (bug 24324). @@ -1328,7 +1356,23 @@ existing_lock: OBD_FAIL_CHECK(OBD_FAIL_LDLM_ENQUEUE_OLD_EXPORT))) { LDLM_ERROR(lock, "lock on destroyed export %p", req->rq_export); rc = -ENOTCONN; - } else if (lock->l_flags & LDLM_FL_AST_SENT) { + } else if (ldlm_is_ast_sent(lock)) { + /* fill lock desc for possible lock convert */ + if (lock->l_blocking_lock && + lock->l_resource->lr_type == LDLM_IBITS) { + struct ldlm_lock *bl_lock = lock->l_blocking_lock; + struct ldlm_lock_desc *rep_desc = &dlm_rep->lock_desc; + + LDLM_DEBUG(lock, + "save blocking bits %llx in granted lock", + bl_lock->l_policy_data.l_inodebits.bits); + /* If lock is blocked then save blocking ibits + * in returned lock policy for the possible lock + * convert on a client. + */ + rep_desc->l_policy_data.l_inodebits.cancel_bits = + bl_lock->l_policy_data.l_inodebits.bits; + } dlm_rep->lock_flags |= ldlm_flags_to_wire(LDLM_FL_AST_SENT); if (lock->l_granted_mode == lock->l_req_mode) { /* @@ -1342,38 +1386,15 @@ existing_lock: unlock_res_and_lock(lock); ldlm_lock_cancel(lock); lock_res_and_lock(lock); - } else - ldlm_add_waiting_lock(lock); - } - } - /* Make sure we never ever grant usual metadata locks to liblustre - clients */ - if ((dlm_req->lock_desc.l_resource.lr_type == LDLM_PLAIN || - dlm_req->lock_desc.l_resource.lr_type == LDLM_IBITS) && - req->rq_export->exp_libclient) { - if (unlikely(!(lock->l_flags & LDLM_FL_CANCEL_ON_BLOCK) || - !(dlm_rep->lock_flags & LDLM_FL_CANCEL_ON_BLOCK))){ - CERROR("Granting sync lock to libclient. " - "req fl %d, rep fl %d, lock fl "LPX64"\n", - dlm_req->lock_flags, dlm_rep->lock_flags, - lock->l_flags); - LDLM_ERROR(lock, "sync lock"); - if (dlm_req->lock_flags & LDLM_FL_HAS_INTENT) { - struct ldlm_intent *it; - - it = req_capsule_client_get(&req->rq_pill, - &RMF_LDLM_INTENT); - if (it != NULL) { - CERROR("This is intent %s ("LPU64")\n", - ldlm_it2str(it->opc), it->opc); - } - } + } else { + ldlm_add_waiting_lock(lock, + ldlm_bl_timeout(lock)); + } } } + unlock_res_and_lock(lock); - unlock_res_and_lock(lock); - - EXIT; + EXIT; out: req->rq_status = rc ?: err; /* return either error - bug 11190 */ if (!req->rq_packed_final) { @@ -1384,158 +1405,183 @@ existing_lock: /* The LOCK_CHANGED code in ldlm_lock_enqueue depends on this * ldlm_reprocess_all. If this moves, revisit that code. -phil */ - if (lock) { - LDLM_DEBUG(lock, "server-side enqueue handler, sending reply" - "(err=%d, rc=%d)", err, rc); - - if (rc == 0) { - if (req_capsule_has_field(&req->rq_pill, &RMF_DLM_LVB, - RCL_SERVER) && - ldlm_lvbo_size(lock) > 0) { - void *buf; - int buflen; - - buf = req_capsule_server_get(&req->rq_pill, - &RMF_DLM_LVB); - LASSERTF(buf != NULL, "req %p, lock %p\n", - req, lock); - buflen = req_capsule_get_size(&req->rq_pill, - &RMF_DLM_LVB, RCL_SERVER); - if (buflen >= 0) { - buflen = ldlm_lvbo_fill(lock, buf, - buflen); - if (buflen >= 0) + if (lock != NULL) { + LDLM_DEBUG(lock, "server-side enqueue handler, sending reply" + "(err=%d, rc=%d)", err, rc); + + if (rc == 0 && + req_capsule_has_field(&req->rq_pill, &RMF_DLM_LVB, + RCL_SERVER) && + ldlm_lvbo_size(lock) > 0) { + void *buf; + int buflen; + +retry: + buf = req_capsule_server_get(&req->rq_pill, + &RMF_DLM_LVB); + LASSERTF(buf != NULL, "req %p, lock %p\n", req, lock); + buflen = req_capsule_get_size(&req->rq_pill, + &RMF_DLM_LVB, RCL_SERVER); + /* non-replayed lock, delayed lvb init may + * need to be occur now + */ + if ((buflen > 0) && !(flags & LDLM_FL_REPLAY)) { + int rc2; + + rc2 = ldlm_lvbo_fill(env, lock, buf, &buflen); + if (rc2 >= 0) { + req_capsule_shrink(&req->rq_pill, + &RMF_DLM_LVB, + rc2, RCL_SERVER); + } else if (rc2 == -ERANGE) { + rc2 = req_capsule_server_grow( + &req->rq_pill, + &RMF_DLM_LVB, buflen); + if (!rc2) { + goto retry; + } else { + /* if we can't grow the buffer, + * it's ok to return empty lvb + * to client. + */ req_capsule_shrink( &req->rq_pill, - &RMF_DLM_LVB, - buflen, RCL_SERVER); - else - rc = buflen; + &RMF_DLM_LVB, 0, + RCL_SERVER); + } + } else { + rc = rc2; } + } else if (flags & LDLM_FL_REPLAY) { + /* no LVB resend upon replay */ + if (buflen > 0) + req_capsule_shrink(&req->rq_pill, + &RMF_DLM_LVB, + 0, RCL_SERVER); else rc = buflen; + } else { + rc = buflen; } - } else { - lock_res_and_lock(lock); - ldlm_resource_unlink_lock(lock); - ldlm_lock_destroy_nolock(lock); - unlock_res_and_lock(lock); - } + } - if (!err && dlm_req->lock_desc.l_resource.lr_type != LDLM_FLOCK) - ldlm_reprocess_all(lock->l_resource); + if (rc != 0 && !(flags & LDLM_FL_RESENT)) { + if (lock->l_export) { + ldlm_lock_cancel(lock); + } else { + lock_res_and_lock(lock); + ldlm_resource_unlink_lock(lock); + ldlm_lock_destroy_nolock(lock); + unlock_res_and_lock(lock); - LDLM_LOCK_RELEASE(lock); - } + } + } - LDLM_DEBUG_NOLOCK("server-side enqueue handler END (lock %p, rc %d)", - lock, rc); + if (!err && !ldlm_is_cbpending(lock) && + dlm_req->lock_desc.l_resource.lr_type != LDLM_FLOCK) + ldlm_reprocess_all(lock->l_resource); - return rc; -} -EXPORT_SYMBOL(ldlm_handle_enqueue0); + LDLM_LOCK_RELEASE(lock); + } -/** - * Old-style LDLM main entry point for server code enqueue. - */ -int ldlm_handle_enqueue(struct ptlrpc_request *req, - ldlm_completion_callback completion_callback, - ldlm_blocking_callback blocking_callback, - ldlm_glimpse_callback glimpse_callback) -{ - struct ldlm_request *dlm_req; - struct ldlm_callback_suite cbs = { - .lcs_completion = completion_callback, - .lcs_blocking = blocking_callback, - .lcs_glimpse = glimpse_callback - }; - int rc; + LDLM_DEBUG_NOLOCK("server-side enqueue handler END (lock %p, rc %d)", + lock, rc); - dlm_req = req_capsule_client_get(&req->rq_pill, &RMF_DLM_REQ); - if (dlm_req != NULL) { - rc = ldlm_handle_enqueue0(req->rq_export->exp_obd->obd_namespace, - req, dlm_req, &cbs); - } else { - rc = -EFAULT; - } return rc; } -EXPORT_SYMBOL(ldlm_handle_enqueue); /** * Main LDLM entry point for server code to process lock conversion requests. */ int ldlm_handle_convert0(struct ptlrpc_request *req, - const struct ldlm_request *dlm_req) + const struct ldlm_request *dlm_req) { - struct ldlm_reply *dlm_rep; - struct ldlm_lock *lock; - int rc; - ENTRY; - - if (req->rq_export && req->rq_export->exp_nid_stats && - req->rq_export->exp_nid_stats->nid_ldlm_stats) - lprocfs_counter_incr(req->rq_export->exp_nid_stats->nid_ldlm_stats, - LDLM_CONVERT - LDLM_FIRST_OPC); + struct obd_export *exp = req->rq_export; + struct ldlm_reply *dlm_rep; + struct ldlm_lock *lock; + int rc; - rc = req_capsule_server_pack(&req->rq_pill); - if (rc) - RETURN(rc); + ENTRY; - dlm_rep = req_capsule_server_get(&req->rq_pill, &RMF_DLM_REP); - dlm_rep->lock_flags = dlm_req->lock_flags; + if (exp && exp->exp_nid_stats && exp->exp_nid_stats->nid_ldlm_stats) + lprocfs_counter_incr(exp->exp_nid_stats->nid_ldlm_stats, + LDLM_CONVERT - LDLM_FIRST_OPC); - lock = ldlm_handle2lock(&dlm_req->lock_handle[0]); - if (!lock) { - req->rq_status = LUSTRE_EINVAL; - } else { - void *res = NULL; - - LDLM_DEBUG(lock, "server-side convert handler START"); + rc = req_capsule_server_pack(&req->rq_pill); + if (rc) + RETURN(rc); + + dlm_rep = req_capsule_server_get(&req->rq_pill, &RMF_DLM_REP); + dlm_rep->lock_flags = dlm_req->lock_flags; + + lock = ldlm_handle2lock(&dlm_req->lock_handle[0]); + if (lock) { + __u64 bits; + __u64 new; + + bits = lock->l_policy_data.l_inodebits.bits; + new = dlm_req->lock_desc.l_policy_data.l_inodebits.bits; + LDLM_DEBUG(lock, "server-side convert handler START"); + + if (ldlm_is_cancel(lock)) { + LDLM_ERROR(lock, "convert on canceled lock!"); + rc = ELDLM_NO_LOCK_DATA; + } else if (dlm_req->lock_desc.l_req_mode != + lock->l_granted_mode) { + LDLM_ERROR(lock, "lock mode differs!"); + rc = ELDLM_NO_LOCK_DATA; + } else if (bits == new) { + /* This can be valid situation if CONVERT RPCs are + * re-ordered. Just finish silently */ + LDLM_DEBUG(lock, "lock is converted already!"); + rc = ELDLM_OK; + } else { + lock_res_and_lock(lock); + if (ldlm_is_waited(lock)) + ldlm_del_waiting_lock(lock); + + ldlm_clear_cbpending(lock); + lock->l_policy_data.l_inodebits.cancel_bits = 0; + ldlm_inodebits_drop(lock, bits & ~new); + /* if lock is in a bl_ast list, remove it from the list + * here before reprocessing. + */ + if (!list_empty(&lock->l_bl_ast)) { + ldlm_discard_bl_lock(lock); + } else { + /* in this case lock was taken from bl_ast list + * already by ldlm_work_bl_ast_lock() and lock + * must clear only some remaining states. + */ + ldlm_clear_ast_sent(lock); + lock->l_bl_ast_run = 0; + ldlm_clear_blocking_lock(lock); + } + unlock_res_and_lock(lock); - lock->l_last_activity = cfs_time_current_sec(); - res = ldlm_lock_convert(lock, dlm_req->lock_desc.l_req_mode, - &dlm_rep->lock_flags); - if (res) { - if (ldlm_del_waiting_lock(lock)) - LDLM_DEBUG(lock, "converted waiting lock"); - req->rq_status = 0; - } else { - req->rq_status = LUSTRE_EDEADLK; - } - } + ldlm_reprocess_all(lock->l_resource); + rc = ELDLM_OK; + } - if (lock) { - if (!req->rq_status) - ldlm_reprocess_all(lock->l_resource); - LDLM_DEBUG(lock, "server-side convert handler END"); - LDLM_LOCK_PUT(lock); - } else - LDLM_DEBUG_NOLOCK("server-side convert handler END"); + if (rc == ELDLM_OK) { + dlm_rep->lock_handle = lock->l_remote_handle; + ldlm_ibits_policy_local_to_wire(&lock->l_policy_data, + &dlm_rep->lock_desc.l_policy_data); + } - RETURN(0); -} -EXPORT_SYMBOL(ldlm_handle_convert0); + LDLM_DEBUG(lock, "server-side convert handler END, rc = %d", + rc); + LDLM_LOCK_PUT(lock); + } else { + rc = ELDLM_NO_LOCK_DATA; + LDLM_DEBUG_NOLOCK("server-side convert handler END, rc = %d", + rc); + } -/** - * Old-style main LDLM entry point for server code to process lock conversion - * requests. - */ -int ldlm_handle_convert(struct ptlrpc_request *req) -{ - int rc; - struct ldlm_request *dlm_req; + req->rq_status = rc; - dlm_req = req_capsule_client_get(&req->rq_pill, &RMF_DLM_REQ); - if (dlm_req != NULL) { - rc = ldlm_handle_convert0(req, dlm_req); - } else { - CERROR ("Can't unpack dlm_req\n"); - rc = -EFAULT; - } - return rc; + RETURN(0); } -EXPORT_SYMBOL(ldlm_handle_convert); /** * Cancel all the locks whose handles are packed into ldlm_request @@ -1544,8 +1590,10 @@ EXPORT_SYMBOL(ldlm_handle_convert); * requests. */ int ldlm_request_cancel(struct ptlrpc_request *req, - const struct ldlm_request *dlm_req, int first) + const struct ldlm_request *dlm_req, + int first, enum lustre_at_flags flags) { + const struct lu_env *env = req->rq_svc_thread->t_env; struct ldlm_resource *res, *pres = NULL; struct ldlm_lock *lock; int i, count, done = 0; @@ -1570,7 +1618,7 @@ int ldlm_request_cancel(struct ptlrpc_request *req, lock = ldlm_handle2lock(&dlm_req->lock_handle[i]); if (!lock) { LDLM_DEBUG_NOLOCK("server-side cancel handler stale " - "lock (cookie "LPU64")", + "lock (cookie %llu)", dlm_req->lock_handle[i].cookie); continue; } @@ -1587,13 +1635,25 @@ int ldlm_request_cancel(struct ptlrpc_request *req, LDLM_RESOURCE_DELREF(pres); ldlm_resource_putref(pres); } - if (res != NULL) { - ldlm_resource_getref(res); - LDLM_RESOURCE_ADDREF(res); - ldlm_res_lvbo_update(res, NULL, 1); - } - pres = res; - } + if (res != NULL) { + ldlm_resource_getref(res); + LDLM_RESOURCE_ADDREF(res); + + if (!ldlm_is_discard_data(lock)) + ldlm_lvbo_update(env, res, lock, + NULL, 1); + } + pres = res; + } + + if ((flags & LATF_STATS) && ldlm_is_ast_sent(lock) && + lock->l_blast_sent != 0) { + time64_t delay = ktime_get_real_seconds() - + lock->l_blast_sent; + LDLM_DEBUG(lock, "server cancels blocked lock after %llds", + (s64)delay); + at_measured(&lock->l_export->exp_bl_lock_at, delay); + } ldlm_lock_cancel(lock); LDLM_LOCK_PUT(lock); } @@ -1633,12 +1693,11 @@ int ldlm_handle_cancel(struct ptlrpc_request *req) if (rc) RETURN(rc); - if (!ldlm_request_cancel(req, dlm_req, 0)) + if (!ldlm_request_cancel(req, dlm_req, 0, LATF_STATS)) req->rq_status = LUSTRE_ESTALE; RETURN(ptlrpc_reply(req)); } -EXPORT_SYMBOL(ldlm_handle_cancel); #endif /* HAVE_SERVER_SUPPORT */ /** @@ -1655,10 +1714,28 @@ void ldlm_handle_bl_callback(struct ldlm_namespace *ns, LDLM_DEBUG(lock, "client blocking AST callback handler"); lock_res_and_lock(lock); - lock->l_flags |= LDLM_FL_CBPENDING; - if (lock->l_flags & LDLM_FL_CANCEL_ON_BLOCK) - lock->l_flags |= LDLM_FL_CANCEL; + /* set bits to cancel for this lock for possible lock convert */ + if (ns_is_client(ns) && (lock->l_resource->lr_type == LDLM_IBITS)) { + /* Lock description contains policy of blocking lock, + * and its cancel_bits is used to pass conflicting bits. + * NOTE: ld can be NULL or can be not NULL but zeroed if + * passed from ldlm_bl_thread_blwi(), check below used bits + * in ld to make sure it is valid description. + */ + if (ld && ld->l_policy_data.l_inodebits.bits) + lock->l_policy_data.l_inodebits.cancel_bits = + ld->l_policy_data.l_inodebits.cancel_bits; + /* if there is no valid ld and lock is cbpending already + * then cancel_bits should be kept, otherwise it is zeroed. + */ + else if (!ldlm_is_cbpending(lock)) + lock->l_policy_data.l_inodebits.cancel_bits = 0; + } + ldlm_set_cbpending(lock); + + if (ldlm_is_cancel_on_block(lock)) + ldlm_set_cancel(lock); do_ast = (!lock->l_readers && !lock->l_writers); unlock_res_and_lock(lock); @@ -1689,20 +1766,22 @@ static void ldlm_handle_cp_callback(struct ptlrpc_request *req, struct ldlm_request *dlm_req, struct ldlm_lock *lock) { + struct list_head ast_list; int lvb_len; - CFS_LIST_HEAD(ast_list); int rc = 0; ENTRY; LDLM_DEBUG(lock, "client completion callback handler START"); + INIT_LIST_HEAD(&ast_list); if (OBD_FAIL_CHECK(OBD_FAIL_LDLM_CANCEL_BL_CB_RACE)) { - int to = cfs_time_seconds(1); + long to = cfs_time_seconds(1); + while (to > 0) { - cfs_schedule_timeout_and_set_state( - CFS_TASK_INTERRUPTIBLE, to); + set_current_state(TASK_INTERRUPTIBLE); + schedule_timeout(to); if (lock->l_granted_mode == lock->l_req_mode || - lock->l_flags & LDLM_FL_DESTROYED) + ldlm_is_destroyed(lock)) break; } } @@ -1723,26 +1802,26 @@ static void ldlm_handle_cp_callback(struct ptlrpc_request *req, lock->l_lvb_len, lvb_len); GOTO(out, rc = -EINVAL); } - } else if (ldlm_has_layout(lock)) { /* for layout lock, lvb has - * variable length */ - void *lvb_data; - - OBD_ALLOC(lvb_data, lvb_len); - if (lvb_data == NULL) { - LDLM_ERROR(lock, "No memory: %d.\n", lvb_len); - GOTO(out, rc = -ENOMEM); - } - - lock_res_and_lock(lock); - LASSERT(lock->l_lvb_data == NULL); - lock->l_lvb_data = lvb_data; - lock->l_lvb_len = lvb_len; - unlock_res_and_lock(lock); } } lock_res_and_lock(lock); - if ((lock->l_flags & LDLM_FL_DESTROYED) || + + if (!ldlm_res_eq(&dlm_req->lock_desc.l_resource.lr_name, + &lock->l_resource->lr_name)) { + ldlm_resource_unlink_lock(lock); + unlock_res_and_lock(lock); + rc = ldlm_lock_change_resource(ns, lock, + &dlm_req->lock_desc.l_resource.lr_name); + if (rc < 0) { + LDLM_ERROR(lock, "Failed to allocate resource"); + GOTO(out, rc); + } + LDLM_DEBUG(lock, "completion AST, new resource"); + lock_res_and_lock(lock); + } + + if (ldlm_is_destroyed(lock) || lock->l_granted_mode == lock->l_req_mode) { /* bug 11300: the lock has already been granted */ unlock_res_and_lock(lock); @@ -1758,34 +1837,20 @@ static void ldlm_handle_cp_callback(struct ptlrpc_request *req, } if (lock->l_resource->lr_type != LDLM_PLAIN) { - ldlm_convert_policy_to_local(req->rq_export, - dlm_req->lock_desc.l_resource.lr_type, - &dlm_req->lock_desc.l_policy_data, - &lock->l_policy_data); - LDLM_DEBUG(lock, "completion AST, new policy data"); - } - - ldlm_resource_unlink_lock(lock); - if (memcmp(&dlm_req->lock_desc.l_resource.lr_name, - &lock->l_resource->lr_name, - sizeof(lock->l_resource->lr_name)) != 0) { - unlock_res_and_lock(lock); - rc = ldlm_lock_change_resource(ns, lock, - &dlm_req->lock_desc.l_resource.lr_name); - if (rc < 0) { - LDLM_ERROR(lock, "Failed to allocate resource"); - GOTO(out, rc); - } - LDLM_DEBUG(lock, "completion AST, new resource"); - CERROR("change resource!\n"); - lock_res_and_lock(lock); - } + ldlm_convert_policy_to_local(req->rq_export, + dlm_req->lock_desc.l_resource.lr_type, + &dlm_req->lock_desc.l_policy_data, + &lock->l_policy_data); + LDLM_DEBUG(lock, "completion AST, new policy data"); + } + + ldlm_resource_unlink_lock(lock); if (dlm_req->lock_flags & LDLM_FL_AST_SENT) { /* BL_AST locks are not needed in LRU. * Let ldlm_cancel_lru() be fast. */ ldlm_lock_remove_from_lru(lock); - lock->l_flags |= LDLM_FL_CBPENDING | LDLM_FL_BL_AST; + lock->l_flags |= LDLM_FL_CBPENDING | LDLM_FL_BL_AST; LDLM_DEBUG(lock, "completion AST includes blocking AST"); } @@ -1816,9 +1881,9 @@ static void ldlm_handle_cp_callback(struct ptlrpc_request *req, out: if (rc < 0) { lock_res_and_lock(lock); - lock->l_flags |= LDLM_FL_FAILED; + ldlm_set_failed(lock); unlock_res_and_lock(lock); - cfs_waitq_signal(&lock->l_waitq); + wake_up(&lock->l_waitq); } LDLM_LOCK_RELEASE(lock); } @@ -1853,9 +1918,9 @@ static void ldlm_handle_gl_callback(struct ptlrpc_request *req, lock_res_and_lock(lock); if (lock->l_granted_mode == LCK_PW && !lock->l_readers && !lock->l_writers && - cfs_time_after(cfs_time_current(), - cfs_time_add(lock->l_last_used, - cfs_time_seconds(10)))) { + ktime_after(ktime_get(), + ktime_add(lock->l_last_used, + ktime_set(ns->ns_dirty_age_limit, 0)))) { unlock_res_and_lock(lock); if (ldlm_bl_to_thread_lock(ns, NULL, lock)) ldlm_handle_bl_callback(ns, NULL, lock); @@ -1882,25 +1947,24 @@ static int ldlm_callback_reply(struct ptlrpc_request *req, int rc) return ptlrpc_reply(req); } -#ifdef __KERNEL__ static int __ldlm_bl_to_thread(struct ldlm_bl_work_item *blwi, - ldlm_cancel_flags_t cancel_flags) + enum ldlm_cancel_flags cancel_flags) { struct ldlm_bl_pool *blp = ldlm_state->ldlm_bl_pool; ENTRY; spin_lock(&blp->blp_lock); if (blwi->blwi_lock && - blwi->blwi_lock->l_flags & LDLM_FL_DISCARD_DATA) { + ldlm_is_discard_data(blwi->blwi_lock)) { /* add LDLM_FL_DISCARD_DATA requests to the priority list */ - cfs_list_add_tail(&blwi->blwi_entry, &blp->blp_prio_list); + list_add_tail(&blwi->blwi_entry, &blp->blp_prio_list); } else { /* other blocking callbacks are added to the regular list */ - cfs_list_add_tail(&blwi->blwi_entry, &blp->blp_list); + list_add_tail(&blwi->blwi_entry, &blp->blp_list); } spin_unlock(&blp->blp_lock); - cfs_waitq_signal(&blp->blp_waitq); + wake_up(&blp->blp_waitq); /* can not check blwi->blwi_flags as blwi could be already freed in LCF_ASYNC mode */ @@ -1913,12 +1977,12 @@ static int __ldlm_bl_to_thread(struct ldlm_bl_work_item *blwi, static inline void init_blwi(struct ldlm_bl_work_item *blwi, struct ldlm_namespace *ns, struct ldlm_lock_desc *ld, - cfs_list_t *cancels, int count, + struct list_head *cancels, int count, struct ldlm_lock *lock, - ldlm_cancel_flags_t cancel_flags) + enum ldlm_cancel_flags cancel_flags) { init_completion(&blwi->blwi_comp); - CFS_INIT_LIST_HEAD(&blwi->blwi_head); + INIT_LIST_HEAD(&blwi->blwi_head); if (memory_pressure_get()) blwi->blwi_mem_pressure = 1; @@ -1928,8 +1992,8 @@ static inline void init_blwi(struct ldlm_bl_work_item *blwi, if (ld != NULL) blwi->blwi_ld = *ld; if (count) { - cfs_list_add(&blwi->blwi_head, cancels); - cfs_list_del_init(cancels); + list_add(&blwi->blwi_head, cancels); + list_del_init(cancels); blwi->blwi_count = count; } else { blwi->blwi_lock = lock; @@ -1948,8 +2012,8 @@ static inline void init_blwi(struct ldlm_bl_work_item *blwi, static int ldlm_bl_to_thread(struct ldlm_namespace *ns, struct ldlm_lock_desc *ld, struct ldlm_lock *lock, - cfs_list_t *cancels, int count, - ldlm_cancel_flags_t cancel_flags) + struct list_head *cancels, int count, + enum ldlm_cancel_flags cancel_flags) { ENTRY; @@ -1977,27 +2041,24 @@ static int ldlm_bl_to_thread(struct ldlm_namespace *ns, } } -#endif int ldlm_bl_to_thread_lock(struct ldlm_namespace *ns, struct ldlm_lock_desc *ld, struct ldlm_lock *lock) { -#ifdef __KERNEL__ return ldlm_bl_to_thread(ns, ld, lock, NULL, 0, LCF_ASYNC); -#else - return -ENOSYS; -#endif } int ldlm_bl_to_thread_list(struct ldlm_namespace *ns, struct ldlm_lock_desc *ld, - cfs_list_t *cancels, int count, - ldlm_cancel_flags_t cancel_flags) + struct list_head *cancels, int count, + enum ldlm_cancel_flags cancel_flags) { -#ifdef __KERNEL__ return ldlm_bl_to_thread(ns, ld, NULL, cancels, count, cancel_flags); -#else - return -ENOSYS; -#endif +} + +int ldlm_bl_thread_wakeup(void) +{ + wake_up(&ldlm_state->ldlm_bl_pool->blp_waitq); + return 0; } /* Setinfo coming from Server (eg MDT) to Client (eg MDC)! */ @@ -2045,11 +2106,11 @@ static int ldlm_handle_setinfo(struct ptlrpc_request *req) } static inline void ldlm_callback_errmsg(struct ptlrpc_request *req, - const char *msg, int rc, - struct lustre_handle *handle) + const char *msg, int rc, + const struct lustre_handle *handle) { DEBUG_REQ((req->rq_no_reply || rc) ? D_WARNING : D_DLMTRACE, req, - "%s: [nid %s] [rc %d] [lock "LPX64"]", + "%s: [nid %s] [rc %d] [lock %#llx]", msg, libcfs_id2str(req->rq_peer), rc, handle ? handle->cookie : 0); if (req->rq_no_reply) @@ -2058,23 +2119,6 @@ static inline void ldlm_callback_errmsg(struct ptlrpc_request *req, CWARN("Send reply failed, maybe cause bug 21636.\n"); } -static int ldlm_handle_qc_callback(struct ptlrpc_request *req) -{ - struct obd_quotactl *oqctl; - struct client_obd *cli = &req->rq_export->exp_obd->u.cli; - - oqctl = req_capsule_client_get(&req->rq_pill, &RMF_OBD_QUOTACTL); - if (oqctl == NULL) { - CERROR("Can't unpack obd_quotactl\n"); - RETURN(-EPROTO); - } - - oqctl->qc_stat = ptlrpc_status_ntoh(oqctl->qc_stat); - - cli->cl_qchk_stat = oqctl->qc_stat; - return 0; -} - /* TODO: handle requests in a similar way as MDT: see mdt_handle_common() */ static int ldlm_callback_handler(struct ptlrpc_request *req) { @@ -2107,8 +2151,11 @@ static int ldlm_callback_handler(struct ptlrpc_request *req) switch (lustre_msg_get_opc(req->rq_reqmsg)) { case LDLM_BL_CALLBACK: - if (OBD_FAIL_CHECK(OBD_FAIL_LDLM_BL_CALLBACK_NET)) + if (OBD_FAIL_CHECK(OBD_FAIL_LDLM_BL_CALLBACK_NET)) { + if (cfs_fail_err) + ldlm_callback_reply(req, -(int)cfs_fail_err); RETURN(0); + } break; case LDLM_CP_CALLBACK: if (OBD_FAIL_CHECK(OBD_FAIL_LDLM_CP_CALLBACK_NET)) @@ -2122,42 +2169,6 @@ static int ldlm_callback_handler(struct ptlrpc_request *req) rc = ldlm_handle_setinfo(req); ldlm_callback_reply(req, rc); RETURN(0); - case LLOG_ORIGIN_HANDLE_CREATE: - req_capsule_set(&req->rq_pill, &RQF_LLOG_ORIGIN_HANDLE_CREATE); - if (OBD_FAIL_CHECK(OBD_FAIL_OBD_LOGD_NET)) - RETURN(0); - rc = llog_origin_handle_open(req); - ldlm_callback_reply(req, rc); - RETURN(0); - case LLOG_ORIGIN_HANDLE_NEXT_BLOCK: - req_capsule_set(&req->rq_pill, - &RQF_LLOG_ORIGIN_HANDLE_NEXT_BLOCK); - if (OBD_FAIL_CHECK(OBD_FAIL_OBD_LOGD_NET)) - RETURN(0); - rc = llog_origin_handle_next_block(req); - ldlm_callback_reply(req, rc); - RETURN(0); - case LLOG_ORIGIN_HANDLE_READ_HEADER: - req_capsule_set(&req->rq_pill, - &RQF_LLOG_ORIGIN_HANDLE_READ_HEADER); - if (OBD_FAIL_CHECK(OBD_FAIL_OBD_LOGD_NET)) - RETURN(0); - rc = llog_origin_handle_read_header(req); - ldlm_callback_reply(req, rc); - RETURN(0); - case LLOG_ORIGIN_HANDLE_CLOSE: - if (OBD_FAIL_CHECK(OBD_FAIL_OBD_LOGD_NET)) - RETURN(0); - rc = llog_origin_handle_close(req); - ldlm_callback_reply(req, rc); - RETURN(0); - case OBD_QC_CALLBACK: - req_capsule_set(&req->rq_pill, &RQF_QC_CALLBACK); - if (OBD_FAIL_CHECK(OBD_FAIL_OBD_QC_CALLBACK_NET)) - RETURN(0); - rc = ldlm_handle_qc_callback(req); - ldlm_callback_reply(req, rc); - RETURN(0); default: CERROR("unknown opcode %u\n", lustre_msg_get_opc(req->rq_reqmsg)); @@ -2189,7 +2200,7 @@ static int ldlm_callback_handler(struct ptlrpc_request *req) lock = ldlm_handle2lock_long(&dlm_req->lock_handle[0], 0); if (!lock) { - CDEBUG(D_DLMTRACE, "callback on lock "LPX64" - lock " + CDEBUG(D_DLMTRACE, "callback on lock %#llx - lock " "disappeared\n", dlm_req->lock_handle[0].cookie); rc = ldlm_callback_reply(req, -EINVAL); ldlm_callback_errmsg(req, "Operate with invalid parameter", rc, @@ -2197,37 +2208,35 @@ static int ldlm_callback_handler(struct ptlrpc_request *req) RETURN(0); } - if ((lock->l_flags & LDLM_FL_FAIL_LOC) && + if (ldlm_is_fail_loc(lock) && lustre_msg_get_opc(req->rq_reqmsg) == LDLM_BL_CALLBACK) OBD_RACE(OBD_FAIL_LDLM_CP_BL_RACE); /* Copy hints/flags (e.g. LDLM_FL_DISCARD_DATA) from AST. */ lock_res_and_lock(lock); lock->l_flags |= ldlm_flags_from_wire(dlm_req->lock_flags & - LDLM_AST_FLAGS); - if (lustre_msg_get_opc(req->rq_reqmsg) == LDLM_BL_CALLBACK) { - /* If somebody cancels lock and cache is already dropped, - * or lock is failed before cp_ast received on client, - * we can tell the server we have no lock. Otherwise, we - * should send cancel after dropping the cache. */ - if (((lock->l_flags & LDLM_FL_CANCELING) && - (lock->l_flags & LDLM_FL_BL_DONE)) || - (lock->l_flags & LDLM_FL_FAILED)) { - LDLM_DEBUG(lock, "callback on lock " - LPX64" - lock disappeared\n", - dlm_req->lock_handle[0].cookie); - unlock_res_and_lock(lock); - LDLM_LOCK_RELEASE(lock); - rc = ldlm_callback_reply(req, -EINVAL); - ldlm_callback_errmsg(req, "Operate on stale lock", rc, - &dlm_req->lock_handle[0]); - RETURN(0); - } + LDLM_FL_AST_MASK); + if (lustre_msg_get_opc(req->rq_reqmsg) == LDLM_BL_CALLBACK) { + /* If somebody cancels lock and cache is already dropped, + * or lock is failed before cp_ast received on client, + * we can tell the server we have no lock. Otherwise, we + * should send cancel after dropping the cache. */ + if ((ldlm_is_canceling(lock) && ldlm_is_bl_done(lock)) || + ldlm_is_failed(lock)) { + LDLM_DEBUG(lock, "callback on lock %llx - lock disappeared", + dlm_req->lock_handle[0].cookie); + unlock_res_and_lock(lock); + LDLM_LOCK_RELEASE(lock); + rc = ldlm_callback_reply(req, -EINVAL); + ldlm_callback_errmsg(req, "Operate on stale lock", rc, + &dlm_req->lock_handle[0]); + RETURN(0); + } /* BL_AST locks are not needed in LRU. * Let ldlm_cancel_lru() be fast. */ - ldlm_lock_remove_from_lru(lock); - lock->l_flags |= LDLM_FL_BL_AST; - } + ldlm_lock_remove_from_lru(lock); + ldlm_set_bl_ast(lock); + } unlock_res_and_lock(lock); /* We want the ost thread to get this reply so that it can respond @@ -2243,7 +2252,7 @@ static int ldlm_callback_handler(struct ptlrpc_request *req) case LDLM_BL_CALLBACK: CDEBUG(D_INODE, "blocking ast\n"); req_capsule_extend(&req->rq_pill, &RQF_LDLM_BL_CALLBACK); - if (!(lock->l_flags & LDLM_FL_CANCEL_ON_BLOCK)) { + if (!ldlm_is_cancel_on_block(lock)) { rc = ldlm_callback_reply(req, 0); if (req->rq_no_reply || rc) ldlm_callback_errmsg(req, "Normal process", rc, @@ -2278,151 +2287,170 @@ static int ldlm_callback_handler(struct ptlrpc_request *req) */ static int ldlm_cancel_handler(struct ptlrpc_request *req) { - int rc; - ENTRY; - - /* Requests arrive in sender's byte order. The ptlrpc service - * handler has already checked and, if necessary, byte-swapped the - * incoming request message body, but I am responsible for the - * message buffers. */ - - req_capsule_init(&req->rq_pill, req, RCL_SERVER); + int rc; - if (req->rq_export == NULL) { - struct ldlm_request *dlm_req; - - CERROR("%s from %s arrived at %lu with bad export cookie " - LPU64"\n", - ll_opcode2str(lustre_msg_get_opc(req->rq_reqmsg)), - libcfs_nid2str(req->rq_peer.nid), - req->rq_arrival_time.tv_sec, - lustre_msg_get_handle(req->rq_reqmsg)->cookie); - - if (lustre_msg_get_opc(req->rq_reqmsg) == LDLM_CANCEL) { - req_capsule_set(&req->rq_pill, &RQF_LDLM_CALLBACK); - dlm_req = req_capsule_client_get(&req->rq_pill, - &RMF_DLM_REQ); - if (dlm_req != NULL) - ldlm_lock_dump_handle(D_ERROR, - &dlm_req->lock_handle[0]); - } - ldlm_callback_reply(req, -ENOTCONN); - RETURN(0); - } + ENTRY; - switch (lustre_msg_get_opc(req->rq_reqmsg)) { + /* Requests arrive in sender's byte order. The ptlrpc service + * handler has already checked and, if necessary, byte-swapped the + * incoming request message body, but I am responsible for the + * message buffers. */ + + req_capsule_init(&req->rq_pill, req, RCL_SERVER); + + if (req->rq_export == NULL) { + struct ldlm_request *dlm_req; + + CERROR("%s from %s arrived at %lu with bad export cookie " + "%llu\n", + ll_opcode2str(lustre_msg_get_opc(req->rq_reqmsg)), + libcfs_nid2str(req->rq_peer.nid), + req->rq_arrival_time.tv_sec, + lustre_msg_get_handle(req->rq_reqmsg)->cookie); + + if (lustre_msg_get_opc(req->rq_reqmsg) == LDLM_CANCEL) { + req_capsule_set(&req->rq_pill, &RQF_LDLM_CALLBACK); + dlm_req = req_capsule_client_get(&req->rq_pill, + &RMF_DLM_REQ); + if (dlm_req != NULL) + ldlm_lock_dump_handle(D_ERROR, + &dlm_req->lock_handle[0]); + } + ldlm_callback_reply(req, -ENOTCONN); + RETURN(0); + } - /* XXX FIXME move this back to mds/handler.c, bug 249 */ - case LDLM_CANCEL: - req_capsule_set(&req->rq_pill, &RQF_LDLM_CANCEL); - CDEBUG(D_INODE, "cancel\n"); + switch (lustre_msg_get_opc(req->rq_reqmsg)) { + /* XXX FIXME move this back to mds/handler.c, bug 249 */ + case LDLM_CANCEL: + req_capsule_set(&req->rq_pill, &RQF_LDLM_CANCEL); + CDEBUG(D_INODE, "cancel\n"); if (CFS_FAIL_CHECK(OBD_FAIL_LDLM_CANCEL_NET) || - CFS_FAIL_CHECK(OBD_FAIL_PTLRPC_CANCEL_RESEND)) + CFS_FAIL_CHECK(OBD_FAIL_PTLRPC_CANCEL_RESEND) || + CFS_FAIL_CHECK(OBD_FAIL_LDLM_BL_EVICT)) RETURN(0); - rc = ldlm_handle_cancel(req); - if (rc) - break; - RETURN(0); - default: - CERROR("invalid opcode %d\n", - lustre_msg_get_opc(req->rq_reqmsg)); - req_capsule_set(&req->rq_pill, &RQF_LDLM_CALLBACK); - ldlm_callback_reply(req, -EINVAL); - } + rc = ldlm_handle_cancel(req); + break; + case LDLM_CONVERT: + { + struct ldlm_request *dlm_req; - RETURN(0); + req_capsule_set(&req->rq_pill, &RQF_LDLM_CONVERT); + CDEBUG(D_INODE, "convert\n"); + + dlm_req = req_capsule_client_get(&req->rq_pill, &RMF_DLM_REQ); + if (dlm_req == NULL) { + CDEBUG(D_INFO, "bad request buffer for cancel\n"); + rc = ldlm_callback_reply(req, -EPROTO); + } else { + req->rq_status = ldlm_handle_convert0(req, dlm_req); + rc = ptlrpc_reply(req); + } + break; + } + default: + CERROR("invalid opcode %d\n", + lustre_msg_get_opc(req->rq_reqmsg)); + req_capsule_set(&req->rq_pill, &RQF_LDLM_CALLBACK); + rc = ldlm_callback_reply(req, -EINVAL); + } + + RETURN(rc); } static int ldlm_cancel_hpreq_lock_match(struct ptlrpc_request *req, - struct ldlm_lock *lock) + struct ldlm_lock *lock) { - struct ldlm_request *dlm_req; - struct lustre_handle lockh; - int rc = 0; - int i; - ENTRY; - - dlm_req = req_capsule_client_get(&req->rq_pill, &RMF_DLM_REQ); - if (dlm_req == NULL) - RETURN(0); + struct ldlm_request *dlm_req; + struct lustre_handle lockh; + int rc = 0; + int i; - ldlm_lock2handle(lock, &lockh); - for (i = 0; i < dlm_req->lock_count; i++) { - if (lustre_handle_equal(&dlm_req->lock_handle[i], - &lockh)) { - DEBUG_REQ(D_RPCTRACE, req, - "Prio raised by lock "LPX64".", lockh.cookie); + ENTRY; - rc = 1; - break; - } - } + dlm_req = req_capsule_client_get(&req->rq_pill, &RMF_DLM_REQ); + if (dlm_req == NULL) + RETURN(0); - RETURN(rc); + ldlm_lock2handle(lock, &lockh); + for (i = 0; i < dlm_req->lock_count; i++) { + if (lustre_handle_equal(&dlm_req->lock_handle[i], + &lockh)) { + DEBUG_REQ(D_RPCTRACE, req, + "Prio raised by lock %#llx.", lockh.cookie); + rc = 1; + break; + } + } + RETURN(rc); } static int ldlm_cancel_hpreq_check(struct ptlrpc_request *req) { - struct ldlm_request *dlm_req; - int rc = 0; - int i; - ENTRY; + struct ldlm_request *dlm_req; + int rc = 0; + int i; - /* no prolong in recovery */ - if (lustre_msg_get_flags(req->rq_reqmsg) & MSG_REPLAY) - RETURN(0); + ENTRY; - dlm_req = req_capsule_client_get(&req->rq_pill, &RMF_DLM_REQ); - if (dlm_req == NULL) - RETURN(-EFAULT); + /* no prolong in recovery */ + if (lustre_msg_get_flags(req->rq_reqmsg) & MSG_REPLAY) + RETURN(0); - for (i = 0; i < dlm_req->lock_count; i++) { - struct ldlm_lock *lock; + dlm_req = req_capsule_client_get(&req->rq_pill, &RMF_DLM_REQ); + if (dlm_req == NULL) + RETURN(-EFAULT); - lock = ldlm_handle2lock(&dlm_req->lock_handle[i]); - if (lock == NULL) - continue; + for (i = 0; i < dlm_req->lock_count; i++) { + struct ldlm_lock *lock; - rc = !!(lock->l_flags & LDLM_FL_AST_SENT); - if (rc) - LDLM_DEBUG(lock, "hpreq cancel lock"); - LDLM_LOCK_PUT(lock); + lock = ldlm_handle2lock(&dlm_req->lock_handle[i]); + if (lock == NULL) + continue; - if (rc) - break; - } + rc = ldlm_is_ast_sent(lock) ? 1 : 0; + if (rc) + LDLM_DEBUG(lock, "hpreq cancel/convert lock"); + LDLM_LOCK_PUT(lock); - RETURN(rc); + if (rc) + break; + } + + RETURN(rc); } static struct ptlrpc_hpreq_ops ldlm_cancel_hpreq_ops = { - .hpreq_lock_match = ldlm_cancel_hpreq_lock_match, + .hpreq_lock_match = ldlm_cancel_hpreq_lock_match, .hpreq_check = ldlm_cancel_hpreq_check, .hpreq_fini = NULL, }; static int ldlm_hpreq_handler(struct ptlrpc_request *req) { - ENTRY; + ENTRY; - req_capsule_init(&req->rq_pill, req, RCL_SERVER); + req_capsule_init(&req->rq_pill, req, RCL_SERVER); - if (req->rq_export == NULL) - RETURN(0); + if (req->rq_export == NULL) + RETURN(0); - if (LDLM_CANCEL == lustre_msg_get_opc(req->rq_reqmsg)) { - req_capsule_set(&req->rq_pill, &RQF_LDLM_CANCEL); - req->rq_ops = &ldlm_cancel_hpreq_ops; - } - RETURN(0); + if (LDLM_CANCEL == lustre_msg_get_opc(req->rq_reqmsg)) { + req_capsule_set(&req->rq_pill, &RQF_LDLM_CANCEL); + req->rq_ops = &ldlm_cancel_hpreq_ops; + } else if (LDLM_CONVERT == lustre_msg_get_opc(req->rq_reqmsg)) { + req_capsule_set(&req->rq_pill, &RQF_LDLM_CONVERT); + req->rq_ops = &ldlm_cancel_hpreq_ops; + } + RETURN(0); } -int ldlm_revoke_lock_cb(cfs_hash_t *hs, cfs_hash_bd_t *bd, - cfs_hlist_node_t *hnode, void *data) +static int ldlm_revoke_lock_cb(struct cfs_hash *hs, struct cfs_hash_bd *bd, + struct hlist_node *hnode, void *data) { - cfs_list_t *rpc_list = data; + struct list_head *rpc_list = data; struct ldlm_lock *lock = cfs_hash_object(hs, hnode); lock_res_and_lock(lock); @@ -2439,7 +2467,7 @@ int ldlm_revoke_lock_cb(cfs_hash_t *hs, cfs_hash_bd_t *bd, return 0; } - if (lock->l_flags & LDLM_FL_AST_SENT) { + if (ldlm_is_ast_sent(lock)) { unlock_res_and_lock(lock); return 0; } @@ -2447,7 +2475,7 @@ int ldlm_revoke_lock_cb(cfs_hash_t *hs, cfs_hash_bd_t *bd, LASSERT(lock->l_blocking_ast); LASSERT(!lock->l_blocking_lock); - lock->l_flags |= LDLM_FL_AST_SENT; + ldlm_set_ast_sent(lock); if (lock->l_export && lock->l_export->exp_lock_hash) { /* NB: it's safe to call cfs_hash_del() even lock isn't * in exp_lock_hash. */ @@ -2458,7 +2486,7 @@ int ldlm_revoke_lock_cb(cfs_hash_t *hs, cfs_hash_bd_t *bd, &lock->l_remote_handle, &lock->l_exp_hash); } - cfs_list_add_tail(&lock->l_rk_ast, rpc_list); + list_add_tail(&lock->l_rk_ast, rpc_list); LDLM_LOCK_GET(lock); unlock_res_and_lock(lock); @@ -2467,51 +2495,70 @@ int ldlm_revoke_lock_cb(cfs_hash_t *hs, cfs_hash_bd_t *bd, void ldlm_revoke_export_locks(struct obd_export *exp) { - cfs_list_t rpc_list; - ENTRY; + struct list_head rpc_list; + ENTRY; - CFS_INIT_LIST_HEAD(&rpc_list); - cfs_hash_for_each_empty(exp->exp_lock_hash, - ldlm_revoke_lock_cb, &rpc_list); - ldlm_run_ast_work(exp->exp_obd->obd_namespace, &rpc_list, - LDLM_WORK_REVOKE_AST); + INIT_LIST_HEAD(&rpc_list); + cfs_hash_for_each_nolock(exp->exp_lock_hash, + ldlm_revoke_lock_cb, &rpc_list, 0); + ldlm_run_ast_work(exp->exp_obd->obd_namespace, &rpc_list, + LDLM_WORK_REVOKE_AST); - EXIT; + EXIT; } EXPORT_SYMBOL(ldlm_revoke_export_locks); #endif /* HAVE_SERVER_SUPPORT */ -#ifdef __KERNEL__ -static struct ldlm_bl_work_item *ldlm_bl_get_work(struct ldlm_bl_pool *blp) +static int ldlm_bl_get_work(struct ldlm_bl_pool *blp, + struct ldlm_bl_work_item **p_blwi, + struct obd_export **p_exp) { struct ldlm_bl_work_item *blwi = NULL; static unsigned int num_bl = 0; + static unsigned int num_stale; + int num_th = atomic_read(&blp->blp_num_threads); + + *p_exp = obd_stale_export_get(); spin_lock(&blp->blp_lock); - /* process a request from the blp_list at least every blp_num_threads */ - if (!cfs_list_empty(&blp->blp_list) && - (cfs_list_empty(&blp->blp_prio_list) || num_bl == 0)) - blwi = cfs_list_entry(blp->blp_list.next, - struct ldlm_bl_work_item, blwi_entry); - else - if (!cfs_list_empty(&blp->blp_prio_list)) - blwi = cfs_list_entry(blp->blp_prio_list.next, - struct ldlm_bl_work_item, - blwi_entry); - - if (blwi) { - if (++num_bl >= cfs_atomic_read(&blp->blp_num_threads)) - num_bl = 0; - cfs_list_del(&blwi->blwi_entry); - } + if (*p_exp != NULL) { + if (num_th == 1 || ++num_stale < num_th) { + spin_unlock(&blp->blp_lock); + return 1; + } else { + num_stale = 0; + } + } + + /* process a request from the blp_list at least every blp_num_threads */ + if (!list_empty(&blp->blp_list) && + (list_empty(&blp->blp_prio_list) || num_bl == 0)) + blwi = list_entry(blp->blp_list.next, + struct ldlm_bl_work_item, blwi_entry); + else + if (!list_empty(&blp->blp_prio_list)) + blwi = list_entry(blp->blp_prio_list.next, + struct ldlm_bl_work_item, + blwi_entry); + + if (blwi) { + if (++num_bl >= num_th) + num_bl = 0; + list_del(&blwi->blwi_entry); + } spin_unlock(&blp->blp_lock); + *p_blwi = blwi; + + if (*p_exp != NULL && *p_blwi != NULL) { + obd_stale_export_put(*p_exp); + *p_exp = NULL; + } - return blwi; + return (*p_blwi != NULL || *p_exp != NULL) ? 1 : 0; } /* This only contains temporary data until the thread starts */ struct ldlm_bl_thread_data { - char bltd_name[CFS_CURPROC_COMM_MAX]; struct ldlm_bl_pool *bltd_blp; struct completion bltd_comp; int bltd_num; @@ -2519,19 +2566,32 @@ struct ldlm_bl_thread_data { static int ldlm_bl_thread_main(void *arg); -static int ldlm_bl_thread_start(struct ldlm_bl_pool *blp) +static int ldlm_bl_thread_start(struct ldlm_bl_pool *blp, bool check_busy) { struct ldlm_bl_thread_data bltd = { .bltd_blp = blp }; - cfs_task_t *task; + struct task_struct *task; init_completion(&bltd.bltd_comp); - bltd.bltd_num = cfs_atomic_read(&blp->blp_num_threads); - snprintf(bltd.bltd_name, sizeof(bltd.bltd_name) - 1, - "ldlm_bl_%02d", bltd.bltd_num); - task = kthread_run(ldlm_bl_thread_main, &bltd, bltd.bltd_name); + + bltd.bltd_num = atomic_inc_return(&blp->blp_num_threads); + if (bltd.bltd_num >= blp->blp_max_threads) { + atomic_dec(&blp->blp_num_threads); + return 0; + } + + LASSERTF(bltd.bltd_num > 0, "thread num:%d\n", bltd.bltd_num); + if (check_busy && + atomic_read(&blp->blp_busy_threads) < (bltd.bltd_num - 1)) { + atomic_dec(&blp->blp_num_threads); + return 0; + } + + task = kthread_run(ldlm_bl_thread_main, &bltd, "ldlm_bl_%02d", + bltd.bltd_num); if (IS_ERR(task)) { CERROR("cannot start LDLM thread ldlm_bl_%02d: rc %ld\n", - cfs_atomic_read(&blp->blp_num_threads), PTR_ERR(task)); + bltd.bltd_num, PTR_ERR(task)); + atomic_dec(&blp->blp_num_threads); return PTR_ERR(task); } wait_for_completion(&bltd.bltd_comp); @@ -2539,6 +2599,88 @@ static int ldlm_bl_thread_start(struct ldlm_bl_pool *blp) return 0; } +/* Not fatal if racy and have a few too many threads */ +static int ldlm_bl_thread_need_create(struct ldlm_bl_pool *blp, + struct ldlm_bl_work_item *blwi) +{ + if (atomic_read(&blp->blp_num_threads) >= blp->blp_max_threads) + return 0; + + if (atomic_read(&blp->blp_busy_threads) < + atomic_read(&blp->blp_num_threads)) + return 0; + + if (blwi != NULL && (blwi->blwi_ns == NULL || + blwi->blwi_mem_pressure)) + return 0; + + return 1; +} + +static int ldlm_bl_thread_blwi(struct ldlm_bl_pool *blp, + struct ldlm_bl_work_item *blwi) +{ + ENTRY; + + if (blwi->blwi_ns == NULL) + /* added by ldlm_cleanup() */ + RETURN(LDLM_ITER_STOP); + + if (blwi->blwi_mem_pressure) + memory_pressure_set(); + + OBD_FAIL_TIMEOUT(OBD_FAIL_LDLM_PAUSE_CANCEL2, 4); + + if (blwi->blwi_count) { + int count; + /* The special case when we cancel locks in lru + * asynchronously, we pass the list of locks here. + * Thus locks are marked LDLM_FL_CANCELING, but NOT + * canceled locally yet. */ + count = ldlm_cli_cancel_list_local(&blwi->blwi_head, + blwi->blwi_count, + LCF_BL_AST); + ldlm_cli_cancel_list(&blwi->blwi_head, count, NULL, + blwi->blwi_flags); + } else { + ldlm_handle_bl_callback(blwi->blwi_ns, &blwi->blwi_ld, + blwi->blwi_lock); + } + if (blwi->blwi_mem_pressure) + memory_pressure_clr(); + + if (blwi->blwi_flags & LCF_ASYNC) + OBD_FREE(blwi, sizeof(*blwi)); + else + complete(&blwi->blwi_comp); + + RETURN(0); +} + +/** + * Cancel stale locks on export. Cancel blocked locks first. + * If the given export has blocked locks, the next in the list may have + * them too, thus cancel not blocked locks only if the current export has + * no blocked locks. + **/ +static int ldlm_bl_thread_exports(struct ldlm_bl_pool *blp, + struct obd_export *exp) +{ + int num; + ENTRY; + + OBD_FAIL_TIMEOUT(OBD_FAIL_LDLM_BL_EVICT, 4); + + num = ldlm_export_cancel_blocked_locks(exp); + if (num == 0) + ldlm_export_cancel_locks(exp); + + obd_stale_export_put(exp); + + RETURN(0); +} + + /** * Main blocking requests processing thread. * @@ -2549,82 +2691,54 @@ static int ldlm_bl_thread_start(struct ldlm_bl_pool *blp) static int ldlm_bl_thread_main(void *arg) { struct ldlm_bl_pool *blp; + struct ldlm_bl_thread_data *bltd = arg; ENTRY; - { - struct ldlm_bl_thread_data *bltd = arg; - - blp = bltd->bltd_blp; + blp = bltd->bltd_blp; - cfs_atomic_inc(&blp->blp_num_threads); - cfs_atomic_inc(&blp->blp_busy_threads); + complete(&bltd->bltd_comp); + /* cannot use bltd after this, it is only on caller's stack */ - complete(&bltd->bltd_comp); - /* cannot use bltd after this, it is only on caller's stack */ - } - - while (1) { - struct l_wait_info lwi = { 0 }; - struct ldlm_bl_work_item *blwi = NULL; - int busy; - - blwi = ldlm_bl_get_work(blp); - - if (blwi == NULL) { - cfs_atomic_dec(&blp->blp_busy_threads); - l_wait_event_exclusive(blp->blp_waitq, - (blwi = ldlm_bl_get_work(blp)) != NULL, - &lwi); - busy = cfs_atomic_inc_return(&blp->blp_busy_threads); - } else { - busy = cfs_atomic_read(&blp->blp_busy_threads); - } + while (1) { + struct l_wait_info lwi = { 0 }; + struct ldlm_bl_work_item *blwi = NULL; + struct obd_export *exp = NULL; + int rc; - if (blwi->blwi_ns == NULL) - /* added by ldlm_cleanup() */ - break; - - /* Not fatal if racy and have a few too many threads */ - if (unlikely(busy < blp->blp_max_threads && - busy >= cfs_atomic_read(&blp->blp_num_threads) && - !blwi->blwi_mem_pressure)) - /* discard the return value, we tried */ - ldlm_bl_thread_start(blp); - - if (blwi->blwi_mem_pressure) - memory_pressure_set(); - - if (blwi->blwi_count) { - int count; - /* The special case when we cancel locks in LRU - * asynchronously, we pass the list of locks here. - * Thus locks are marked LDLM_FL_CANCELING, but NOT - * canceled locally yet. */ - count = ldlm_cli_cancel_list_local(&blwi->blwi_head, - blwi->blwi_count, - LCF_BL_AST); - ldlm_cli_cancel_list(&blwi->blwi_head, count, NULL, - blwi->blwi_flags); - } else { - ldlm_handle_bl_callback(blwi->blwi_ns, &blwi->blwi_ld, - blwi->blwi_lock); - } - if (blwi->blwi_mem_pressure) - memory_pressure_clr(); + rc = ldlm_bl_get_work(blp, &blwi, &exp); - if (blwi->blwi_flags & LCF_ASYNC) - OBD_FREE(blwi, sizeof(*blwi)); - else - complete(&blwi->blwi_comp); - } + if (rc == 0) + l_wait_event_exclusive(blp->blp_waitq, + ldlm_bl_get_work(blp, &blwi, + &exp), + &lwi); + atomic_inc(&blp->blp_busy_threads); + + if (ldlm_bl_thread_need_create(blp, blwi)) + /* discard the return value, we tried */ + ldlm_bl_thread_start(blp, true); + + if (exp) + rc = ldlm_bl_thread_exports(blp, exp); + else if (blwi) + rc = ldlm_bl_thread_blwi(blp, blwi); + + atomic_dec(&blp->blp_busy_threads); + + if (rc == LDLM_ITER_STOP) + break; + + /* If there are many namespaces, we will not sleep waiting for + * work, and must do a cond_resched to avoid holding the CPU + * for too long */ + cond_resched(); + } - cfs_atomic_dec(&blp->blp_busy_threads); - cfs_atomic_dec(&blp->blp_num_threads); + atomic_dec(&blp->blp_num_threads); complete(&blp->blp_comp); - RETURN(0); + RETURN(0); } -#endif static int ldlm_setup(void); static int ldlm_cleanup(void); @@ -2643,7 +2757,6 @@ int ldlm_get_ref(void) RETURN(rc); } -EXPORT_SYMBOL(ldlm_get_ref); void ldlm_put_ref(void) { @@ -2662,66 +2775,65 @@ void ldlm_put_ref(void) EXIT; } -EXPORT_SYMBOL(ldlm_put_ref); /* * Export handle<->lock hash operations. */ static unsigned -ldlm_export_lock_hash(cfs_hash_t *hs, const void *key, unsigned mask) +ldlm_export_lock_hash(struct cfs_hash *hs, const void *key, unsigned mask) { return cfs_hash_u64_hash(((struct lustre_handle *)key)->cookie, mask); } static void * -ldlm_export_lock_key(cfs_hlist_node_t *hnode) +ldlm_export_lock_key(struct hlist_node *hnode) { struct ldlm_lock *lock; - lock = cfs_hlist_entry(hnode, struct ldlm_lock, l_exp_hash); + lock = hlist_entry(hnode, struct ldlm_lock, l_exp_hash); return &lock->l_remote_handle; } static void -ldlm_export_lock_keycpy(cfs_hlist_node_t *hnode, void *key) +ldlm_export_lock_keycpy(struct hlist_node *hnode, void *key) { struct ldlm_lock *lock; - lock = cfs_hlist_entry(hnode, struct ldlm_lock, l_exp_hash); + lock = hlist_entry(hnode, struct ldlm_lock, l_exp_hash); lock->l_remote_handle = *(struct lustre_handle *)key; } static int -ldlm_export_lock_keycmp(const void *key, cfs_hlist_node_t *hnode) +ldlm_export_lock_keycmp(const void *key, struct hlist_node *hnode) { return lustre_handle_equal(ldlm_export_lock_key(hnode), key); } static void * -ldlm_export_lock_object(cfs_hlist_node_t *hnode) +ldlm_export_lock_object(struct hlist_node *hnode) { - return cfs_hlist_entry(hnode, struct ldlm_lock, l_exp_hash); + return hlist_entry(hnode, struct ldlm_lock, l_exp_hash); } static void -ldlm_export_lock_get(cfs_hash_t *hs, cfs_hlist_node_t *hnode) +ldlm_export_lock_get(struct cfs_hash *hs, struct hlist_node *hnode) { struct ldlm_lock *lock; - lock = cfs_hlist_entry(hnode, struct ldlm_lock, l_exp_hash); + lock = hlist_entry(hnode, struct ldlm_lock, l_exp_hash); LDLM_LOCK_GET(lock); } static void -ldlm_export_lock_put(cfs_hash_t *hs, cfs_hlist_node_t *hnode) +ldlm_export_lock_put(struct cfs_hash *hs, struct hlist_node *hnode) { struct ldlm_lock *lock; - lock = cfs_hlist_entry(hnode, struct ldlm_lock, l_exp_hash); + lock = hlist_entry(hnode, struct ldlm_lock, l_exp_hash); LDLM_LOCK_RELEASE(lock); } -static cfs_hash_ops_t ldlm_export_lock_ops = { +static struct cfs_hash_ops ldlm_export_lock_ops = { .hs_hash = ldlm_export_lock_hash, .hs_key = ldlm_export_lock_key, .hs_keycmp = ldlm_export_lock_keycmp, @@ -2772,14 +2884,50 @@ void ldlm_destroy_export(struct obd_export *exp) } EXPORT_SYMBOL(ldlm_destroy_export); +static ssize_t cancel_unused_locks_before_replay_show(struct kobject *kobj, + struct attribute *attr, + char *buf) +{ + return sprintf(buf, "%d\n", ldlm_cancel_unused_locks_before_replay); +} + +static ssize_t cancel_unused_locks_before_replay_store(struct kobject *kobj, + struct attribute *attr, + const char *buffer, + size_t count) +{ + int rc; + unsigned long val; + + rc = kstrtoul(buffer, 10, &val); + if (rc) + return rc; + + ldlm_cancel_unused_locks_before_replay = val; + + return count; +} +LUSTRE_RW_ATTR(cancel_unused_locks_before_replay); + +static struct attribute *ldlm_attrs[] = { + &lustre_attr_cancel_unused_locks_before_replay.attr, + NULL, +}; + +static struct attribute_group ldlm_attr_group = { + .attrs = ldlm_attrs, +}; + static int ldlm_setup(void) { static struct ptlrpc_service_conf conf; - struct ldlm_bl_pool *blp = NULL; - int rc = 0; -#ifdef __KERNEL__ - int i; -#endif + struct ldlm_bl_pool *blp = NULL; +#ifdef HAVE_SERVER_SUPPORT + struct task_struct *task; +#endif /* HAVE_SERVER_SUPPORT */ + int i; + int rc = 0; + ENTRY; if (ldlm_state != NULL) @@ -2789,11 +2937,25 @@ static int ldlm_setup(void) if (ldlm_state == NULL) RETURN(-ENOMEM); -#ifdef LPROCFS - rc = ldlm_proc_setup(); - if (rc != 0) + ldlm_kobj = kobject_create_and_add("ldlm", &lustre_kset->kobj); + if (!ldlm_kobj) + GOTO(out, -ENOMEM); + + rc = sysfs_create_group(ldlm_kobj, &ldlm_attr_group); + if (rc) + GOTO(out, rc); + + ldlm_ns_kset = kset_create_and_add("namespaces", NULL, ldlm_kobj); + if (!ldlm_ns_kset) + GOTO(out, -ENOMEM); + + ldlm_svc_kset = kset_create_and_add("services", NULL, ldlm_kobj); + if (!ldlm_svc_kset) + GOTO(out, -ENOMEM); + + rc = ldlm_debugfs_setup(); + if (rc != 0) GOTO(out, rc); -#endif memset(&conf, 0, sizeof(conf)); conf = (typeof(conf)) { @@ -2814,18 +2976,20 @@ static int ldlm_setup(void) .tc_nthrs_base = LDLM_NTHRS_BASE, .tc_nthrs_max = LDLM_NTHRS_MAX, .tc_nthrs_user = ldlm_num_threads, - .tc_cpu_affinity = 1, + .tc_cpu_bind = ldlm_cpu_bind, .tc_ctx_tags = LCT_MD_THREAD | LCT_DT_THREAD, }, .psc_cpt = { .cc_pattern = ldlm_cpts, + .cc_affinity = true, }, .psc_ops = { .so_req_handler = ldlm_callback_handler, }, }; ldlm_state->ldlm_cb_service = \ - ptlrpc_register_service(&conf, ldlm_svc_proc_dir); + ptlrpc_register_service(&conf, ldlm_svc_kset, + ldlm_svc_debugfs_dir); if (IS_ERR(ldlm_state->ldlm_cb_service)) { CERROR("failed to start service\n"); rc = PTR_ERR(ldlm_state->ldlm_cb_service); @@ -2854,13 +3018,14 @@ static int ldlm_setup(void) .tc_nthrs_base = LDLM_NTHRS_BASE, .tc_nthrs_max = LDLM_NTHRS_MAX, .tc_nthrs_user = ldlm_num_threads, - .tc_cpu_affinity = 1, + .tc_cpu_bind = ldlm_cpu_bind, .tc_ctx_tags = LCT_MD_THREAD | \ LCT_DT_THREAD | \ LCT_CL_THREAD, }, .psc_cpt = { .cc_pattern = ldlm_cpts, + .cc_affinity = true, }, .psc_ops = { .so_req_handler = ldlm_cancel_handler, @@ -2868,14 +3033,15 @@ static int ldlm_setup(void) }, }; ldlm_state->ldlm_cancel_service = \ - ptlrpc_register_service(&conf, ldlm_svc_proc_dir); + ptlrpc_register_service(&conf, ldlm_svc_kset, + ldlm_svc_debugfs_dir); if (IS_ERR(ldlm_state->ldlm_cancel_service)) { CERROR("failed to start service\n"); rc = PTR_ERR(ldlm_state->ldlm_cancel_service); ldlm_state->ldlm_cancel_service = NULL; GOTO(out, rc); } -#endif +#endif /* HAVE_SERVER_SUPPORT */ OBD_ALLOC(blp, sizeof(*blp)); if (blp == NULL) @@ -2883,13 +3049,12 @@ static int ldlm_setup(void) ldlm_state->ldlm_bl_pool = blp; spin_lock_init(&blp->blp_lock); - CFS_INIT_LIST_HEAD(&blp->blp_list); - CFS_INIT_LIST_HEAD(&blp->blp_prio_list); - cfs_waitq_init(&blp->blp_waitq); - cfs_atomic_set(&blp->blp_num_threads, 0); - cfs_atomic_set(&blp->blp_busy_threads, 0); + INIT_LIST_HEAD(&blp->blp_list); + INIT_LIST_HEAD(&blp->blp_prio_list); + init_waitqueue_head(&blp->blp_waitq); + atomic_set(&blp->blp_num_threads, 0); + atomic_set(&blp->blp_busy_threads, 0); -#ifdef __KERNEL__ if (ldlm_num_threads == 0) { blp->blp_min_threads = LDLM_NTHRS_INIT; blp->blp_max_threads = LDLM_NTHRS_MAX; @@ -2900,36 +3065,34 @@ static int ldlm_setup(void) } for (i = 0; i < blp->blp_min_threads; i++) { - rc = ldlm_bl_thread_start(blp); + rc = ldlm_bl_thread_start(blp, false); if (rc < 0) GOTO(out, rc); } -# ifdef HAVE_SERVER_SUPPORT - CFS_INIT_LIST_HEAD(&expired_lock_thread.elt_expired_locks); - expired_lock_thread.elt_state = ELT_STOPPED; - cfs_waitq_init(&expired_lock_thread.elt_waitq); - - CFS_INIT_LIST_HEAD(&waiting_locks_list); - spin_lock_init(&waiting_locks_spinlock); - cfs_timer_init(&waiting_locks_timer, waiting_locks_callback, 0); - - rc = PTR_ERR(kthread_run(expired_lock_main, NULL, "ldlm_elt")); - if (IS_ERR_VALUE(rc)) { +#ifdef HAVE_SERVER_SUPPORT + task = kthread_run(expired_lock_main, NULL, "ldlm_elt"); + if (IS_ERR(task)) { + rc = PTR_ERR(task); CERROR("Cannot start ldlm expired-lock thread: %d\n", rc); GOTO(out, rc); } - cfs_wait_event(expired_lock_thread.elt_waitq, - expired_lock_thread.elt_state == ELT_READY); -# endif /* HAVE_SERVER_SUPPORT */ + wait_event(expired_lock_wait_queue, + expired_lock_thread_state == ELT_READY); +#endif /* HAVE_SERVER_SUPPORT */ rc = ldlm_pools_init(); if (rc) { CERROR("Failed to initialize LDLM pools: %d\n", rc); GOTO(out, rc); } -#endif + + rc = ldlm_reclaim_setup(); + if (rc) { + CERROR("Failed to setup reclaim thread: rc = %d\n", rc); + GOTO(out, rc); + } RETURN(0); out: @@ -2941,28 +3104,28 @@ static int ldlm_cleanup(void) { ENTRY; - if (!cfs_list_empty(ldlm_namespace_list(LDLM_NAMESPACE_SERVER)) || - !cfs_list_empty(ldlm_namespace_list(LDLM_NAMESPACE_CLIENT))) { + if (!list_empty(ldlm_namespace_list(LDLM_NAMESPACE_SERVER)) || + !list_empty(ldlm_namespace_list(LDLM_NAMESPACE_CLIENT))) { CERROR("ldlm still has namespaces; clean these up first.\n"); ldlm_dump_all_namespaces(LDLM_NAMESPACE_SERVER, D_DLMTRACE); ldlm_dump_all_namespaces(LDLM_NAMESPACE_CLIENT, D_DLMTRACE); RETURN(-EBUSY); } -#ifdef __KERNEL__ - ldlm_pools_fini(); + ldlm_reclaim_cleanup(); + ldlm_pools_fini(); if (ldlm_state->ldlm_bl_pool != NULL) { struct ldlm_bl_pool *blp = ldlm_state->ldlm_bl_pool; - while (cfs_atomic_read(&blp->blp_num_threads) > 0) { + while (atomic_read(&blp->blp_num_threads) > 0) { struct ldlm_bl_work_item blwi = { .blwi_ns = NULL }; init_completion(&blp->blp_comp); spin_lock(&blp->blp_lock); - cfs_list_add_tail(&blwi.blwi_entry, &blp->blp_list); - cfs_waitq_signal(&blp->blp_waitq); + list_add_tail(&blwi.blwi_entry, &blp->blp_list); + wake_up(&blp->blp_waitq); spin_unlock(&blp->blp_lock); wait_for_completion(&blp->blp_comp); @@ -2970,27 +3133,33 @@ static int ldlm_cleanup(void) OBD_FREE(blp, sizeof(*blp)); } -#endif /* __KERNEL__ */ if (ldlm_state->ldlm_cb_service != NULL) ptlrpc_unregister_service(ldlm_state->ldlm_cb_service); -# ifdef HAVE_SERVER_SUPPORT +#ifdef HAVE_SERVER_SUPPORT if (ldlm_state->ldlm_cancel_service != NULL) ptlrpc_unregister_service(ldlm_state->ldlm_cancel_service); -# endif +#endif + + if (ldlm_ns_kset) + kset_unregister(ldlm_ns_kset); + if (ldlm_svc_kset) + kset_unregister(ldlm_svc_kset); + if (ldlm_kobj) { + sysfs_remove_group(ldlm_kobj, &ldlm_attr_group); + kobject_put(ldlm_kobj); + } -#ifdef __KERNEL__ - ldlm_proc_cleanup(); + ldlm_debugfs_cleanup(); -# ifdef HAVE_SERVER_SUPPORT - if (expired_lock_thread.elt_state != ELT_STOPPED) { - expired_lock_thread.elt_state = ELT_TERMINATE; - cfs_waitq_signal(&expired_lock_thread.elt_waitq); - cfs_wait_event(expired_lock_thread.elt_waitq, - expired_lock_thread.elt_state == ELT_STOPPED); +#ifdef HAVE_SERVER_SUPPORT + if (expired_lock_thread_state != ELT_STOPPED) { + expired_lock_thread_state = ELT_TERMINATE; + wake_up(&expired_lock_wait_queue); + wait_event(expired_lock_wait_queue, + expired_lock_thread_state == ELT_STOPPED); } -# endif -#endif /* __KERNEL__ */ +#endif OBD_FREE(ldlm_state, sizeof(*ldlm_state)); ldlm_state = NULL; @@ -3000,9 +3169,6 @@ static int ldlm_cleanup(void) int ldlm_init(void) { - mutex_init(&ldlm_ref_mutex); - mutex_init(ldlm_namespace_lock(LDLM_NAMESPACE_SERVER)); - mutex_init(ldlm_namespace_lock(LDLM_NAMESPACE_CLIENT)); ldlm_resource_slab = kmem_cache_create("ldlm_resources", sizeof(struct ldlm_resource), 0, SLAB_HWCACHE_ALIGN, NULL); @@ -3012,23 +3178,45 @@ int ldlm_init(void) ldlm_lock_slab = kmem_cache_create("ldlm_locks", sizeof(struct ldlm_lock), 0, SLAB_HWCACHE_ALIGN | SLAB_DESTROY_BY_RCU, NULL); - if (ldlm_lock_slab == NULL) { - kmem_cache_destroy(ldlm_resource_slab); - return -ENOMEM; - } + if (ldlm_lock_slab == NULL) + goto out_resource; ldlm_interval_slab = kmem_cache_create("interval_node", sizeof(struct ldlm_interval), 0, SLAB_HWCACHE_ALIGN, NULL); - if (ldlm_interval_slab == NULL) { - kmem_cache_destroy(ldlm_resource_slab); - kmem_cache_destroy(ldlm_lock_slab); - return -ENOMEM; - } + if (ldlm_interval_slab == NULL) + goto out_lock; + + ldlm_interval_tree_slab = kmem_cache_create("interval_tree", + sizeof(struct ldlm_interval_tree) * LCK_MODE_NUM, + 0, SLAB_HWCACHE_ALIGN, NULL); + if (ldlm_interval_tree_slab == NULL) + goto out_interval; + +#ifdef HAVE_SERVER_SUPPORT + ldlm_glimpse_work_kmem = kmem_cache_create("ldlm_glimpse_work_kmem", + sizeof(struct ldlm_glimpse_work), + 0, 0, NULL); + if (ldlm_glimpse_work_kmem == NULL) + goto out_interval_tree; +#endif + #if LUSTRE_TRACKS_LOCK_EXP_REFS - class_export_dump_hook = ldlm_dump_export_locks; + class_export_dump_hook = ldlm_dump_export_locks; #endif - return 0; + return 0; +#ifdef HAVE_SERVER_SUPPORT +out_interval_tree: + kmem_cache_destroy(ldlm_interval_tree_slab); +#endif +out_interval: + kmem_cache_destroy(ldlm_interval_slab); +out_lock: + kmem_cache_destroy(ldlm_lock_slab); +out_resource: + kmem_cache_destroy(ldlm_resource_slab); + + return -ENOMEM; } void ldlm_exit(void) @@ -3036,12 +3224,14 @@ void ldlm_exit(void) if (ldlm_refcount) CERROR("ldlm_refcount is %d in ldlm_exit!\n", ldlm_refcount); kmem_cache_destroy(ldlm_resource_slab); -#ifdef __KERNEL__ /* ldlm_lock_put() use RCU to call ldlm_lock_free, so need call * synchronize_rcu() to wait a grace period elapsed, so that * ldlm_lock_free() get a chance to be called. */ synchronize_rcu(); -#endif kmem_cache_destroy(ldlm_lock_slab); kmem_cache_destroy(ldlm_interval_slab); + kmem_cache_destroy(ldlm_interval_tree_slab); +#ifdef HAVE_SERVER_SUPPORT + kmem_cache_destroy(ldlm_glimpse_work_kmem); +#endif }