Merge branches 'x86/asm', 'x86/cleanups', 'x86/cpudetect', 'x86/debug', 'x86/doc...
[linux-2.6] / arch / alpha / kernel / err_ev6.c
1 /*
2  *      linux/arch/alpha/kernel/err_ev6.c
3  *
4  *      Copyright (C) 2000 Jeff Wiedemeier (Compaq Computer Corporation)
5  *
6  *      Error handling code supporting Alpha systems
7  */
8
9 #include <linux/init.h>
10 #include <linux/sched.h>
11
12 #include <asm/io.h>
13 #include <asm/irq_regs.h>
14 #include <asm/hwrpb.h>
15 #include <asm/smp.h>
16 #include <asm/err_common.h>
17 #include <asm/err_ev6.h>
18
19 #include "err_impl.h"
20 #include "proto.h"
21
22 static int
23 ev6_parse_ibox(u64 i_stat, int print)
24 {
25         int status = MCHK_DISPOSITION_REPORT;
26
27 #define EV6__I_STAT__PAR        (1UL << 29)
28 #define EV6__I_STAT__ERRMASK    (EV6__I_STAT__PAR)
29
30         if (!(i_stat & EV6__I_STAT__ERRMASK))
31                 return MCHK_DISPOSITION_UNKNOWN_ERROR;
32
33         if (!print)
34                 return status;
35
36         if (i_stat & EV6__I_STAT__PAR)
37                 printk("%s    Icache parity error\n", err_print_prefix);
38
39         return status;
40 }
41
42 static int
43 ev6_parse_mbox(u64 mm_stat, u64 d_stat, u64 c_stat, int print)
44 {
45         int status = MCHK_DISPOSITION_REPORT;
46
47 #define EV6__MM_STAT__DC_TAG_PERR       (1UL << 10)
48 #define EV6__MM_STAT__ERRMASK           (EV6__MM_STAT__DC_TAG_PERR)
49 #define EV6__D_STAT__TPERR_P0           (1UL << 0)
50 #define EV6__D_STAT__TPERR_P1           (1UL << 1)
51 #define EV6__D_STAT__ECC_ERR_ST         (1UL << 2)
52 #define EV6__D_STAT__ECC_ERR_LD         (1UL << 3)
53 #define EV6__D_STAT__SEO                (1UL << 4)
54 #define EV6__D_STAT__ERRMASK            (EV6__D_STAT__TPERR_P0 |        \
55                                          EV6__D_STAT__TPERR_P1 |        \
56                                          EV6__D_STAT__ECC_ERR_ST |      \
57                                          EV6__D_STAT__ECC_ERR_LD |      \
58                                          EV6__D_STAT__SEO)
59
60         if (!(d_stat & EV6__D_STAT__ERRMASK) && 
61             !(mm_stat & EV6__MM_STAT__ERRMASK))
62                 return MCHK_DISPOSITION_UNKNOWN_ERROR;
63
64         if (!print)
65                 return status;
66
67         if (mm_stat & EV6__MM_STAT__DC_TAG_PERR)
68                 printk("%s    Dcache tag parity error on probe\n",
69                        err_print_prefix);
70         if (d_stat & EV6__D_STAT__TPERR_P0)
71                 printk("%s    Dcache tag parity error - pipe 0\n",
72                        err_print_prefix);
73         if (d_stat & EV6__D_STAT__TPERR_P1)
74                 printk("%s    Dcache tag parity error - pipe 1\n",
75                        err_print_prefix);
76         if (d_stat & EV6__D_STAT__ECC_ERR_ST)
77                 printk("%s    ECC error occurred on a store\n", 
78                        err_print_prefix);
79         if (d_stat & EV6__D_STAT__ECC_ERR_LD)
80                 printk("%s    ECC error occurred on a %s load\n",
81                        err_print_prefix,
82                        c_stat ? "" : "speculative ");
83         if (d_stat & EV6__D_STAT__SEO)
84                 printk("%s    Dcache second error\n", err_print_prefix);
85
86         return status;
87 }
88
89 static int
90 ev6_parse_cbox(u64 c_addr, u64 c1_syn, u64 c2_syn, 
91                u64 c_stat, u64 c_sts, int print)
92 {
93         char *sourcename[] = { "UNKNOWN", "UNKNOWN", "UNKNOWN",
94                                "MEMORY", "BCACHE", "DCACHE", 
95                                "BCACHE PROBE", "BCACHE PROBE" };
96         char *streamname[] = { "D", "I" };
97         char *bitsname[] = { "SINGLE", "DOUBLE" };
98         int status = MCHK_DISPOSITION_REPORT;
99         int source = -1, stream = -1, bits = -1;
100
101 #define EV6__C_STAT__BC_PERR            (0x01)
102 #define EV6__C_STAT__DC_PERR            (0x02)
103 #define EV6__C_STAT__DSTREAM_MEM_ERR    (0x03)
104 #define EV6__C_STAT__DSTREAM_BC_ERR     (0x04)
105 #define EV6__C_STAT__DSTREAM_DC_ERR     (0x05)
106 #define EV6__C_STAT__PROBE_BC_ERR0      (0x06)  /* both 6 and 7 indicate... */
107 #define EV6__C_STAT__PROBE_BC_ERR1      (0x07)  /* ...probe bc error.       */
108 #define EV6__C_STAT__ISTREAM_MEM_ERR    (0x0B)
109 #define EV6__C_STAT__ISTREAM_BC_ERR     (0x0C)
110 #define EV6__C_STAT__DSTREAM_MEM_DBL    (0x13)
111 #define EV6__C_STAT__DSTREAM_BC_DBL     (0x14)
112 #define EV6__C_STAT__ISTREAM_MEM_DBL    (0x1B)
113 #define EV6__C_STAT__ISTREAM_BC_DBL     (0x1C)
114 #define EV6__C_STAT__SOURCE_MEMORY      (0x03)
115 #define EV6__C_STAT__SOURCE_BCACHE      (0x04)
116 #define EV6__C_STAT__SOURCE__S          (0)
117 #define EV6__C_STAT__SOURCE__M          (0x07)
118 #define EV6__C_STAT__ISTREAM__S         (3)
119 #define EV6__C_STAT__ISTREAM__M         (0x01)
120 #define EV6__C_STAT__DOUBLE__S          (4)
121 #define EV6__C_STAT__DOUBLE__M          (0x01)
122 #define EV6__C_STAT__ERRMASK            (0x1F)
123 #define EV6__C_STS__SHARED              (1 << 0)
124 #define EV6__C_STS__DIRTY               (1 << 1)
125 #define EV6__C_STS__VALID               (1 << 2)
126 #define EV6__C_STS__PARITY              (1 << 3)
127
128         if (!(c_stat & EV6__C_STAT__ERRMASK))
129                 return MCHK_DISPOSITION_UNKNOWN_ERROR;
130
131         if (!print)
132                 return status;
133
134         source = EXTRACT(c_stat, EV6__C_STAT__SOURCE);
135         stream = EXTRACT(c_stat, EV6__C_STAT__ISTREAM);
136         bits = EXTRACT(c_stat, EV6__C_STAT__DOUBLE);
137
138         if (c_stat & EV6__C_STAT__BC_PERR) {
139                 printk("%s    Bcache tag parity error\n", err_print_prefix);
140                 source = -1;
141         }
142
143         if (c_stat & EV6__C_STAT__DC_PERR) {
144                 printk("%s    Dcache tag parity error\n", err_print_prefix);
145                 source = -1;
146         }
147
148         if (c_stat == EV6__C_STAT__PROBE_BC_ERR0 ||
149             c_stat == EV6__C_STAT__PROBE_BC_ERR1) {
150                 printk("%s    Bcache single-bit error on a probe hit\n",
151                        err_print_prefix);
152                 source = -1;
153         }
154
155         if (source != -1) 
156                 printk("%s    %s-STREAM %s-BIT ECC error from %s\n",
157                        err_print_prefix,
158                        streamname[stream], bitsname[bits], sourcename[source]);
159
160         printk("%s    Address: 0x%016lx\n"
161                  "    Syndrome[upper.lower]: %02lx.%02lx\n", 
162                err_print_prefix,
163                c_addr,
164                c2_syn, c1_syn);
165
166         if (source == EV6__C_STAT__SOURCE_MEMORY ||
167             source == EV6__C_STAT__SOURCE_BCACHE) 
168                 printk("%s    Block status: %s%s%s%s\n",
169                        err_print_prefix,
170                        (c_sts & EV6__C_STS__SHARED) ? "SHARED " : "",
171                        (c_sts & EV6__C_STS__DIRTY)  ? "DIRTY "  : "",
172                        (c_sts & EV6__C_STS__VALID)  ? "VALID "  : "",
173                        (c_sts & EV6__C_STS__PARITY) ? "PARITY " : "");
174                 
175         return status;
176 }
177
178 void
179 ev6_register_error_handlers(void)
180 {
181         /* None right now. */
182 }
183
184 int
185 ev6_process_logout_frame(struct el_common *mchk_header, int print)
186 {
187         struct el_common_EV6_mcheck *ev6mchk = 
188                 (struct el_common_EV6_mcheck *)mchk_header;
189         int status = MCHK_DISPOSITION_UNKNOWN_ERROR;
190
191         status |= ev6_parse_ibox(ev6mchk->I_STAT, print);
192         status |= ev6_parse_mbox(ev6mchk->MM_STAT, ev6mchk->DC_STAT, 
193                                  ev6mchk->C_STAT, print);
194         status |= ev6_parse_cbox(ev6mchk->C_ADDR, ev6mchk->DC1_SYNDROME,
195                                  ev6mchk->DC0_SYNDROME, ev6mchk->C_STAT,
196                                  ev6mchk->C_STS, print);
197
198         if (!print)
199                 return status;
200
201         if (status != MCHK_DISPOSITION_DISMISS) {
202                 char *saved_err_prefix = err_print_prefix;
203
204                 /*
205                  * Dump some additional information from the frame
206                  */
207                 printk("%s    EXC_ADDR: 0x%016lx   IER_CM: 0x%016lx"
208                             "   ISUM: 0x%016lx\n"
209                          "    PAL_BASE: 0x%016lx   I_CTL:  0x%016lx"
210                             "   PCTX: 0x%016lx\n",
211                        err_print_prefix,
212                        ev6mchk->EXC_ADDR, ev6mchk->IER_CM, ev6mchk->ISUM,
213                        ev6mchk->PAL_BASE, ev6mchk->I_CTL, ev6mchk->PCTX);
214
215                 if (status == MCHK_DISPOSITION_UNKNOWN_ERROR) {
216                         printk("%s    UNKNOWN error, frame follows:\n",
217                                err_print_prefix);
218                 } else {
219                         /* had decode -- downgrade print level for frame */
220                         err_print_prefix = KERN_NOTICE;
221                 }
222
223                 mchk_dump_logout_frame(mchk_header);
224
225                 err_print_prefix = saved_err_prefix;
226         }
227
228         return status;
229 }
230
231 void
232 ev6_machine_check(u64 vector, u64 la_ptr)
233 {
234         struct el_common *mchk_header = (struct el_common *)la_ptr;
235
236         /*
237          * Sync the processor
238          */
239         mb();
240         draina();
241
242         /*
243          * Parse the logout frame without printing first. If the only error(s)
244          * found are have a disposition of "dismiss", then just dismiss them
245          * and don't print any message
246          */
247         if (ev6_process_logout_frame(mchk_header, 0) != 
248             MCHK_DISPOSITION_DISMISS) {
249                 char *saved_err_prefix = err_print_prefix;
250                 err_print_prefix = KERN_CRIT;
251
252                 /*
253                  * Either a nondismissable error was detected or no
254                  * recognized error was detected  in the logout frame 
255                  * -- report the error in either case
256                  */
257                 printk("%s*CPU %s Error (Vector 0x%x) reported on CPU %d:\n", 
258                        err_print_prefix,
259                        (vector == SCB_Q_PROCERR)?"Correctable":"Uncorrectable",
260                        (unsigned int)vector, (int)smp_processor_id());
261                 
262                 ev6_process_logout_frame(mchk_header, 1);
263                 dik_show_regs(get_irq_regs(), NULL);
264
265                 err_print_prefix = saved_err_prefix;
266         }
267
268         /* 
269          * Release the logout frame 
270          */
271         wrmces(0x7);
272         mb();
273 }
274