xref: /linux/arch/alpha/kernel/irq_alpha.c (revision 979f867191f80e74713394cf8c0a3c1b3662b648)
1 /*
2  * Alpha specific irq code.
3  */
4 
5 #include <linux/init.h>
6 #include <linux/sched.h>
7 #include <linux/irq.h>
8 #include <linux/kernel_stat.h>
9 #include <linux/module.h>
10 
11 #include <asm/machvec.h>
12 #include <asm/dma.h>
13 #include <asm/perf_event.h>
14 
15 #include "proto.h"
16 #include "irq_impl.h"
17 
18 /* Hack minimum IPL during interrupt processing for broken hardware.  */
19 #ifdef CONFIG_ALPHA_BROKEN_IRQ_MASK
20 int __min_ipl;
21 EXPORT_SYMBOL(__min_ipl);
22 #endif
23 
24 /*
25  * Performance counter hook.  A module can override this to
26  * do something useful.
27  */
28 static void
29 dummy_perf(unsigned long vector, struct pt_regs *regs)
30 {
31 	irq_err_count++;
32 	printk(KERN_CRIT "Performance counter interrupt!\n");
33 }
34 
35 void (*perf_irq)(unsigned long, struct pt_regs *) = dummy_perf;
36 EXPORT_SYMBOL(perf_irq);
37 
38 /*
39  * The main interrupt entry point.
40  */
41 
42 asmlinkage void
43 do_entInt(unsigned long type, unsigned long vector,
44 	  unsigned long la_ptr, struct pt_regs *regs)
45 {
46 	struct pt_regs *old_regs;
47 	switch (type) {
48 	case 0:
49 #ifdef CONFIG_SMP
50 		handle_ipi(regs);
51 		return;
52 #else
53 		irq_err_count++;
54 		printk(KERN_CRIT "Interprocessor interrupt? "
55 		       "You must be kidding!\n");
56 #endif
57 		break;
58 	case 1:
59 		old_regs = set_irq_regs(regs);
60 #ifdef CONFIG_SMP
61 	  {
62 		long cpu;
63 
64 		local_irq_disable();
65 		smp_percpu_timer_interrupt(regs);
66 		cpu = smp_processor_id();
67 		if (cpu != boot_cpuid) {
68 		        kstat_incr_irqs_this_cpu(RTC_IRQ, irq_to_desc(RTC_IRQ));
69 		} else {
70 			handle_irq(RTC_IRQ);
71 		}
72 	  }
73 #else
74 		handle_irq(RTC_IRQ);
75 #endif
76 		set_irq_regs(old_regs);
77 		return;
78 	case 2:
79 		old_regs = set_irq_regs(regs);
80 		alpha_mv.machine_check(vector, la_ptr);
81 		set_irq_regs(old_regs);
82 		return;
83 	case 3:
84 		old_regs = set_irq_regs(regs);
85 		alpha_mv.device_interrupt(vector);
86 		set_irq_regs(old_regs);
87 		return;
88 	case 4:
89 		perf_irq(la_ptr, regs);
90 		return;
91 	default:
92 		printk(KERN_CRIT "Hardware intr %ld %lx? Huh?\n",
93 		       type, vector);
94 	}
95 	printk(KERN_CRIT "PC = %016lx PS=%04lx\n", regs->pc, regs->ps);
96 }
97 
98 void __init
99 common_init_isa_dma(void)
100 {
101 	outb(0, DMA1_RESET_REG);
102 	outb(0, DMA2_RESET_REG);
103 	outb(0, DMA1_CLR_MASK_REG);
104 	outb(0, DMA2_CLR_MASK_REG);
105 }
106 
107 void __init
108 init_IRQ(void)
109 {
110 	/* Just in case the platform init_irq() causes interrupts/mchecks
111 	   (as is the case with RAWHIDE, at least).  */
112 	wrent(entInt, 0);
113 
114 	alpha_mv.init_irq();
115 
116 	init_hw_perf_events();
117 }
118 
119 /*
120  * machine error checks
121  */
122 #define MCHK_K_TPERR           0x0080
123 #define MCHK_K_TCPERR          0x0082
124 #define MCHK_K_HERR            0x0084
125 #define MCHK_K_ECC_C           0x0086
126 #define MCHK_K_ECC_NC          0x0088
127 #define MCHK_K_OS_BUGCHECK     0x008A
128 #define MCHK_K_PAL_BUGCHECK    0x0090
129 
130 #ifndef CONFIG_SMP
131 struct mcheck_info __mcheck_info;
132 #endif
133 
134 void
135 process_mcheck_info(unsigned long vector, unsigned long la_ptr,
136 		    const char *machine, int expected)
137 {
138 	struct el_common *mchk_header;
139 	const char *reason;
140 
141 	/*
142 	 * See if the machine check is due to a badaddr() and if so,
143 	 * ignore it.
144 	 */
145 
146 #ifdef CONFIG_VERBOSE_MCHECK
147 	if (alpha_verbose_mcheck > 1) {
148 		printk(KERN_CRIT "%s machine check %s\n", machine,
149 		       expected ? "expected." : "NOT expected!!!");
150 	}
151 #endif
152 
153 	if (expected) {
154 		int cpu = smp_processor_id();
155 		mcheck_expected(cpu) = 0;
156 		mcheck_taken(cpu) = 1;
157 		return;
158 	}
159 
160 	mchk_header = (struct el_common *)la_ptr;
161 
162 	printk(KERN_CRIT "%s machine check: vector=0x%lx pc=0x%lx code=0x%x\n",
163 	       machine, vector, get_irq_regs()->pc, mchk_header->code);
164 
165 	switch (mchk_header->code) {
166 	/* Machine check reasons.  Defined according to PALcode sources.  */
167 	case 0x80: reason = "tag parity error"; break;
168 	case 0x82: reason = "tag control parity error"; break;
169 	case 0x84: reason = "generic hard error"; break;
170 	case 0x86: reason = "correctable ECC error"; break;
171 	case 0x88: reason = "uncorrectable ECC error"; break;
172 	case 0x8A: reason = "OS-specific PAL bugcheck"; break;
173 	case 0x90: reason = "callsys in kernel mode"; break;
174 	case 0x96: reason = "i-cache read retryable error"; break;
175 	case 0x98: reason = "processor detected hard error"; break;
176 
177 	/* System specific (these are for Alcor, at least): */
178 	case 0x202: reason = "system detected hard error"; break;
179 	case 0x203: reason = "system detected uncorrectable ECC error"; break;
180 	case 0x204: reason = "SIO SERR occurred on PCI bus"; break;
181 	case 0x205: reason = "parity error detected by core logic"; break;
182 	case 0x206: reason = "SIO IOCHK occurred on ISA bus"; break;
183 	case 0x207: reason = "non-existent memory error"; break;
184 	case 0x208: reason = "MCHK_K_DCSR"; break;
185 	case 0x209: reason = "PCI SERR detected"; break;
186 	case 0x20b: reason = "PCI data parity error detected"; break;
187 	case 0x20d: reason = "PCI address parity error detected"; break;
188 	case 0x20f: reason = "PCI master abort error"; break;
189 	case 0x211: reason = "PCI target abort error"; break;
190 	case 0x213: reason = "scatter/gather PTE invalid error"; break;
191 	case 0x215: reason = "flash ROM write error"; break;
192 	case 0x217: reason = "IOA timeout detected"; break;
193 	case 0x219: reason = "IOCHK#, EISA add-in board parity or other catastrophic error"; break;
194 	case 0x21b: reason = "EISA fail-safe timer timeout"; break;
195 	case 0x21d: reason = "EISA bus time-out"; break;
196 	case 0x21f: reason = "EISA software generated NMI"; break;
197 	case 0x221: reason = "unexpected ev5 IRQ[3] interrupt"; break;
198 	default: reason = "unknown"; break;
199 	}
200 
201 	printk(KERN_CRIT "machine check type: %s%s\n",
202 	       reason, mchk_header->retry ? " (retryable)" : "");
203 
204 	dik_show_regs(get_irq_regs(), NULL);
205 
206 #ifdef CONFIG_VERBOSE_MCHECK
207 	if (alpha_verbose_mcheck > 1) {
208 		/* Dump the logout area to give all info.  */
209 		unsigned long *ptr = (unsigned long *)la_ptr;
210 		long i;
211 		for (i = 0; i < mchk_header->size / sizeof(long); i += 2) {
212 			printk(KERN_CRIT "   +%8lx %016lx %016lx\n",
213 			       i*sizeof(long), ptr[i], ptr[i+1]);
214 		}
215 	}
216 #endif /* CONFIG_VERBOSE_MCHECK */
217 }
218 
219 /*
220  * The special RTC interrupt type.  The interrupt itself was
221  * processed by PALcode, and comes in via entInt vector 1.
222  */
223 
224 static void rtc_enable_disable(unsigned int irq) { }
225 static unsigned int rtc_startup(unsigned int irq) { return 0; }
226 
227 struct irqaction timer_irqaction = {
228 	.handler	= timer_interrupt,
229 	.flags		= IRQF_DISABLED,
230 	.name		= "timer",
231 };
232 
233 static struct irq_chip rtc_irq_type = {
234 	.name		= "RTC",
235 	.startup	= rtc_startup,
236 	.shutdown	= rtc_enable_disable,
237 	.enable		= rtc_enable_disable,
238 	.disable	= rtc_enable_disable,
239 	.ack		= rtc_enable_disable,
240 	.end		= rtc_enable_disable,
241 };
242 
243 void __init
244 init_rtc_irq(void)
245 {
246 	irq_desc[RTC_IRQ].status = IRQ_DISABLED;
247 	irq_desc[RTC_IRQ].chip = &rtc_irq_type;
248 	setup_irq(RTC_IRQ, &timer_irqaction);
249 }
250 
251 /* Dummy irqactions.  */
252 struct irqaction isa_cascade_irqaction = {
253 	.handler	= no_action,
254 	.name		= "isa-cascade"
255 };
256 
257 struct irqaction timer_cascade_irqaction = {
258 	.handler	= no_action,
259 	.name		= "timer-cascade"
260 };
261 
262 struct irqaction halt_switch_irqaction = {
263 	.handler	= no_action,
264 	.name		= "halt-switch"
265 };
266