/* * GPL HEADER START * * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License version 2 only, * as published by the Free Software Foundation. * * This program is distributed in the hope that it will be useful, but * WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * General Public License version 2 for more details (a copy is included * in the LICENSE file that accompanied this code). * * You should have received a copy of the GNU General Public License * version 2 along with this program; If not, see * http://www.gnu.org/licenses/gpl-2.0.html * * GPL HEADER END */ /* * Copyright (c) 2008, 2010, Oracle and/or its affiliates. All rights reserved. * Use is subject to license terms. * * Copyright (c) 2012, 2017, Intel Corporation. */ /* * This file is part of Lustre, http://www.lustre.org/ * Lustre is a trademark of Sun Microsystems, Inc. * * libcfs/libcfs/linux/linux-debug.c * * Author: Phil Schwan */ #include #include #include #include #include #include #ifdef HAVE_KERNEL_LOCKED #include #endif #include #include #include #include # define DEBUG_SUBSYSTEM S_LNET #include #include "tracefile.h" char lnet_debug_log_upcall[1024] = "/usr/lib/lustre/lnet_debug_log_upcall"; /** * Upcall function once a Lustre log has been dumped. * * \param file path of the dumped log */ void libcfs_run_debug_log_upcall(char *file) { char *argv[3]; int rc; char *envp[] = { "HOME=/", "PATH=/sbin:/bin:/usr/sbin:/usr/bin", NULL}; ENTRY; argv[0] = lnet_debug_log_upcall; LASSERTF(file != NULL, "called on a null filename\n"); argv[1] = file; //only need to pass the path of the file argv[2] = NULL; rc = call_usermodehelper(argv[0], argv, envp, 1); if (rc < 0 && rc != -ENOENT) { CERROR("Error %d invoking LNET debug log upcall %s %s; " "check /proc/sys/lnet/debug_log_upcall\n", rc, argv[0], argv[1]); } else { CDEBUG(D_HA, "Invoked LNET debug log upcall %s %s\n", argv[0], argv[1]); } EXIT; } /* coverity[+kill] */ void lbug_with_loc(struct libcfs_debug_msg_data *msgdata) { libcfs_catastrophe = 1; libcfs_debug_msg(msgdata, "LBUG\n"); if (in_interrupt()) { panic("LBUG in interrupt.\n"); /* not reached */ } libcfs_debug_dumpstack(NULL); if (libcfs_panic_on_lbug) panic("LBUG"); else libcfs_debug_dumplog(); set_current_state(TASK_UNINTERRUPTIBLE); while (1) schedule(); } EXPORT_SYMBOL(lbug_with_loc); #ifdef CONFIG_STACKTRACE #define MAX_ST_ENTRIES 100 static DEFINE_SPINLOCK(st_lock); static void libcfs_call_trace(struct task_struct *tsk) { struct stack_trace trace; static unsigned long entries[MAX_ST_ENTRIES]; trace.nr_entries = 0; trace.max_entries = MAX_ST_ENTRIES; trace.entries = entries; trace.skip = 0; spin_lock(&st_lock); pr_info("Pid: %d, comm: %.20s %s %s\n", tsk->pid, tsk->comm, init_utsname()->release, init_utsname()->version); pr_info("Call Trace:\n"); save_stack_trace_tsk(tsk, &trace); print_stack_trace(&trace, 0); spin_unlock(&st_lock); } #else /* !CONFIG_STACKTRACE */ #ifdef CONFIG_X86 #include #include #ifdef HAVE_STACKTRACE_OPS #ifdef HAVE_STACKTRACE_WARNING static void print_trace_warning_symbol(void *data, char *msg, unsigned long symbol) { printk("%s", (char *)data); print_symbol(msg, symbol); printk("\n"); } static void print_trace_warning(void *data, char *msg) { printk("%s%s\n", (char *)data, msg); } #endif static int print_trace_stack(void *data, char *name) { printk(" <%s> ", name); return 0; } #ifdef STACKTRACE_OPS_ADDRESS_RETURN_INT static int #else static void #endif print_trace_address(void *data, unsigned long addr, int reliable) { char fmt[32]; touch_nmi_watchdog(); sprintf(fmt, " [<%016lx>] %s%%s\n", addr, reliable ? "": "? "); __print_symbol(fmt, addr); #ifdef STACKTRACE_OPS_ADDRESS_RETURN_INT return 0; #endif } static const struct stacktrace_ops print_trace_ops = { #ifdef HAVE_STACKTRACE_WARNING .warning = print_trace_warning, .warning_symbol = print_trace_warning_symbol, #endif .stack = print_trace_stack, .address = print_trace_address, #ifdef STACKTRACE_OPS_HAVE_WALK_STACK .walk_stack = print_context_stack, #endif }; #endif /* HAVE_STACKTRACE_OPS */ static void libcfs_call_trace(struct task_struct *tsk) { #ifdef HAVE_STACKTRACE_OPS printk("Pid: %d, comm: %.20s\n", tsk->pid, tsk->comm); printk("\nCall Trace:\n"); dump_trace(tsk, NULL, NULL, #ifdef HAVE_DUMP_TRACE_ADDRESS 0, #endif /* HAVE_DUMP_TRACE_ADDRESS */ &print_trace_ops, NULL); printk("\n"); #else /* !HAVE_STACKTRACE_OPS */ if (tsk == current) dump_stack(); else CWARN("can't show stack: kernel doesn't export show_task\n"); #endif /* HAVE_STACKTRACE_OPS */ } #else /* !CONFIG_X86 */ static void libcfs_call_trace(struct task_struct *tsk) { if (tsk == current) dump_stack(); else CWARN("can't show stack: kernel doesn't export show_task\n"); } #endif /* CONFIG_X86 */ #endif /* CONFIG_STACKTRACE */ void libcfs_debug_dumpstack(struct task_struct *tsk) { libcfs_call_trace(tsk ?: current); } EXPORT_SYMBOL(libcfs_debug_dumpstack); static int panic_notifier(struct notifier_block *self, unsigned long unused1, void *unused2) { if (libcfs_panic_in_progress) return 0; libcfs_panic_in_progress = 1; mb(); #ifdef LNET_DUMP_ON_PANIC /* This is currently disabled because it spews far too much to the * console on the rare cases it is ever triggered. */ if (in_interrupt()) { cfs_trace_debug_print(); } else { #ifdef HAVE_KERNEL_LOCKED while (kernel_locked()) unlock_kernel(); #endif libcfs_debug_dumplog_internal((void *)(long)current_pid()); } #endif return 0; } static struct notifier_block libcfs_panic_notifier = { .notifier_call = panic_notifier, .next = NULL, .priority = 10000 }; void libcfs_register_panic_notifier(void) { atomic_notifier_chain_register(&panic_notifier_list, &libcfs_panic_notifier); } void libcfs_unregister_panic_notifier(void) { atomic_notifier_chain_unregister(&panic_notifier_list, &libcfs_panic_notifier); }