MIPS: microMIPS: Floating point support.
[deliverable/linux.git] / arch / mips / kernel / smtc.c
CommitLineData
8531a35e
KK
1/*
2 * This program is free software; you can redistribute it and/or
3 * modify it under the terms of the GNU General Public License
4 * as published by the Free Software Foundation; either version 2
5 * of the License, or (at your option) any later version.
6 *
7 * This program is distributed in the hope that it will be useful,
8 * but WITHOUT ANY WARRANTY; without even the implied warranty of
9 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
10 * GNU General Public License for more details.
11 *
12 * You should have received a copy of the GNU General Public License
13 * along with this program; if not, write to the Free Software
14 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
15 *
16 * Copyright (C) 2004 Mips Technologies, Inc
17 * Copyright (C) 2008 Kevin D. Kissell
18 */
41c594ab 19
ea580401 20#include <linux/clockchips.h>
41c594ab
RB
21#include <linux/kernel.h>
22#include <linux/sched.h>
631330f5 23#include <linux/smp.h>
41c594ab
RB
24#include <linux/cpumask.h>
25#include <linux/interrupt.h>
ae036b79 26#include <linux/kernel_stat.h>
ec43c014 27#include <linux/module.h>
8f99a162 28#include <linux/ftrace.h>
5a0e3ad6 29#include <linux/slab.h>
41c594ab
RB
30
31#include <asm/cpu.h>
32#include <asm/processor.h>
60063497 33#include <linux/atomic.h>
41c594ab
RB
34#include <asm/hardirq.h>
35#include <asm/hazards.h>
3b1d4ed5 36#include <asm/irq.h>
41c594ab 37#include <asm/mmu_context.h>
41c594ab
RB
38#include <asm/mipsregs.h>
39#include <asm/cacheflush.h>
40#include <asm/time.h>
41#include <asm/addrspace.h>
42#include <asm/smtc.h>
41c594ab 43#include <asm/smtc_proc.h>
df1cc3da 44#include <asm/setup.h>
41c594ab
RB
45
46/*
1146fe30
RB
47 * SMTC Kernel needs to manipulate low-level CPU interrupt mask
48 * in do_IRQ. These are passed in setup_irq_smtc() and stored
49 * in this table.
41c594ab 50 */
1146fe30 51unsigned long irq_hwmask[NR_IRQS];
41c594ab 52
41c594ab
RB
53#define LOCK_MT_PRA() \
54 local_irq_save(flags); \
55 mtflags = dmt()
56
57#define UNLOCK_MT_PRA() \
58 emt(mtflags); \
59 local_irq_restore(flags)
60
61#define LOCK_CORE_PRA() \
62 local_irq_save(flags); \
63 mtflags = dvpe()
64
65#define UNLOCK_CORE_PRA() \
66 evpe(mtflags); \
67 local_irq_restore(flags)
68
69/*
70 * Data structures purely associated with SMTC parallelism
71 */
72
73
74/*
75 * Table for tracking ASIDs whose lifetime is prolonged.
76 */
77
78asiduse smtc_live_asid[MAX_SMTC_TLBS][MAX_SMTC_ASIDS];
79
41c594ab 80/*
603e82ed 81 * Number of InterProcessor Interrupt (IPI) message buffers to allocate
41c594ab
RB
82 */
83
84#define IPIBUF_PER_CPU 4
85
d2bb01b0 86struct smtc_ipi_q IPIQ[NR_CPUS];
5868756d 87static struct smtc_ipi_q freeIPIq;
41c594ab
RB
88
89
889a4c7b
SH
90/*
91 * Number of FPU contexts for each VPE
92 */
93
94static int smtc_nconf1[MAX_SMTC_VPES];
95
96
41c594ab
RB
97/* Forward declarations */
98
937a8015 99void ipi_decode(struct smtc_ipi *);
5868756d 100static void post_direct_ipi(int cpu, struct smtc_ipi *pipi);
20bb25d1 101static void setup_cross_vpe_interrupts(unsigned int nvpe);
41c594ab
RB
102void init_smtc_stats(void);
103
104/* Global SMTC Status */
105
982f6ffe 106unsigned int smtc_status;
41c594ab
RB
107
108/* Boot command line configuration overrides */
109
be5f1f21 110static int vpe0limit;
982f6ffe
RB
111static int ipibuffers;
112static int nostlb;
113static int asidmask;
d532f3d2 114unsigned int smtc_asid_mask = 0xff;
41c594ab 115
be5f1f21
KK
116static int __init vpe0tcs(char *str)
117{
118 get_option(&str, &vpe0limit);
119
120 return 1;
121}
122
41c594ab
RB
123static int __init ipibufs(char *str)
124{
125 get_option(&str, &ipibuffers);
126 return 1;
127}
128
129static int __init stlb_disable(char *s)
130{
131 nostlb = 1;
132 return 1;
133}
134
135static int __init asidmask_set(char *str)
136{
137 get_option(&str, &asidmask);
4bf42d42 138 switch (asidmask) {
41c594ab
RB
139 case 0x1:
140 case 0x3:
141 case 0x7:
142 case 0xf:
143 case 0x1f:
144 case 0x3f:
145 case 0x7f:
146 case 0xff:
147 smtc_asid_mask = (unsigned long)asidmask;
148 break;
149 default:
150 printk("ILLEGAL ASID mask 0x%x from command line\n", asidmask);
151 }
152 return 1;
153}
154
be5f1f21 155__setup("vpe0tcs=", vpe0tcs);
41c594ab
RB
156__setup("ipibufs=", ipibufs);
157__setup("nostlb", stlb_disable);
158__setup("asidmask=", asidmask_set);
159
c68644d3 160#ifdef CONFIG_SMTC_IDLE_HOOK_DEBUG
41c594ab 161
982f6ffe 162static int hang_trig;
41c594ab
RB
163
164static int __init hangtrig_enable(char *s)
165{
166 hang_trig = 1;
167 return 1;
168}
169
170
171__setup("hangtrig", hangtrig_enable);
172
173#define DEFAULT_BLOCKED_IPI_LIMIT 32
174
175static int timerq_limit = DEFAULT_BLOCKED_IPI_LIMIT;
176
177static int __init tintq(char *str)
178{
179 get_option(&str, &timerq_limit);
180 return 1;
181}
182
183__setup("tintq=", tintq);
184
889a4c7b 185static int imstuckcount[MAX_SMTC_VPES][8];
41c594ab 186/* vpemask represents IM/IE bits of per-VPE Status registers, low-to-high */
889a4c7b 187static int vpemask[MAX_SMTC_VPES][8] = {
20bb25d1
RB
188 {0, 0, 1, 0, 0, 0, 0, 1},
189 {0, 0, 0, 0, 0, 0, 0, 1}
190};
41c594ab 191int tcnoprog[NR_CPUS];
52553664 192static atomic_t idle_hook_initialized = ATOMIC_INIT(0);
41c594ab
RB
193static int clock_hang_reported[NR_CPUS];
194
c68644d3 195#endif /* CONFIG_SMTC_IDLE_HOOK_DEBUG */
41c594ab 196
41c594ab
RB
197/*
198 * Configure shared TLB - VPC configuration bit must be set by caller
199 */
200
5868756d 201static void smtc_configure_tlb(void)
41c594ab 202{
21a151d8 203 int i, tlbsiz, vpes;
41c594ab
RB
204 unsigned long mvpconf0;
205 unsigned long config1val;
206
207 /* Set up ASID preservation table */
208 for (vpes=0; vpes<MAX_SMTC_TLBS; vpes++) {
209 for(i = 0; i < MAX_SMTC_ASIDS; i++) {
210 smtc_live_asid[vpes][i] = 0;
211 }
212 }
213 mvpconf0 = read_c0_mvpconf0();
214
215 if ((vpes = ((mvpconf0 & MVPCONF0_PVPE)
216 >> MVPCONF0_PVPE_SHIFT) + 1) > 1) {
217 /* If we have multiple VPEs, try to share the TLB */
218 if ((mvpconf0 & MVPCONF0_TLBS) && !nostlb) {
219 /*
220 * If TLB sizing is programmable, shared TLB
221 * size is the total available complement.
222 * Otherwise, we have to take the sum of all
223 * static VPE TLB entries.
224 */
225 if ((tlbsiz = ((mvpconf0 & MVPCONF0_PTLBE)
226 >> MVPCONF0_PTLBE_SHIFT)) == 0) {
227 /*
228 * If there's more than one VPE, there had better
229 * be more than one TC, because we need one to bind
230 * to each VPE in turn to be able to read
231 * its configuration state!
232 */
233 settc(1);
234 /* Stop the TC from doing anything foolish */
235 write_tc_c0_tchalt(TCHALT_H);
236 mips_ihb();
237 /* No need to un-Halt - that happens later anyway */
238 for (i=0; i < vpes; i++) {
70342287 239 write_tc_c0_tcbind(i);
41c594ab
RB
240 /*
241 * To be 100% sure we're really getting the right
242 * information, we exit the configuration state
243 * and do an IHB after each rebinding.
244 */
245 write_c0_mvpcontrol(
246 read_c0_mvpcontrol() & ~ MVPCONTROL_VPC );
247 mips_ihb();
248 /*
249 * Only count if the MMU Type indicated is TLB
250 */
4bf42d42 251 if (((read_vpe_c0_config() & MIPS_CONF_MT) >> 7) == 1) {
41c594ab
RB
252 config1val = read_vpe_c0_config1();
253 tlbsiz += ((config1val >> 25) & 0x3f) + 1;
254 }
255
256 /* Put core back in configuration state */
257 write_c0_mvpcontrol(
258 read_c0_mvpcontrol() | MVPCONTROL_VPC );
259 mips_ihb();
260 }
261 }
262 write_c0_mvpcontrol(read_c0_mvpcontrol() | MVPCONTROL_STLB);
c80697b3 263 ehb();
41c594ab
RB
264
265 /*
266 * Setup kernel data structures to use software total,
267 * rather than read the per-VPE Config1 value. The values
268 * for "CPU 0" gets copied to all the other CPUs as part
269 * of their initialization in smtc_cpu_setup().
270 */
271
a0b62180
RB
272 /* MIPS32 limits TLB indices to 64 */
273 if (tlbsiz > 64)
274 tlbsiz = 64;
275 cpu_data[0].tlbsize = current_cpu_data.tlbsize = tlbsiz;
41c594ab 276 smtc_status |= SMTC_TLB_SHARED;
a0b62180 277 local_flush_tlb_all();
41c594ab
RB
278
279 printk("TLB of %d entry pairs shared by %d VPEs\n",
280 tlbsiz, vpes);
281 } else {
282 printk("WARNING: TLB Not Sharable on SMTC Boot!\n");
283 }
284 }
285}
286
287
288/*
289 * Incrementally build the CPU map out of constituent MIPS MT cores,
70342287 290 * using the specified available VPEs and TCs. Plaform code needs
41c594ab
RB
291 * to ensure that each MIPS MT core invokes this routine on reset,
292 * one at a time(!).
293 *
294 * This version of the build_cpu_map and prepare_cpus routines assumes
295 * that *all* TCs of a MIPS MT core will be used for Linux, and that
296 * they will be spread across *all* available VPEs (to minimise the
297 * loss of efficiency due to exception service serialization).
298 * An improved version would pick up configuration information and
299 * possibly leave some TCs/VPEs as "slave" processors.
300 *
301 * Use c0_MVPConf0 to find out how many TCs are available, setting up
0b5f9c00 302 * cpu_possible_mask and the logical/physical mappings.
41c594ab
RB
303 */
304
8531a35e 305int __init smtc_build_cpu_map(int start_cpu_slot)
41c594ab
RB
306{
307 int i, ntcs;
308
309 /*
310 * The CPU map isn't actually used for anything at this point,
311 * so it's not clear what else we should do apart from set
312 * everything up so that "logical" = "physical".
313 */
314 ntcs = ((read_c0_mvpconf0() & MVPCONF0_PTC) >> MVPCONF0_PTC_SHIFT) + 1;
315 for (i=start_cpu_slot; i<NR_CPUS && i<ntcs; i++) {
4037ac6e 316 set_cpu_possible(i, true);
41c594ab
RB
317 __cpu_number_map[i] = i;
318 __cpu_logical_map[i] = i;
319 }
ea580401 320#ifdef CONFIG_MIPS_MT_FPAFF
41c594ab
RB
321 /* Initialize map of CPUs with FPUs */
322 cpus_clear(mt_fpu_cpumask);
ea580401 323#endif
41c594ab
RB
324
325 /* One of those TC's is the one booting, and not a secondary... */
326 printk("%i available secondary CPU TC(s)\n", i - 1);
327
328 return i;
329}
330
331/*
332 * Common setup before any secondaries are started
c7b2ec21 333 * Make sure all CPUs are in a sensible state before we boot any of the
41c594ab
RB
334 * secondaries.
335 *
336 * For MIPS MT "SMTC" operation, we set up all TCs, spread as evenly
337 * as possible across the available VPEs.
338 */
339
340static void smtc_tc_setup(int vpe, int tc, int cpu)
341{
889a4c7b
SH
342 static int cp1contexts[MAX_SMTC_VPES];
343
344 /*
345 * Make a local copy of the available FPU contexts in order
346 * to keep track of TCs that can have one.
347 */
348 if (tc == 1)
349 {
350 /*
351 * FIXME: Multi-core SMTC hasn't been tested and the
70342287 352 * maximum number of VPEs may change.
889a4c7b
SH
353 */
354 cp1contexts[0] = smtc_nconf1[0] - 1;
355 cp1contexts[1] = smtc_nconf1[1];
356 }
357
41c594ab
RB
358 settc(tc);
359 write_tc_c0_tchalt(TCHALT_H);
360 mips_ihb();
361 write_tc_c0_tcstatus((read_tc_c0_tcstatus()
362 & ~(TCSTATUS_TKSU | TCSTATUS_DA | TCSTATUS_IXMT))
363 | TCSTATUS_A);
8531a35e
KK
364 /*
365 * TCContext gets an offset from the base of the IPIQ array
366 * to be used in low-level code to detect the presence of
c7b2ec21 367 * an active IPI queue.
8531a35e
KK
368 */
369 write_tc_c0_tccontext((sizeof(struct smtc_ipi_q) * cpu) << 16);
889a4c7b
SH
370
371 /* Bind TC to VPE. */
41c594ab 372 write_tc_c0_tcbind(vpe);
889a4c7b 373
c7b2ec21 374 /* In general, all TCs should have the same cpu_data indications. */
41c594ab 375 memcpy(&cpu_data[cpu], &cpu_data[0], sizeof(struct cpuinfo_mips));
889a4c7b
SH
376
377 /* Check to see if there is a FPU context available for this TC. */
378 if (!cp1contexts[vpe])
41c594ab 379 cpu_data[cpu].options &= ~MIPS_CPU_FPU;
889a4c7b
SH
380 else
381 cp1contexts[vpe]--;
382
383 /* Store the TC and VPE into the cpu_data structure. */
41c594ab
RB
384 cpu_data[cpu].vpe_id = vpe;
385 cpu_data[cpu].tc_id = tc;
889a4c7b
SH
386
387 /* FIXME: Multi-core SMTC hasn't been tested, but be prepared. */
8531a35e 388 cpu_data[cpu].core = (read_vpe_c0_ebase() >> 1) & 0xff;
41c594ab
RB
389}
390
8531a35e 391/*
889a4c7b 392 * Tweak to get Count registers synced as closely as possible. The
c7b2ec21 393 * value seems good for 34K-class cores.
8531a35e
KK
394 */
395
396#define CP0_SKEW 8
41c594ab 397
8531a35e 398void smtc_prepare_cpus(int cpus)
41c594ab 399{
be5f1f21 400 int i, vpe, tc, ntc, nvpe, tcpervpe[NR_CPUS], slop, cpu;
41c594ab
RB
401 unsigned long flags;
402 unsigned long val;
403 int nipi;
404 struct smtc_ipi *pipi;
405
406 /* disable interrupts so we can disable MT */
407 local_irq_save(flags);
408 /* disable MT so we can configure */
409 dvpe();
410 dmt();
411
34af946a 412 spin_lock_init(&freeIPIq.lock);
41c594ab
RB
413
414 /*
415 * We probably don't have as many VPEs as we do SMP "CPUs",
416 * but it's possible - and in any case we'll never use more!
417 */
418 for (i=0; i<NR_CPUS; i++) {
419 IPIQ[i].head = IPIQ[i].tail = NULL;
34af946a 420 spin_lock_init(&IPIQ[i].lock);
41c594ab 421 IPIQ[i].depth = 0;
2e41f91d 422 IPIQ[i].resched_flag = 0; /* No reschedules queued initially */
41c594ab
RB
423 }
424
425 /* cpu_data index starts at zero */
426 cpu = 0;
427 cpu_data[cpu].vpe_id = 0;
428 cpu_data[cpu].tc_id = 0;
8531a35e 429 cpu_data[cpu].core = (read_c0_ebase() >> 1) & 0xff;
41c594ab
RB
430 cpu++;
431
432 /* Report on boot-time options */
49a89efb 433 mips_mt_set_cpuoptions();
41c594ab
RB
434 if (vpelimit > 0)
435 printk("Limit of %d VPEs set\n", vpelimit);
436 if (tclimit > 0)
437 printk("Limit of %d TCs set\n", tclimit);
438 if (nostlb) {
439 printk("Shared TLB Use Inhibited - UNSAFE for Multi-VPE Operation\n");
440 }
441 if (asidmask)
442 printk("ASID mask value override to 0x%x\n", asidmask);
443
444 /* Temporary */
c68644d3 445#ifdef CONFIG_SMTC_IDLE_HOOK_DEBUG
41c594ab
RB
446 if (hang_trig)
447 printk("Logic Analyser Trigger on suspected TC hang\n");
c68644d3 448#endif /* CONFIG_SMTC_IDLE_HOOK_DEBUG */
41c594ab
RB
449
450 /* Put MVPE's into 'configuration state' */
451 write_c0_mvpcontrol( read_c0_mvpcontrol() | MVPCONTROL_VPC );
452
453 val = read_c0_mvpconf0();
454 nvpe = ((val & MVPCONF0_PVPE) >> MVPCONF0_PVPE_SHIFT) + 1;
455 if (vpelimit > 0 && nvpe > vpelimit)
456 nvpe = vpelimit;
457 ntc = ((val & MVPCONF0_PTC) >> MVPCONF0_PTC_SHIFT) + 1;
458 if (ntc > NR_CPUS)
459 ntc = NR_CPUS;
460 if (tclimit > 0 && ntc > tclimit)
461 ntc = tclimit;
be5f1f21
KK
462 slop = ntc % nvpe;
463 for (i = 0; i < nvpe; i++) {
464 tcpervpe[i] = ntc / nvpe;
465 if (slop) {
466 if((slop - i) > 0) tcpervpe[i]++;
467 }
468 }
469 /* Handle command line override for VPE0 */
470 if (vpe0limit > ntc) vpe0limit = ntc;
471 if (vpe0limit > 0) {
472 int slopslop;
473 if (vpe0limit < tcpervpe[0]) {
474 /* Reducing TC count - distribute to others */
475 slop = tcpervpe[0] - vpe0limit;
476 slopslop = slop % (nvpe - 1);
477 tcpervpe[0] = vpe0limit;
478 for (i = 1; i < nvpe; i++) {
479 tcpervpe[i] += slop / (nvpe - 1);
480 if(slopslop && ((slopslop - (i - 1) > 0)))
481 tcpervpe[i]++;
482 }
483 } else if (vpe0limit > tcpervpe[0]) {
484 /* Increasing TC count - steal from others */
485 slop = vpe0limit - tcpervpe[0];
486 slopslop = slop % (nvpe - 1);
487 tcpervpe[0] = vpe0limit;
488 for (i = 1; i < nvpe; i++) {
489 tcpervpe[i] -= slop / (nvpe - 1);
490 if(slopslop && ((slopslop - (i - 1) > 0)))
491 tcpervpe[i]--;
492 }
493 }
494 }
41c594ab
RB
495
496 /* Set up shared TLB */
497 smtc_configure_tlb();
498
499 for (tc = 0, vpe = 0 ; (vpe < nvpe) && (tc < ntc) ; vpe++) {
889a4c7b
SH
500 /* Get number of CP1 contexts for each VPE. */
501 if (tc == 0)
502 {
503 /*
504 * Do not call settc() for TC0 or the FPU context
505 * value will be incorrect. Besides, we know that
506 * we are TC0 anyway.
507 */
508 smtc_nconf1[0] = ((read_vpe_c0_vpeconf1() &
509 VPECONF1_NCP1) >> VPECONF1_NCP1_SHIFT);
510 if (nvpe == 2)
511 {
512 settc(1);
513 smtc_nconf1[1] = ((read_vpe_c0_vpeconf1() &
514 VPECONF1_NCP1) >> VPECONF1_NCP1_SHIFT);
515 settc(0);
516 }
517 }
d8e5f9fe
KM
518 if (tcpervpe[vpe] == 0)
519 continue;
41c594ab
RB
520 if (vpe != 0)
521 printk(", ");
522 printk("VPE %d: TC", vpe);
be5f1f21 523 for (i = 0; i < tcpervpe[vpe]; i++) {
41c594ab
RB
524 /*
525 * TC 0 is bound to VPE 0 at reset,
526 * and is presumably executing this
527 * code. Leave it alone!
528 */
529 if (tc != 0) {
21a151d8 530 smtc_tc_setup(vpe, tc, cpu);
889a4c7b
SH
531 if (vpe != 0) {
532 /*
533 * Set MVP bit (possibly again). Do it
534 * here to catch CPUs that have no TCs
535 * bound to the VPE at reset. In that
536 * case, a TC must be bound to the VPE
537 * before we can set VPEControl[MVP]
538 */
539 write_vpe_c0_vpeconf0(
540 read_vpe_c0_vpeconf0() |
541 VPECONF0_MVP);
542 }
41c594ab
RB
543 cpu++;
544 }
545 printk(" %d", tc);
546 tc++;
547 }
41c594ab 548 if (vpe != 0) {
d8e5f9fe
KM
549 /*
550 * Allow this VPE to control others.
551 */
552 write_vpe_c0_vpeconf0(read_vpe_c0_vpeconf0() |
553 VPECONF0_MVP);
554
41c594ab
RB
555 /*
556 * Clear any stale software interrupts from VPE's Cause
557 */
558 write_vpe_c0_cause(0);
559
560 /*
561 * Clear ERL/EXL of VPEs other than 0
562 * and set restricted interrupt enable/mask.
563 */
564 write_vpe_c0_status((read_vpe_c0_status()
565 & ~(ST0_BEV | ST0_ERL | ST0_EXL | ST0_IM))
566 | (STATUSF_IP0 | STATUSF_IP1 | STATUSF_IP7
567 | ST0_IE));
568 /*
569 * set config to be the same as vpe0,
570 * particularly kseg0 coherency alg
571 */
572 write_vpe_c0_config(read_c0_config());
573 /* Clear any pending timer interrupt */
574 write_vpe_c0_compare(0);
575 /* Propagate Config7 */
576 write_vpe_c0_config7(read_c0_config7());
8531a35e
KK
577 write_vpe_c0_count(read_c0_count() + CP0_SKEW);
578 ehb();
41c594ab
RB
579 }
580 /* enable multi-threading within VPE */
581 write_vpe_c0_vpecontrol(read_vpe_c0_vpecontrol() | VPECONTROL_TE);
582 /* enable the VPE */
583 write_vpe_c0_vpeconf0(read_vpe_c0_vpeconf0() | VPECONF0_VPA);
584 }
585
586 /*
587 * Pull any physically present but unused TCs out of circulation.
588 */
589 while (tc < (((val & MVPCONF0_PTC) >> MVPCONF0_PTC_SHIFT) + 1)) {
4037ac6e
RR
590 set_cpu_possible(tc, false);
591 set_cpu_present(tc, false);
41c594ab
RB
592 tc++;
593 }
594
595 /* release config state */
596 write_c0_mvpcontrol( read_c0_mvpcontrol() & ~ MVPCONTROL_VPC );
597
598 printk("\n");
599
600 /* Set up coprocessor affinity CPU mask(s) */
601
ea580401 602#ifdef CONFIG_MIPS_MT_FPAFF
41c594ab 603 for (tc = 0; tc < ntc; tc++) {
4bf42d42 604 if (cpu_data[tc].options & MIPS_CPU_FPU)
41c594ab
RB
605 cpu_set(tc, mt_fpu_cpumask);
606 }
ea580401 607#endif
41c594ab
RB
608
609 /* set up ipi interrupts... */
610
611 /* If we have multiple VPEs running, set up the cross-VPE interrupt */
612
20bb25d1 613 setup_cross_vpe_interrupts(nvpe);
41c594ab
RB
614
615 /* Set up queue of free IPI "messages". */
616 nipi = NR_CPUS * IPIBUF_PER_CPU;
617 if (ipibuffers > 0)
618 nipi = ipibuffers;
619
620 pipi = kmalloc(nipi *sizeof(struct smtc_ipi), GFP_KERNEL);
621 if (pipi == NULL)
ab75dc02 622 panic("kmalloc of IPI message buffers failed");
41c594ab
RB
623 else
624 printk("IPI buffer pool of %d buffers\n", nipi);
625 for (i = 0; i < nipi; i++) {
626 smtc_ipi_nq(&freeIPIq, pipi);
627 pipi++;
628 }
629
630 /* Arm multithreading and enable other VPEs - but all TCs are Halted */
631 emt(EMT_ENABLE);
632 evpe(EVPE_ENABLE);
633 local_irq_restore(flags);
634 /* Initialize SMTC /proc statistics/diagnostics */
635 init_smtc_stats();
636}
637
638
639/*
640 * Setup the PC, SP, and GP of a secondary processor and start it
641 * running!
642 * smp_bootstrap is the place to resume from
643 * __KSTK_TOS(idle) is apparently the stack pointer
644 * (unsigned long)idle->thread_info the gp
645 *
646 */
e119d49a 647void __cpuinit smtc_boot_secondary(int cpu, struct task_struct *idle)
41c594ab
RB
648{
649 extern u32 kernelsp[NR_CPUS];
b7e4226e 650 unsigned long flags;
41c594ab
RB
651 int mtflags;
652
653 LOCK_MT_PRA();
654 if (cpu_data[cpu].vpe_id != cpu_data[smp_processor_id()].vpe_id) {
655 dvpe();
656 }
657 settc(cpu_data[cpu].tc_id);
658
659 /* pc */
660 write_tc_c0_tcrestart((unsigned long)&smp_bootstrap);
661
662 /* stack pointer */
663 kernelsp[cpu] = __KSTK_TOS(idle);
664 write_tc_gpr_sp(__KSTK_TOS(idle));
665
666 /* global pointer */
c9f4f06d 667 write_tc_gpr_gp((unsigned long)task_thread_info(idle));
41c594ab
RB
668
669 smtc_status |= SMTC_MTC_ACTIVE;
670 write_tc_c0_tchalt(0);
671 if (cpu_data[cpu].vpe_id != cpu_data[smp_processor_id()].vpe_id) {
672 evpe(EVPE_ENABLE);
673 }
674 UNLOCK_MT_PRA();
675}
676
677void smtc_init_secondary(void)
678{
41c594ab
RB
679}
680
681void smtc_smp_finish(void)
682{
8531a35e
KK
683 int cpu = smp_processor_id();
684
685 /*
686 * Lowest-numbered CPU per VPE starts a clock tick.
687 * Like per_cpu_trap_init() hack, this assumes that
688 * SMTC init code assigns TCs consdecutively and
689 * in ascending order across available VPEs.
690 */
691 if (cpu > 0 && (cpu_data[cpu].vpe_id != cpu_data[cpu - 1].vpe_id))
692 write_c0_compare(read_c0_count() + mips_hpt_frequency/HZ);
693
70dc8fa7
YZ
694 local_irq_enable();
695
41c594ab
RB
696 printk("TC %d going on-line as CPU %d\n",
697 cpu_data[smp_processor_id()].tc_id, smp_processor_id());
698}
699
700void smtc_cpus_done(void)
701{
702}
703
704/*
705 * Support for SMTC-optimized driver IRQ registration
706 */
707
708/*
709 * SMTC Kernel needs to manipulate low-level CPU interrupt mask
710 * in do_IRQ. These are passed in setup_irq_smtc() and stored
711 * in this table.
712 */
713
714int setup_irq_smtc(unsigned int irq, struct irqaction * new,
715 unsigned long hwmask)
716{
ef36fc3c 717#ifdef CONFIG_SMTC_IDLE_HOOK_DEBUG
20bb25d1
RB
718 unsigned int vpe = current_cpu_data.vpe_id;
719
3b1d4ed5 720 vpemask[vpe][irq - MIPS_CPU_IRQ_BASE] = 1;
20bb25d1 721#endif
ef36fc3c 722 irq_hwmask[irq] = hwmask;
41c594ab
RB
723
724 return setup_irq(irq, new);
725}
726
f571eff0
KK
727#ifdef CONFIG_MIPS_MT_SMTC_IRQAFF
728/*
729 * Support for IRQ affinity to TCs
730 */
731
732void smtc_set_irq_affinity(unsigned int irq, cpumask_t affinity)
733{
734 /*
735 * If a "fast path" cache of quickly decodable affinity state
736 * is maintained, this is where it gets done, on a call up
737 * from the platform affinity code.
738 */
739}
740
930cd54b 741void smtc_forward_irq(struct irq_data *d)
f571eff0 742{
930cd54b 743 unsigned int irq = d->irq;
f571eff0
KK
744 int target;
745
746 /*
747 * OK wise guy, now figure out how to get the IRQ
748 * to be serviced on an authorized "CPU".
749 *
750 * Ideally, to handle the situation where an IRQ has multiple
751 * eligible CPUS, we would maintain state per IRQ that would
752 * allow a fair distribution of service requests. Since the
753 * expected use model is any-or-only-one, for simplicity
754 * and efficiency, we just pick the easiest one to find.
755 */
756
2a2b2212 757 target = cpumask_first(d->affinity);
f571eff0
KK
758
759 /*
760 * We depend on the platform code to have correctly processed
761 * IRQ affinity change requests to ensure that the IRQ affinity
762 * mask has been purged of bits corresponding to nonexistent and
763 * offline "CPUs", and to TCs bound to VPEs other than the VPE
764 * connected to the physical interrupt input for the interrupt
70342287 765 * in question. Otherwise we have a nasty problem with interrupt
f571eff0 766 * mask management. This is best handled in non-performance-critical
70342287 767 * platform IRQ affinity setting code, to minimize interrupt-time
f571eff0
KK
768 * checks.
769 */
770
771 /* If no one is eligible, service locally */
930cd54b 772 if (target >= NR_CPUS)
f571eff0 773 do_IRQ_no_affinity(irq);
930cd54b
TG
774 else
775 smtc_send_ipi(target, IRQ_AFFINITY_IPI, irq);
f571eff0
KK
776}
777
778#endif /* CONFIG_MIPS_MT_SMTC_IRQAFF */
779
41c594ab
RB
780/*
781 * IPI model for SMTC is tricky, because interrupts aren't TC-specific.
782 * Within a VPE one TC can interrupt another by different approaches.
783 * The easiest to get right would probably be to make all TCs except
784 * the target IXMT and set a software interrupt, but an IXMT-based
785 * scheme requires that a handler must run before a new IPI could
786 * be sent, which would break the "broadcast" loops in MIPS MT.
787 * A more gonzo approach within a VPE is to halt the TC, extract
788 * its Restart, Status, and a couple of GPRs, and program the Restart
789 * address to emulate an interrupt.
790 *
791 * Within a VPE, one can be confident that the target TC isn't in
792 * a critical EXL state when halted, since the write to the Halt
793 * register could not have issued on the writing thread if the
794 * halting thread had EXL set. So k0 and k1 of the target TC
795 * can be used by the injection code. Across VPEs, one can't
796 * be certain that the target TC isn't in a critical exception
797 * state. So we try a two-step process of sending a software
798 * interrupt to the target VPE, which either handles the event
799 * itself (if it was the target) or injects the event within
800 * the VPE.
801 */
802
5868756d 803static void smtc_ipi_qdump(void)
41c594ab
RB
804{
805 int i;
2e41f91d 806 struct smtc_ipi *temp;
41c594ab
RB
807
808 for (i = 0; i < NR_CPUS ;i++) {
2e41f91d 809 pr_info("IPIQ[%d]: head = 0x%x, tail = 0x%x, depth = %d\n",
41c594ab
RB
810 i, (unsigned)IPIQ[i].head, (unsigned)IPIQ[i].tail,
811 IPIQ[i].depth);
2e41f91d
JP
812 temp = IPIQ[i].head;
813
814 while (temp != IPIQ[i].tail) {
815 pr_debug("%d %d %d: ", temp->type, temp->dest,
816 (int)temp->arg);
817#ifdef SMTC_IPI_DEBUG
818 pr_debug("%u %lu\n", temp->sender, temp->stamp);
819#else
820 pr_debug("\n");
821#endif
822 temp = temp->flink;
823 }
41c594ab
RB
824 }
825}
826
827/*
828 * The standard atomic.h primitives don't quite do what we want
829 * here: We need an atomic add-and-return-previous-value (which
830 * could be done with atomic_add_return and a decrement) and an
831 * atomic set/zero-and-return-previous-value (which can't really
832 * be done with the atomic.h primitives). And since this is
833 * MIPS MT, we can assume that we have LL/SC.
834 */
ea580401 835static inline int atomic_postincrement(atomic_t *v)
41c594ab
RB
836{
837 unsigned long result;
838
839 unsigned long temp;
840
841 __asm__ __volatile__(
842 "1: ll %0, %2 \n"
843 " addu %1, %0, 1 \n"
844 " sc %1, %2 \n"
845 " beqz %1, 1b \n"
d87d0c93 846 __WEAK_LLSC_MB
ea580401
RB
847 : "=&r" (result), "=&r" (temp), "=m" (v->counter)
848 : "m" (v->counter)
41c594ab
RB
849 : "memory");
850
851 return result;
852}
853
41c594ab
RB
854void smtc_send_ipi(int cpu, int type, unsigned int action)
855{
856 int tcstatus;
857 struct smtc_ipi *pipi;
b7e4226e 858 unsigned long flags;
41c594ab 859 int mtflags;
8531a35e
KK
860 unsigned long tcrestart;
861 extern void r4k_wait_irqoff(void), __pastwait(void);
2e41f91d
JP
862 int set_resched_flag = (type == LINUX_SMP_IPI &&
863 action == SMP_RESCHEDULE_YOURSELF);
41c594ab
RB
864
865 if (cpu == smp_processor_id()) {
866 printk("Cannot Send IPI to self!\n");
867 return;
868 }
2e41f91d
JP
869 if (set_resched_flag && IPIQ[cpu].resched_flag != 0)
870 return; /* There is a reschedule queued already */
871
41c594ab
RB
872 /* Set up a descriptor, to be delivered either promptly or queued */
873 pipi = smtc_ipi_dq(&freeIPIq);
874 if (pipi == NULL) {
875 bust_spinlocks(1);
876 mips_mt_regdump(dvpe());
ab75dc02 877 panic("IPI Msg. Buffers Depleted");
41c594ab
RB
878 }
879 pipi->type = type;
880 pipi->arg = (void *)action;
881 pipi->dest = cpu;
882 if (cpu_data[cpu].vpe_id != cpu_data[smp_processor_id()].vpe_id) {
603e82ed 883 /* If not on same VPE, enqueue and send cross-VPE interrupt */
2e41f91d 884 IPIQ[cpu].resched_flag |= set_resched_flag;
41c594ab
RB
885 smtc_ipi_nq(&IPIQ[cpu], pipi);
886 LOCK_CORE_PRA();
887 settc(cpu_data[cpu].tc_id);
888 write_vpe_c0_cause(read_vpe_c0_cause() | C_SW1);
889 UNLOCK_CORE_PRA();
890 } else {
891 /*
892 * Not sufficient to do a LOCK_MT_PRA (dmt) here,
893 * since ASID shootdown on the other VPE may
894 * collide with this operation.
895 */
896 LOCK_CORE_PRA();
897 settc(cpu_data[cpu].tc_id);
898 /* Halt the targeted TC */
899 write_tc_c0_tchalt(TCHALT_H);
900 mips_ihb();
901
902 /*
70342287 903 * Inspect TCStatus - if IXMT is set, we have to queue
41c594ab
RB
904 * a message. Otherwise, we set up the "interrupt"
905 * of the other TC
70342287 906 */
41c594ab
RB
907 tcstatus = read_tc_c0_tcstatus();
908
909 if ((tcstatus & TCSTATUS_IXMT) != 0) {
910 /*
8531a35e
KK
911 * If we're in the the irq-off version of the wait
912 * loop, we need to force exit from the wait and
913 * do a direct post of the IPI.
914 */
915 if (cpu_wait == r4k_wait_irqoff) {
916 tcrestart = read_tc_c0_tcrestart();
917 if (tcrestart >= (unsigned long)r4k_wait_irqoff
918 && tcrestart < (unsigned long)__pastwait) {
919 write_tc_c0_tcrestart(__pastwait);
920 tcstatus &= ~TCSTATUS_IXMT;
921 write_tc_c0_tcstatus(tcstatus);
922 goto postdirect;
923 }
924 }
925 /*
926 * Otherwise we queue the message for the target TC
927 * to pick up when he does a local_irq_restore()
41c594ab
RB
928 */
929 write_tc_c0_tchalt(0);
930 UNLOCK_CORE_PRA();
2e41f91d 931 IPIQ[cpu].resched_flag |= set_resched_flag;
41c594ab
RB
932 smtc_ipi_nq(&IPIQ[cpu], pipi);
933 } else {
8531a35e 934postdirect:
41c594ab
RB
935 post_direct_ipi(cpu, pipi);
936 write_tc_c0_tchalt(0);
937 UNLOCK_CORE_PRA();
938 }
939 }
940}
941
942/*
943 * Send IPI message to Halted TC, TargTC/TargVPE already having been set
944 */
5868756d 945static void post_direct_ipi(int cpu, struct smtc_ipi *pipi)
41c594ab
RB
946{
947 struct pt_regs *kstack;
948 unsigned long tcstatus;
949 unsigned long tcrestart;
950 extern u32 kernelsp[NR_CPUS];
951 extern void __smtc_ipi_vector(void);
ea580401 952//printk("%s: on %d for %d\n", __func__, smp_processor_id(), cpu);
41c594ab
RB
953
954 /* Extract Status, EPC from halted TC */
955 tcstatus = read_tc_c0_tcstatus();
956 tcrestart = read_tc_c0_tcrestart();
957 /* If TCRestart indicates a WAIT instruction, advance the PC */
958 if ((tcrestart & 0x80000000)
959 && ((*(unsigned int *)tcrestart & 0xfe00003f) == 0x42000020)) {
960 tcrestart += 4;
961 }
962 /*
963 * Save on TC's future kernel stack
964 *
965 * CU bit of Status is indicator that TC was
966 * already running on a kernel stack...
967 */
70342287 968 if (tcstatus & ST0_CU0) {
41c594ab
RB
969 /* Note that this "- 1" is pointer arithmetic */
970 kstack = ((struct pt_regs *)read_tc_gpr_sp()) - 1;
971 } else {
972 kstack = ((struct pt_regs *)kernelsp[cpu]) - 1;
973 }
974
975 kstack->cp0_epc = (long)tcrestart;
976 /* Save TCStatus */
977 kstack->cp0_tcstatus = tcstatus;
978 /* Pass token of operation to be performed kernel stack pad area */
979 kstack->pad0[4] = (unsigned long)pipi;
980 /* Pass address of function to be called likewise */
981 kstack->pad0[5] = (unsigned long)&ipi_decode;
982 /* Set interrupt exempt and kernel mode */
983 tcstatus |= TCSTATUS_IXMT;
984 tcstatus &= ~TCSTATUS_TKSU;
985 write_tc_c0_tcstatus(tcstatus);
986 ehb();
987 /* Set TC Restart address to be SMTC IPI vector */
988 write_tc_c0_tcrestart(__smtc_ipi_vector);
989}
990
937a8015 991static void ipi_resched_interrupt(void)
41c594ab 992{
184748cc 993 scheduler_ipi();
41c594ab
RB
994}
995
937a8015 996static void ipi_call_interrupt(void)
41c594ab
RB
997{
998 /* Invoke generic function invocation code in smp.c */
999 smp_call_function_interrupt();
1000}
1001
8531a35e 1002DECLARE_PER_CPU(struct clock_event_device, mips_clockevent_device);
ea580401 1003
8f99a162 1004static void __irq_entry smtc_clock_tick_interrupt(void)
41c594ab 1005{
ea580401
RB
1006 unsigned int cpu = smp_processor_id();
1007 struct clock_event_device *cd;
8f99a162
WZ
1008 int irq = MIPS_CPU_IRQ_BASE + 1;
1009
1010 irq_enter();
1011 kstat_incr_irqs_this_cpu(irq, irq_to_desc(irq));
1012 cd = &per_cpu(mips_clockevent_device, cpu);
1013 cd->event_handler(cd);
1014 irq_exit();
1015}
1016
1017void ipi_decode(struct smtc_ipi *pipi)
1018{
41c594ab
RB
1019 void *arg_copy = pipi->arg;
1020 int type_copy = pipi->type;
d2287f5e 1021
41c594ab 1022 smtc_ipi_nq(&freeIPIq, pipi);
dbc1d911 1023
41c594ab 1024 switch (type_copy) {
4bf42d42 1025 case SMTC_CLOCK_TICK:
8f99a162 1026 smtc_clock_tick_interrupt();
4bf42d42 1027 break;
ea580401 1028
4bf42d42
RB
1029 case LINUX_SMP_IPI:
1030 switch ((int)arg_copy) {
1031 case SMP_RESCHEDULE_YOURSELF:
937a8015 1032 ipi_resched_interrupt();
41c594ab 1033 break;
4bf42d42 1034 case SMP_CALL_FUNCTION:
937a8015 1035 ipi_call_interrupt();
41c594ab
RB
1036 break;
1037 default:
fa90c872 1038 printk("Impossible SMTC IPI Argument %p\n", arg_copy);
41c594ab 1039 break;
4bf42d42
RB
1040 }
1041 break;
f571eff0
KK
1042#ifdef CONFIG_MIPS_MT_SMTC_IRQAFF
1043 case IRQ_AFFINITY_IPI:
1044 /*
1045 * Accept a "forwarded" interrupt that was initially
1046 * taken by a TC who doesn't have affinity for the IRQ.
1047 */
1048 do_IRQ_no_affinity((int)arg_copy);
1049 break;
1050#endif /* CONFIG_MIPS_MT_SMTC_IRQAFF */
4bf42d42
RB
1051 default:
1052 printk("Impossible SMTC IPI Type 0x%x\n", type_copy);
1053 break;
41c594ab
RB
1054 }
1055}
1056
8531a35e
KK
1057/*
1058 * Similar to smtc_ipi_replay(), but invoked from context restore,
1059 * so it reuses the current exception frame rather than set up a
1060 * new one with self_ipi.
1061 */
1062
937a8015 1063void deferred_smtc_ipi(void)
41c594ab 1064{
8531a35e 1065 int cpu = smp_processor_id();
41c594ab
RB
1066
1067 /*
1068 * Test is not atomic, but much faster than a dequeue,
1069 * and the vast majority of invocations will have a null queue.
8531a35e
KK
1070 * If irq_disabled when this was called, then any IPIs queued
1071 * after we test last will be taken on the next irq_enable/restore.
1072 * If interrupts were enabled, then any IPIs added after the
1073 * last test will be taken directly.
41c594ab 1074 */
8531a35e
KK
1075
1076 while (IPIQ[cpu].head != NULL) {
1077 struct smtc_ipi_q *q = &IPIQ[cpu];
1078 struct smtc_ipi *pipi;
1079 unsigned long flags;
1080
1081 /*
1082 * It may be possible we'll come in with interrupts
1083 * already enabled.
1084 */
1085 local_irq_save(flags);
8531a35e
KK
1086 spin_lock(&q->lock);
1087 pipi = __smtc_ipi_dq(q);
1088 spin_unlock(&q->lock);
2e41f91d
JP
1089 if (pipi != NULL) {
1090 if (pipi->type == LINUX_SMP_IPI &&
1091 (int)pipi->arg == SMP_RESCHEDULE_YOURSELF)
1092 IPIQ[cpu].resched_flag = 0;
937a8015 1093 ipi_decode(pipi);
2e41f91d 1094 }
8531a35e
KK
1095 /*
1096 * The use of the __raw_local restore isn't
1097 * as obviously necessary here as in smtc_ipi_replay(),
1098 * but it's more efficient, given that we're already
1099 * running down the IPI queue.
1100 */
df9ee292 1101 __arch_local_irq_restore(flags);
41c594ab
RB
1102 }
1103}
1104
41c594ab
RB
1105/*
1106 * Cross-VPE interrupts in the SMTC prototype use "software interrupts"
1107 * set via cross-VPE MTTR manipulation of the Cause register. It would be
1108 * in some regards preferable to have external logic for "doorbell" hardware
1109 * interrupts.
1110 */
1111
97dcb82d 1112static int cpu_ipi_irq = MIPS_CPU_IRQ_BASE + MIPS_CPU_IPI_IRQ;
41c594ab 1113
937a8015 1114static irqreturn_t ipi_interrupt(int irq, void *dev_idm)
41c594ab
RB
1115{
1116 int my_vpe = cpu_data[smp_processor_id()].vpe_id;
1117 int my_tc = cpu_data[smp_processor_id()].tc_id;
1118 int cpu;
1119 struct smtc_ipi *pipi;
1120 unsigned long tcstatus;
1121 int sent;
b7e4226e 1122 unsigned long flags;
41c594ab
RB
1123 unsigned int mtflags;
1124 unsigned int vpflags;
1125
1126 /*
1127 * So long as cross-VPE interrupts are done via
1128 * MFTR/MTTR read-modify-writes of Cause, we need
1129 * to stop other VPEs whenever the local VPE does
1130 * anything similar.
1131 */
1132 local_irq_save(flags);
1133 vpflags = dvpe();
1134 clear_c0_cause(0x100 << MIPS_CPU_IPI_IRQ);
1135 set_c0_status(0x100 << MIPS_CPU_IPI_IRQ);
1136 irq_enable_hazard();
1137 evpe(vpflags);
1138 local_irq_restore(flags);
1139
1140 /*
1141 * Cross-VPE Interrupt handler: Try to directly deliver IPIs
1142 * queued for TCs on this VPE other than the current one.
1143 * Return-from-interrupt should cause us to drain the queue
1144 * for the current TC, so we ought not to have to do it explicitly here.
1145 */
1146
1147 for_each_online_cpu(cpu) {
1148 if (cpu_data[cpu].vpe_id != my_vpe)
1149 continue;
1150
1151 pipi = smtc_ipi_dq(&IPIQ[cpu]);
1152 if (pipi != NULL) {
1153 if (cpu_data[cpu].tc_id != my_tc) {
1154 sent = 0;
1155 LOCK_MT_PRA();
1156 settc(cpu_data[cpu].tc_id);
1157 write_tc_c0_tchalt(TCHALT_H);
1158 mips_ihb();
1159 tcstatus = read_tc_c0_tcstatus();
1160 if ((tcstatus & TCSTATUS_IXMT) == 0) {
1161 post_direct_ipi(cpu, pipi);
1162 sent = 1;
1163 }
1164 write_tc_c0_tchalt(0);
1165 UNLOCK_MT_PRA();
1166 if (!sent) {
1167 smtc_ipi_req(&IPIQ[cpu], pipi);
1168 }
1169 } else {
1170 /*
1171 * ipi_decode() should be called
1172 * with interrupts off
1173 */
1174 local_irq_save(flags);
2e41f91d
JP
1175 if (pipi->type == LINUX_SMP_IPI &&
1176 (int)pipi->arg == SMP_RESCHEDULE_YOURSELF)
1177 IPIQ[cpu].resched_flag = 0;
937a8015 1178 ipi_decode(pipi);
41c594ab
RB
1179 local_irq_restore(flags);
1180 }
1181 }
1182 }
1183
1184 return IRQ_HANDLED;
1185}
1186
937a8015 1187static void ipi_irq_dispatch(void)
41c594ab 1188{
937a8015 1189 do_IRQ(cpu_ipi_irq);
41c594ab
RB
1190}
1191
033890b0
RB
1192static struct irqaction irq_ipi = {
1193 .handler = ipi_interrupt,
8b5690f8 1194 .flags = IRQF_PERCPU,
b2651583 1195 .name = "SMTC_IPI"
033890b0 1196};
41c594ab 1197
20bb25d1 1198static void setup_cross_vpe_interrupts(unsigned int nvpe)
41c594ab 1199{
20bb25d1
RB
1200 if (nvpe < 1)
1201 return;
1202
41c594ab 1203 if (!cpu_has_vint)
603e82ed 1204 panic("SMTC Kernel requires Vectored Interrupt support");
41c594ab
RB
1205
1206 set_vi_handler(MIPS_CPU_IPI_IRQ, ipi_irq_dispatch);
1207
41c594ab
RB
1208 setup_irq_smtc(cpu_ipi_irq, &irq_ipi, (0x100 << MIPS_CPU_IPI_IRQ));
1209
e4ec7989 1210 irq_set_handler(cpu_ipi_irq, handle_percpu_irq);
41c594ab
RB
1211}
1212
1213/*
1214 * SMTC-specific hacks invoked from elsewhere in the kernel.
1215 */
1216
8531a35e
KK
1217 /*
1218 * smtc_ipi_replay is called from raw_local_irq_restore
1219 */
1220
1221void smtc_ipi_replay(void)
ac8be955 1222{
8a1e97ee
RB
1223 unsigned int cpu = smp_processor_id();
1224
ac8be955
RB
1225 /*
1226 * To the extent that we've ever turned interrupts off,
1227 * we may have accumulated deferred IPIs. This is subtle.
ac8be955
RB
1228 * we should be OK: If we pick up something and dispatch
1229 * it here, that's great. If we see nothing, but concurrent
1230 * with this operation, another TC sends us an IPI, IXMT
1231 * is clear, and we'll handle it as a real pseudo-interrupt
8531a35e
KK
1232 * and not a pseudo-pseudo interrupt. The important thing
1233 * is to do the last check for queued message *after* the
1234 * re-enabling of interrupts.
ac8be955 1235 */
8531a35e
KK
1236 while (IPIQ[cpu].head != NULL) {
1237 struct smtc_ipi_q *q = &IPIQ[cpu];
1238 struct smtc_ipi *pipi;
1239 unsigned long flags;
ac8be955 1240
8531a35e
KK
1241 /*
1242 * It's just possible we'll come in with interrupts
1243 * already enabled.
1244 */
1245 local_irq_save(flags);
1246
1247 spin_lock(&q->lock);
1248 pipi = __smtc_ipi_dq(q);
1249 spin_unlock(&q->lock);
1250 /*
1251 ** But use a raw restore here to avoid recursion.
1252 */
df9ee292 1253 __arch_local_irq_restore(flags);
8531a35e
KK
1254
1255 if (pipi) {
ac8be955 1256 self_ipi(pipi);
8a1e97ee 1257 smtc_cpu_stats[cpu].selfipis++;
ac8be955
RB
1258 }
1259 }
1260}
1261
ec43c014
RB
1262EXPORT_SYMBOL(smtc_ipi_replay);
1263
41c594ab
RB
1264void smtc_idle_loop_hook(void)
1265{
c68644d3 1266#ifdef CONFIG_SMTC_IDLE_HOOK_DEBUG
41c594ab
RB
1267 int im;
1268 int flags;
1269 int mtflags;
1270 int bit;
1271 int vpe;
1272 int tc;
1273 int hook_ntcs;
1274 /*
1275 * printk within DMT-protected regions can deadlock,
1276 * so buffer diagnostic messages for later output.
1277 */
1278 char *pdb_msg;
1279 char id_ho_db_msg[768]; /* worst-case use should be less than 700 */
1280
1281 if (atomic_read(&idle_hook_initialized) == 0) { /* fast test */
1282 if (atomic_add_return(1, &idle_hook_initialized) == 1) {
1283 int mvpconf0;
1284 /* Tedious stuff to just do once */
1285 mvpconf0 = read_c0_mvpconf0();
1286 hook_ntcs = ((mvpconf0 & MVPCONF0_PTC) >> MVPCONF0_PTC_SHIFT) + 1;
1287 if (hook_ntcs > NR_CPUS)
1288 hook_ntcs = NR_CPUS;
1289 for (tc = 0; tc < hook_ntcs; tc++) {
1290 tcnoprog[tc] = 0;
1291 clock_hang_reported[tc] = 0;
70342287 1292 }
41c594ab
RB
1293 for (vpe = 0; vpe < 2; vpe++)
1294 for (im = 0; im < 8; im++)
1295 imstuckcount[vpe][im] = 0;
1296 printk("Idle loop test hook initialized for %d TCs\n", hook_ntcs);
1297 atomic_set(&idle_hook_initialized, 1000);
1298 } else {
1299 /* Someone else is initializing in parallel - let 'em finish */
1300 while (atomic_read(&idle_hook_initialized) < 1000)
1301 ;
1302 }
1303 }
1304
1305 /* Have we stupidly left IXMT set somewhere? */
1306 if (read_c0_tcstatus() & 0x400) {
1307 write_c0_tcstatus(read_c0_tcstatus() & ~0x400);
1308 ehb();
1309 printk("Dangling IXMT in cpu_idle()\n");
1310 }
1311
1312 /* Have we stupidly left an IM bit turned off? */
1313#define IM_LIMIT 2000
1314 local_irq_save(flags);
1315 mtflags = dmt();
1316 pdb_msg = &id_ho_db_msg[0];
1317 im = read_c0_status();
8f8771a0 1318 vpe = current_cpu_data.vpe_id;
41c594ab
RB
1319 for (bit = 0; bit < 8; bit++) {
1320 /*
1321 * In current prototype, I/O interrupts
1322 * are masked for VPE > 0
1323 */
1324 if (vpemask[vpe][bit]) {
1325 if (!(im & (0x100 << bit)))
1326 imstuckcount[vpe][bit]++;
1327 else
1328 imstuckcount[vpe][bit] = 0;
1329 if (imstuckcount[vpe][bit] > IM_LIMIT) {
1330 set_c0_status(0x100 << bit);
1331 ehb();
1332 imstuckcount[vpe][bit] = 0;
1333 pdb_msg += sprintf(pdb_msg,
1334 "Dangling IM %d fixed for VPE %d\n", bit,
1335 vpe);
1336 }
1337 }
1338 }
1339
41c594ab
RB
1340 emt(mtflags);
1341 local_irq_restore(flags);
1342 if (pdb_msg != &id_ho_db_msg[0])
1343 printk("CPU%d: %s", smp_processor_id(), id_ho_db_msg);
c68644d3 1344#endif /* CONFIG_SMTC_IDLE_HOOK_DEBUG */
ac8be955 1345
8531a35e 1346 smtc_ipi_replay();
41c594ab
RB
1347}
1348
1349void smtc_soft_dump(void)
1350{
1351 int i;
1352
1353 printk("Counter Interrupts taken per CPU (TC)\n");
1354 for (i=0; i < NR_CPUS; i++) {
1355 printk("%d: %ld\n", i, smtc_cpu_stats[i].timerints);
1356 }
1357 printk("Self-IPI invocations:\n");
1358 for (i=0; i < NR_CPUS; i++) {
1359 printk("%d: %ld\n", i, smtc_cpu_stats[i].selfipis);
1360 }
1361 smtc_ipi_qdump();
41c594ab
RB
1362 printk("%d Recoveries of \"stolen\" FPU\n",
1363 atomic_read(&smtc_fpu_recoveries));
1364}
1365
1366
1367/*
1368 * TLB management routines special to SMTC
1369 */
1370
1371void smtc_get_new_mmu_context(struct mm_struct *mm, unsigned long cpu)
1372{
1373 unsigned long flags, mtflags, tcstat, prevhalt, asid;
1374 int tlb, i;
1375
1376 /*
1377 * It would be nice to be able to use a spinlock here,
1378 * but this is invoked from within TLB flush routines
1379 * that protect themselves with DVPE, so if a lock is
e0daad44 1380 * held by another TC, it'll never be freed.
41c594ab
RB
1381 *
1382 * DVPE/DMT must not be done with interrupts enabled,
1383 * so even so most callers will already have disabled
1384 * them, let's be really careful...
1385 */
1386
1387 local_irq_save(flags);
1388 if (smtc_status & SMTC_TLB_SHARED) {
1389 mtflags = dvpe();
1390 tlb = 0;
1391 } else {
1392 mtflags = dmt();
1393 tlb = cpu_data[cpu].vpe_id;
1394 }
1395 asid = asid_cache(cpu);
1396
1397 do {
d532f3d2 1398 if (!ASID_MASK(ASID_INC(asid))) {
41c594ab
RB
1399 if (cpu_has_vtag_icache)
1400 flush_icache_all();
af901ca1 1401 /* Traverse all online CPUs (hack requires contiguous range) */
b5eb5511 1402 for_each_online_cpu(i) {
41c594ab
RB
1403 /*
1404 * We don't need to worry about our own CPU, nor those of
1405 * CPUs who don't share our TLB.
1406 */
1407 if ((i != smp_processor_id()) &&
1408 ((smtc_status & SMTC_TLB_SHARED) ||
1409 (cpu_data[i].vpe_id == cpu_data[cpu].vpe_id))) {
1410 settc(cpu_data[i].tc_id);
1411 prevhalt = read_tc_c0_tchalt() & TCHALT_H;
1412 if (!prevhalt) {
1413 write_tc_c0_tchalt(TCHALT_H);
1414 mips_ihb();
1415 }
1416 tcstat = read_tc_c0_tcstatus();
d532f3d2 1417 smtc_live_asid[tlb][ASID_MASK(tcstat)] |= (asiduse)(0x1 << i);
41c594ab
RB
1418 if (!prevhalt)
1419 write_tc_c0_tchalt(0);
1420 }
1421 }
1422 if (!asid) /* fix version if needed */
1423 asid = ASID_FIRST_VERSION;
1424 local_flush_tlb_all(); /* start new asid cycle */
1425 }
d532f3d2 1426 } while (smtc_live_asid[tlb][ASID_MASK(asid)]);
41c594ab
RB
1427
1428 /*
1429 * SMTC shares the TLB within VPEs and possibly across all VPEs.
1430 */
b5eb5511 1431 for_each_online_cpu(i) {
41c594ab
RB
1432 if ((smtc_status & SMTC_TLB_SHARED) ||
1433 (cpu_data[i].vpe_id == cpu_data[cpu].vpe_id))
1434 cpu_context(i, mm) = asid_cache(i) = asid;
1435 }
1436
1437 if (smtc_status & SMTC_TLB_SHARED)
1438 evpe(mtflags);
1439 else
1440 emt(mtflags);
1441 local_irq_restore(flags);
1442}
1443
1444/*
1445 * Invoked from macros defined in mmu_context.h
1446 * which must already have disabled interrupts
1447 * and done a DVPE or DMT as appropriate.
1448 */
1449
1450void smtc_flush_tlb_asid(unsigned long asid)
1451{
1452 int entry;
1453 unsigned long ehi;
1454
1455 entry = read_c0_wired();
1456
1457 /* Traverse all non-wired entries */
1458 while (entry < current_cpu_data.tlbsize) {
1459 write_c0_index(entry);
1460 ehb();
1461 tlb_read();
1462 ehb();
1463 ehi = read_c0_entryhi();
d532f3d2 1464 if (ASID_MASK(ehi) == asid) {
41c594ab
RB
1465 /*
1466 * Invalidate only entries with specified ASID,
1467 * makiing sure all entries differ.
1468 */
1469 write_c0_entryhi(CKSEG0 + (entry << (PAGE_SHIFT + 1)));
1470 write_c0_entrylo0(0);
1471 write_c0_entrylo1(0);
1472 mtc0_tlbw_hazard();
1473 tlb_write_indexed();
1474 }
1475 entry++;
1476 }
1477 write_c0_index(PARKED_INDEX);
1478 tlbw_use_hazard();
1479}
1480
1481/*
1482 * Support for single-threading cache flush operations.
1483 */
1484
5868756d 1485static int halt_state_save[NR_CPUS];
41c594ab
RB
1486
1487/*
1488 * To really, really be sure that nothing is being done
70342287 1489 * by other TCs, halt them all. This code assumes that
41c594ab
RB
1490 * a DVPE has already been done, so while their Halted
1491 * state is theoretically architecturally unstable, in
1492 * practice, it's not going to change while we're looking
1493 * at it.
1494 */
1495
1496void smtc_cflush_lockdown(void)
1497{
1498 int cpu;
1499
1500 for_each_online_cpu(cpu) {
1501 if (cpu != smp_processor_id()) {
1502 settc(cpu_data[cpu].tc_id);
1503 halt_state_save[cpu] = read_tc_c0_tchalt();
1504 write_tc_c0_tchalt(TCHALT_H);
1505 }
1506 }
1507 mips_ihb();
1508}
1509
1510/* It would be cheating to change the cpu_online states during a flush! */
1511
1512void smtc_cflush_release(void)
1513{
1514 int cpu;
1515
1516 /*
1517 * Start with a hazard barrier to ensure
1518 * that all CACHE ops have played through.
1519 */
1520 mips_ihb();
1521
1522 for_each_online_cpu(cpu) {
1523 if (cpu != smp_processor_id()) {
1524 settc(cpu_data[cpu].tc_id);
1525 write_tc_c0_tchalt(halt_state_save[cpu]);
1526 }
1527 }
1528 mips_ihb();
1529}
This page took 0.631005 seconds and 5 git commands to generate.