Merge tag 'arc-4.9-rc3' of git://git.kernel.org/pub/scm/linux/kernel/git/vgupta/arc
[cascardo/linux.git] / arch / arc / kernel / mcip.c
1 /*
2  * ARC ARConnect (MultiCore IP) support (formerly known as MCIP)
3  *
4  * Copyright (C) 2013 Synopsys, Inc. (www.synopsys.com)
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License version 2 as
8  * published by the Free Software Foundation.
9  */
10
11 #include <linux/smp.h>
12 #include <linux/irq.h>
13 #include <linux/spinlock.h>
14 #include <asm/irqflags-arcv2.h>
15 #include <asm/mcip.h>
16 #include <asm/setup.h>
17
18 static DEFINE_RAW_SPINLOCK(mcip_lock);
19
20 #ifdef CONFIG_SMP
21
22 static char smp_cpuinfo_buf[128];
23
24 static void mcip_setup_per_cpu(int cpu)
25 {
26         smp_ipi_irq_setup(cpu, IPI_IRQ);
27         smp_ipi_irq_setup(cpu, SOFTIRQ_IRQ);
28 }
29
30 static void mcip_ipi_send(int cpu)
31 {
32         unsigned long flags;
33         int ipi_was_pending;
34
35         /* ARConnect can only send IPI to others */
36         if (unlikely(cpu == raw_smp_processor_id())) {
37                 arc_softirq_trigger(SOFTIRQ_IRQ);
38                 return;
39         }
40
41         raw_spin_lock_irqsave(&mcip_lock, flags);
42
43         /*
44          * If receiver already has a pending interrupt, elide sending this one.
45          * Linux cross core calling works well with concurrent IPIs
46          * coalesced into one
47          * see arch/arc/kernel/smp.c: ipi_send_msg_one()
48          */
49         __mcip_cmd(CMD_INTRPT_READ_STATUS, cpu);
50         ipi_was_pending = read_aux_reg(ARC_REG_MCIP_READBACK);
51         if (!ipi_was_pending)
52                 __mcip_cmd(CMD_INTRPT_GENERATE_IRQ, cpu);
53
54         raw_spin_unlock_irqrestore(&mcip_lock, flags);
55 }
56
57 static void mcip_ipi_clear(int irq)
58 {
59         unsigned int cpu, c;
60         unsigned long flags;
61
62         if (unlikely(irq == SOFTIRQ_IRQ)) {
63                 arc_softirq_clear(irq);
64                 return;
65         }
66
67         raw_spin_lock_irqsave(&mcip_lock, flags);
68
69         /* Who sent the IPI */
70         __mcip_cmd(CMD_INTRPT_CHECK_SOURCE, 0);
71
72         cpu = read_aux_reg(ARC_REG_MCIP_READBACK);      /* 1,2,4,8... */
73
74         /*
75          * In rare case, multiple concurrent IPIs sent to same target can
76          * possibly be coalesced by MCIP into 1 asserted IRQ, so @cpus can be
77          * "vectored" (multiple bits sets) as opposed to typical single bit
78          */
79         do {
80                 c = __ffs(cpu);                 /* 0,1,2,3 */
81                 __mcip_cmd(CMD_INTRPT_GENERATE_ACK, c);
82                 cpu &= ~(1U << c);
83         } while (cpu);
84
85         raw_spin_unlock_irqrestore(&mcip_lock, flags);
86 }
87
88 static void mcip_probe_n_setup(void)
89 {
90         struct mcip_bcr mp;
91
92         READ_BCR(ARC_REG_MCIP_BCR, mp);
93
94         sprintf(smp_cpuinfo_buf,
95                 "Extn [SMP]\t: ARConnect (v%d): %d cores with %s%s%s%s%s\n",
96                 mp.ver, mp.num_cores,
97                 IS_AVAIL1(mp.ipi, "IPI "),
98                 IS_AVAIL1(mp.idu, "IDU "),
99                 IS_AVAIL1(mp.llm, "LLM "),
100                 IS_AVAIL1(mp.dbg, "DEBUG "),
101                 IS_AVAIL1(mp.gfrc, "GFRC"));
102
103         cpuinfo_arc700[0].extn.gfrc = mp.gfrc;
104
105         if (mp.dbg) {
106                 __mcip_cmd_data(CMD_DEBUG_SET_SELECT, 0, 0xf);
107                 __mcip_cmd_data(CMD_DEBUG_SET_MASK, 0xf, 0xf);
108         }
109 }
110
111 struct plat_smp_ops plat_smp_ops = {
112         .info           = smp_cpuinfo_buf,
113         .init_early_smp = mcip_probe_n_setup,
114         .init_per_cpu   = mcip_setup_per_cpu,
115         .ipi_send       = mcip_ipi_send,
116         .ipi_clear      = mcip_ipi_clear,
117 };
118
119 #endif
120
121 /***************************************************************************
122  * ARCv2 Interrupt Distribution Unit (IDU)
123  *
124  * Connects external "COMMON" IRQs to core intc, providing:
125  *  -dynamic routing (IRQ affinity)
126  *  -load balancing (Round Robin interrupt distribution)
127  *  -1:N distribution
128  *
129  * It physically resides in the MCIP hw block
130  */
131
132 #include <linux/irqchip.h>
133 #include <linux/of.h>
134 #include <linux/of_irq.h>
135
136 /*
137  * Set the DEST for @cmn_irq to @cpu_mask (1 bit per core)
138  */
139 static void idu_set_dest(unsigned int cmn_irq, unsigned int cpu_mask)
140 {
141         __mcip_cmd_data(CMD_IDU_SET_DEST, cmn_irq, cpu_mask);
142 }
143
144 static void idu_set_mode(unsigned int cmn_irq, unsigned int lvl,
145                            unsigned int distr)
146 {
147         union {
148                 unsigned int word;
149                 struct {
150                         unsigned int distr:2, pad:2, lvl:1, pad2:27;
151                 };
152         } data;
153
154         data.distr = distr;
155         data.lvl = lvl;
156         __mcip_cmd_data(CMD_IDU_SET_MODE, cmn_irq, data.word);
157 }
158
159 static void idu_irq_mask(struct irq_data *data)
160 {
161         unsigned long flags;
162
163         raw_spin_lock_irqsave(&mcip_lock, flags);
164         __mcip_cmd_data(CMD_IDU_SET_MASK, data->hwirq, 1);
165         raw_spin_unlock_irqrestore(&mcip_lock, flags);
166 }
167
168 static void idu_irq_unmask(struct irq_data *data)
169 {
170         unsigned long flags;
171
172         raw_spin_lock_irqsave(&mcip_lock, flags);
173         __mcip_cmd_data(CMD_IDU_SET_MASK, data->hwirq, 0);
174         raw_spin_unlock_irqrestore(&mcip_lock, flags);
175 }
176
177 #ifdef CONFIG_SMP
178 static int
179 idu_irq_set_affinity(struct irq_data *data, const struct cpumask *cpumask,
180                      bool force)
181 {
182         unsigned long flags;
183         cpumask_t online;
184
185         /* errout if no online cpu per @cpumask */
186         if (!cpumask_and(&online, cpumask, cpu_online_mask))
187                 return -EINVAL;
188
189         raw_spin_lock_irqsave(&mcip_lock, flags);
190
191         idu_set_dest(data->hwirq, cpumask_bits(&online)[0]);
192         idu_set_mode(data->hwirq, IDU_M_TRIG_LEVEL, IDU_M_DISTRI_RR);
193
194         raw_spin_unlock_irqrestore(&mcip_lock, flags);
195
196         return IRQ_SET_MASK_OK;
197 }
198 #endif
199
200 static struct irq_chip idu_irq_chip = {
201         .name                   = "MCIP IDU Intc",
202         .irq_mask               = idu_irq_mask,
203         .irq_unmask             = idu_irq_unmask,
204 #ifdef CONFIG_SMP
205         .irq_set_affinity       = idu_irq_set_affinity,
206 #endif
207
208 };
209
210 static int idu_first_irq;
211
212 static void idu_cascade_isr(struct irq_desc *desc)
213 {
214         struct irq_domain *domain = irq_desc_get_handler_data(desc);
215         unsigned int core_irq = irq_desc_get_irq(desc);
216         unsigned int idu_irq;
217
218         idu_irq = core_irq - idu_first_irq;
219         generic_handle_irq(irq_find_mapping(domain, idu_irq));
220 }
221
222 static int idu_irq_map(struct irq_domain *d, unsigned int virq, irq_hw_number_t hwirq)
223 {
224         irq_set_chip_and_handler(virq, &idu_irq_chip, handle_level_irq);
225         irq_set_status_flags(virq, IRQ_MOVE_PCNTXT);
226
227         return 0;
228 }
229
230 static int idu_irq_xlate(struct irq_domain *d, struct device_node *n,
231                          const u32 *intspec, unsigned int intsize,
232                          irq_hw_number_t *out_hwirq, unsigned int *out_type)
233 {
234         irq_hw_number_t hwirq = *out_hwirq = intspec[0];
235         int distri = intspec[1];
236         unsigned long flags;
237
238         *out_type = IRQ_TYPE_NONE;
239
240         /* XXX: validate distribution scheme again online cpu mask */
241         if (distri == 0) {
242                 /* 0 - Round Robin to all cpus, otherwise 1 bit per core */
243                 raw_spin_lock_irqsave(&mcip_lock, flags);
244                 idu_set_dest(hwirq, BIT(num_online_cpus()) - 1);
245                 idu_set_mode(hwirq, IDU_M_TRIG_LEVEL, IDU_M_DISTRI_RR);
246                 raw_spin_unlock_irqrestore(&mcip_lock, flags);
247         } else {
248                 /*
249                  * DEST based distribution for Level Triggered intr can only
250                  * have 1 CPU, so generalize it to always contain 1 cpu
251                  */
252                 int cpu = ffs(distri);
253
254                 if (cpu != fls(distri))
255                         pr_warn("IDU irq %lx distri mode set to cpu %x\n",
256                                 hwirq, cpu);
257
258                 raw_spin_lock_irqsave(&mcip_lock, flags);
259                 idu_set_dest(hwirq, cpu);
260                 idu_set_mode(hwirq, IDU_M_TRIG_LEVEL, IDU_M_DISTRI_DEST);
261                 raw_spin_unlock_irqrestore(&mcip_lock, flags);
262         }
263
264         return 0;
265 }
266
267 static const struct irq_domain_ops idu_irq_ops = {
268         .xlate  = idu_irq_xlate,
269         .map    = idu_irq_map,
270 };
271
272 /*
273  * [16, 23]: Statically assigned always private-per-core (Timers, WDT, IPI)
274  * [24, 23+C]: If C > 0 then "C" common IRQs
275  * [24+C, N]: Not statically assigned, private-per-core
276  */
277
278
279 static int __init
280 idu_of_init(struct device_node *intc, struct device_node *parent)
281 {
282         struct irq_domain *domain;
283         /* Read IDU BCR to confirm nr_irqs */
284         int nr_irqs = of_irq_count(intc);
285         int i, irq;
286         struct mcip_bcr mp;
287
288         READ_BCR(ARC_REG_MCIP_BCR, mp);
289
290         if (!mp.idu)
291                 panic("IDU not detected, but DeviceTree using it");
292
293         pr_info("MCIP: IDU referenced from Devicetree %d irqs\n", nr_irqs);
294
295         domain = irq_domain_add_linear(intc, nr_irqs, &idu_irq_ops, NULL);
296
297         /* Parent interrupts (core-intc) are already mapped */
298
299         for (i = 0; i < nr_irqs; i++) {
300                 /*
301                  * Return parent uplink IRQs (towards core intc) 24,25,.....
302                  * this step has been done before already
303                  * however we need it to get the parent virq and set IDU handler
304                  * as first level isr
305                  */
306                 irq = irq_of_parse_and_map(intc, i);
307                 if (!i)
308                         idu_first_irq = irq;
309
310                 irq_set_chained_handler_and_data(irq, idu_cascade_isr, domain);
311         }
312
313         __mcip_cmd(CMD_IDU_ENABLE, 0);
314
315         return 0;
316 }
317 IRQCHIP_DECLARE(arcv2_idu_intc, "snps,archs-idu-intc", idu_of_init);