dlm: validate messages before processing
[safe/jmp/linux-2.6] / fs / dlm / debug_fs.c
index 49deca8..12c3bfd 100644 (file)
 #include <linux/debugfs.h>
 
 #include "dlm_internal.h"
+#include "lock.h"
 
+#define DLM_DEBUG_BUF_LEN 4096
+static char debug_buf[DLM_DEBUG_BUF_LEN];
+static struct mutex debug_buf_lock;
 
 static struct dentry *dlm_root;
 
 struct rsb_iter {
        int entry;
+       int locks;
+       int header;
        struct dlm_ls *ls;
        struct list_head *next;
        struct dlm_rsb *rsb;
 };
 
+/*
+ * dump all rsb's in the lockspace hash table
+ */
+
 static char *print_lockmode(int mode)
 {
        switch (mode) {
@@ -50,8 +60,8 @@ static char *print_lockmode(int mode)
        }
 }
 
-static void print_lock(struct seq_file *s, struct dlm_lkb *lkb,
-                      struct dlm_rsb *res)
+static void print_resource_lock(struct seq_file *s, struct dlm_lkb *lkb,
+                               struct dlm_rsb *res)
 {
        seq_printf(s, "%08x %s", lkb->lkb_id, print_lockmode(lkb->lkb_grmode));
 
@@ -76,7 +86,9 @@ static void print_lock(struct seq_file *s, struct dlm_lkb *lkb,
 static int print_resource(struct dlm_rsb *res, struct seq_file *s)
 {
        struct dlm_lkb *lkb;
-       int i, lvblen = res->res_ls->ls_lvblen;
+       int i, lvblen = res->res_ls->ls_lvblen, recover_list, root_list;
+
+       lock_rsb(res);
 
        seq_printf(s, "\nResource %p Name (len=%d) \"", res, res->res_length);
        for (i = 0; i < res->res_length; i++) {
@@ -110,19 +122,95 @@ static int print_resource(struct dlm_rsb *res, struct seq_file *s)
                seq_printf(s, "\n");
        }
 
+       root_list = !list_empty(&res->res_root_list);
+       recover_list = !list_empty(&res->res_recover_list);
+
+       if (root_list || recover_list) {
+               seq_printf(s, "Recovery: root %d recover %d flags %lx "
+                          "count %d\n", root_list, recover_list,
+                          res->res_flags, res->res_recover_locks_count);
+       }
+
        /* Print the locks attached to this resource */
        seq_printf(s, "Granted Queue\n");
        list_for_each_entry(lkb, &res->res_grantqueue, lkb_statequeue)
-               print_lock(s, lkb, res);
+               print_resource_lock(s, lkb, res);
 
        seq_printf(s, "Conversion Queue\n");
        list_for_each_entry(lkb, &res->res_convertqueue, lkb_statequeue)
-               print_lock(s, lkb, res);
+               print_resource_lock(s, lkb, res);
 
        seq_printf(s, "Waiting Queue\n");
        list_for_each_entry(lkb, &res->res_waitqueue, lkb_statequeue)
-               print_lock(s, lkb, res);
+               print_resource_lock(s, lkb, res);
+
+       if (list_empty(&res->res_lookup))
+               goto out;
+
+       seq_printf(s, "Lookup Queue\n");
+       list_for_each_entry(lkb, &res->res_lookup, lkb_rsb_lookup) {
+               seq_printf(s, "%08x %s", lkb->lkb_id,
+                          print_lockmode(lkb->lkb_rqmode));
+               if (lkb->lkb_wait_type)
+                       seq_printf(s, " wait_type: %d", lkb->lkb_wait_type);
+               seq_printf(s, "\n");
+       }
+ out:
+       unlock_rsb(res);
+       return 0;
+}
+
+static void print_lock(struct seq_file *s, struct dlm_lkb *lkb, struct dlm_rsb *r)
+{
+       struct dlm_user_args *ua;
+       unsigned int waiting = 0;
+       uint64_t xid = 0;
+
+       if (lkb->lkb_flags & DLM_IFL_USER) {
+               ua = (struct dlm_user_args *) lkb->lkb_astparam;
+               if (ua)
+                       xid = ua->xid;
+       }
+
+       if (lkb->lkb_timestamp)
+               waiting = jiffies_to_msecs(jiffies - lkb->lkb_timestamp);
+
+       /* id nodeid remid pid xid exflags flags sts grmode rqmode time_ms
+          r_nodeid r_len r_name */
+
+       seq_printf(s, "%x %d %x %u %llu %x %x %d %d %d %u %u %d \"%s\"\n",
+                  lkb->lkb_id,
+                  lkb->lkb_nodeid,
+                  lkb->lkb_remid,
+                  lkb->lkb_ownpid,
+                  (unsigned long long)xid,
+                  lkb->lkb_exflags,
+                  lkb->lkb_flags,
+                  lkb->lkb_status,
+                  lkb->lkb_grmode,
+                  lkb->lkb_rqmode,
+                  waiting,
+                  r->res_nodeid,
+                  r->res_length,
+                  r->res_name);
+}
+
+static int print_locks(struct dlm_rsb *r, struct seq_file *s)
+{
+       struct dlm_lkb *lkb;
+
+       lock_rsb(r);
 
+       list_for_each_entry(lkb, &r->res_grantqueue, lkb_statequeue)
+               print_lock(s, lkb, r);
+
+       list_for_each_entry(lkb, &r->res_convertqueue, lkb_statequeue)
+               print_lock(s, lkb, r);
+
+       list_for_each_entry(lkb, &r->res_waitqueue, lkb_statequeue)
+               print_lock(s, lkb, r);
+
+       unlock_rsb(r);
        return 0;
 }
 
@@ -138,6 +226,9 @@ static int rsb_iter_next(struct rsb_iter *ri)
                        read_lock(&ls->ls_rsbtbl[i].lock);
                        if (!list_empty(&ls->ls_rsbtbl[i].list)) {
                                ri->next = ls->ls_rsbtbl[i].list.next;
+                               ri->rsb = list_entry(ri->next, struct dlm_rsb,
+                                                       res_hashchain);
+                               dlm_hold_rsb(ri->rsb);
                                read_unlock(&ls->ls_rsbtbl[i].lock);
                                break;
                        }
@@ -148,6 +239,7 @@ static int rsb_iter_next(struct rsb_iter *ri)
                if (ri->entry >= ls->ls_rsbtbl_size)
                        return 1;
        } else {
+               struct dlm_rsb *old = ri->rsb;
                i = ri->entry;
                read_lock(&ls->ls_rsbtbl[i].lock);
                ri->next = ri->next->next;
@@ -156,11 +248,14 @@ static int rsb_iter_next(struct rsb_iter *ri)
                        ri->next = NULL;
                        ri->entry++;
                        read_unlock(&ls->ls_rsbtbl[i].lock);
+                       dlm_put_rsb(old);
                        goto top;
                 }
+               ri->rsb = list_entry(ri->next, struct dlm_rsb, res_hashchain);
+               dlm_hold_rsb(ri->rsb);
                read_unlock(&ls->ls_rsbtbl[i].lock);
+               dlm_put_rsb(old);
        }
