Merge Linux 2.6.23
[linux-2.6] / arch / blackfin / mach-common / irqpanic.c
1 /*
2  * File:         arch/blackfin/mach-common/irqpanic.c
3  * Based on:
4  * Author:
5  *
6  * Created:      ?
7  * Description:  panic kernel with dump information
8  *
9  * Modified:     rgetz - added cache checking code 14Feb06
10  *               Copyright 2004-2006 Analog Devices Inc.
11  *
12  * Bugs:         Enter bugs at http://blackfin.uclinux.org/
13  *
14  * This program is free software; you can redistribute it and/or modify
15  * it under the terms of the GNU General Public License as published by
16  * the Free Software Foundation; either version 2 of the License, or
17  * (at your option) any later version.
18  *
19  * This program is distributed in the hope that it will be useful,
20  * but WITHOUT ANY WARRANTY; without even the implied warranty of
21  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
22  * GNU General Public License for more details.
23  *
24  * You should have received a copy of the GNU General Public License
25  * along with this program; if not, see the file COPYING, or write
26  * to the Free Software Foundation, Inc.,
27  * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
28  */
29
30 #include <linux/module.h>
31 #include <linux/kernel_stat.h>
32 #include <linux/sched.h>
33 #include <asm/traps.h>
34 #include <asm/blackfin.h>
35
36 #include "../oprofile/op_blackfin.h"
37
38 #ifdef CONFIG_DEBUG_ICACHE_CHECK
39 #define L1_ICACHE_START 0xffa10000
40 #define L1_ICACHE_END   0xffa13fff
41 void irq_panic(int reason, struct pt_regs *regs) __attribute__ ((l1_text));
42 #endif
43
44 /*
45  * irq_panic - calls panic with string setup
46  */
47 asmlinkage void irq_panic(int reason, struct pt_regs *regs)
48 {
49         int sig = 0;
50         siginfo_t info;
51
52 #ifdef CONFIG_DEBUG_ICACHE_CHECK
53         unsigned int cmd, tag, ca, cache_hi, cache_lo, *pa;
54         unsigned short i, j, die;
55         unsigned int bad[10][6];
56
57         /* check entire cache for coherency
58          * Since printk is in cacheable memory,
59          * don't call it until you have checked everything
60         */
61
62         die = 0;
63         i = 0;
64
65         /* check icache */
66
67         for (ca = L1_ICACHE_START; ca <= L1_ICACHE_END && i < 10; ca += 32) {
68
69                 /* Grab various address bits for the itest_cmd fields                      */
70                 cmd = (((ca & 0x3000) << 4) |   /* ca[13:12] for SBNK[1:0]             */
71                        ((ca & 0x0c00) << 16) |  /* ca[11:10] for WAYSEL[1:0]           */
72                        ((ca & 0x3f8)) | /* ca[09:03] for SET[4:0] and DW[1:0]  */
73                        0);      /* Access Tag, Read access             */
74
75                 SSYNC();
76                 bfin_write_ITEST_COMMAND(cmd);
77                 SSYNC();
78                 tag = bfin_read_ITEST_DATA0();
79                 SSYNC();
80
81                 /* if tag is marked as valid, check it */
82                 if (tag & 1) {
83                         /* The icache is arranged in 4 groups of 64-bits */
84                         for (j = 0; j < 32; j += 8) {
85                                 cmd = ((((ca + j) & 0x3000) << 4) |     /* ca[13:12] for SBNK[1:0]             */
86                                        (((ca + j) & 0x0c00) << 16) |    /* ca[11:10] for WAYSEL[1:0]           */
87                                        (((ca + j) & 0x3f8)) |   /* ca[09:03] for SET[4:0] and DW[1:0]  */
88                                        4);      /* Access Data, Read access             */
89
90                                 SSYNC();
91                                 bfin_write_ITEST_COMMAND(cmd);
92                                 SSYNC();
93
94                                 cache_hi = bfin_read_ITEST_DATA1();
95                                 cache_lo = bfin_read_ITEST_DATA0();
96
97                                 pa = ((unsigned int *)((tag & 0xffffcc00) |
98                                                        ((ca + j) & ~(0xffffcc00))));
99
100                                 /*
101                                  * Debugging this, enable
102                                  *
103                                  * printk("addr: %08x %08x%08x | %08x%08x\n",
104                                  *  ((unsigned int *)((tag & 0xffffcc00)  | ((ca+j) & ~(0xffffcc00)))),
105                                  *   cache_hi, cache_lo, *(pa+1), *pa);
106                                  */
107
108                                 if (cache_hi != *(pa + 1) || cache_lo != *pa) {
109                                         /* Since icache is not working, stay out of it, by not printing */
110                                         die = 1;
111                                         bad[i][0] = (ca + j);
112                                         bad[i][1] = cache_hi;
113                                         bad[i][2] = cache_lo;
114                                         bad[i][3] = ((tag & 0xffffcc00) |
115                                                 ((ca + j) & ~(0xffffcc00)));
116                                         bad[i][4] = *(pa + 1);
117                                         bad[i][5] = *(pa);
118                                         i++;
119                                 }
120                         }
121                 }
122         }
123         if (die) {
124                 printk(KERN_EMERG "icache coherency error\n");
125                 for (j = 0; j <= i; j++) {
126                         printk(KERN_EMERG
127                             "cache address   : %08x  cache value : %08x%08x\n",
128                              bad[j][0], bad[j][1], bad[j][2]);
129                         printk(KERN_EMERG
130                             "physical address: %08x  SDRAM value : %08x%08x\n",
131                              bad[j][3], bad[j][4], bad[j][5]);
132                 }
133                 panic("icache coherency error");
134         } else {
135                 printk(KERN_EMERG "icache checked, and OK\n");
136         }
137 #endif
138
139         printk(KERN_EMERG "\n");
140         printk(KERN_EMERG "Exception: IRQ 0x%x entered\n", reason);
141         printk(KERN_EMERG " code=[0x%08lx],   stack frame=0x%08lx,  "
142             " bad PC=0x%08lx\n",
143             (unsigned long)regs->seqstat,
144             (unsigned long)regs,
145             (unsigned long)regs->pc);
146         if (reason == 0x5) {
147                 printk(KERN_EMERG "----------- HARDWARE ERROR -----------\n");
148
149                 /* There is only need to check for Hardware Errors, since other
150                  * EXCEPTIONS are handled in TRAPS.c (MH)
151                  */
152                 switch (regs->seqstat & SEQSTAT_HWERRCAUSE) {
153                 case (SEQSTAT_HWERRCAUSE_SYSTEM_MMR):   /* System MMR Error */
154                         info.si_code = BUS_ADRALN;
155                         sig = SIGBUS;
156                         printk(KERN_EMERG HWC_x2);
157                         break;
158                 case (SEQSTAT_HWERRCAUSE_EXTERN_ADDR):  /* External Memory Addressing Error */
159                         info.si_code = BUS_ADRERR;
160                         sig = SIGBUS;
161                         printk(KERN_EMERG HWC_x3);
162                         break;
163                 case (SEQSTAT_HWERRCAUSE_PERF_FLOW):    /* Performance Monitor Overflow */
164                         printk(KERN_EMERG HWC_x12);
165                         break;
166                 case (SEQSTAT_HWERRCAUSE_RAISE_5):      /* RAISE 5 instruction */
167                         printk(KERN_EMERG HWC_x18);
168                         break;
169                 default:        /* Reserved */
170                         printk(KERN_EMERG HWC_default);
171                         break;
172                 }
173         }
174
175         regs->ipend = bfin_read_IPEND();
176         dump_bfin_regs(regs, (void *)regs->pc);
177         if (0 == (info.si_signo = sig) || 0 == user_mode(regs)) /* in kernelspace */
178                 panic("Unhandled IRQ or exceptions!\n");
179         else {                  /* in userspace */
180                 info.si_errno = 0;
181                 info.si_addr = (void *)regs->pc;
182                 force_sig_info(sig, &info, current);
183         }
184 }
185
186 #ifdef CONFIG_HARDWARE_PM
187 /*
188  * call the handler of Performance overflow
189  */
190 asmlinkage void pm_overflow(int irq, struct pt_regs *regs)
191 {
192         pm_overflow_handler(irq, regs);
193 }
194 #endif