Something went wrong. Try again.
(I'm so sorry!) Linux kernel mirror (for testing) git.kernel.org/pub/scm/linux/kernel/git/torvalds/linux.git
kernel os linux
Something went wrong. Try again.
123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827// SPDX-License-Identifier: GPL-2.0-only/***************************************************************************************************************************************************************** Copyright (C) 2005-2009 Red Hat, Inc. All rights reserved.*****************************************************************************************************************************************************************/
#include <linux/pagemap.h>#include <linux/seq_file.h>#include <linux/init.h>#include <linux/ctype.h>#include <linux/debugfs.h>#include <linux/slab.h>
#include "dlm_internal.h"#include "midcomms.h"#include "lock.h"#include "ast.h"
#define DLM_DEBUG_BUF_LEN 4096static char debug_buf[DLM_DEBUG_BUF_LEN];static struct mutex debug_buf_lock;
static struct dentry *dlm_root;static struct dentry *dlm_comms;
static char *print_lockmode(int mode){ switch (mode) { case DLM_LOCK_IV: return "--"; case DLM_LOCK_NL: return "NL"; case DLM_LOCK_CR: return "CR"; case DLM_LOCK_CW: return "CW"; case DLM_LOCK_PR: return "PR"; case DLM_LOCK_PW: return "PW"; case DLM_LOCK_EX: return "EX"; default: return "??"; }}
static void print_format1_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));
if (lkb->lkb_status == DLM_LKSTS_CONVERT || lkb->lkb_status == DLM_LKSTS_WAITING) seq_printf(s, " (%s)", print_lockmode(lkb->lkb_rqmode));
if (lkb->lkb_nodeid) { if (lkb->lkb_nodeid != res->res_nodeid) seq_printf(s, " Remote: %3d %08x", lkb->lkb_nodeid, lkb->lkb_remid); else seq_printf(s, " Master: %08x", lkb->lkb_remid); }
if (lkb->lkb_wait_type) seq_printf(s, " wait_type: %d", lkb->lkb_wait_type);
seq_putc(s, '\n');}
static void print_format1(struct dlm_rsb *res, struct seq_file *s){ struct dlm_lkb *lkb; 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++) { if (isprint(res->res_name[i])) seq_printf(s, "%c", res->res_name[i]); else seq_printf(s, "%c", '.'); }
if (res->res_nodeid > 0) seq_printf(s, "\"\nLocal Copy, Master is node %d\n", res->res_nodeid); else if (res->res_nodeid == 0) seq_puts(s, "\"\nMaster Copy\n"); else if (res->res_nodeid == -1) seq_printf(s, "\"\nLooking up master (lkid %x)\n", res->res_first_lkid); else seq_printf(s, "\"\nInvalid master %d\n", res->res_nodeid); if (seq_has_overflowed(s)) goto out;
/* Print the LVB: */ if (res->res_lvbptr) { seq_puts(s, "LVB: "); for (i = 0; i < lvblen; i++) { if (i == lvblen / 2) seq_puts(s, "\n "); seq_printf(s, "%02x ", (unsigned char) res->res_lvbptr[i]); } if (rsb_flag(res, RSB_VALNOTVALID)) seq_puts(s, " (INVALID)"); seq_putc(s, '\n'); if (seq_has_overflowed(s)) goto out; }
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_puts(s, "Granted Queue\n"); list_for_each_entry(lkb, &res->res_grantqueue, lkb_statequeue) { print_format1_lock(s, lkb, res); if (seq_has_overflowed(s)) goto out; }
seq_puts(s, "Conversion Queue\n"); list_for_each_entry(lkb, &res->res_convertqueue, lkb_statequeue) { print_format1_lock(s, lkb, res); if (seq_has_overflowed(s)) goto out; }
seq_puts(s, "Waiting Queue\n"); list_for_each_entry(lkb, &res->res_waitqueue, lkb_statequeue) { print_format1_lock(s, lkb, res); if (seq_has_overflowed(s)) goto out; }
if (list_empty(&res->res_lookup)) goto out;
seq_puts(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_putc(s, '\n'); if (seq_has_overflowed(s)) goto out; } out: unlock_rsb(res);}
static void print_format2_lock(struct seq_file *s, struct dlm_lkb *lkb, struct dlm_rsb *r){ u64 xid = 0; u64 us;
if (test_bit(DLM_DFL_USER_BIT, &lkb->lkb_dflags)) { if (lkb->lkb_ua) xid = lkb->lkb_ua->xid; }
/* microseconds since lkb was added to current queue */ us = ktime_to_us(ktime_sub(ktime_get(), lkb->lkb_timestamp));
/* id nodeid remid pid xid exflags flags sts grmode rqmode time_us r_nodeid r_len r_name */
seq_printf(s, "%x %d %x %u %llu %x %x %d %d %d %llu %u %d \"%s\"\n", lkb->lkb_id, lkb->lkb_nodeid, lkb->lkb_remid, lkb->lkb_ownpid, (unsigned long long)xid, lkb->lkb_exflags, dlm_iflags_val(lkb), lkb->lkb_status, lkb->lkb_grmode, lkb->lkb_rqmode, (unsigned long long)us, r->res_nodeid, r->res_length, r->res_name);}
static void print_format2(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_format2_lock(s, lkb, r); if (seq_has_overflowed(s)) goto out; }
list_for_each_entry(lkb, &r->res_convertqueue, lkb_statequeue) { print_format2_lock(s, lkb, r); if (seq_has_overflowed(s)) goto out; }
list_for_each_entry(lkb, &r->res_waitqueue, lkb_statequeue) { print_format2_lock(s, lkb, r); if (seq_has_overflowed(s)) goto out; } out: unlock_rsb(r);}
static void print_format3_lock(struct seq_file *s, struct dlm_lkb *lkb, int rsb_lookup){ u64 xid = 0;
if (test_bit(DLM_DFL_USER_BIT, &lkb->lkb_dflags)) { if (lkb->lkb_ua) xid = lkb->lkb_ua->xid; }
seq_printf(s, "lkb %x %d %x %u %llu %x %x %d %d %d %d %d %d %u %llu %llu\n", lkb->lkb_id, lkb->lkb_nodeid, lkb->lkb_remid, lkb->lkb_ownpid, (unsigned long long)xid, lkb->lkb_exflags, dlm_iflags_val(lkb), lkb->lkb_status, lkb->lkb_grmode, lkb->lkb_rqmode, lkb->lkb_last_bast_cb_mode, rsb_lookup, lkb->lkb_wait_type, lkb->lkb_lvbseq, (unsigned long long)ktime_to_ns(lkb->lkb_timestamp), (unsigned long long)ktime_to_ns(lkb->lkb_last_bast_time));}
static void print_format3(struct dlm_rsb *r, struct seq_file *s){ struct dlm_lkb *lkb; int i, lvblen = r->res_ls->ls_lvblen; int print_name = 1;
lock_rsb(r);
seq_printf(s, "rsb %p %d %x %lx %d %d %u %d ", r, r->res_nodeid, r->res_first_lkid, r->res_flags, !list_empty(&r->res_root_list), !list_empty(&r->res_recover_list), r->res_recover_locks_count, r->res_length); if (seq_has_overflowed(s)) goto out;
for (i = 0; i < r->res_length; i++) { if (!isascii(r->res_name[i]) || !isprint(r->res_name[i])) print_name = 0; }
seq_puts(s, print_name ? "str " : "hex");
for (i = 0; i < r->res_length; i++) { if (print_name) seq_printf(s, "%c", r->res_name[i]); else seq_printf(s, " %02x", (unsigned char)r->res_name[i]); } seq_putc(s, '\n'); if (seq_has_overflowed(s)) goto out;
if (!r->res_lvbptr) goto do_locks;
seq_printf(s, "lvb %u %d", r->res_lvbseq, lvblen);
for (i = 0; i < lvblen; i++) seq_printf(s, " %02x", (unsigned char)r->res_lvbptr[i]); seq_putc(s, '\n'); if (seq_has_overflowed(s)) goto out;
do_locks: list_for_each_entry(lkb, &r->res_grantqueue, lkb_statequeue) { print_format3_lock(s, lkb, 0); if (seq_has_overflowed(s)) goto out; }
list_for_each_entry(lkb, &r->res_convertqueue, lkb_statequeue) { print_format3_lock(s, lkb, 0); if (seq_has_overflowed(s)) goto out; }
list_for_each_entry(lkb, &r->res_waitqueue, lkb_statequeue) { print_format3_lock(s, lkb, 0); if (seq_has_overflowed(s)) goto out; }
list_for_each_entry(lkb, &r->res_lookup, lkb_rsb_lookup) { print_format3_lock(s, lkb, 1); if (seq_has_overflowed(s)) goto out; } out: unlock_rsb(r);}
static void print_format4(struct dlm_rsb *r, struct seq_file *s){ int our_nodeid = dlm_our_nodeid(); int print_name = 1; int i;
lock_rsb(r);
seq_printf(s, "rsb %p %d %d %d %d %lu %lx %d ", r, r->res_nodeid, r->res_master_nodeid, r->res_dir_nodeid, our_nodeid, r->res_toss_time, r->res_flags, r->res_length);
for (i = 0; i < r->res_length; i++) { if (!isascii(r->res_name[i]) || !isprint(r->res_name[i])) print_name = 0; }
seq_puts(s, print_name ? "str " : "hex");
for (i = 0; i < r->res_length; i++) { if (print_name) seq_printf(s, "%c", r->res_name[i]); else seq_printf(s, " %02x", (unsigned char)r->res_name[i]); } seq_putc(s, '\n'); unlock_rsb(r);}
static const struct seq_operations format1_seq_ops;static const struct seq_operations format2_seq_ops;static const struct seq_operations format3_seq_ops;static const struct seq_operations format4_seq_ops;
/* * If the buffer is full, seq_printf can be called again, but it * does nothing. So, the these printing routines periodically check * seq_has_overflowed to avoid wasting too much time trying to print to * a full buffer. */
static int table_seq_show(struct seq_file *seq, void *iter_ptr){ struct dlm_rsb *rsb = list_entry(iter_ptr, struct dlm_rsb, res_slow_list);
if (seq->op == &format1_seq_ops) print_format1(rsb, seq); else if (seq->op == &format2_seq_ops) print_format2(rsb, seq); else if (seq->op == &format3_seq_ops) print_format3(rsb, seq); else if (seq->op == &format4_seq_ops) print_format4(rsb, seq);
return 0;}
static void *table_seq_start(struct seq_file *seq, loff_t *pos){ struct dlm_ls *ls = seq->private; struct list_head *list;
if (!*pos) { if (seq->op == &format2_seq_ops) seq_puts(seq, "id nodeid remid pid xid exflags flags sts grmode rqmode time_ms r_nodeid r_len r_name\n"); else if (seq->op == &format3_seq_ops) seq_puts(seq, "rsb ptr nodeid first_lkid flags !root_list_empty !recover_list_empty recover_locks_count len\n"); else if (seq->op == &format4_seq_ops) seq_puts(seq, "rsb ptr nodeid master_nodeid dir_nodeid our_nodeid toss_time flags len str|hex name\n"); }
if (seq->op == &format4_seq_ops) list = &ls->ls_slow_inactive; else list = &ls->ls_slow_active;
read_lock_bh(&ls->ls_rsbtbl_lock); return seq_list_start(list, *pos);}
static void *table_seq_next(struct seq_file *seq, void *iter_ptr, loff_t *pos){ struct dlm_ls *ls = seq->private; struct list_head *list;
if (seq->op == &format4_seq_ops) list = &ls->ls_slow_inactive; else list = &ls->ls_slow_active;
return seq_list_next(iter_ptr, list, pos);}
static void table_seq_stop(struct seq_file *seq, void *iter_ptr){ struct dlm_ls *ls = seq->private;
read_unlock_bh(&ls->ls_rsbtbl_lock);}
static const struct seq_operations format1_seq_ops = { .start = table_seq_start, .next = table_seq_next, .stop = table_seq_stop, .show = table_seq_show,};
static const struct seq_operations format2_seq_ops = { .start = table_seq_start, .next = table_seq_next, .stop = table_seq_stop, .show = table_seq_show,};
static const struct seq_operations format3_seq_ops = { .start = table_seq_start, .next = table_seq_next, .stop = table_seq_stop, .show = table_seq_show,};
static const struct seq_operations format4_seq_ops = { .start = table_seq_start, .next = table_seq_next, .stop = table_seq_stop, .show = table_seq_show,};
static const struct file_operations format1_fops;static const struct file_operations format2_fops;static const struct file_operations format3_fops;static const struct file_operations format4_fops;
static int table_open1(struct inode *inode, struct file *file){ struct seq_file *seq; int ret;
ret = seq_open(file, &format1_seq_ops); if (ret) return ret;
seq = file->private_data; seq->private = inode->i_private; /* the dlm_ls */ return 0;}
static int table_open2(struct inode *inode, struct file *file){ struct seq_file *seq; int ret;
ret = seq_open(file, &format2_seq_ops); if (ret) return ret;
seq = file->private_data; seq->private = inode->i_private; /* the dlm_ls */ return 0;}
static ssize_t table_write2(struct file *file, const char __user *user_buf, size_t count, loff_t *ppos){ struct seq_file *seq = file->private_data; int n, len, lkb_nodeid, lkb_status, error; char name[DLM_RESNAME_MAXLEN + 1] = {}; struct dlm_ls *ls = seq->private; unsigned int lkb_flags; char buf[256] = {}; uint32_t lkb_id;
if (copy_from_user(buf, user_buf, min_t(size_t, sizeof(buf) - 1, count))) return -EFAULT;
n = sscanf(buf, "%x %" __stringify(DLM_RESNAME_MAXLEN) "s %x %d %d", &lkb_id, name, &lkb_flags, &lkb_nodeid, &lkb_status); if (n != 5) return -EINVAL;
len = strnlen(name, DLM_RESNAME_MAXLEN); error = dlm_debug_add_lkb(ls, lkb_id, name, len, lkb_flags, lkb_nodeid, lkb_status); if (error) return error;
return count;}
static int table_open3(struct inode *inode, struct file *file){ struct seq_file *seq; int ret;
ret = seq_open(file, &format3_seq_ops); if (ret) return ret;
seq = file->private_data; seq->private = inode->i_private; /* the dlm_ls */ return 0;}
static int table_open4(struct inode *inode, struct file *file){ struct seq_file *seq; int ret;
ret = seq_open(file, &format4_seq_ops); if (ret) return ret;
seq = file->private_data; seq->private = inode->i_private; /* the dlm_ls */ return 0;}
static const struct file_operations format1_fops = { .owner = THIS_MODULE, .open = table_open1, .read = seq_read, .llseek = seq_lseek, .release = seq_release};
static const struct file_operations format2_fops = { .owner = THIS_MODULE, .open = table_open2, .read = seq_read, .write = table_write2, .llseek = seq_lseek, .release = seq_release};
static const struct file_operations format3_fops = { .owner = THIS_MODULE, .open = table_open3, .read = seq_read, .llseek = seq_lseek, .release = seq_release};
static const struct file_operations format4_fops = { .owner = THIS_MODULE, .open = table_open4, .read = seq_read, .llseek = seq_lseek, .release = seq_release};
/* * dump lkb's on the ls_waiters list */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; ssize_t rv;
mutex_lock(&debug_buf_lock); ret = dlm_lock_recovery_try(ls); if (!ret) { rv = -EAGAIN; goto out; }
spin_lock_bh(&ls->ls_waiters_lock); 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; } spin_unlock_bh(&ls->ls_waiters_lock); dlm_unlock_recovery(ls);
rv = simple_read_from_buffer(userbuf, count, ppos, debug_buf, pos);out: mutex_unlock(&debug_buf_lock); return rv;}
static ssize_t waiters_write(struct file *file, const char __user *user_buf, size_t count, loff_t *ppos){ struct dlm_ls *ls = file->private_data; int mstype, to_nodeid; char buf[128] = {}; uint32_t lkb_id; int n, error;
if (copy_from_user(buf, user_buf, min_t(size_t, sizeof(buf) - 1, count))) return -EFAULT;
n = sscanf(buf, "%x %d %d", &lkb_id, &mstype, &to_nodeid); if (n != 3) return -EINVAL;
error = dlm_lock_recovery_try(ls); if (!error) return -EAGAIN;
error = dlm_debug_add_lkb_to_waiters(ls, lkb_id, mstype, to_nodeid); dlm_unlock_recovery(ls); if (error) return error;
return count;}
static const struct file_operations waiters_fops = { .owner = THIS_MODULE, .open = simple_open, .read = waiters_read, .write = waiters_write, .llseek = default_llseek,};
void dlm_delete_debug_file(struct dlm_ls *ls){ debugfs_remove(ls->ls_debug_rsb_dentry); debugfs_remove(ls->ls_debug_waiters_dentry); debugfs_remove(ls->ls_debug_locks_dentry); debugfs_remove(ls->ls_debug_all_dentry); debugfs_remove(ls->ls_debug_toss_dentry); debugfs_remove(ls->ls_debug_queued_asts_dentry);}
static int dlm_state_show(struct seq_file *file, void *offset){ seq_printf(file, "%s\n", dlm_midcomms_state(file->private)); return 0;}DEFINE_SHOW_ATTRIBUTE(dlm_state);
static int dlm_flags_show(struct seq_file *file, void *offset){ seq_printf(file, "%lu\n", dlm_midcomms_flags(file->private)); return 0;}DEFINE_SHOW_ATTRIBUTE(dlm_flags);
static int dlm_send_queue_cnt_show(struct seq_file *file, void *offset){ seq_printf(file, "%d\n", dlm_midcomms_send_queue_cnt(file->private)); return 0;}DEFINE_SHOW_ATTRIBUTE(dlm_send_queue_cnt);
static int dlm_version_show(struct seq_file *file, void *offset){ seq_printf(file, "0x%08x\n", dlm_midcomms_version(file->private)); return 0;}DEFINE_SHOW_ATTRIBUTE(dlm_version);
static ssize_t dlm_rawmsg_write(struct file *fp, const char __user *user_buf, size_t count, loff_t *ppos){ void *buf; int ret;
if (count > PAGE_SIZE || count < sizeof(struct dlm_header)) return -EINVAL;
buf = kmalloc(PAGE_SIZE, GFP_NOFS); if (!buf) return -ENOMEM;
if (copy_from_user(buf, user_buf, count)) { ret = -EFAULT; goto out; }
ret = dlm_midcomms_rawmsg_send(fp->private_data, buf, count); if (ret) goto out;
kfree(buf); return count;
out: kfree(buf); return ret;}
static const struct file_operations dlm_rawmsg_fops = { .open = simple_open, .write = dlm_rawmsg_write,};
void *dlm_create_debug_comms_file(int nodeid, void *data){ struct dentry *d_node; char name[256];
memset(name, 0, sizeof(name)); snprintf(name, 256, "%d", nodeid);
d_node = debugfs_create_dir(name, dlm_comms); debugfs_create_file("state", 0444, d_node, data, &dlm_state_fops); debugfs_create_file("flags", 0444, d_node, data, &dlm_flags_fops); debugfs_create_file("send_queue_count", 0444, d_node, data, &dlm_send_queue_cnt_fops); debugfs_create_file("version", 0444, d_node, data, &dlm_version_fops); debugfs_create_file("rawmsg", 0200, d_node, data, &dlm_rawmsg_fops);
return d_node;}
void dlm_delete_debug_comms_file(void *ctx){ debugfs_remove(ctx);}
void dlm_create_debug_file(struct dlm_ls *ls){ /* Reserve enough space for the longest file name */ char name[DLM_LOCKSPACE_LEN + sizeof("_queued_asts")];
/* format 1 */
ls->ls_debug_rsb_dentry = debugfs_create_file(ls->ls_name, S_IFREG | S_IRUGO, dlm_root, ls, &format1_fops);
/* format 2 */
snprintf(name, sizeof(name), "%s_locks", ls->ls_name);
ls->ls_debug_locks_dentry = debugfs_create_file(name, 0644, dlm_root, ls, &format2_fops);
/* format 3 */
snprintf(name, sizeof(name), "%s_all", ls->ls_name);
ls->ls_debug_all_dentry = debugfs_create_file(name, S_IFREG | S_IRUGO, dlm_root, ls, &format3_fops);
/* format 4 */
snprintf(name, sizeof(name), "%s_toss", ls->ls_name);
ls->ls_debug_toss_dentry = debugfs_create_file(name, S_IFREG | S_IRUGO, dlm_root, ls, &format4_fops);
snprintf(name, sizeof(name), "%s_waiters", ls->ls_name);
ls->ls_debug_waiters_dentry = debugfs_create_file(name, 0644, dlm_root, ls, &waiters_fops);}
void __init dlm_register_debugfs(void){ mutex_init(&debug_buf_lock); dlm_root = debugfs_create_dir("dlm", NULL); dlm_comms = debugfs_create_dir("comms", dlm_root);}
void dlm_unregister_debugfs(void){ debugfs_remove(dlm_root);}