-       ri->rsb = list_entry(ri->next, struct dlm_rsb, res_hashchain);
 
        return 0;
 }
@@ -174,7 +269,7 @@ static struct rsb_iter *rsb_iter_init(struct dlm_ls *ls)
 {
        struct rsb_iter *ri;
 
-       ri = kmalloc(sizeof *ri, GFP_KERNEL);
+       ri = kzalloc(sizeof *ri, GFP_KERNEL);
        if (!ri)
                return NULL;
 
@@ -190,7 +285,7 @@ static struct rsb_iter *rsb_iter_init(struct dlm_ls *ls)
        return ri;
 }
 
-static void *seq_start(struct seq_file *file, loff_t *pos)
+static void *rsb_seq_start(struct seq_file *file, loff_t *pos)
 {
        struct rsb_iter *ri;
        loff_t n = *pos;
@@ -209,7 +304,7 @@ static void *seq_start(struct seq_file *file, loff_t *pos)
        return ri;
 }
 
-static void *seq_next(struct seq_file *file, void *iter_ptr, loff_t *pos)
+static void *rsb_seq_next(struct seq_file *file, void *iter_ptr, loff_t *pos)
 {
        struct rsb_iter *ri = iter_ptr;
 
@@ -223,68 +318,234 @@ static void *seq_next(struct seq_file *file, void *iter_ptr, loff_t *pos)
        return ri;
 }
 
