Whamcloud - gitweb
b=22828 fix unnormalized Linux symbols
[fs/lustre-release.git] / libcfs / libcfs / watchdog.c
index e904d0e..cc6ae59 100644 (file)
@@ -26,7 +26,7 @@
  * GPL HEADER END
  */
 /*
- * Copyright  2008 Sun Microsystems, Inc. All rights reserved
+ * Copyright (c) 2008, 2010, Oracle and/or its affiliates. All rights reserved.
  * Use is subject to license terms.
  */
 /*
 #include "tracefile.h"
 
 struct lc_watchdog {
-        cfs_timer_t           lcw_timer; /* kernel timer */
-        cfs_list_t            lcw_list;
-        cfs_time_t            lcw_last_touched;
-        cfs_task_t           *lcw_task;
+        cfs_spinlock_t  lcw_lock;     /* check or change lcw_list */
+        int             lcw_refcount; /* must hold lcw_pending_timers_lock */
+        cfs_timer_t     lcw_timer;    /* kernel timer */
+        cfs_list_t      lcw_list;     /* chain on pending list */
+        cfs_time_t      lcw_last_touched; /* last touched stamp */
+        cfs_task_t     *lcw_task;     /* owner task */
+        void          (*lcw_callback)(pid_t, void *);
+        void           *lcw_data;
 
