2 * Copyright (C) 2001,2002,2003 Broadcom Corporation
4 * This program is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU General Public License
6 * as published by the Free Software Foundation; either version 2
7 * of the License, or (at your option) any later version.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, write to the Free Software
16 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
18 #include <linux/sched.h>
19 #include <asm/mipsregs.h>
20 #include <asm/sibyte/sb1250.h>
21 #include <asm/sibyte/sb1250_regs.h>
23 #if !defined(CONFIG_SIBYTE_BUS_WATCHER) || defined(CONFIG_SIBYTE_BW_TRACE)
25 #include <asm/sibyte/sb1250_scd.h>
29 * We'd like to dump the L2_ECC_TAG register on errors, but errata make
30 * that unsafe... So for now we don't. (BCM1250/BCM112x erratum SOC-48.)
32 #undef DUMP_L2_ECC_TAG_ON_ERROR
36 /* XXX should come from config1 XXX */
37 #define SB1_CACHE_INDEX_MASK 0x1fe0
39 #define CP0_ERRCTL_RECOVERABLE (1 << 31)
40 #define CP0_ERRCTL_DCACHE (1 << 30)
41 #define CP0_ERRCTL_ICACHE (1 << 29)
42 #define CP0_ERRCTL_MULTIBUS (1 << 23)
43 #define CP0_ERRCTL_MC_TLB (1 << 15)
44 #define CP0_ERRCTL_MC_TIMEOUT (1 << 14)
46 #define CP0_CERRI_TAG_PARITY (1 << 29)
47 #define CP0_CERRI_DATA_PARITY (1 << 28)
48 #define CP0_CERRI_EXTERNAL (1 << 26)
50 #define CP0_CERRI_IDX_VALID(c) (!((c) & CP0_CERRI_EXTERNAL))
51 #define CP0_CERRI_DATA (CP0_CERRI_DATA_PARITY)
53 #define CP0_CERRD_MULTIPLE (1 << 31)
54 #define CP0_CERRD_TAG_STATE (1 << 30)
55 #define CP0_CERRD_TAG_ADDRESS (1 << 29)
56 #define CP0_CERRD_DATA_SBE (1 << 28)
57 #define CP0_CERRD_DATA_DBE (1 << 27)
58 #define CP0_CERRD_EXTERNAL (1 << 26)
59 #define CP0_CERRD_LOAD (1 << 25)
60 #define CP0_CERRD_STORE (1 << 24)
61 #define CP0_CERRD_FILLWB (1 << 23)
62 #define CP0_CERRD_COHERENCY (1 << 22)
63 #define CP0_CERRD_DUPTAG (1 << 21)
65 #define CP0_CERRD_DPA_VALID(c) (!((c) & CP0_CERRD_EXTERNAL))
66 #define CP0_CERRD_IDX_VALID(c) \
67 (((c) & (CP0_CERRD_LOAD | CP0_CERRD_STORE)) ? (!((c) & CP0_CERRD_EXTERNAL)) : 0)
68 #define CP0_CERRD_CAUSES \
69 (CP0_CERRD_LOAD | CP0_CERRD_STORE | CP0_CERRD_FILLWB | CP0_CERRD_COHERENCY | CP0_CERRD_DUPTAG)
70 #define CP0_CERRD_TYPES \
71 (CP0_CERRD_TAG_STATE | CP0_CERRD_TAG_ADDRESS | CP0_CERRD_DATA_SBE | CP0_CERRD_DATA_DBE | CP0_CERRD_EXTERNAL)
72 #define CP0_CERRD_DATA (CP0_CERRD_DATA_SBE | CP0_CERRD_DATA_DBE)
74 static uint32_t extract_ic(unsigned short addr, int data);
75 static uint32_t extract_dc(unsigned short addr, int data);
77 static inline void breakout_errctl(unsigned int val)
79 if (val & CP0_ERRCTL_RECOVERABLE)
80 prom_printf(" recoverable");
81 if (val & CP0_ERRCTL_DCACHE)
82 prom_printf(" dcache");
83 if (val & CP0_ERRCTL_ICACHE)
84 prom_printf(" icache");
85 if (val & CP0_ERRCTL_MULTIBUS)
86 prom_printf(" multiple-buserr");
90 static inline void breakout_cerri(unsigned int val)
92 if (val & CP0_CERRI_TAG_PARITY)
93 prom_printf(" tag-parity");
94 if (val & CP0_CERRI_DATA_PARITY)
95 prom_printf(" data-parity");
96 if (val & CP0_CERRI_EXTERNAL)
97 prom_printf(" external");
101 static inline void breakout_cerrd(unsigned int val)
103 switch (val & CP0_CERRD_CAUSES) {
105 prom_printf(" load,");
107 case CP0_CERRD_STORE:
108 prom_printf(" store,");
110 case CP0_CERRD_FILLWB:
111 prom_printf(" fill/wb,");
113 case CP0_CERRD_COHERENCY:
114 prom_printf(" coherency,");
116 case CP0_CERRD_DUPTAG:
117 prom_printf(" duptags,");
120 prom_printf(" NO CAUSE,");
123 if (!(val & CP0_CERRD_TYPES))
124 prom_printf(" NO TYPE");
126 if (val & CP0_CERRD_MULTIPLE)
127 prom_printf(" multi-err");
128 if (val & CP0_CERRD_TAG_STATE)
129 prom_printf(" tag-state");
130 if (val & CP0_CERRD_TAG_ADDRESS)
131 prom_printf(" tag-address");
132 if (val & CP0_CERRD_DATA_SBE)
133 prom_printf(" data-SBE");
134 if (val & CP0_CERRD_DATA_DBE)
135 prom_printf(" data-DBE");
136 if (val & CP0_CERRD_EXTERNAL)
137 prom_printf(" external");
142 #ifndef CONFIG_SIBYTE_BUS_WATCHER
144 static void check_bus_watcher(void)
146 uint32_t status, l2_err, memio_err;
147 #ifdef DUMP_L2_ECC_TAG_ON_ERROR
151 /* Destructive read, clears register and interrupt */
152 status = csr_in32(IOADDR(A_SCD_BUS_ERR_STATUS));
153 /* Bit 31 is always on, but there's no #define for that */
154 if (status & ~(1UL << 31)) {
155 l2_err = csr_in32(IOADDR(A_BUS_L2_ERRORS));
156 #ifdef DUMP_L2_ECC_TAG_ON_ERROR
157 l2_tag = in64(IO_SPACE_BASE | A_L2_ECC_TAG);
159 memio_err = csr_in32(IOADDR(A_BUS_MEM_IO_ERRORS));
160 prom_printf("Bus watcher error counters: %08x %08x\n", l2_err, memio_err);
161 prom_printf("\nLast recorded signature:\n");
162 prom_printf("Request %02x from %d, answered by %d with Dcode %d\n",
163 (unsigned int)(G_SCD_BERR_TID(status) & 0x3f),
164 (int)(G_SCD_BERR_TID(status) >> 6),
165 (int)G_SCD_BERR_RID(status),
166 (int)G_SCD_BERR_DCODE(status));
167 #ifdef DUMP_L2_ECC_TAG_ON_ERROR
168 prom_printf("Last L2 tag w/ bad ECC: %016llx\n", l2_tag);
171 prom_printf("Bus watcher indicates no error\n");
175 extern void check_bus_watcher(void);
178 asmlinkage void sb1_cache_error(void)
181 uint32_t errctl, cerr_i, cerr_d, dpalo, dpahi, eepc, res;
183 #ifdef CONFIG_SIBYTE_BW_TRACE
184 /* Freeze the trace buffer now */
185 #if defined(CONFIG_SIBYTE_BCM1x55) || defined(CONFIG_SIBYTE_BCM1x80)
186 csr_out32(M_BCM1480_SCD_TRACE_CFG_FREEZE, IO_SPACE_BASE | A_SCD_TRACE_CFG);
188 csr_out32(M_SCD_TRACE_CFG_FREEZE, IO_SPACE_BASE | A_SCD_TRACE_CFG);
190 prom_printf("Trace buffer frozen\n");
193 prom_printf("Cache error exception on CPU %x:\n",
194 (read_c0_prid() >> 25) & 0x7);
196 __asm__ __volatile__ (
202 " mfc0 %2, $27, 1\n\t"
203 " dmfc0 $1, $27, 3\n\t"
204 " dsrl32 %3, $1, 0 \n\t"
205 " sll %4, $1, 0 \n\t"
208 : "=r" (errctl), "=r" (cerr_i), "=r" (cerr_d),
209 "=r" (dpahi), "=r" (dpalo), "=r" (eepc));
211 cerr_dpa = (((uint64_t)dpahi) << 32) | dpalo;
212 prom_printf(" c0_errorepc == %08x\n", eepc);
213 prom_printf(" c0_errctl == %08x", errctl);
214 breakout_errctl(errctl);
215 if (errctl & CP0_ERRCTL_ICACHE) {
216 prom_printf(" c0_cerr_i == %08x", cerr_i);
217 breakout_cerri(cerr_i);
218 if (CP0_CERRI_IDX_VALID(cerr_i)) {
219 /* Check index of EPC, allowing for delay slot */
220 if (((eepc & SB1_CACHE_INDEX_MASK) != (cerr_i & SB1_CACHE_INDEX_MASK)) &&
221 ((eepc & SB1_CACHE_INDEX_MASK) != ((cerr_i & SB1_CACHE_INDEX_MASK) - 4)))
222 prom_printf(" cerr_i idx doesn't match eepc\n");
224 res = extract_ic(cerr_i & SB1_CACHE_INDEX_MASK,
225 (cerr_i & CP0_CERRI_DATA) != 0);
227 prom_printf("...didn't see indicated icache problem\n");
231 if (errctl & CP0_ERRCTL_DCACHE) {
232 prom_printf(" c0_cerr_d == %08x", cerr_d);
233 breakout_cerrd(cerr_d);
234 if (CP0_CERRD_DPA_VALID(cerr_d)) {
235 prom_printf(" c0_cerr_dpa == %010llx\n", cerr_dpa);
236 if (!CP0_CERRD_IDX_VALID(cerr_d)) {
237 res = extract_dc(cerr_dpa & SB1_CACHE_INDEX_MASK,
238 (cerr_d & CP0_CERRD_DATA) != 0);
240 prom_printf("...didn't see indicated dcache problem\n");
242 if ((cerr_dpa & SB1_CACHE_INDEX_MASK) != (cerr_d & SB1_CACHE_INDEX_MASK))
243 prom_printf(" cerr_d idx doesn't match cerr_dpa\n");
245 res = extract_dc(cerr_d & SB1_CACHE_INDEX_MASK,
246 (cerr_d & CP0_CERRD_DATA) != 0);
248 prom_printf("...didn't see indicated problem\n");
257 * Calling panic() when a fatal cache error occurs scrambles the
258 * state of the system (and the cache), making it difficult to
259 * investigate after the fact. However, if you just stall the CPU,
260 * the other CPU may keep on running, which is typically very
263 #ifdef CONFIG_SB1_CERR_STALL
267 panic("unhandled cache error");
272 /* Parity lookup table. */
273 static const uint8_t parity[256] = {
274 0,1,1,0,1,0,0,1,1,0,0,1,0,1,1,0,1,0,0,1,0,1,1,0,0,1,1,0,1,0,0,1,
275 1,0,0,1,0,1,1,0,0,1,1,0,1,0,0,1,0,1,1,0,1,0,0,1,1,0,0,1,0,1,1,0,
276 1,0,0,1,0,1,1,0,0,1,1,0,1,0,0,1,0,1,1,0,1,0,0,1,1,0,0,1,0,1,1,0,
277 0,1,1,0,1,0,0,1,1,0,0,1,0,1,1,0,1,0,0,1,0,1,1,0,0,1,1,0,1,0,0,1,
278 1,0,0,1,0,1,1,0,0,1,1,0,1,0,0,1,0,1,1,0,1,0,0,1,1,0,0,1,0,1,1,0,
279 0,1,1,0,1,0,0,1,1,0,0,1,0,1,1,0,1,0,0,1,0,1,1,0,0,1,1,0,1,0,0,1,
280 0,1,1,0,1,0,0,1,1,0,0,1,0,1,1,0,1,0,0,1,0,1,1,0,0,1,1,0,1,0,0,1,
281 1,0,0,1,0,1,1,0,0,1,1,0,1,0,0,1,0,1,1,0,1,0,0,1,1,0,0,1,0,1,1,0
284 /* Masks to select bits for Hamming parity, mask_72_64[i] for bit[i] */
285 static const uint64_t mask_72_64[8] = {
286 0x0738C808099264FFULL,
287 0x38C808099264FF07ULL,
288 0xC808099264FF0738ULL,
289 0x08099264FF0738C8ULL,
290 0x099264FF0738C808ULL,
291 0x9264FF0738C80809ULL,
292 0x64FF0738C8080992ULL,
293 0xFF0738C808099264ULL
296 /* Calculate the parity on a range of bits */
297 static char range_parity(uint64_t dword, int max, int min)
302 for (i=max-min; i>=0; i--) {
310 /* Calculate the 4-bit even byte-parity for an instruction */
311 static unsigned char inst_parity(uint32_t word)
315 for (j=0; j<4; j++) {
316 char byte_parity = 0;
317 for (i=0; i<8; i++) {
318 if (word & 0x80000000)
319 byte_parity = !byte_parity;
323 parity |= byte_parity;
328 static uint32_t extract_ic(unsigned short addr, int data)
332 uint64_t taglo, va, tlo_tmp;
333 uint32_t taghi, taglolo, taglohi;
337 prom_printf("Icache index 0x%04x ", addr);
338 for (way = 0; way < 4; way++) {
339 /* Index-load-tag-I */
340 __asm__ __volatile__ (
342 " .set noreorder \n\t"
345 " cache 4, 0(%3) \n\t"
347 " dmfc0 $1, $28 \n\t"
348 " dsrl32 %1, $1, 0 \n\t"
349 " sll %2, $1, 0 \n\t"
351 : "=r" (taghi), "=r" (taglohi), "=r" (taglolo)
352 : "r" ((way << 13) | addr));
354 taglo = ((unsigned long long)taglohi << 32) | taglolo;
356 lru = (taghi >> 14) & 0xff;
357 prom_printf("[Bank %d Set 0x%02x] LRU > %d %d %d %d > MRU\n",
358 ((addr >> 5) & 0x3), /* bank */
359 ((addr >> 7) & 0x3f), /* index */
365 va = (taglo & 0xC0000FFFFFFFE000ULL) | addr;
366 if ((taglo & (1 << 31)) && (((taglo >> 62) & 0x3) == 3))
367 va |= 0x3FFFF00000000000ULL;
368 valid = ((taghi >> 29) & 1);
370 tlo_tmp = taglo & 0xfff3ff;
371 if (((taglo >> 10) & 1) ^ range_parity(tlo_tmp, 23, 0)) {
372 prom_printf(" ** bad parity in VTag0/G/ASID\n");
373 res |= CP0_CERRI_TAG_PARITY;
375 if (((taglo >> 11) & 1) ^ range_parity(taglo, 63, 24)) {
376 prom_printf(" ** bad parity in R/VTag1\n");
377 res |= CP0_CERRI_TAG_PARITY;
380 if (valid ^ ((taghi >> 27) & 1)) {
381 prom_printf(" ** bad parity for valid bit\n");
382 res |= CP0_CERRI_TAG_PARITY;
384 prom_printf(" %d [VA %016llx] [Vld? %d] raw tags: %08X-%016llX\n",
385 way, va, valid, taghi, taglo);
388 uint32_t datahi, insta, instb;
392 /* (hit all banks and ways) */
393 for (offset = 0; offset < 4; offset++) {
394 /* Index-load-data-I */
395 __asm__ __volatile__ (
397 " .set noreorder\n\t"
400 " cache 6, 0(%3) \n\t"
401 " mfc0 %0, $29, 1\n\t"
402 " dmfc0 $1, $28, 1\n\t"
403 " dsrl32 %1, $1, 0 \n\t"
404 " sll %2, $1, 0 \n\t"
406 : "=r" (datahi), "=r" (insta), "=r" (instb)
407 : "r" ((way << 13) | addr | (offset << 3)));
408 predecode = (datahi >> 8) & 0xff;
409 if (((datahi >> 16) & 1) != (uint32_t)range_parity(predecode, 7, 0)) {
410 prom_printf(" ** bad parity in predecode\n");
411 res |= CP0_CERRI_DATA_PARITY;
413 /* XXXKW should/could check predecode bits themselves */
414 if (((datahi >> 4) & 0xf) ^ inst_parity(insta)) {
415 prom_printf(" ** bad parity in instruction a\n");
416 res |= CP0_CERRI_DATA_PARITY;
418 if ((datahi & 0xf) ^ inst_parity(instb)) {
419 prom_printf(" ** bad parity in instruction b\n");
420 res |= CP0_CERRI_DATA_PARITY;
422 prom_printf(" %05X-%08X%08X", datahi, insta, instb);
430 /* Compute the ECC for a data doubleword */
431 static uint8_t dc_ecc(uint64_t dword)
439 for (i = 7; i >= 0; i--)
442 t = dword & mask_72_64[i];
443 w = (uint32_t)(t >> 32);
444 p ^= (parity[w>>24] ^ parity[(w>>16) & 0xFF]
445 ^ parity[(w>>8) & 0xFF] ^ parity[w & 0xFF]);
446 w = (uint32_t)(t & 0xFFFFFFFF);
447 p ^= (parity[w>>24] ^ parity[(w>>16) & 0xFF]
448 ^ parity[(w>>8) & 0xFF] ^ parity[w & 0xFF]);
458 static struct dc_state dc_states[] = {
468 #define DC_TAG_VALID(state) \
469 (((state) == 0x0) || ((state) == 0xf) || ((state) == 0x13) || \
470 ((state) == 0x19) || ((state) == 0x16) || ((state) == 0x1c))
472 static char *dc_state_str(unsigned char state)
474 struct dc_state *dsc = dc_states;
475 while (dsc->val != 0xff) {
476 if (dsc->val == state)
483 static uint32_t extract_dc(unsigned short addr, int data)
488 uint32_t taghi, taglolo, taglohi;
492 prom_printf("Dcache index 0x%04x ", addr);
493 for (way = 0; way < 4; way++) {
494 __asm__ __volatile__ (
496 " .set noreorder\n\t"
499 " cache 5, 0(%3)\n\t" /* Index-load-tag-D */
500 " mfc0 %0, $29, 2\n\t"
501 " dmfc0 $1, $28, 2\n\t"
502 " dsrl32 %1, $1, 0\n\t"
505 : "=r" (taghi), "=r" (taglohi), "=r" (taglolo)
506 : "r" ((way << 13) | addr));
508 taglo = ((unsigned long long)taglohi << 32) | taglolo;
509 pa = (taglo & 0xFFFFFFE000ULL) | addr;
511 lru = (taghi >> 14) & 0xff;
512 prom_printf("[Bank %d Set 0x%02x] LRU > %d %d %d %d > MRU\n",
513 ((addr >> 11) & 0x2) | ((addr >> 5) & 1), /* bank */
514 ((addr >> 6) & 0x3f), /* index */
520 state = (taghi >> 25) & 0x1f;
521 valid = DC_TAG_VALID(state);
522 prom_printf(" %d [PA %010llx] [state %s (%02x)] raw tags: %08X-%016llX\n",
523 way, pa, dc_state_str(state), state, taghi, taglo);
525 if (((taglo >> 11) & 1) ^ range_parity(taglo, 39, 26)) {
526 prom_printf(" ** bad parity in PTag1\n");
527 res |= CP0_CERRD_TAG_ADDRESS;
529 if (((taglo >> 10) & 1) ^ range_parity(taglo, 25, 13)) {
530 prom_printf(" ** bad parity in PTag0\n");
531 res |= CP0_CERRD_TAG_ADDRESS;
534 res |= CP0_CERRD_TAG_STATE;
539 uint32_t datalohi, datalolo, datahi;
543 for (offset = 0; offset < 4; offset++) {
544 /* Index-load-data-D */
545 __asm__ __volatile__ (
547 " .set noreorder\n\t"
550 " cache 7, 0(%3)\n\t" /* Index-load-data-D */
551 " mfc0 %0, $29, 3\n\t"
552 " dmfc0 $1, $28, 3\n\t"
553 " dsrl32 %1, $1, 0 \n\t"
554 " sll %2, $1, 0 \n\t"
556 : "=r" (datahi), "=r" (datalohi), "=r" (datalolo)
557 : "r" ((way << 13) | addr | (offset << 3)));
558 datalo = ((unsigned long long)datalohi << 32) | datalolo;
559 ecc = dc_ecc(datalo);
562 bad_ecc |= 1 << (3-offset);
568 res |= (bits == 1) ? CP0_CERRD_DATA_SBE : CP0_CERRD_DATA_DBE;
570 prom_printf(" %02X-%016llX", datahi, datalo);
574 prom_printf(" dwords w/ bad ECC: %d %d %d %d\n",
575 !!(bad_ecc & 8), !!(bad_ecc & 4),
576 !!(bad_ecc & 2), !!(bad_ecc & 1));