-static void seq_stop(struct seq_file *file, void *iter_ptr)
+static void rsb_seq_stop(struct seq_file *file, void *iter_ptr)
 {
        /* nothing for now */
 }
 
-static int seq_show(struct seq_file *file, void *iter_ptr)
+static int rsb_seq_show(struct seq_file *file, void *iter_ptr)
 {
        struct rsb_iter *ri = iter_ptr;
 
-       print_resource(ri->rsb, file);
+       if (ri->locks) {
+               if (ri->header) {
+                       seq_printf(file, "id nodeid remid pid xid exflags flags "
+                                        "sts grmode rqmode time_ms r_nodeid "
+                                        "r_len r_name\n");
+                       ri->header = 0;
+               }
+               print_locks(ri->rsb, file);
+       } else {
+               print_resource(ri->rsb, file);
+       }
 
        return 0;
 }
 
-static struct seq_operations dlm_seq_ops = {
-       .start = seq_start,
-       .next  = seq_next,
-       .stop  = seq_stop,
-       .show  = seq_show,
+static struct seq_operations rsb_seq_ops = {
+       .start = rsb_seq_start,
+       .next  = rsb_seq_next,
+       .stop  = rsb_seq_stop,
+       .show  = rsb_seq_show,
+};
+
+static int rsb_open(struct inode *inode, struct file *file)
+{
+       struct seq_file *seq;
+       int ret;
+
+       ret = seq_open(file, &rsb_seq_ops);
+       if (ret)
+               return ret;
+
+       seq = file->private_data;
+       seq->private = inode->i_private;
+
+       return 0;
+}
+
+static const struct file_operations rsb_fops = {
+       .owner   = THIS_MODULE,
+       .open    = rsb_open,
+       .read    = seq_read,
+       .llseek  = seq_lseek,
+       .release = seq_release
+};
+
+/*
+ * Dump state in compact per-lock listing
+ */
+
+static struct rsb_iter *locks_iter_init(struct dlm_ls *ls, loff_t *pos)
+{
+       struct rsb_iter *ri;
+
+       ri = kzalloc(sizeof *ri, GFP_KERNEL);
+       if (!ri)
+               return NULL;
+
+       ri->ls = ls;
+       ri->entry = 0;
+       ri->next = NULL;
+       ri->locks = 1;
+
+       if (*pos == 0)
+               ri->header = 1;
+
+       if (rsb_iter_next(ri)) {
+               rsb_iter_free(ri);
+               return NULL;
+       }
+
+       return ri;
+}
+
+static void *locks_seq_start(struct seq_file *file, loff_t *pos)
+{
+       struct rsb_iter *ri;
+       loff_t n = *pos;
+
+       ri = locks_iter_init(file->private, pos);
+       if (!ri)
+               return NULL;
+
+       while (n--) {
+               if (rsb_iter_next(ri)) {
+                       rsb_iter_free(ri);
+                       return NULL;
+               }
+       }
+
+       return ri;
+}
+
+static struct seq_operations locks_seq_ops = {
+       .start = locks_seq_start,
+       .next  = rsb_seq_next,
+       .stop  = rsb_seq_stop,
+       .show  = rsb_seq_show,
 };
 
-static int do_open(struct inode *inode, struct file *file)
+static int locks_open(struct inode *inode, struct file *file)
 {
        struct seq_file *seq;
        int ret;
 
-       ret = seq_open(file, &dlm_seq_ops);
+       ret = seq_open(file, &locks_seq_ops);
        if (ret)
                return ret;
 
        seq = file->private_data;
-       seq->private = inode->u.generic_ip;
+       seq->private = inode->i_private;
 
        return 0;
 }
 
-static struct file_operations dlm_fops = {
+static const struct file_operations locks_fops = {
        .owner   = THIS_MODULE,
-       .open    = do_open,
+       .open    = locks_open,
        .read    = seq_read,
        .llseek  = seq_lseek,
        .release = seq_release
 };
 
+/*
+ * dump lkb's on the ls_waiters list
+ */
+
+static int waiters_open(struct inode *inode, struct file *file)
+{
+       file->private_data = inode->i_private;
+       return 0;
+}
+
+static ssize_t waiters_read(struct file *file, char __user *userbuf,
+                           size_t count, loff_t *ppos)
+{
+       struct dlm_ls *ls = file->private_data;
+       struct dlm_lkb *lkb;
+       size_t len = DLM_DEBUG_BUF_LEN, pos = 0, ret, rv;
+
+       mutex_lock(&debug_buf_lock);
+       mutex_lock(&ls->ls_waiters_mutex);
+       memset(debug_buf, 0, sizeof(debug_buf));
+
+       list_for_each_entry(lkb, &ls->ls_waiters, lkb_wait_reply) {
+               ret = snprintf(debug_buf + pos, len - pos, "%x %d %d %s\n",
+                              lkb->lkb_id, lkb->lkb_wait_type,
+                              lkb->lkb_nodeid, lkb->lkb_resource->res_name);
+               if (ret >= len - pos)
+                       break;
+               pos += ret;
+       }
+       mutex_unlock(&ls->ls_waiters_mutex);
+
+       rv = simple_read_from_buffer(userbuf, count, ppos, debug_buf, pos);
+       mutex_unlock(&debug_buf_lock);
+       return rv;
+}
+
+static const struct file_operations waiters_fops = {
+       .owner   = THIS_MODULE,
+       .open    = waiters_open,
+       .read    = waiters_read
+};
+
 int dlm_create_debug_file(struct dlm_ls *ls)
 {
-       ls->ls_debug_dentry = debugfs_create_file(ls->ls_name,
-                                                 S_IFREG | S_IRUGO,
-                                                 dlm_root,
-                                                 ls,
-                                                 &dlm_fops);
-       return ls->ls_debug_dentry ? 0 : -ENOMEM;
+       char name[DLM_LOCKSPACE_LEN+8];
+
+       ls->ls_debug_rsb_dentry = debugfs_create_file(ls->ls_name,
+                                                     S_IFREG | S_IRUGO,
+                                                     dlm_root,
+                                                     ls,
+                                                     &rsb_fops);
+       if (!ls->ls_debug_rsb_dentry)
+               return -ENOMEM;
+
+       memset(name, 0, sizeof(name));
+       snprintf(name, DLM_LOCKSPACE_LEN+8, "%s_waiters", ls->ls_name);
+
+       ls->ls_debug_waiters_dentry = debugfs_create_file(name,
+                                                         S_IFREG | S_IRUGO,
+                                                         dlm_root,
+                                                         ls,
+                                                         &waiters_fops);
+       if (!ls->ls_debug_waiters_dentry) {
+               debugfs_remove(ls->ls_debug_rsb_dentry);
+               return -ENOMEM;
+       }
+
+       memset(name, 0, sizeof(name));
+       snprintf(name, DLM_LOCKSPACE_LEN+8, "%s_locks", ls->ls_name);
+
+       ls->ls_debug_locks_dentry = debugfs_create_file(name,
+                                                       S_IFREG | S_IRUGO,
+                                                       dlm_root,
+                                                       ls,
+                                                       &locks_fops);
+       if (!ls->ls_debug_locks_dentry) {
+               debugfs_remove(ls->ls_debug_waiters_dentry);
+               debugfs_remove(ls->ls_debug_rsb_dentry);
+               return -ENOMEM;
+       }
+
+       return 0;
 }
 
 void dlm_delete_debug_file(struct dlm_ls *ls)
 {
-       if (ls->ls_debug_dentry)
-               debugfs_remove(ls->ls_debug_dentry);
+       if (ls->ls_debug_rsb_dentry)
+               debugfs_remove(ls->ls_debug_rsb_dentry);
+       if (ls->ls_debug_waiters_dentry)
+               debugfs_remove(ls->ls_debug_waiters_dentry);
+       if (ls->ls_debug_locks_dentry)
+               debugfs_remove(ls->ls_debug_locks_dentry);
 }
 
 int dlm_register_debugfs(void)
 {
+       mutex_init(&debug_buf_lock);
        dlm_root = debugfs_create_dir("dlm", NULL);
        return dlm_root ? 0 : -ENOMEM;
 }