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 <common.h>
22 #include <cpu_func.h>
23 #include <efi_loader.h>
24 #include <irq_func.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(0);
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 
do_undefined_instruction(struct pt_regs * pt_regs)138 void do_undefined_instruction (struct pt_regs *pt_regs)
139 {
140 	efi_restore_gd();
141 	printf ("undefined instruction\n");
142 	fixup_pc(pt_regs, -4);
143 	show_regs (pt_regs);
144 	show_efi_loaded_images(pt_regs);
145 	bad_mode ();
146 }
147 
do_software_interrupt(struct pt_regs * pt_regs)148 void do_software_interrupt (struct pt_regs *pt_regs)
149 {
150 	efi_restore_gd();
151 	printf ("software interrupt\n");
152 	fixup_pc(pt_regs, -4);
153 	show_regs (pt_regs);
154 	show_efi_loaded_images(pt_regs);
155 	bad_mode ();
156 }
157 
do_prefetch_abort(struct pt_regs * pt_regs)158 void do_prefetch_abort (struct pt_regs *pt_regs)
159 {
160 	efi_restore_gd();
161 	printf ("prefetch abort\n");
162 	fixup_pc(pt_regs, -8);
163 	show_regs (pt_regs);
164 	show_efi_loaded_images(pt_regs);
165 	bad_mode ();
166 }
167 
do_data_abort(struct pt_regs * pt_regs)168 void do_data_abort (struct pt_regs *pt_regs)
169 {
170 	efi_restore_gd();
171 	printf ("data abort\n");
172 	fixup_pc(pt_regs, -8);
173 	show_regs (pt_regs);
174 	show_efi_loaded_images(pt_regs);
175 	bad_mode ();
176 }
177 
do_not_used(struct pt_regs * pt_regs)178 void do_not_used (struct pt_regs *pt_regs)
179 {
180 	efi_restore_gd();
181 	printf ("not used\n");
182 	fixup_pc(pt_regs, -8);
183 	show_regs (pt_regs);
184 	show_efi_loaded_images(pt_regs);
185 	bad_mode ();
186 }
187 
do_fiq(struct pt_regs * pt_regs)188 void do_fiq (struct pt_regs *pt_regs)
189 {
190 	efi_restore_gd();
191 	printf ("fast interrupt request\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_irq(struct pt_regs * pt_regs)198 void do_irq (struct pt_regs *pt_regs)
199 {
200 	efi_restore_gd();
201 	printf ("interrupt request\n");
202 	fixup_pc(pt_regs, -8);
203 	show_regs (pt_regs);
204 	show_efi_loaded_images(pt_regs);
205 	bad_mode ();
206 }
207