| /* |
| * This program is free software; you can redistribute it and/or modify it |
| * under the terms of the GNU General Public License version 2 as published |
| * by the Free Software Foundation. |
| * |
| * Copyright (C) 2010 John Crispin <john@phrozen.org> |
| * Copyright (C) 2010 Thomas Langer <thomas.langer@lantiq.com> |
| */ |
| |
| #include <linux/interrupt.h> |
| #include <linux/ioport.h> |
| #include <linux/sched.h> |
| #include <linux/irqdomain.h> |
| #include <linux/of_platform.h> |
| #include <linux/of_address.h> |
| #include <linux/of_irq.h> |
| |
| #include <asm/bootinfo.h> |
| #include <asm/irq_cpu.h> |
| |
| #include <lantiq_soc.h> |
| #include <irq.h> |
| |
| /* register definitions - internal irqs */ |
| #define LTQ_ICU_IM0_ISR 0x0000 |
| #define LTQ_ICU_IM0_IER 0x0008 |
| #define LTQ_ICU_IM0_IOSR 0x0010 |
| #define LTQ_ICU_IM0_IRSR 0x0018 |
| #define LTQ_ICU_IM0_IMR 0x0020 |
| #define LTQ_ICU_IM1_ISR 0x0028 |
| #define LTQ_ICU_OFFSET (LTQ_ICU_IM1_ISR - LTQ_ICU_IM0_ISR) |
| |
| /* register definitions - external irqs */ |
| #define LTQ_EIU_EXIN_C 0x0000 |
| #define LTQ_EIU_EXIN_INIC 0x0004 |
| #define LTQ_EIU_EXIN_INC 0x0008 |
| #define LTQ_EIU_EXIN_INEN 0x000C |
| |
| /* number of external interrupts */ |
| #define MAX_EIU 6 |
| |
| /* the performance counter */ |
| #define LTQ_PERF_IRQ (INT_NUM_IM4_IRL0 + 31) |
| |
| /* |
| * irqs generated by devices attached to the EBU need to be acked in |
| * a special manner |
| */ |
| #define LTQ_ICU_EBU_IRQ 22 |
| |
| #define ltq_icu_w32(m, x, y) ltq_w32((x), ltq_icu_membase[m] + (y)) |
| #define ltq_icu_r32(m, x) ltq_r32(ltq_icu_membase[m] + (x)) |
| |
| #define ltq_eiu_w32(x, y) ltq_w32((x), ltq_eiu_membase + (y)) |
| #define ltq_eiu_r32(x) ltq_r32(ltq_eiu_membase + (x)) |
| |
| /* our 2 ipi interrupts for VSMP */ |
| #define MIPS_CPU_IPI_RESCHED_IRQ 0 |
| #define MIPS_CPU_IPI_CALL_IRQ 1 |
| |
| /* we have a cascade of 8 irqs */ |
| #define MIPS_CPU_IRQ_CASCADE 8 |
| |
| static int exin_avail; |
| static u32 ltq_eiu_irq[MAX_EIU]; |
| static void __iomem *ltq_icu_membase[MAX_IM]; |
| static void __iomem *ltq_eiu_membase; |
| static struct irq_domain *ltq_domain; |
| static int ltq_perfcount_irq; |
| |
| int ltq_eiu_get_irq(int exin) |
| { |
| if (exin < exin_avail) |
| return ltq_eiu_irq[exin]; |
| return -1; |
| } |
| |
| void ltq_disable_irq(struct irq_data *d) |
| { |
| u32 ier = LTQ_ICU_IM0_IER; |
| int offset = d->hwirq - MIPS_CPU_IRQ_CASCADE; |
| int im = offset / INT_NUM_IM_OFFSET; |
| |
| offset %= INT_NUM_IM_OFFSET; |
| ltq_icu_w32(im, ltq_icu_r32(im, ier) & ~BIT(offset), ier); |
| } |
| |
| void ltq_mask_and_ack_irq(struct irq_data *d) |
| { |
| u32 ier = LTQ_ICU_IM0_IER; |
| u32 isr = LTQ_ICU_IM0_ISR; |
| int offset = d->hwirq - MIPS_CPU_IRQ_CASCADE; |
| int im = offset / INT_NUM_IM_OFFSET; |
| |
| offset %= INT_NUM_IM_OFFSET; |
| ltq_icu_w32(im, ltq_icu_r32(im, ier) & ~BIT(offset), ier); |
| ltq_icu_w32(im, BIT(offset), isr); |
| } |
| |
| static void ltq_ack_irq(struct irq_data *d) |
| { |
| u32 isr = LTQ_ICU_IM0_ISR; |
| int offset = d->hwirq - MIPS_CPU_IRQ_CASCADE; |
| int im = offset / INT_NUM_IM_OFFSET; |
| |
| offset %= INT_NUM_IM_OFFSET; |
| ltq_icu_w32(im, BIT(offset), isr); |
| } |
| |
| void ltq_enable_irq(struct irq_data *d) |
| { |
| u32 ier = LTQ_ICU_IM0_IER; |
| int offset = d->hwirq - MIPS_CPU_IRQ_CASCADE; |
| int im = offset / INT_NUM_IM_OFFSET; |
| |
| offset %= INT_NUM_IM_OFFSET; |
| ltq_icu_w32(im, ltq_icu_r32(im, ier) | BIT(offset), ier); |
| } |
| |
| static int ltq_eiu_settype(struct irq_data *d, unsigned int type) |
| { |
| int i; |
| |
| for (i = 0; i < exin_avail; i++) { |
| if (d->hwirq == ltq_eiu_irq[i]) { |
| int val = 0; |
| int edge = 0; |
| |
| switch (type) { |
| case IRQF_TRIGGER_NONE: |
| break; |
| case IRQF_TRIGGER_RISING: |
| val = 1; |
| edge = 1; |
| break; |
| case IRQF_TRIGGER_FALLING: |
| val = 2; |
| edge = 1; |
| break; |
| case IRQF_TRIGGER_RISING | IRQF_TRIGGER_FALLING: |
| val = 3; |
| edge = 1; |
| break; |
| case IRQF_TRIGGER_HIGH: |
| val = 5; |
| break; |
| case IRQF_TRIGGER_LOW: |
| val = 6; |
| break; |
| default: |
| pr_err("invalid type %d for irq %ld\n", |
| type, d->hwirq); |
| return -EINVAL; |
| } |
| |
| if (edge) |
| irq_set_handler(d->hwirq, handle_edge_irq); |
| |
| ltq_eiu_w32((ltq_eiu_r32(LTQ_EIU_EXIN_C) & |
| (~(7 << (i * 4)))) | (val << (i * 4)), |
| LTQ_EIU_EXIN_C); |
| } |
| } |
| |
| return 0; |
| } |
| |
| static unsigned int ltq_startup_eiu_irq(struct irq_data *d) |
| { |
| int i; |
| |
| ltq_enable_irq(d); |
| for (i = 0; i < exin_avail; i++) { |
| if (d->hwirq == ltq_eiu_irq[i]) { |
| /* by default we are low level triggered */ |
| ltq_eiu_settype(d, IRQF_TRIGGER_LOW); |
| /* clear all pending */ |
| ltq_eiu_w32(ltq_eiu_r32(LTQ_EIU_EXIN_INC) & ~BIT(i), |
| LTQ_EIU_EXIN_INC); |
| /* enable */ |
| ltq_eiu_w32(ltq_eiu_r32(LTQ_EIU_EXIN_INEN) | BIT(i), |
| LTQ_EIU_EXIN_INEN); |
| break; |
| } |
| } |
| |
| return 0; |
| } |
| |
| static void ltq_shutdown_eiu_irq(struct irq_data *d) |
| { |
| int i; |
| |
| ltq_disable_irq(d); |
| for (i = 0; i < exin_avail; i++) { |
| if (d->hwirq == ltq_eiu_irq[i]) { |
| /* disable */ |
| ltq_eiu_w32(ltq_eiu_r32(LTQ_EIU_EXIN_INEN) & ~BIT(i), |
| LTQ_EIU_EXIN_INEN); |
| break; |
| } |
| } |
| } |
| |
| static struct irq_chip ltq_irq_type = { |
| .name = "icu", |
| .irq_enable = ltq_enable_irq, |
| .irq_disable = ltq_disable_irq, |
| .irq_unmask = ltq_enable_irq, |
| .irq_ack = ltq_ack_irq, |
| .irq_mask = ltq_disable_irq, |
| .irq_mask_ack = ltq_mask_and_ack_irq, |
| }; |
| |
| static struct irq_chip ltq_eiu_type = { |
| .name = "eiu", |
| .irq_startup = ltq_startup_eiu_irq, |
| .irq_shutdown = ltq_shutdown_eiu_irq, |
| .irq_enable = ltq_enable_irq, |
| .irq_disable = ltq_disable_irq, |
| .irq_unmask = ltq_enable_irq, |
| .irq_ack = ltq_ack_irq, |
| .irq_mask = ltq_disable_irq, |
| .irq_mask_ack = ltq_mask_and_ack_irq, |
| .irq_set_type = ltq_eiu_settype, |
| }; |
| |
| static void ltq_hw_irq_handler(struct irq_desc *desc) |
| { |
| int module = irq_desc_get_irq(desc) - 2; |
| u32 irq; |
| int hwirq; |
| |
| irq = ltq_icu_r32(module, LTQ_ICU_IM0_IOSR); |
| if (irq == 0) |
| return; |
| |
| /* |
| * silicon bug causes only the msb set to 1 to be valid. all |
| * other bits might be bogus |
| */ |
| irq = __fls(irq); |
| hwirq = irq + MIPS_CPU_IRQ_CASCADE + (INT_NUM_IM_OFFSET * module); |
| generic_handle_irq(irq_linear_revmap(ltq_domain, hwirq)); |
| |
| /* if this is a EBU irq, we need to ack it or get a deadlock */ |
| if ((irq == LTQ_ICU_EBU_IRQ) && (module == 0) && LTQ_EBU_PCC_ISTAT) |
| ltq_ebu_w32(ltq_ebu_r32(LTQ_EBU_PCC_ISTAT) | 0x10, |
| LTQ_EBU_PCC_ISTAT); |
| } |
| |
| static int icu_map(struct irq_domain *d, unsigned int irq, irq_hw_number_t hw) |
| { |
| struct irq_chip *chip = <q_irq_type; |
| int i; |
| |
| if (hw < MIPS_CPU_IRQ_CASCADE) |
| return 0; |
| |
| for (i = 0; i < exin_avail; i++) |
| if (hw == ltq_eiu_irq[i]) |
| chip = <q_eiu_type; |
| |
| irq_set_chip_and_handler(irq, chip, handle_level_irq); |
| |
| return 0; |
| } |
| |
| static const struct irq_domain_ops irq_domain_ops = { |
| .xlate = irq_domain_xlate_onetwocell, |
| .map = icu_map, |
| }; |
| |
| int __init icu_of_init(struct device_node *node, struct device_node *parent) |
| { |
| struct device_node *eiu_node; |
| struct resource res; |
| int i, ret; |
| |
| for (i = 0; i < MAX_IM; i++) { |
| if (of_address_to_resource(node, i, &res)) |
| panic("Failed to get icu memory range"); |
| |
| if (!request_mem_region(res.start, resource_size(&res), |
| res.name)) |
| pr_err("Failed to request icu memory"); |
| |
| ltq_icu_membase[i] = ioremap_nocache(res.start, |
| resource_size(&res)); |
| if (!ltq_icu_membase[i]) |
| panic("Failed to remap icu memory"); |
| } |
| |
| /* turn off all irqs by default */ |
| for (i = 0; i < MAX_IM; i++) { |
| /* make sure all irqs are turned off by default */ |
| ltq_icu_w32(i, 0, LTQ_ICU_IM0_IER); |
| /* clear all possibly pending interrupts */ |
| ltq_icu_w32(i, ~0, LTQ_ICU_IM0_ISR); |
| } |
| |
| mips_cpu_irq_init(); |
| |
| for (i = 0; i < MAX_IM; i++) |
| irq_set_chained_handler(i + 2, ltq_hw_irq_handler); |
| |
| ltq_domain = irq_domain_add_linear(node, |
| (MAX_IM * INT_NUM_IM_OFFSET) + MIPS_CPU_IRQ_CASCADE, |
| &irq_domain_ops, 0); |
| |
| /* tell oprofile which irq to use */ |
| ltq_perfcount_irq = irq_create_mapping(ltq_domain, LTQ_PERF_IRQ); |
| |
| /* |
| * if the timer irq is not one of the mips irqs we need to |
| * create a mapping |
| */ |
| if (MIPS_CPU_TIMER_IRQ != 7) |
| irq_create_mapping(ltq_domain, MIPS_CPU_TIMER_IRQ); |
| |
| /* the external interrupts are optional and xway only */ |
| eiu_node = of_find_compatible_node(NULL, NULL, "lantiq,eiu-xway"); |
| if (eiu_node && !of_address_to_resource(eiu_node, 0, &res)) { |
| /* find out how many external irq sources we have */ |
| exin_avail = of_property_count_u32_elems(eiu_node, |
| "lantiq,eiu-irqs"); |
| |
| if (exin_avail > MAX_EIU) |
| exin_avail = MAX_EIU; |
| |
| ret = of_property_read_u32_array(eiu_node, "lantiq,eiu-irqs", |
| ltq_eiu_irq, exin_avail); |
| if (ret) |
| panic("failed to load external irq resources"); |
| |
| if (!request_mem_region(res.start, resource_size(&res), |
| res.name)) |
| pr_err("Failed to request eiu memory"); |
| |
| ltq_eiu_membase = ioremap_nocache(res.start, |
| resource_size(&res)); |
| if (!ltq_eiu_membase) |
| panic("Failed to remap eiu memory"); |
| } |
| |
| return 0; |
| } |
| |
| int get_c0_perfcount_int(void) |
| { |
| return ltq_perfcount_irq; |
| } |
| EXPORT_SYMBOL_GPL(get_c0_perfcount_int); |
| |
| unsigned int get_c0_compare_int(void) |
| { |
| return MIPS_CPU_TIMER_IRQ; |
| } |
| |
| static struct of_device_id __initdata of_irq_ids[] = { |
| { .compatible = "lantiq,icu", .data = icu_of_init }, |
| {}, |
| }; |
| |
| void __init arch_init_irq(void) |
| { |
| of_irq_init(of_irq_ids); |
| } |