1 // SPDX-License-Identifier: GPL-2.0+
2 /*
3 * (C) Copyright 2003
4 * Texas Instruments <www.ti.com>
5 *
6 * (C) Copyright 2002
7 * Sysgo Real-Time Solutions, GmbH <www.elinos.com>
8 * Marius Groeger <mgroeger@sysgo.de>
9 *
10 * (C) Copyright 2002
11 * Sysgo Real-Time Solutions, GmbH <www.elinos.com>
12 * Alex Zuepke <azu@sysgo.de>
13 *
14 * (C) Copyright 2002-2004
15 * Gary Jennejohn, DENX Software Engineering, <garyj@denx.de>
16 *
17 * (C) Copyright 2004
18 * Philippe Robin, ARM Ltd. <philippe.robin@arm.com>
19 */
20
21 #include <cpu_func.h>
22 #include <efi_loader.h>
23 #include <irq_func.h>
24 #include <semihosting.h>
25 #include <asm/global_data.h>
26 #include <asm/proc-armv/ptrace.h>
27 #include <asm/ptrace.h>
28 #include <asm/u-boot-arm.h>
29
30 DECLARE_GLOBAL_DATA_PTR;
31
interrupt_init(void)32 int interrupt_init(void)
33 {
34 /*
35 * setup up stacks if necessary
36 */
37 IRQ_STACK_START_IN = gd->irq_sp + 8;
38
39 enable_interrupts();
40
41 return 0;
42 }
43
enable_interrupts(void)44 void enable_interrupts(void)
45 {
46 return;
47 }
disable_interrupts(void)48 int disable_interrupts(void)
49 {
50 return 0;
51 }
52
bad_mode(void)53 void bad_mode (void)
54 {
55 panic ("Resetting CPU ...\n");
56 reset_cpu();
57 }
58
show_efi_loaded_images(struct pt_regs * regs)59 static void show_efi_loaded_images(struct pt_regs *regs)
60 {
61 efi_print_image_infos((void *)instruction_pointer(regs));
62 }
63
dump_instr(struct pt_regs * regs)64 static void dump_instr(struct pt_regs *regs)
65 {
66 unsigned long addr = instruction_pointer(regs);
67 const int thumb = thumb_mode(regs);
68 const int width = thumb ? 4 : 8;
69 int i;
70
71 if (thumb)
72 addr &= ~1L;
73 else
74 addr &= ~3L;
75 printf("Code: ");
76 for (i = -4; i < 1 + !!thumb; i++) {
77 unsigned int val;
78
79 if (thumb)
80 val = ((u16 *)addr)[i];
81 else
82 val = ((u32 *)addr)[i];
83 printf(i == 0 ? "(%0*x) " : "%0*x ", width, val);
84 }
85 printf("\n");
86 }
87
show_regs(struct pt_regs * regs)88 void show_regs (struct pt_regs *regs)
89 {
90 unsigned long __maybe_unused flags;
91 const char __maybe_unused *processor_modes[] = {
92 "USER_26", "FIQ_26", "IRQ_26", "SVC_26",
93 "UK4_26", "UK5_26", "UK6_26", "UK7_26",
94 "UK8_26", "UK9_26", "UK10_26", "UK11_26",
95 "UK12_26", "UK13_26", "UK14_26", "UK15_26",
96 "USER_32", "FIQ_32", "IRQ_32", "SVC_32",
97 "UK4_32", "UK5_32", "UK6_32", "ABT_32",
98 "UK8_32", "UK9_32", "HYP_32", "UND_32",
99 "UK12_32", "UK13_32", "UK14_32", "SYS_32",
100 };
101
102 flags = condition_codes (regs);
103
104 printf("pc : [<%08lx>] lr : [<%08lx>]\n",
105 instruction_pointer(regs), regs->ARM_lr);
106 if (gd->flags & GD_FLG_RELOC) {
107 printf("reloc pc : [<%08lx>] lr : [<%08lx>]\n",
108 instruction_pointer(regs) - gd->reloc_off,
109 regs->ARM_lr - gd->reloc_off);
110 }
111 printf("sp : %08lx ip : %08lx fp : %08lx\n",
112 regs->ARM_sp, regs->ARM_ip, regs->ARM_fp);
113 printf ("r10: %08lx r9 : %08lx r8 : %08lx\n",
114 regs->ARM_r10, regs->ARM_r9, regs->ARM_r8);
115 printf ("r7 : %08lx r6 : %08lx r5 : %08lx r4 : %08lx\n",
116 regs->ARM_r7, regs->ARM_r6, regs->ARM_r5, regs->ARM_r4);
117 printf ("r3 : %08lx r2 : %08lx r1 : %08lx r0 : %08lx\n",
118 regs->ARM_r3, regs->ARM_r2, regs->ARM_r1, regs->ARM_r0);
119 printf ("Flags: %c%c%c%c",
120 flags & CC_N_BIT ? 'N' : 'n',
121 flags & CC_Z_BIT ? 'Z' : 'z',
122 flags & CC_C_BIT ? 'C' : 'c', flags & CC_V_BIT ? 'V' : 'v');
123 printf (" IRQs %s FIQs %s Mode %s%s\n",
124 interrupts_enabled (regs) ? "on" : "off",
125 fast_interrupts_enabled (regs) ? "on" : "off",
126 processor_modes[processor_mode (regs)],
127 thumb_mode (regs) ? " (T)" : "");
128 dump_instr(regs);
129 }
130
131 /* fixup PC to point to the instruction leading to the exception */
fixup_pc(struct pt_regs * regs,int offset)132 static inline void fixup_pc(struct pt_regs *regs, int offset)
133 {
134 uint32_t pc = instruction_pointer(regs) + offset;
135 regs->ARM_pc = pc | (regs->ARM_pc & PCMASK);
136 }
137
138 /*
139 * Try to "emulate" a semihosting call in the event that we don't have a
140 * debugger attached.
141 */
smh_emulate_trap(struct pt_regs * regs)142 static bool smh_emulate_trap(struct pt_regs *regs)
143 {
144 if (regs->ARM_cpsr & T_BIT) {
145 u16 *insn = (u16 *)(regs->ARM_pc - 2);
146
147 if (*insn != SMH_T32_SVC)
148 return false;
149 } else {
150 u32 *insn = (u32 *)(regs->ARM_pc - 4);
151
152 if (*insn != SMH_A32_SVC)
153 return false;
154 }
155
156 /* Avoid future semihosting calls */
157 disable_semihosting();
158
159 /* Just pretend the call failed */
160 regs->ARM_r0 = -1;
161 return true;
162 }
163
do_undefined_instruction(struct pt_regs * pt_regs)164 void do_undefined_instruction (struct pt_regs *pt_regs)
165 {
166 efi_restore_gd();
167 printf ("undefined instruction\n");
168 fixup_pc(pt_regs, -4);
169 show_regs (pt_regs);
170 show_efi_loaded_images(pt_regs);
171 bad_mode ();
172 }
173
do_software_interrupt(struct pt_regs * pt_regs)174 void do_software_interrupt (struct pt_regs *pt_regs)
175 {
176 if (CONFIG_IS_ENABLED(SEMIHOSTING_FALLBACK) &&
177 smh_emulate_trap(pt_regs))
178 return;
179
180 efi_restore_gd();
181 printf ("software interrupt\n");
182 fixup_pc(pt_regs, -4);
183 show_regs (pt_regs);
184 show_efi_loaded_images(pt_regs);
185 bad_mode ();
186 }
187
do_prefetch_abort(struct pt_regs * pt_regs)188 void do_prefetch_abort (struct pt_regs *pt_regs)
189 {
190 efi_restore_gd();
191 printf ("prefetch abort\n");
192 fixup_pc(pt_regs, -8);
193 show_regs (pt_regs);
194 show_efi_loaded_images(pt_regs);
195 bad_mode ();
196 }
197
do_data_abort(struct pt_regs * pt_regs)198 void do_data_abort (struct pt_regs *pt_regs)
199 {
200 efi_restore_gd();
201 printf ("data abort\n");
202 fixup_pc(pt_regs, -8);
203 show_regs (pt_regs);
204 show_efi_loaded_images(pt_regs);
205 bad_mode ();
206 }
207
do_not_used(struct pt_regs * pt_regs)208 void do_not_used (struct pt_regs *pt_regs)
209 {
210 efi_restore_gd();
211 printf ("not used\n");
212 fixup_pc(pt_regs, -8);
213 show_regs (pt_regs);
214 show_efi_loaded_images(pt_regs);
215 bad_mode ();
216 }
217
do_fiq(struct pt_regs * pt_regs)218 void do_fiq (struct pt_regs *pt_regs)
219 {
220 efi_restore_gd();
221 printf ("fast interrupt request\n");
222 fixup_pc(pt_regs, -8);
223 show_regs (pt_regs);
224 show_efi_loaded_images(pt_regs);
225 bad_mode ();
226 }
227
do_irq(struct pt_regs * pt_regs)228 void do_irq (struct pt_regs *pt_regs)
229 {
230 efi_restore_gd();
231 printf ("interrupt request\n");
232 fixup_pc(pt_regs, -8);
233 show_regs (pt_regs);
234 show_efi_loaded_images(pt_regs);
235 bad_mode ();
236 }
237