LXR linux/arch/h8300/kernel/traps.c

   1/*
   2 * linux/arch/h8300/boot/traps.c -- general exception handling code
   3 * H8/300 support Yoshinori Sato <ysato@users.sourceforge.jp>
   4 * 
   5 * Cloned from Linux/m68k.
   6 *
   7 * No original Copyright holder listed,
   8 * Probabily original (C) Roman Zippel (assigned DJD, 1999)
   9 *
  10 * Copyright 1999-2000 D. Jeff Dionne, <jeff@rt-control.com>
  11 *
  12 * This file is subject to the terms and conditions of the GNU General Public
  13 * License.  See the file COPYING in the main directory of this archive
  14 * for more details.
  15 */
  16
  17#include <linux/types.h>
  18#include <linux/sched.h>
  19#include <linux/kernel.h>
  20#include <linux/errno.h>
  21#include <linux/init.h>
  22#include <linux/module.h>
  23
  24#include <asm/system.h>
  25#include <asm/irq.h>
  26#include <asm/traps.h>
  27#include <asm/page.h>
  28#include <asm/gpio.h>
  29
  30/*
  31 * this must be called very early as the kernel might
  32 * use some instruction that are emulated on the 060
  33 */
  34
  35void __init base_trap_init(void)
  36{
  37}
  38
  39void __init trap_init (void)
  40{
  41}
  42
  43asmlinkage void set_esp0 (unsigned long ssp)
  44{
  45        current->thread.esp0 = ssp;
  46}
  47
  48/*
  49 *      Generic dumping code. Used for panic and debug.
  50 */
  51
  52static void dump(struct pt_regs *fp)
  53{
  54        unsigned long   *sp;
  55        unsigned char   *tp;
  56        int             i;
  57
  58        printk("\nCURRENT PROCESS:\n\n");
  59        printk("COMM=%s PID=%d\n", current->comm, current->pid);
  60        if (current->mm) {
  61                printk("TEXT=%08x-%08x DATA=%08x-%08x BSS=%08x-%08x\n",
  62                        (int) current->mm->start_code,
  63                        (int) current->mm->end_code,
  64                        (int) current->mm->start_data,
  65                        (int) current->mm->end_data,
  66                        (int) current->mm->end_data,
  67                        (int) current->mm->brk);
  68                printk("USER-STACK=%08x  KERNEL-STACK=%08lx\n\n",
  69                        (int) current->mm->start_stack,
  70                        (int) PAGE_SIZE+(unsigned long)current);
  71        }
  72
  73        show_regs(fp);
  74        printk("\nCODE:");
  75        tp = ((unsigned char *) fp->pc) - 0x20;
  76        for (sp = (unsigned long *) tp, i = 0; (i < 0x40);  i += 4) {
  77                if ((i % 0x10) == 0)
  78                        printk("\n%08x: ", (int) (tp + i));
  79                printk("%08x ", (int) *sp++);
  80        }
  81        printk("\n");
  82
  83        printk("\nKERNEL STACK:");
  84        tp = ((unsigned char *) fp) - 0x40;
  85        for (sp = (unsigned long *) tp, i = 0; (i < 0xc0); i += 4) {
  86                if ((i % 0x10) == 0)
  87                        printk("\n%08x: ", (int) (tp + i));
  88                printk("%08x ", (int) *sp++);
  89        }
  90        printk("\n");
  91        if (STACK_MAGIC != *(unsigned long *)((unsigned long)current+PAGE_SIZE))
  92                printk("(Possibly corrupted stack page??)\n");
  93
  94        printk("\n\n");
  95}
  96
  97void die_if_kernel (char *str, struct pt_regs *fp, int nr)
  98{
  99        extern int console_loglevel;
 100
 101        if (!(fp->ccr & PS_S))
 102                return;
 103
 104        console_loglevel = 15;
 105        dump(fp);
 106
 107        do_exit(SIGSEGV);
 108}
 109
 110extern char _start, _etext;
 111#define check_kernel_text(addr) \
 112        ((addr >= (unsigned long)(&_start)) && \
 113         (addr <  (unsigned long)(&_etext))) 
 114
 115static int kstack_depth_to_print = 24;
 116
 117void show_stack(struct task_struct *task, unsigned long *esp)
 118{
 119        unsigned long *stack,  addr;
 120        int i;
 121
 122        if (esp == NULL)
 123                esp = (unsigned long *) &esp;
 124
 125        stack = esp;
 126
 127        printk("Stack from %08lx:", (unsigned long)stack);
 128        for (i = 0; i < kstack_depth_to_print; i++) {
 129                if (((unsigned long)stack & (THREAD_SIZE - 1)) == 0)
 130                        break;
 131                if (i % 8 == 0)
 132                        printk("\n       ");
 133                printk(" %08lx", *stack++);
 134        }
 135
 136        printk("\nCall Trace:");
 137        i = 0;
 138        stack = esp;
 139        while (((unsigned long)stack & (THREAD_SIZE - 1)) != 0) {
 140                addr = *stack++;
 141                /*
 142                 * If the address is either in the text segment of the
 143                 * kernel, or in the region which contains vmalloc'ed
 144                 * memory, it *may* be the address of a calling
 145                 * routine; if so, print it so that someone tracing
 146                 * down the cause of the crash will be able to figure
 147                 * out the call path that was taken.
 148                 */
 149                if (check_kernel_text(addr)) {
 150                        if (i % 4 == 0)
 151                                printk("\n       ");
 152                        printk(" [<%08lx>]", addr);
 153                        i++;
 154                }
 155        }
 156        printk("\n");
 157}
 158
 159void show_trace_task(struct task_struct *tsk)
 160{
 161        show_stack(tsk,(unsigned long *)tsk->thread.esp0);
 162}
 163
 164void dump_stack(void)
 165{
 166        show_stack(NULL,NULL);
 167}
 168
 169EXPORT_SYMBOL(dump_stack);
 170