-        void                (*lcw_callback)(pid_t, void *);
-        void                 *lcw_data;
-
-        pid_t                 lcw_pid;
+        pid_t           lcw_pid;
 
         enum {
                 LC_WATCHDOG_DISABLED,
@@ -82,7 +83,7 @@ static unsigned long lcw_flags = 0;
 /*
  * Number of outstanding watchdogs.
  * When it hits 1, we start the dispatcher.
- * When it hits 0, we stop the distpatcher.
+ * When it hits 0, we stop the dispatcher.
  */
 static __u32         lcw_refcount = 0;
 static CFS_DECLARE_MUTEX(lcw_refcount_sem);
@@ -99,7 +100,6 @@ static cfs_list_t lcw_pending_timers = \
 /* Last time a watchdog expired */
 static cfs_time_t lcw_last_watchdog_time;
 static int lcw_recent_watchdog_count;
-static cfs_spinlock_t lcw_last_watchdog_lock = CFS_SPIN_LOCK_UNLOCKED;
 
 static void
 lcw_dump(struct lc_watchdog *lcw)
@@ -110,10 +110,10 @@ lcw_dump(struct lc_watchdog *lcw)
 #elif defined(HAVE_TASK_RCU)
         rcu_read_lock();
 #else
-        CERROR("unable to dump stack because of missing export\n"); 
+        CERROR("unable to dump stack because of missing export\n");
         RETURN_EXIT;
 #endif
-       if (lcw->lcw_task == NULL) { 
+       if (lcw->lcw_task == NULL) {
                 LCONSOLE_WARN("Process " LPPID " was not found in the task "
                               "list; watchdog callback may be incomplete\n",
                               (int)lcw->lcw_pid);
@@ -132,10 +132,6 @@ lcw_dump(struct lc_watchdog *lcw)
 static void lcw_cb(ulong_ptr_t data)
 {
         struct lc_watchdog *lcw = (struct lc_watchdog *)data;
-        cfs_time_t current_time;
-        cfs_duration_t delta_time;
-        struct timeval timediff;
-
         ENTRY;
 
         if (lcw->lcw_state != LC_WATCHDOG_ENABLED) {
@@ -144,17 +140,47 @@ static void lcw_cb(ulong_ptr_t data)
         }
 
         lcw->lcw_state = LC_WATCHDOG_EXPIRED;
-        current_time = cfs_time_current();
 
+        cfs_spin_lock_bh(&lcw->lcw_lock);
+        LASSERT(cfs_list_empty(&lcw->lcw_list));
+
+        cfs_spin_lock_bh(&lcw_pending_timers_lock);
+        lcw->lcw_refcount++; /* +1 for pending list */
+        cfs_list_add(&lcw->lcw_list, &lcw_pending_timers);
+        cfs_waitq_signal(&lcw_event_waitq);
+
+        cfs_spin_unlock_bh(&lcw_pending_timers_lock);
+        cfs_spin_unlock_bh(&lcw->lcw_lock);
+        EXIT;
+}
+
+static int is_watchdog_fired(void)
+{
+        int rc;
+
+        if (cfs_test_bit(LCW_FLAG_STOP, &lcw_flags))
+                return 1;
+
+        cfs_spin_lock_bh(&lcw_pending_timers_lock);
+        rc = !cfs_list_empty(&lcw_pending_timers);
+        cfs_spin_unlock_bh(&lcw_pending_timers_lock);
+        return rc;
+}
+
+static void lcw_dump_stack(struct lc_watchdog *lcw)
+{
+        cfs_time_t      current_time;
+        cfs_duration_t  delta_time;
+        struct timeval  timediff;
+
+        current_time = cfs_time_current();
         delta_time = cfs_time_sub(current_time, lcw->lcw_last_touched);
         cfs_duration_usec(delta_time, &timediff);
 
-        /* Check to see if we should throttle the watchdog timer to avoid
+        /*
+         * Check to see if we should throttle the watchdog timer to avoid
          * too many dumps going to the console thus triggering an NMI.
-         * Normally we would not hold the spin lock over the CWARN but in
-         * this case we hold it to ensure non ratelimited lcw_dumps are not
-         * interleaved on the console making them hard to read. */
-        cfs_spin_lock_bh(&lcw_last_watchdog_lock);
+         */
         delta_time = cfs_duration_sec(cfs_time_sub(current_time,
                                                    lcw_last_watchdog_time));
 
@@ -176,8 +202,6 @@ static void lcw_cb(ulong_ptr_t data)
                         lcw_recent_watchdog_count = 0;
                 }
 
-               /* This warning should appear on the console, but may not get
-                * into the logs since we're running in a softirq handler */
                 LCONSOLE_WARN("Service thread pid %u was inactive for "
                               "%lu.%.02lus. The thread might be hung, or it "
                               "might only be slow and will resume later. "
@@ -187,32 +211,7 @@ static void lcw_cb(ulong_ptr_t data)
                               timediff.tv_sec,
                               timediff.tv_usec / 10000);
                 lcw_dump(lcw);
-       }
-
-        cfs_spin_unlock_bh(&lcw_last_watchdog_lock);
-        cfs_spin_lock_bh(&lcw_pending_timers_lock);
-
-        if (cfs_list_empty(&lcw->lcw_list)) {
-                cfs_list_add(&lcw->lcw_list, &lcw_pending_timers);
-                cfs_waitq_signal(&lcw_event_waitq);
         }
-
-        cfs_spin_unlock_bh(&lcw_pending_timers_lock);
-
-        EXIT;
-}
-
-static int is_watchdog_fired(void)
-{
-        int rc;
-
-        if (cfs_test_bit(LCW_FLAG_STOP, &lcw_flags))
-                return 1;
-
-        cfs_spin_lock_bh(&lcw_pending_timers_lock);
-        rc = !cfs_list_empty(&lcw_pending_timers);
-        cfs_spin_unlock_bh(&lcw_pending_timers_lock);
-        return rc;
 }
 
 static int lcw_dispatch_main(void *data)
@@ -220,6 +219,7 @@ static int lcw_dispatch_main(void *data)
         int                 rc = 0;
         unsigned long       flags;
         struct lc_watchdog *lcw;
+        CFS_LIST_HEAD      (zombies);
 
         ENTRY;
 
@@ -233,6 +233,8 @@ static int lcw_dispatch_main(void *data)
         cfs_complete(&lcw_start_completion);
 
         while (1) {
+                int dumplog = 1;
+
                 cfs_wait_event_interruptible(lcw_event_waitq,
                                              is_watchdog_fired(), rc);
                 CDEBUG(D_INFO, "Watchdog got woken up...\n");
@@ -251,21 +253,60 @@ static int lcw_dispatch_main(void *data)
 
                 cfs_spin_lock_bh(&lcw_pending_timers_lock);
                 while (!cfs_list_empty(&lcw_pending_timers)) {
+                        int is_dumplog;
 
                         lcw = cfs_list_entry(lcw_pending_timers.next,
-                                         struct lc_watchdog,
-                                         lcw_list);
+                                             struct lc_watchdog, lcw_list);
+                        /* +1 ref for callback to make sure lwc wouldn't be
+                         * deleted after releasing lcw_pending_timers_lock */
+                        lcw->lcw_refcount++;
+                        cfs_spin_unlock_bh(&lcw_pending_timers_lock);
+
+                        /* lock ordering */
+                        cfs_spin_lock_bh(&lcw->lcw_lock);
+                        cfs_spin_lock_bh(&lcw_pending_timers_lock);
+
+                        if (cfs_list_empty(&lcw->lcw_list)) {
+                                /* already removed from pending list */
+                                lcw->lcw_refcount--; /* -1 ref for callback */
+                                if (lcw->lcw_refcount == 0)
+                                        cfs_list_add(&lcw->lcw_list, &zombies);
+                                cfs_spin_unlock_bh(&lcw->lcw_lock);
+                                /* still hold lcw_pending_timers_lock */
+                                continue;
+                        }
+
                         cfs_list_del_init(&lcw->lcw_list);
+                        lcw->lcw_refcount--; /* -1 ref for pending list */
+
                         cfs_spin_unlock_bh(&lcw_pending_timers_lock);
+                        cfs_spin_unlock_bh(&lcw->lcw_lock);
 
-                        CDEBUG(D_INFO, "found lcw for pid " LPPID "\n", lcw->lcw_pid);
+                        CDEBUG(D_INFO, "found lcw for pid " LPPID "\n",
+                               lcw->lcw_pid);
+                        lcw_dump_stack(lcw);
 
-                        if (lcw->lcw_state != LC_WATCHDOG_DISABLED)
+                        is_dumplog = lcw->lcw_callback == lc_watchdog_dumplog;
+                        if (lcw->lcw_state != LC_WATCHDOG_DISABLED &&
+                            (dumplog || !is_dumplog)) {
                                 lcw->lcw_callback(lcw->lcw_pid, lcw->lcw_data);
+                                if (dumplog && is_dumplog)
+                                        dumplog = 0;
+                        }
 
                         cfs_spin_lock_bh(&lcw_pending_timers_lock);
+                        lcw->lcw_refcount--; /* -1 ref for callback */
+                        if (lcw->lcw_refcount == 0)
+                                cfs_list_add(&lcw->lcw_list, &zombies);
                 }
                 cfs_spin_unlock_bh(&lcw_pending_timers_lock);
+
+                while (!cfs_list_empty(&zombies)) {
+                        lcw = cfs_list_entry(lcw_pending_timers.next,
+                                         struct lc_watchdog, lcw_list);
+                        cfs_list_del(&lcw->lcw_list);
+                        LIBCFS_FREE(lcw, sizeof(*lcw));
+                }
         }
 
         cfs_complete(&lcw_stop_completion);
