xref: /openbmc/linux/arch/ia64/kernel/irq_ia64.c (revision c21b37f6)
1 /*
2  * linux/arch/ia64/kernel/irq_ia64.c
3  *
4  * Copyright (C) 1998-2001 Hewlett-Packard Co
5  *	Stephane Eranian <eranian@hpl.hp.com>
6  *	David Mosberger-Tang <davidm@hpl.hp.com>
7  *
8  *  6/10/99: Updated to bring in sync with x86 version to facilitate
9  *	     support for SMP and different interrupt controllers.
10  *
11  * 09/15/00 Goutham Rao <goutham.rao@intel.com> Implemented pci_irq_to_vector
12  *                      PCI to vector allocation routine.
13  * 04/14/2004 Ashok Raj <ashok.raj@intel.com>
14  *						Added CPU Hotplug handling for IPF.
15  */
16 
17 #include <linux/module.h>
18 
19 #include <linux/jiffies.h>
20 #include <linux/errno.h>
21 #include <linux/init.h>
22 #include <linux/interrupt.h>
23 #include <linux/ioport.h>
24 #include <linux/kernel_stat.h>
25 #include <linux/slab.h>
26 #include <linux/ptrace.h>
27 #include <linux/random.h>	/* for rand_initialize_irq() */
28 #include <linux/signal.h>
29 #include <linux/smp.h>
30 #include <linux/threads.h>
31 #include <linux/bitops.h>
32 #include <linux/irq.h>
33 
34 #include <asm/delay.h>
35 #include <asm/intrinsics.h>
36 #include <asm/io.h>
37 #include <asm/hw_irq.h>
38 #include <asm/machvec.h>
39 #include <asm/pgtable.h>
40 #include <asm/system.h>
41 #include <asm/tlbflush.h>
42 
43 #ifdef CONFIG_PERFMON
44 # include <asm/perfmon.h>
45 #endif
46 
47 #define IRQ_DEBUG	0
48 
49 #define IRQ_VECTOR_UNASSIGNED	(0)
50 
51 #define IRQ_UNUSED		(0)
52 #define IRQ_USED		(1)
53 #define IRQ_RSVD		(2)
54 
55 /* These can be overridden in platform_irq_init */
56 int ia64_first_device_vector = IA64_DEF_FIRST_DEVICE_VECTOR;
57 int ia64_last_device_vector = IA64_DEF_LAST_DEVICE_VECTOR;
58 
59 /* default base addr of IPI table */
60 void __iomem *ipi_base_addr = ((void __iomem *)
61 			       (__IA64_UNCACHED_OFFSET | IA64_IPI_DEFAULT_BASE_ADDR));
62 
63 static cpumask_t vector_allocation_domain(int cpu);
64 
65 /*
66  * Legacy IRQ to IA-64 vector translation table.
67  */
68 __u8 isa_irq_to_vector_map[16] = {
69 	/* 8259 IRQ translation, first 16 entries */
70 	0x2f, 0x20, 0x2e, 0x2d, 0x2c, 0x2b, 0x2a, 0x29,
71 	0x28, 0x27, 0x26, 0x25, 0x24, 0x23, 0x22, 0x21
72 };
73 EXPORT_SYMBOL(isa_irq_to_vector_map);
74 
75 DEFINE_SPINLOCK(vector_lock);
76 
77 struct irq_cfg irq_cfg[NR_IRQS] __read_mostly = {
78 	[0 ... NR_IRQS - 1] = {
79 		.vector = IRQ_VECTOR_UNASSIGNED,
80 		.domain = CPU_MASK_NONE
81 	}
82 };
83 
84 DEFINE_PER_CPU(int[IA64_NUM_VECTORS], vector_irq) = {
85 	[0 ... IA64_NUM_VECTORS - 1] = IA64_SPURIOUS_INT_VECTOR
86 };
87 
88 static cpumask_t vector_table[IA64_NUM_VECTORS] = {
89 	[0 ... IA64_NUM_VECTORS - 1] = CPU_MASK_NONE
90 };
91 
92 static int irq_status[NR_IRQS] = {
93 	[0 ... NR_IRQS -1] = IRQ_UNUSED
94 };
95 
96 int check_irq_used(int irq)
97 {
98 	if (irq_status[irq] == IRQ_USED)
99 		return 1;
100 
101 	return -1;
102 }
103 
104 static void reserve_irq(unsigned int irq)
105 {
106 	unsigned long flags;
107 
108 	spin_lock_irqsave(&vector_lock, flags);
109 	irq_status[irq] = IRQ_RSVD;
110 	spin_unlock_irqrestore(&vector_lock, flags);
111 }
112 
113 static inline int find_unassigned_irq(void)
114 {
115 	int irq;
116 
117 	for (irq = IA64_FIRST_DEVICE_VECTOR; irq < NR_IRQS; irq++)
118 		if (irq_status[irq] == IRQ_UNUSED)
119 			return irq;
120 	return -ENOSPC;
121 }
122 
123 static inline int find_unassigned_vector(cpumask_t domain)
124 {
125 	cpumask_t mask;
126 	int pos, vector;
127 
128 	cpus_and(mask, domain, cpu_online_map);
129 	if (cpus_empty(mask))
130 		return -EINVAL;
131 
132 	for (pos = 0; pos < IA64_NUM_DEVICE_VECTORS; pos++) {
133 		vector = IA64_FIRST_DEVICE_VECTOR + pos;
134 		cpus_and(mask, domain, vector_table[vector]);
135 		if (!cpus_empty(mask))
136 			continue;
137 		return vector;
138 	}
139 	return -ENOSPC;
140 }
141 
142 static int __bind_irq_vector(int irq, int vector, cpumask_t domain)
143 {
144 	cpumask_t mask;
145 	int cpu;
146 	struct irq_cfg *cfg = &irq_cfg[irq];
147 
148 	BUG_ON((unsigned)irq >= NR_IRQS);
149 	BUG_ON((unsigned)vector >= IA64_NUM_VECTORS);
150 
151 	cpus_and(mask, domain, cpu_online_map);
152 	if (cpus_empty(mask))
153 		return -EINVAL;
154 	if ((cfg->vector == vector) && cpus_equal(cfg->domain, domain))
155 		return 0;
156 	if (cfg->vector != IRQ_VECTOR_UNASSIGNED)
157 		return -EBUSY;
158 	for_each_cpu_mask(cpu, mask)
159 		per_cpu(vector_irq, cpu)[vector] = irq;
160 	cfg->vector = vector;
161 	cfg->domain = domain;
162 	irq_status[irq] = IRQ_USED;
163 	cpus_or(vector_table[vector], vector_table[vector], domain);
164 	return 0;
165 }
166 
167 int bind_irq_vector(int irq, int vector, cpumask_t domain)
168 {
169 	unsigned long flags;
170 	int ret;
171 
172 	spin_lock_irqsave(&vector_lock, flags);
173 	ret = __bind_irq_vector(irq, vector, domain);
174 	spin_unlock_irqrestore(&vector_lock, flags);
175 	return ret;
176 }
177 
178 static void __clear_irq_vector(int irq)
179 {
180 	int vector, cpu;
181 	cpumask_t mask;
182 	cpumask_t domain;
183 	struct irq_cfg *cfg = &irq_cfg[irq];
184 
185 	BUG_ON((unsigned)irq >= NR_IRQS);
186 	BUG_ON(cfg->vector == IRQ_VECTOR_UNASSIGNED);
187 	vector = cfg->vector;
188 	domain = cfg->domain;
189 	cpus_and(mask, cfg->domain, cpu_online_map);
190 	for_each_cpu_mask(cpu, mask)
191 		per_cpu(vector_irq, cpu)[vector] = IA64_SPURIOUS_INT_VECTOR;
192 	cfg->vector = IRQ_VECTOR_UNASSIGNED;
193 	cfg->domain = CPU_MASK_NONE;
194 	irq_status[irq] = IRQ_UNUSED;
195 	cpus_andnot(vector_table[vector], vector_table[vector], domain);
196 }
197 
198 static void clear_irq_vector(int irq)
199 {
200 	unsigned long flags;
201 
202 	spin_lock_irqsave(&vector_lock, flags);
203 	__clear_irq_vector(irq);
204 	spin_unlock_irqrestore(&vector_lock, flags);
205 }
206 
207 int
208 assign_irq_vector (int irq)
209 {
210 	unsigned long flags;
211 	int vector, cpu;
212 	cpumask_t domain;
213 
214 	vector = -ENOSPC;
215 
216 	spin_lock_irqsave(&vector_lock, flags);
217 	for_each_online_cpu(cpu) {
218 		domain = vector_allocation_domain(cpu);
219 		vector = find_unassigned_vector(domain);
220 		if (vector >= 0)
221 			break;
222 	}
223 	if (vector < 0)
224 		goto out;
225 	if (irq == AUTO_ASSIGN)
226 		irq = vector;
227 	BUG_ON(__bind_irq_vector(irq, vector, domain));
228  out:
229 	spin_unlock_irqrestore(&vector_lock, flags);
230 	return vector;
231 }
232 
233 void
234 free_irq_vector (int vector)
235 {
236 	if (vector < IA64_FIRST_DEVICE_VECTOR ||
237 	    vector > IA64_LAST_DEVICE_VECTOR)
238 		return;
239 	clear_irq_vector(vector);
240 }
241 
242 int
243 reserve_irq_vector (int vector)
244 {
245 	if (vector < IA64_FIRST_DEVICE_VECTOR ||
246 	    vector > IA64_LAST_DEVICE_VECTOR)
247 		return -EINVAL;
248 	return !!bind_irq_vector(vector, vector, CPU_MASK_ALL);
249 }
250 
251 /*
252  * Initialize vector_irq on a new cpu. This function must be called
253  * with vector_lock held.
254  */
255 void __setup_vector_irq(int cpu)
256 {
257 	int irq, vector;
258 
259 	/* Clear vector_irq */
260 	for (vector = 0; vector < IA64_NUM_VECTORS; ++vector)
261 		per_cpu(vector_irq, cpu)[vector] = IA64_SPURIOUS_INT_VECTOR;
262 	/* Mark the inuse vectors */
263 	for (irq = 0; irq < NR_IRQS; ++irq) {
264 		if (!cpu_isset(cpu, irq_cfg[irq].domain))
265 			continue;
266 		vector = irq_to_vector(irq);
267 		per_cpu(vector_irq, cpu)[vector] = irq;
268 	}
269 }
270 
271 #if defined(CONFIG_SMP) && (defined(CONFIG_IA64_GENERIC) || defined(CONFIG_IA64_DIG))
272 static enum vector_domain_type {
273 	VECTOR_DOMAIN_NONE,
274 	VECTOR_DOMAIN_PERCPU
275 } vector_domain_type = VECTOR_DOMAIN_NONE;
276 
277 static cpumask_t vector_allocation_domain(int cpu)
278 {
279 	if (vector_domain_type == VECTOR_DOMAIN_PERCPU)
280 		return cpumask_of_cpu(cpu);
281 	return CPU_MASK_ALL;
282 }
283 
284 static int __init parse_vector_domain(char *arg)
285 {
286 	if (!arg)
287 		return -EINVAL;
288 	if (!strcmp(arg, "percpu")) {
289 		vector_domain_type = VECTOR_DOMAIN_PERCPU;
290 		no_int_routing = 1;
291 	}
292 	return 0;
293 }
294 early_param("vector", parse_vector_domain);
295 #else
296 static cpumask_t vector_allocation_domain(int cpu)
297 {
298 	return CPU_MASK_ALL;
299 }
300 #endif
301 
302 
303 void destroy_and_reserve_irq(unsigned int irq)
304 {
305 	dynamic_irq_cleanup(irq);
306 
307 	clear_irq_vector(irq);
308 	reserve_irq(irq);
309 }
310 
311 static int __reassign_irq_vector(int irq, int cpu)
312 {
313 	struct irq_cfg *cfg = &irq_cfg[irq];
314 	int vector;
315 	cpumask_t domain;
316 
317 	if (cfg->vector == IRQ_VECTOR_UNASSIGNED || !cpu_online(cpu))
318 		return -EINVAL;
319 	if (cpu_isset(cpu, cfg->domain))
320 		return 0;
321 	domain = vector_allocation_domain(cpu);
322 	vector = find_unassigned_vector(domain);
323 	if (vector < 0)
324 		return -ENOSPC;
325 	__clear_irq_vector(irq);
326 	BUG_ON(__bind_irq_vector(irq, vector, domain));
327 	return 0;
328 }
329 
330 int reassign_irq_vector(int irq, int cpu)
331 {
332 	unsigned long flags;
333 	int ret;
334 
335 	spin_lock_irqsave(&vector_lock, flags);
336 	ret = __reassign_irq_vector(irq, cpu);
337 	spin_unlock_irqrestore(&vector_lock, flags);
338 	return ret;
339 }
340 
341 /*
342  * Dynamic irq allocate and deallocation for MSI
343  */
344 int create_irq(void)
345 {
346 	unsigned long flags;
347 	int irq, vector, cpu;
348 	cpumask_t domain;
349 
350 	irq = vector = -ENOSPC;
351 	spin_lock_irqsave(&vector_lock, flags);
352 	for_each_online_cpu(cpu) {
353 		domain = vector_allocation_domain(cpu);
354 		vector = find_unassigned_vector(domain);
355 		if (vector >= 0)
356 			break;
357 	}
358 	if (vector < 0)
359 		goto out;
360 	irq = find_unassigned_irq();
361 	if (irq < 0)
362 		goto out;
363 	BUG_ON(__bind_irq_vector(irq, vector, domain));
364  out:
365 	spin_unlock_irqrestore(&vector_lock, flags);
366 	if (irq >= 0)
367 		dynamic_irq_init(irq);
368 	return irq;
369 }
370 
371 void destroy_irq(unsigned int irq)
372 {
373 	dynamic_irq_cleanup(irq);
374 	clear_irq_vector(irq);
375 }
376 
377 #ifdef CONFIG_SMP
378 #	define IS_RESCHEDULE(vec)	(vec == IA64_IPI_RESCHEDULE)
379 #	define IS_LOCAL_TLB_FLUSH(vec)	(vec == IA64_IPI_LOCAL_TLB_FLUSH)
380 #else
381 #	define IS_RESCHEDULE(vec)	(0)
382 #	define IS_LOCAL_TLB_FLUSH(vec)	(0)
383 #endif
384 /*
385  * That's where the IVT branches when we get an external
386  * interrupt. This branches to the correct hardware IRQ handler via
387  * function ptr.
388  */
389 void
390 ia64_handle_irq (ia64_vector vector, struct pt_regs *regs)
391 {
392 	struct pt_regs *old_regs = set_irq_regs(regs);
393 	unsigned long saved_tpr;
394 
395 #if IRQ_DEBUG
396 	{
397 		unsigned long bsp, sp;
398 
399 		/*
400 		 * Note: if the interrupt happened while executing in
401 		 * the context switch routine (ia64_switch_to), we may
402 		 * get a spurious stack overflow here.  This is
403 		 * because the register and the memory stack are not
404 		 * switched atomically.
405 		 */
406 		bsp = ia64_getreg(_IA64_REG_AR_BSP);
407 		sp = ia64_getreg(_IA64_REG_SP);
408 
409 		if ((sp - bsp) < 1024) {
410 			static unsigned char count;
411 			static long last_time;
412 
413 			if (jiffies - last_time > 5*HZ)
414 				count = 0;
415 			if (++count < 5) {
416 				last_time = jiffies;
417 				printk("ia64_handle_irq: DANGER: less than "
418 				       "1KB of free stack space!!\n"
419 				       "(bsp=0x%lx, sp=%lx)\n", bsp, sp);
420 			}
421 		}
422 	}
423 #endif /* IRQ_DEBUG */
424 
425 	/*
426 	 * Always set TPR to limit maximum interrupt nesting depth to
427 	 * 16 (without this, it would be ~240, which could easily lead
428 	 * to kernel stack overflows).
429 	 */
430 	irq_enter();
431 	saved_tpr = ia64_getreg(_IA64_REG_CR_TPR);
432 	ia64_srlz_d();
433 	while (vector != IA64_SPURIOUS_INT_VECTOR) {
434 		if (unlikely(IS_LOCAL_TLB_FLUSH(vector))) {
435 			smp_local_flush_tlb();
436 			kstat_this_cpu.irqs[vector]++;
437 		} else if (unlikely(IS_RESCHEDULE(vector)))
438 			kstat_this_cpu.irqs[vector]++;
439 		else {
440 			ia64_setreg(_IA64_REG_CR_TPR, vector);
441 			ia64_srlz_d();
442 
443 			generic_handle_irq(local_vector_to_irq(vector));
444 
445 			/*
446 			 * Disable interrupts and send EOI:
447 			 */
448 			local_irq_disable();
449 			ia64_setreg(_IA64_REG_CR_TPR, saved_tpr);
450 		}
451 		ia64_eoi();
452 		vector = ia64_get_ivr();
453 	}
454 	/*
455 	 * This must be done *after* the ia64_eoi().  For example, the keyboard softirq
456 	 * handler needs to be able to wait for further keyboard interrupts, which can't
457 	 * come through until ia64_eoi() has been done.
458 	 */
459 	irq_exit();
460 	set_irq_regs(old_regs);
461 }
462 
463 #ifdef CONFIG_HOTPLUG_CPU
464 /*
465  * This function emulates a interrupt processing when a cpu is about to be
466  * brought down.
467  */
468 void ia64_process_pending_intr(void)
469 {
470 	ia64_vector vector;
471 	unsigned long saved_tpr;
472 	extern unsigned int vectors_in_migration[NR_IRQS];
473 
474 	vector = ia64_get_ivr();
475 
476 	 irq_enter();
477 	 saved_tpr = ia64_getreg(_IA64_REG_CR_TPR);
478 	 ia64_srlz_d();
479 
480 	 /*
481 	  * Perform normal interrupt style processing
482 	  */
483 	while (vector != IA64_SPURIOUS_INT_VECTOR) {
484 		if (unlikely(IS_LOCAL_TLB_FLUSH(vector))) {
485 			smp_local_flush_tlb();
486 			kstat_this_cpu.irqs[vector]++;
487 		} else if (unlikely(IS_RESCHEDULE(vector)))
488 			kstat_this_cpu.irqs[vector]++;
489 		else {
490 			struct pt_regs *old_regs = set_irq_regs(NULL);
491 
492 			ia64_setreg(_IA64_REG_CR_TPR, vector);
493 			ia64_srlz_d();
494 
495 			/*
496 			 * Now try calling normal ia64_handle_irq as it would have got called
497 			 * from a real intr handler. Try passing null for pt_regs, hopefully
498 			 * it will work. I hope it works!.
499 			 * Probably could shared code.
500 			 */
501 			vectors_in_migration[local_vector_to_irq(vector)]=0;
502 			generic_handle_irq(local_vector_to_irq(vector));
503 			set_irq_regs(old_regs);
504 
505 			/*
506 			 * Disable interrupts and send EOI
507 			 */
508 			local_irq_disable();
509 			ia64_setreg(_IA64_REG_CR_TPR, saved_tpr);
510 		}
511 		ia64_eoi();
512 		vector = ia64_get_ivr();
513 	}
514 	irq_exit();
515 }
516 #endif
517 
518 
519 #ifdef CONFIG_SMP
520 
521 static irqreturn_t dummy_handler (int irq, void *dev_id)
522 {
523 	BUG();
524 }
525 extern irqreturn_t handle_IPI (int irq, void *dev_id);
526 
527 static struct irqaction ipi_irqaction = {
528 	.handler =	handle_IPI,
529 	.flags =	IRQF_DISABLED,
530 	.name =		"IPI"
531 };
532 
533 static struct irqaction resched_irqaction = {
534 	.handler =	dummy_handler,
535 	.flags =	IRQF_DISABLED,
536 	.name =		"resched"
537 };
538 
539 static struct irqaction tlb_irqaction = {
540 	.handler =	dummy_handler,
541 	.flags =	IRQF_DISABLED,
542 	.name =		"tlb_flush"
543 };
544 
545 #endif
546 
547 void
548 register_percpu_irq (ia64_vector vec, struct irqaction *action)
549 {
550 	irq_desc_t *desc;
551 	unsigned int irq;
552 
553 	irq = vec;
554 	BUG_ON(bind_irq_vector(irq, vec, CPU_MASK_ALL));
555 	desc = irq_desc + irq;
556 	desc->status |= IRQ_PER_CPU;
557 	desc->chip = &irq_type_ia64_lsapic;
558 	if (action)
559 		setup_irq(irq, action);
560 }
561 
562 void __init
563 init_IRQ (void)
564 {
565 	register_percpu_irq(IA64_SPURIOUS_INT_VECTOR, NULL);
566 #ifdef CONFIG_SMP
567 	register_percpu_irq(IA64_IPI_VECTOR, &ipi_irqaction);
568 	register_percpu_irq(IA64_IPI_RESCHEDULE, &resched_irqaction);
569 	register_percpu_irq(IA64_IPI_LOCAL_TLB_FLUSH, &tlb_irqaction);
570 #endif
571 #ifdef CONFIG_PERFMON
572 	pfm_init_percpu();
573 #endif
574 	platform_irq_init();
575 }
576 
577 void
578 ia64_send_ipi (int cpu, int vector, int delivery_mode, int redirect)
579 {
580 	void __iomem *ipi_addr;
581 	unsigned long ipi_data;
582 	unsigned long phys_cpu_id;
583 
584 #ifdef CONFIG_SMP
585 	phys_cpu_id = cpu_physical_id(cpu);
586 #else
587 	phys_cpu_id = (ia64_getreg(_IA64_REG_CR_LID) >> 16) & 0xffff;
588 #endif
589 
590 	/*
591 	 * cpu number is in 8bit ID and 8bit EID
592 	 */
593 
594 	ipi_data = (delivery_mode << 8) | (vector & 0xff);
595 	ipi_addr = ipi_base_addr + ((phys_cpu_id << 4) | ((redirect & 1) << 3));
596 
597 	writeq(ipi_data, ipi_addr);
598 }
599