]>
Commit | Line | Data |
---|---|---|
9171fc81 MF |
1 | /* |
2 | * U-boot - traps.c Routines related to interrupts and exceptions | |
3 | * | |
4 | * Copyright (c) 2005-2008 Analog Devices Inc. | |
5 | * | |
6 | * This file is based on | |
7 | * No original Copyright holder listed, | |
8 | * Probabily original (C) Roman Zippel (assigned DJD, 1999) | |
9 | * | |
10 | * Copyright 2003 Metrowerks - for Blackfin | |
11 | * Copyright 2000-2001 Lineo, Inc. D. Jeff Dionne <[email protected]> | |
12 | * Copyright 1999-2000 D. Jeff Dionne, <[email protected]> | |
13 | * | |
14 | * (C) Copyright 2000-2004 | |
15 | * Wolfgang Denk, DENX Software Engineering, [email protected]. | |
16 | * | |
17 | * Licensed under the GPL-2 or later. | |
18 | */ | |
19 | ||
20 | #include <common.h> | |
21 | #include <linux/types.h> | |
22 | #include <asm/traps.h> | |
23 | #include <asm/cplb.h> | |
24 | #include <asm/io.h> | |
25 | #include <asm/mach-common/bits/core.h> | |
26 | #include <asm/mach-common/bits/mpu.h> | |
27 | #include <asm/mach-common/bits/trace.h> | |
28 | #include "cpu.h" | |
29 | ||
30 | #define trace_buffer_save(x) \ | |
31 | do { \ | |
32 | (x) = bfin_read_TBUFCTL(); \ | |
33 | bfin_write_TBUFCTL((x) & ~TBUFEN); \ | |
34 | } while (0) | |
35 | ||
36 | #define trace_buffer_restore(x) \ | |
37 | bfin_write_TBUFCTL((x)) | |
38 | ||
39 | /* The purpose of this map is to provide a mapping of address<->cplb settings | |
40 | * rather than an exact map of what is actually addressable on the part. This | |
41 | * map covers all current Blackfin parts. If you try to access an address that | |
42 | * is in this map but not actually on the part, you won't get an exception and | |
43 | * reboot, you'll get an external hardware addressing error and reboot. Since | |
44 | * only the ends matter (you did something wrong and the board reset), the means | |
45 | * are largely irrelevant. | |
46 | */ | |
47 | struct memory_map { | |
48 | uint32_t start, end; | |
49 | uint32_t data_flags, inst_flags; | |
50 | }; | |
51 | const struct memory_map const bfin_memory_map[] = { | |
52 | { /* external memory */ | |
53 | .start = 0x00000000, | |
54 | .end = 0x20000000, | |
55 | .data_flags = SDRAM_DGENERIC, | |
56 | .inst_flags = SDRAM_IGENERIC, | |
57 | }, | |
58 | { /* async banks */ | |
59 | .start = 0x20000000, | |
60 | .end = 0x30000000, | |
61 | .data_flags = SDRAM_EBIU, | |
62 | .inst_flags = SDRAM_INON_CHBL, | |
63 | }, | |
64 | { /* everything on chip */ | |
65 | .start = 0xE0000000, | |
66 | .end = 0xFFFFFFFF, | |
67 | .data_flags = L1_DMEMORY, | |
68 | .inst_flags = L1_IMEMORY, | |
69 | } | |
70 | }; | |
71 | ||
72 | void trap_c(struct pt_regs *regs) | |
73 | { | |
74 | uint32_t trapnr = (regs->seqstat & EXCAUSE); | |
75 | bool data = false; | |
76 | ||
77 | switch (trapnr) { | |
78 | /* 0x26 - Data CPLB Miss */ | |
79 | case VEC_CPLB_M: | |
80 | ||
81 | if (ANOMALY_05000261) { | |
82 | static uint32_t last_cplb_fault_retx; | |
83 | /* | |
84 | * Work around an anomaly: if we see a new DCPLB fault, | |
85 | * return without doing anything. Then, | |
86 | * if we get the same fault again, handle it. | |
87 | */ | |
88 | if (last_cplb_fault_retx != regs->retx) { | |
89 | last_cplb_fault_retx = regs->retx; | |
90 | return; | |
91 | } | |
92 | } | |
93 | ||
94 | data = true; | |
95 | /* fall through */ | |
96 | ||
97 | /* 0x27 - Instruction CPLB Miss */ | |
98 | case VEC_CPLB_I_M: { | |
99 | volatile uint32_t *CPLB_ADDR_BASE, *CPLB_DATA_BASE, *CPLB_ADDR, *CPLB_DATA; | |
100 | uint32_t new_cplb_addr = 0, new_cplb_data = 0; | |
101 | static size_t last_evicted; | |
102 | size_t i; | |
103 | ||
104 | new_cplb_addr = (data ? bfin_read_DCPLB_FAULT_ADDR() : bfin_read_ICPLB_FAULT_ADDR()) & ~(4 * 1024 * 1024 - 1); | |
105 | ||
106 | for (i = 0; i < ARRAY_SIZE(bfin_memory_map); ++i) { | |
107 | /* if the exception is inside this range, lets use it */ | |
108 | if (new_cplb_addr >= bfin_memory_map[i].start && | |
109 | new_cplb_addr < bfin_memory_map[i].end) | |
110 | break; | |
111 | } | |
112 | if (i == ARRAY_SIZE(bfin_memory_map)) { | |
113 | printf("%cCPLB exception outside of memory map at 0x%p\n", | |
114 | (data ? 'D' : 'I'), new_cplb_addr); | |
115 | bfin_panic(regs); | |
116 | } else | |
117 | debug("CPLB addr %p matches map 0x%p - 0x%p\n", new_cplb_addr, bfin_memory_map[i].start, bfin_memory_map[i].end); | |
118 | new_cplb_data = (data ? bfin_memory_map[i].data_flags : bfin_memory_map[i].inst_flags); | |
119 | ||
120 | /* Turn the cache off */ | |
121 | SSYNC(); | |
122 | if (data) { | |
123 | asm(" .align 8; "); | |
124 | *pDMEM_CONTROL &= ~ENDCPLB; | |
125 | } else { | |
126 | asm(" .align 8; "); | |
127 | *pIMEM_CONTROL &= ~ENICPLB; | |
128 | } | |
129 | SSYNC(); | |
130 | ||
131 | if (data) { | |
132 | CPLB_ADDR_BASE = (uint32_t *)DCPLB_ADDR0; | |
133 | CPLB_DATA_BASE = (uint32_t *)DCPLB_DATA0; | |
134 | } else { | |
135 | CPLB_ADDR_BASE = (uint32_t *)ICPLB_ADDR0; | |
136 | CPLB_DATA_BASE = (uint32_t *)ICPLB_DATA0; | |
137 | } | |
138 | ||
139 | /* find the next unlocked entry and evict it */ | |
140 | i = last_evicted & 0xF; | |
141 | debug("last evicted = %i\n", i); | |
142 | CPLB_DATA = CPLB_DATA_BASE + i; | |
143 | while (*CPLB_DATA & CPLB_LOCK) { | |
144 | debug("skipping %i %p - %08X\n", i, CPLB_DATA, *CPLB_DATA); | |
145 | i = (i + 1) & 0xF; /* wrap around */ | |
146 | CPLB_DATA = CPLB_DATA_BASE + i; | |
147 | } | |
148 | CPLB_ADDR = CPLB_ADDR_BASE + i; | |
149 | ||
150 | debug("evicting entry %i: 0x%p 0x%08X\n", i, *CPLB_ADDR, *CPLB_DATA); | |
151 | last_evicted = i + 1; | |
152 | *CPLB_ADDR = new_cplb_addr; | |
153 | *CPLB_DATA = new_cplb_data; | |
154 | ||
155 | /* dump current table for debugging purposes */ | |
156 | CPLB_ADDR = CPLB_ADDR_BASE; | |
157 | CPLB_DATA = CPLB_DATA_BASE; | |
158 | for (i = 0; i < 16; ++i) | |
159 | debug("%2i 0x%p 0x%08X\n", i, *CPLB_ADDR++, *CPLB_DATA++); | |
160 | ||
161 | /* Turn the cache back on */ | |
162 | SSYNC(); | |
163 | if (data) { | |
164 | asm(" .align 8; "); | |
165 | *pDMEM_CONTROL |= ENDCPLB; | |
166 | } else { | |
167 | asm(" .align 8; "); | |
168 | *pIMEM_CONTROL |= ENICPLB; | |
169 | } | |
170 | SSYNC(); | |
171 | ||
172 | break; | |
173 | } | |
174 | ||
175 | default: | |
176 | /* All traps come here */ | |
177 | bfin_panic(regs); | |
178 | } | |
179 | } | |
180 | ||
181 | #ifdef CONFIG_DEBUG_DUMP | |
182 | # define ENABLE_DUMP 1 | |
183 | #else | |
184 | # define ENABLE_DUMP 0 | |
185 | #endif | |
186 | ||
187 | #ifdef CONFIG_DEBUG_DUMP_SYMS | |
188 | # define ENABLE_DUMP_SYMS 1 | |
189 | #else | |
190 | # define ENABLE_DUMP_SYMS 0 | |
191 | #endif | |
192 | ||
193 | static const char *symbol_lookup(unsigned long addr, unsigned long *caddr) | |
194 | { | |
195 | if (!ENABLE_DUMP_SYMS) | |
196 | return NULL; | |
197 | ||
198 | extern const char system_map[] __attribute__((__weak__)); | |
199 | const char *sym, *csym; | |
200 | char *esym; | |
201 | unsigned long sym_addr; | |
202 | ||
203 | sym = system_map; | |
204 | csym = NULL; | |
205 | *caddr = 0; | |
206 | ||
207 | while (*sym) { | |
208 | sym_addr = simple_strtoul(sym, &esym, 16); | |
209 | sym = esym + 1; | |
210 | if (sym_addr > addr) | |
211 | break; | |
212 | *caddr = sym_addr; | |
213 | csym = sym; | |
214 | sym += strlen(sym) + 1; | |
215 | } | |
216 | ||
217 | return csym; | |
218 | } | |
219 | ||
220 | static void decode_address(char *buf, unsigned long address) | |
221 | { | |
222 | unsigned long sym_addr; | |
223 | const char *sym = symbol_lookup(address, &sym_addr); | |
224 | ||
225 | if (sym) { | |
226 | sprintf(buf, "<0x%p> { %s + 0x%x }", address, sym, address - sym_addr); | |
227 | return; | |
228 | } | |
229 | ||
230 | if (!address) | |
231 | sprintf(buf, "<0x%p> /* Maybe null pointer? */", address); | |
6d0f6bcf JCPV |
232 | else if (address >= CONFIG_SYS_MONITOR_BASE && |
233 | address < CONFIG_SYS_MONITOR_BASE + CONFIG_SYS_MONITOR_LEN) | |
9171fc81 MF |
234 | sprintf(buf, "<0x%p> /* somewhere in u-boot */", address); |
235 | else | |
236 | sprintf(buf, "<0x%p> /* unknown address */", address); | |
237 | } | |
238 | ||
239 | void dump(struct pt_regs *fp) | |
240 | { | |
241 | char buf[150]; | |
242 | size_t i; | |
243 | ||
244 | if (!ENABLE_DUMP) | |
245 | return; | |
246 | ||
247 | printf("SEQUENCER STATUS:\n"); | |
248 | printf(" SEQSTAT: %08lx IPEND: %04lx SYSCFG: %04lx\n", | |
249 | fp->seqstat, fp->ipend, fp->syscfg); | |
250 | printf(" HWERRCAUSE: 0x%lx\n", (fp->seqstat & HWERRCAUSE) >> HWERRCAUSE_P); | |
251 | printf(" EXCAUSE : 0x%lx\n", (fp->seqstat & EXCAUSE) >> EXCAUSE_P); | |
252 | for (i = 6; i <= 15; ++i) { | |
253 | if (fp->ipend & (1 << i)) { | |
254 | decode_address(buf, bfin_read32(EVT0 + 4*i)); | |
255 | printf(" physical IVG%i asserted : %s\n", i, buf); | |
256 | } | |
257 | } | |
258 | decode_address(buf, fp->rete); | |
259 | printf(" RETE: %s\n", buf); | |
260 | decode_address(buf, fp->retn); | |
261 | printf(" RETN: %s\n", buf); | |
262 | decode_address(buf, fp->retx); | |
263 | printf(" RETX: %s\n", buf); | |
264 | decode_address(buf, fp->rets); | |
265 | printf(" RETS: %s\n", buf); | |
266 | decode_address(buf, fp->pc); | |
267 | printf(" PC : %s\n", buf); | |
268 | ||
269 | if (fp->seqstat & EXCAUSE) { | |
270 | decode_address(buf, bfin_read_DCPLB_FAULT_ADDR()); | |
271 | printf("DCPLB_FAULT_ADDR: %s\n", buf); | |
272 | decode_address(buf, bfin_read_ICPLB_FAULT_ADDR()); | |
273 | printf("ICPLB_FAULT_ADDR: %s\n", buf); | |
274 | } | |
275 | ||
276 | printf("\nPROCESSOR STATE:\n"); | |
277 | printf(" R0 : %08lx R1 : %08lx R2 : %08lx R3 : %08lx\n", | |
278 | fp->r0, fp->r1, fp->r2, fp->r3); | |
279 | printf(" R4 : %08lx R5 : %08lx R6 : %08lx R7 : %08lx\n", | |
280 | fp->r4, fp->r5, fp->r6, fp->r7); | |
281 | printf(" P0 : %08lx P1 : %08lx P2 : %08lx P3 : %08lx\n", | |
282 | fp->p0, fp->p1, fp->p2, fp->p3); | |
283 | printf(" P4 : %08lx P5 : %08lx FP : %08lx SP : %08lx\n", | |
284 | fp->p4, fp->p5, fp->fp, fp); | |
285 | printf(" LB0: %08lx LT0: %08lx LC0: %08lx\n", | |
286 | fp->lb0, fp->lt0, fp->lc0); | |
287 | printf(" LB1: %08lx LT1: %08lx LC1: %08lx\n", | |
288 | fp->lb1, fp->lt1, fp->lc1); | |
289 | printf(" B0 : %08lx L0 : %08lx M0 : %08lx I0 : %08lx\n", | |
290 | fp->b0, fp->l0, fp->m0, fp->i0); | |
291 | printf(" B1 : %08lx L1 : %08lx M1 : %08lx I1 : %08lx\n", | |
292 | fp->b1, fp->l1, fp->m1, fp->i1); | |
293 | printf(" B2 : %08lx L2 : %08lx M2 : %08lx I2 : %08lx\n", | |
294 | fp->b2, fp->l2, fp->m2, fp->i2); | |
295 | printf(" B3 : %08lx L3 : %08lx M3 : %08lx I3 : %08lx\n", | |
296 | fp->b3, fp->l3, fp->m3, fp->i3); | |
297 | printf("A0.w: %08lx A0.x: %08lx A1.w: %08lx A1.x: %08lx\n", | |
298 | fp->a0w, fp->a0x, fp->a1w, fp->a1x); | |
299 | ||
300 | printf("USP : %08lx ASTAT: %08lx\n", | |
301 | fp->usp, fp->astat); | |
302 | ||
303 | printf("\n"); | |
304 | } | |
305 | ||
306 | void dump_bfin_trace_buffer(void) | |
307 | { | |
308 | char buf[150]; | |
309 | unsigned long tflags; | |
310 | size_t i = 0; | |
311 | ||
312 | if (!ENABLE_DUMP) | |
313 | return; | |
314 | ||
315 | trace_buffer_save(tflags); | |
316 | ||
317 | printf("Hardware Trace:\n"); | |
318 | ||
319 | if (bfin_read_TBUFSTAT() & TBUFCNT) { | |
320 | for (; bfin_read_TBUFSTAT() & TBUFCNT; i++) { | |
321 | decode_address(buf, bfin_read_TBUF()); | |
322 | printf("%4i Target : %s\n", i, buf); | |
323 | decode_address(buf, bfin_read_TBUF()); | |
324 | printf(" Source : %s\n", buf); | |
325 | } | |
326 | } | |
327 | ||
328 | trace_buffer_restore(tflags); | |
329 | } | |
330 | ||
331 | void bfin_panic(struct pt_regs *regs) | |
332 | { | |
333 | if (ENABLE_DUMP) { | |
334 | unsigned long tflags; | |
335 | trace_buffer_save(tflags); | |
336 | } | |
337 | ||
338 | puts( | |
339 | "\n" | |
340 | "\n" | |
341 | "\n" | |
342 | "Ack! Something bad happened to the Blackfin!\n" | |
343 | "\n" | |
344 | ); | |
345 | dump(regs); | |
346 | dump_bfin_trace_buffer(); | |
347 | printf( | |
348 | "\n" | |
349 | "Please reset the board\n" | |
350 | "\n" | |
351 | ); | |
352 | bfin_reset_or_hang(); | |
353 | } |