@@ -327,6 +368,8 @@ struct lc_watchdog *lc_watchdog_add(int timeout,
                 RETURN(ERR_PTR(-ENOMEM));
         }
 
+        cfs_spin_lock_init(&lcw->lcw_lock);
+        lcw->lcw_refcount = 1; /* refcount for owner */
         lcw->lcw_task     = cfs_current();
         lcw->lcw_pid      = cfs_curproc_pid();
         lcw->lcw_callback = (callback != NULL) ? callback : lc_watchdog_dumplog;
@@ -374,14 +417,25 @@ static void lcw_update_time(struct lc_watchdog *lcw, const char *message)
         lcw->lcw_last_touched = newtime;
 }
 
+static void lc_watchdog_del_pending(struct lc_watchdog *lcw)
+{
+        cfs_spin_lock_bh(&lcw->lcw_lock);
+        if (unlikely(!cfs_list_empty(&lcw->lcw_list))) {
+                cfs_spin_lock_bh(&lcw_pending_timers_lock);
+                cfs_list_del_init(&lcw->lcw_list);
+                lcw->lcw_refcount--; /* -1 ref for pending list */
+                cfs_spin_unlock_bh(&lcw_pending_timers_lock);
+        }
+
+        cfs_spin_unlock_bh(&lcw->lcw_lock);
+}
+
 void lc_watchdog_touch(struct lc_watchdog *lcw, int timeout)
 {
         ENTRY;
         LASSERT(lcw != NULL);
 
-        cfs_spin_lock_bh(&lcw_pending_timers_lock);
-        cfs_list_del_init(&lcw->lcw_list);
-        cfs_spin_unlock_bh(&lcw_pending_timers_lock);
+        lc_watchdog_del_pending(lcw);
 
         lcw_update_time(lcw, "resumed");
         lcw->lcw_state = LC_WATCHDOG_ENABLED;
@@ -398,10 +452,7 @@ void lc_watchdog_disable(struct lc_watchdog *lcw)
         ENTRY;
         LASSERT(lcw != NULL);
 
-        cfs_spin_lock_bh(&lcw_pending_timers_lock);
-        if (!cfs_list_empty(&lcw->lcw_list))
-                cfs_list_del_init(&lcw->lcw_list);
-        cfs_spin_unlock_bh(&lcw_pending_timers_lock);
+        lc_watchdog_del_pending(lcw);
 
         lcw_update_time(lcw, "completed");
         lcw->lcw_state = LC_WATCHDOG_DISABLED;
@@ -412,6 +463,8 @@ EXPORT_SYMBOL(lc_watchdog_disable);
 
 void lc_watchdog_delete(struct lc_watchdog *lcw)
 {
+        int dead;
+
         ENTRY;
         LASSERT(lcw != NULL);
 
@@ -419,18 +472,26 @@ void lc_watchdog_delete(struct lc_watchdog *lcw)
 
         lcw_update_time(lcw, "stopped");
 
+        cfs_spin_lock_bh(&lcw->lcw_lock);
         cfs_spin_lock_bh(&lcw_pending_timers_lock);
-        if (!cfs_list_empty(&lcw->lcw_list))
+        if (unlikely(!cfs_list_empty(&lcw->lcw_list))) {
                 cfs_list_del_init(&lcw->lcw_list);
+                lcw->lcw_refcount--; /* -1 ref for pending list */
+        }
+
+        lcw->lcw_refcount--; /* -1 ref for owner */
+        dead = lcw->lcw_refcount == 0;
         cfs_spin_unlock_bh(&lcw_pending_timers_lock);
+        cfs_spin_unlock_bh(&lcw->lcw_lock);
+
+        if (dead)
+                LIBCFS_FREE(lcw, sizeof(*lcw));
 
         cfs_down(&lcw_refcount_sem);
         if (--lcw_refcount == 0)
                 lcw_dispatch_stop();
         cfs_up(&lcw_refcount_sem);
 
-        LIBCFS_FREE(lcw, sizeof(*lcw));
-
         EXIT;
 }
 EXPORT_SYMBOL(lc_watchdog_delete);