diff options
author | Linus Torvalds <torvalds@ppc970.osdl.org> | 2005-04-16 18:20:36 -0400 |
---|---|---|
committer | Linus Torvalds <torvalds@ppc970.osdl.org> | 2005-04-16 18:20:36 -0400 |
commit | 1da177e4c3f41524e886b7f1b8a0c1fc7321cac2 (patch) | |
tree | 0bba044c4ce775e45a88a51686b5d9f90697ea9d /arch/i386/mach-voyager/voyager_smp.c |
Linux-2.6.12-rc2v2.6.12-rc2
Initial git repository build. I'm not bothering with the full history,
even though we have it. We can create a separate "historical" git
archive of that later if we want to, and in the meantime it's about
3.2GB when imported into git - space that would just make the early
git days unnecessarily complicated, when we don't have a lot of good
infrastructure for it.
Let it rip!
Diffstat (limited to 'arch/i386/mach-voyager/voyager_smp.c')
-rw-r--r-- | arch/i386/mach-voyager/voyager_smp.c | 1931 |
1 files changed, 1931 insertions, 0 deletions
diff --git a/arch/i386/mach-voyager/voyager_smp.c b/arch/i386/mach-voyager/voyager_smp.c new file mode 100644 index 000000000000..903d739ca74a --- /dev/null +++ b/arch/i386/mach-voyager/voyager_smp.c | |||
@@ -0,0 +1,1931 @@ | |||
1 | /* -*- mode: c; c-basic-offset: 8 -*- */ | ||
2 | |||
3 | /* Copyright (C) 1999,2001 | ||
4 | * | ||
5 | * Author: J.E.J.Bottomley@HansenPartnership.com | ||
6 | * | ||
7 | * linux/arch/i386/kernel/voyager_smp.c | ||
8 | * | ||
9 | * This file provides all the same external entries as smp.c but uses | ||
10 | * the voyager hal to provide the functionality | ||
11 | */ | ||
12 | #include <linux/config.h> | ||
13 | #include <linux/mm.h> | ||
14 | #include <linux/kernel_stat.h> | ||
15 | #include <linux/delay.h> | ||
16 | #include <linux/mc146818rtc.h> | ||
17 | #include <linux/cache.h> | ||
18 | #include <linux/interrupt.h> | ||
19 | #include <linux/smp_lock.h> | ||
20 | #include <linux/init.h> | ||
21 | #include <linux/kernel.h> | ||
22 | #include <linux/bootmem.h> | ||
23 | #include <linux/completion.h> | ||
24 | #include <asm/desc.h> | ||
25 | #include <asm/voyager.h> | ||
26 | #include <asm/vic.h> | ||
27 | #include <asm/mtrr.h> | ||
28 | #include <asm/pgalloc.h> | ||
29 | #include <asm/tlbflush.h> | ||
30 | #include <asm/arch_hooks.h> | ||
31 | |||
32 | #include <linux/irq.h> | ||
33 | |||
34 | /* TLB state -- visible externally, indexed physically */ | ||
35 | DEFINE_PER_CPU(struct tlb_state, cpu_tlbstate) ____cacheline_aligned = { &init_mm, 0 }; | ||
36 | |||
37 | /* CPU IRQ affinity -- set to all ones initially */ | ||
38 | static unsigned long cpu_irq_affinity[NR_CPUS] __cacheline_aligned = { [0 ... NR_CPUS-1] = ~0UL }; | ||
39 | |||
40 | /* per CPU data structure (for /proc/cpuinfo et al), visible externally | ||
41 | * indexed physically */ | ||
42 | struct cpuinfo_x86 cpu_data[NR_CPUS] __cacheline_aligned; | ||
43 | |||
44 | /* physical ID of the CPU used to boot the system */ | ||
45 | unsigned char boot_cpu_id; | ||
46 | |||
47 | /* The memory line addresses for the Quad CPIs */ | ||
48 | struct voyager_qic_cpi *voyager_quad_cpi_addr[NR_CPUS] __cacheline_aligned; | ||
49 | |||
50 | /* The masks for the Extended VIC processors, filled in by cat_init */ | ||
51 | __u32 voyager_extended_vic_processors = 0; | ||
52 | |||
53 | /* Masks for the extended Quad processors which cannot be VIC booted */ | ||
54 | __u32 voyager_allowed_boot_processors = 0; | ||
55 | |||
56 | /* The mask for the Quad Processors (both extended and non-extended) */ | ||
57 | __u32 voyager_quad_processors = 0; | ||
58 | |||
59 | /* Total count of live CPUs, used in process.c to display | ||
60 | * the CPU information and in irq.c for the per CPU irq | ||
61 | * activity count. Finally exported by i386_ksyms.c */ | ||
62 | static int voyager_extended_cpus = 1; | ||
63 | |||
64 | /* Have we found an SMP box - used by time.c to do the profiling | ||
65 | interrupt for timeslicing; do not set to 1 until the per CPU timer | ||
66 | interrupt is active */ | ||
67 | int smp_found_config = 0; | ||
68 | |||
69 | /* Used for the invalidate map that's also checked in the spinlock */ | ||
70 | static volatile unsigned long smp_invalidate_needed; | ||
71 | |||
72 | /* Bitmask of currently online CPUs - used by setup.c for | ||
73 | /proc/cpuinfo, visible externally but still physical */ | ||
74 | cpumask_t cpu_online_map = CPU_MASK_NONE; | ||
75 | |||
76 | /* Bitmask of CPUs present in the system - exported by i386_syms.c, used | ||
77 | * by scheduler but indexed physically */ | ||
78 | cpumask_t phys_cpu_present_map = CPU_MASK_NONE; | ||
79 | |||
80 | |||
81 | /* The internal functions */ | ||
82 | static void send_CPI(__u32 cpuset, __u8 cpi); | ||
83 | static void ack_CPI(__u8 cpi); | ||
84 | static int ack_QIC_CPI(__u8 cpi); | ||
85 | static void ack_special_QIC_CPI(__u8 cpi); | ||
86 | static void ack_VIC_CPI(__u8 cpi); | ||
87 | static void send_CPI_allbutself(__u8 cpi); | ||
88 | static void enable_vic_irq(unsigned int irq); | ||
89 | static void disable_vic_irq(unsigned int irq); | ||
90 | static unsigned int startup_vic_irq(unsigned int irq); | ||
91 | static void enable_local_vic_irq(unsigned int irq); | ||
92 | static void disable_local_vic_irq(unsigned int irq); | ||
93 | static void before_handle_vic_irq(unsigned int irq); | ||
94 | static void after_handle_vic_irq(unsigned int irq); | ||
95 | static void set_vic_irq_affinity(unsigned int irq, cpumask_t mask); | ||
96 | static void ack_vic_irq(unsigned int irq); | ||
97 | static void vic_enable_cpi(void); | ||
98 | static void do_boot_cpu(__u8 cpuid); | ||
99 | static void do_quad_bootstrap(void); | ||
100 | static inline void wrapper_smp_local_timer_interrupt(struct pt_regs *); | ||
101 | |||
102 | int hard_smp_processor_id(void); | ||
103 | |||
104 | /* Inline functions */ | ||
105 | static inline void | ||
106 | send_one_QIC_CPI(__u8 cpu, __u8 cpi) | ||
107 | { | ||
108 | voyager_quad_cpi_addr[cpu]->qic_cpi[cpi].cpi = | ||
109 | (smp_processor_id() << 16) + cpi; | ||
110 | } | ||
111 | |||
112 | static inline void | ||
113 | send_QIC_CPI(__u32 cpuset, __u8 cpi) | ||
114 | { | ||
115 | int cpu; | ||
116 | |||
117 | for_each_online_cpu(cpu) { | ||
118 | if(cpuset & (1<<cpu)) { | ||
119 | #ifdef VOYAGER_DEBUG | ||
120 | if(!cpu_isset(cpu, cpu_online_map)) | ||
121 | VDEBUG(("CPU%d sending cpi %d to CPU%d not in cpu_online_map\n", hard_smp_processor_id(), cpi, cpu)); | ||
122 | #endif | ||
123 | send_one_QIC_CPI(cpu, cpi - QIC_CPI_OFFSET); | ||
124 | } | ||
125 | } | ||
126 | } | ||
127 | |||
128 | static inline void | ||
129 | send_one_CPI(__u8 cpu, __u8 cpi) | ||
130 | { | ||
131 | if(voyager_quad_processors & (1<<cpu)) | ||
132 | send_one_QIC_CPI(cpu, cpi - QIC_CPI_OFFSET); | ||
133 | else | ||
134 | send_CPI(1<<cpu, cpi); | ||
135 | } | ||
136 | |||
137 | static inline void | ||
138 | send_CPI_allbutself(__u8 cpi) | ||
139 | { | ||
140 | __u8 cpu = smp_processor_id(); | ||
141 | __u32 mask = cpus_addr(cpu_online_map)[0] & ~(1 << cpu); | ||
142 | send_CPI(mask, cpi); | ||
143 | } | ||
144 | |||
145 | static inline int | ||
146 | is_cpu_quad(void) | ||
147 | { | ||
148 | __u8 cpumask = inb(VIC_PROC_WHO_AM_I); | ||
149 | return ((cpumask & QUAD_IDENTIFIER) == QUAD_IDENTIFIER); | ||
150 | } | ||
151 | |||
152 | static inline int | ||
153 | is_cpu_extended(void) | ||
154 | { | ||
155 | __u8 cpu = hard_smp_processor_id(); | ||
156 | |||
157 | return(voyager_extended_vic_processors & (1<<cpu)); | ||
158 | } | ||
159 | |||
160 | static inline int | ||
161 | is_cpu_vic_boot(void) | ||
162 | { | ||
163 | __u8 cpu = hard_smp_processor_id(); | ||
164 | |||
165 | return(voyager_extended_vic_processors | ||
166 | & voyager_allowed_boot_processors & (1<<cpu)); | ||
167 | } | ||
168 | |||
169 | |||
170 | static inline void | ||
171 | ack_CPI(__u8 cpi) | ||
172 | { | ||
173 | switch(cpi) { | ||
174 | case VIC_CPU_BOOT_CPI: | ||
175 | if(is_cpu_quad() && !is_cpu_vic_boot()) | ||
176 | ack_QIC_CPI(cpi); | ||
177 | else | ||
178 | ack_VIC_CPI(cpi); | ||
179 | break; | ||
180 | case VIC_SYS_INT: | ||
181 | case VIC_CMN_INT: | ||
182 | /* These are slightly strange. Even on the Quad card, | ||
183 | * They are vectored as VIC CPIs */ | ||
184 | if(is_cpu_quad()) | ||
185 | ack_special_QIC_CPI(cpi); | ||
186 | else | ||
187 | ack_VIC_CPI(cpi); | ||
188 | break; | ||
189 | default: | ||
190 | printk("VOYAGER ERROR: CPI%d is in common CPI code\n", cpi); | ||
191 | break; | ||
192 | } | ||
193 | } | ||
194 | |||
195 | /* local variables */ | ||
196 | |||
197 | /* The VIC IRQ descriptors -- these look almost identical to the | ||
198 | * 8259 IRQs except that masks and things must be kept per processor | ||
199 | */ | ||
200 | static struct hw_interrupt_type vic_irq_type = { | ||
201 | .typename = "VIC-level", | ||
202 | .startup = startup_vic_irq, | ||
203 | .shutdown = disable_vic_irq, | ||
204 | .enable = enable_vic_irq, | ||
205 | .disable = disable_vic_irq, | ||
206 | .ack = before_handle_vic_irq, | ||
207 | .end = after_handle_vic_irq, | ||
208 | .set_affinity = set_vic_irq_affinity, | ||
209 | }; | ||
210 | |||
211 | /* used to count up as CPUs are brought on line (starts at 0) */ | ||
212 | static int cpucount = 0; | ||
213 | |||
214 | /* steal a page from the bottom of memory for the trampoline and | ||
215 | * squirrel its address away here. This will be in kernel virtual | ||
216 | * space */ | ||
217 | static __u32 trampoline_base; | ||
218 | |||
219 | /* The per cpu profile stuff - used in smp_local_timer_interrupt */ | ||
220 | static DEFINE_PER_CPU(int, prof_multiplier) = 1; | ||
221 | static DEFINE_PER_CPU(int, prof_old_multiplier) = 1; | ||
222 | static DEFINE_PER_CPU(int, prof_counter) = 1; | ||
223 | |||
224 | /* the map used to check if a CPU has booted */ | ||
225 | static __u32 cpu_booted_map; | ||
226 | |||
227 | /* the synchronize flag used to hold all secondary CPUs spinning in | ||
228 | * a tight loop until the boot sequence is ready for them */ | ||
229 | static cpumask_t smp_commenced_mask = CPU_MASK_NONE; | ||
230 | |||
231 | /* This is for the new dynamic CPU boot code */ | ||
232 | cpumask_t cpu_callin_map = CPU_MASK_NONE; | ||
233 | cpumask_t cpu_callout_map = CPU_MASK_NONE; | ||
234 | |||
235 | /* The per processor IRQ masks (these are usually kept in sync) */ | ||
236 | static __u16 vic_irq_mask[NR_CPUS] __cacheline_aligned; | ||
237 | |||
238 | /* the list of IRQs to be enabled by the VIC_ENABLE_IRQ_CPI */ | ||
239 | static __u16 vic_irq_enable_mask[NR_CPUS] __cacheline_aligned = { 0 }; | ||
240 | |||
241 | /* Lock for enable/disable of VIC interrupts */ | ||
242 | static __cacheline_aligned DEFINE_SPINLOCK(vic_irq_lock); | ||
243 | |||
244 | /* The boot processor is correctly set up in PC mode when it | ||
245 | * comes up, but the secondaries need their master/slave 8259 | ||
246 | * pairs initializing correctly */ | ||
247 | |||
248 | /* Interrupt counters (per cpu) and total - used to try to | ||
249 | * even up the interrupt handling routines */ | ||
250 | static long vic_intr_total = 0; | ||
251 | static long vic_intr_count[NR_CPUS] __cacheline_aligned = { 0 }; | ||
252 | static unsigned long vic_tick[NR_CPUS] __cacheline_aligned = { 0 }; | ||
253 | |||
254 | /* Since we can only use CPI0, we fake all the other CPIs */ | ||
255 | static unsigned long vic_cpi_mailbox[NR_CPUS] __cacheline_aligned; | ||
256 | |||
257 | /* debugging routine to read the isr of the cpu's pic */ | ||
258 | static inline __u16 | ||
259 | vic_read_isr(void) | ||
260 | { | ||
261 | __u16 isr; | ||
262 | |||
263 | outb(0x0b, 0xa0); | ||
264 | isr = inb(0xa0) << 8; | ||
265 | outb(0x0b, 0x20); | ||
266 | isr |= inb(0x20); | ||
267 | |||
268 | return isr; | ||
269 | } | ||
270 | |||
271 | static __init void | ||
272 | qic_setup(void) | ||
273 | { | ||
274 | if(!is_cpu_quad()) { | ||
275 | /* not a quad, no setup */ | ||
276 | return; | ||
277 | } | ||
278 | outb(QIC_DEFAULT_MASK0, QIC_MASK_REGISTER0); | ||
279 | outb(QIC_CPI_ENABLE, QIC_MASK_REGISTER1); | ||
280 | |||
281 | if(is_cpu_extended()) { | ||
282 | /* the QIC duplicate of the VIC base register */ | ||
283 | outb(VIC_DEFAULT_CPI_BASE, QIC_VIC_CPI_BASE_REGISTER); | ||
284 | outb(QIC_DEFAULT_CPI_BASE, QIC_CPI_BASE_REGISTER); | ||
285 | |||
286 | /* FIXME: should set up the QIC timer and memory parity | ||
287 | * error vectors here */ | ||
288 | } | ||
289 | } | ||
290 | |||
291 | static __init void | ||
292 | vic_setup_pic(void) | ||
293 | { | ||
294 | outb(1, VIC_REDIRECT_REGISTER_1); | ||
295 | /* clear the claim registers for dynamic routing */ | ||
296 | outb(0, VIC_CLAIM_REGISTER_0); | ||
297 | outb(0, VIC_CLAIM_REGISTER_1); | ||
298 | |||
299 | outb(0, VIC_PRIORITY_REGISTER); | ||
300 | /* Set the Primary and Secondary Microchannel vector | ||
301 | * bases to be the same as the ordinary interrupts | ||
302 | * | ||
303 | * FIXME: This would be more efficient using separate | ||
304 | * vectors. */ | ||
305 | outb(FIRST_EXTERNAL_VECTOR, VIC_PRIMARY_MC_BASE); | ||
306 | outb(FIRST_EXTERNAL_VECTOR, VIC_SECONDARY_MC_BASE); | ||
307 | /* Now initiallise the master PIC belonging to this CPU by | ||
308 | * sending the four ICWs */ | ||
309 | |||
310 | /* ICW1: level triggered, ICW4 needed */ | ||
311 | outb(0x19, 0x20); | ||
312 | |||
313 | /* ICW2: vector base */ | ||
314 | outb(FIRST_EXTERNAL_VECTOR, 0x21); | ||
315 | |||
316 | /* ICW3: slave at line 2 */ | ||
317 | outb(0x04, 0x21); | ||
318 | |||
319 | /* ICW4: 8086 mode */ | ||
320 | outb(0x01, 0x21); | ||
321 | |||
322 | /* now the same for the slave PIC */ | ||
323 | |||
324 | /* ICW1: level trigger, ICW4 needed */ | ||
325 | outb(0x19, 0xA0); | ||
326 | |||
327 | /* ICW2: slave vector base */ | ||
328 | outb(FIRST_EXTERNAL_VECTOR + 8, 0xA1); | ||
329 | |||
330 | /* ICW3: slave ID */ | ||
331 | outb(0x02, 0xA1); | ||
332 | |||
333 | /* ICW4: 8086 mode */ | ||
334 | outb(0x01, 0xA1); | ||
335 | } | ||
336 | |||
337 | static void | ||
338 | do_quad_bootstrap(void) | ||
339 | { | ||
340 | if(is_cpu_quad() && is_cpu_vic_boot()) { | ||
341 | int i; | ||
342 | unsigned long flags; | ||
343 | __u8 cpuid = hard_smp_processor_id(); | ||
344 | |||
345 | local_irq_save(flags); | ||
346 | |||
347 | for(i = 0; i<4; i++) { | ||
348 | /* FIXME: this would be >>3 &0x7 on the 32 way */ | ||
349 | if(((cpuid >> 2) & 0x03) == i) | ||
350 | /* don't lower our own mask! */ | ||
351 | continue; | ||
352 | |||
353 | /* masquerade as local Quad CPU */ | ||
354 | outb(QIC_CPUID_ENABLE | i, QIC_PROCESSOR_ID); | ||
355 | /* enable the startup CPI */ | ||
356 | outb(QIC_BOOT_CPI_MASK, QIC_MASK_REGISTER1); | ||
357 | /* restore cpu id */ | ||
358 | outb(0, QIC_PROCESSOR_ID); | ||
359 | } | ||
360 | local_irq_restore(flags); | ||
361 | } | ||
362 | } | ||
363 | |||
364 | |||
365 | /* Set up all the basic stuff: read the SMP config and make all the | ||
366 | * SMP information reflect only the boot cpu. All others will be | ||
367 | * brought on-line later. */ | ||
368 | void __init | ||
369 | find_smp_config(void) | ||
370 | { | ||
371 | int i; | ||
372 | |||
373 | boot_cpu_id = hard_smp_processor_id(); | ||
374 | |||
375 | printk("VOYAGER SMP: Boot cpu is %d\n", boot_cpu_id); | ||
376 | |||
377 | /* initialize the CPU structures (moved from smp_boot_cpus) */ | ||
378 | for(i=0; i<NR_CPUS; i++) { | ||
379 | cpu_irq_affinity[i] = ~0; | ||
380 | } | ||
381 | cpu_online_map = cpumask_of_cpu(boot_cpu_id); | ||
382 | |||
383 | /* The boot CPU must be extended */ | ||
384 | voyager_extended_vic_processors = 1<<boot_cpu_id; | ||
385 | /* initially, all of the first 8 cpu's can boot */ | ||
386 | voyager_allowed_boot_processors = 0xff; | ||
387 | /* set up everything for just this CPU, we can alter | ||
388 | * this as we start the other CPUs later */ | ||
389 | /* now get the CPU disposition from the extended CMOS */ | ||
390 | cpus_addr(phys_cpu_present_map)[0] = voyager_extended_cmos_read(VOYAGER_PROCESSOR_PRESENT_MASK); | ||
391 | cpus_addr(phys_cpu_present_map)[0] |= voyager_extended_cmos_read(VOYAGER_PROCESSOR_PRESENT_MASK + 1) << 8; | ||
392 | cpus_addr(phys_cpu_present_map)[0] |= voyager_extended_cmos_read(VOYAGER_PROCESSOR_PRESENT_MASK + 2) << 16; | ||
393 | cpus_addr(phys_cpu_present_map)[0] |= voyager_extended_cmos_read(VOYAGER_PROCESSOR_PRESENT_MASK + 3) << 24; | ||
394 | printk("VOYAGER SMP: phys_cpu_present_map = 0x%lx\n", cpus_addr(phys_cpu_present_map)[0]); | ||
395 | /* Here we set up the VIC to enable SMP */ | ||
396 | /* enable the CPIs by writing the base vector to their register */ | ||
397 | outb(VIC_DEFAULT_CPI_BASE, VIC_CPI_BASE_REGISTER); | ||
398 | outb(1, VIC_REDIRECT_REGISTER_1); | ||
399 | /* set the claim registers for static routing --- Boot CPU gets | ||
400 | * all interrupts untill all other CPUs started */ | ||
401 | outb(0xff, VIC_CLAIM_REGISTER_0); | ||
402 | outb(0xff, VIC_CLAIM_REGISTER_1); | ||
403 | /* Set the Primary and Secondary Microchannel vector | ||
404 | * bases to be the same as the ordinary interrupts | ||
405 | * | ||
406 | * FIXME: This would be more efficient using separate | ||
407 | * vectors. */ | ||
408 | outb(FIRST_EXTERNAL_VECTOR, VIC_PRIMARY_MC_BASE); | ||
409 | outb(FIRST_EXTERNAL_VECTOR, VIC_SECONDARY_MC_BASE); | ||
410 | |||
411 | /* Finally tell the firmware that we're driving */ | ||
412 | outb(inb(VOYAGER_SUS_IN_CONTROL_PORT) | VOYAGER_IN_CONTROL_FLAG, | ||
413 | VOYAGER_SUS_IN_CONTROL_PORT); | ||
414 | |||
415 | current_thread_info()->cpu = boot_cpu_id; | ||
416 | } | ||
417 | |||
418 | /* | ||
419 | * The bootstrap kernel entry code has set these up. Save them | ||
420 | * for a given CPU, id is physical */ | ||
421 | void __init | ||
422 | smp_store_cpu_info(int id) | ||
423 | { | ||
424 | struct cpuinfo_x86 *c=&cpu_data[id]; | ||
425 | |||
426 | *c = boot_cpu_data; | ||
427 | |||
428 | identify_cpu(c); | ||
429 | } | ||
430 | |||
431 | /* set up the trampoline and return the physical address of the code */ | ||
432 | static __u32 __init | ||
433 | setup_trampoline(void) | ||
434 | { | ||
435 | /* these two are global symbols in trampoline.S */ | ||
436 | extern __u8 trampoline_end[]; | ||
437 | extern __u8 trampoline_data[]; | ||
438 | |||
439 | memcpy((__u8 *)trampoline_base, trampoline_data, | ||
440 | trampoline_end - trampoline_data); | ||
441 | return virt_to_phys((__u8 *)trampoline_base); | ||
442 | } | ||
443 | |||
444 | /* Routine initially called when a non-boot CPU is brought online */ | ||
445 | static void __init | ||
446 | start_secondary(void *unused) | ||
447 | { | ||
448 | __u8 cpuid = hard_smp_processor_id(); | ||
449 | /* external functions not defined in the headers */ | ||
450 | extern void calibrate_delay(void); | ||
451 | |||
452 | cpu_init(); | ||
453 | |||
454 | /* OK, we're in the routine */ | ||
455 | ack_CPI(VIC_CPU_BOOT_CPI); | ||
456 | |||
457 | /* setup the 8259 master slave pair belonging to this CPU --- | ||
458 | * we won't actually receive any until the boot CPU | ||
459 | * relinquishes it's static routing mask */ | ||
460 | vic_setup_pic(); | ||
461 | |||
462 | qic_setup(); | ||
463 | |||
464 | if(is_cpu_quad() && !is_cpu_vic_boot()) { | ||
465 | /* clear the boot CPI */ | ||
466 | __u8 dummy; | ||
467 | |||
468 | dummy = voyager_quad_cpi_addr[cpuid]->qic_cpi[VIC_CPU_BOOT_CPI].cpi; | ||
469 | printk("read dummy %d\n", dummy); | ||
470 | } | ||
471 | |||
472 | /* lower the mask to receive CPIs */ | ||
473 | vic_enable_cpi(); | ||
474 | |||
475 | VDEBUG(("VOYAGER SMP: CPU%d, stack at about %p\n", cpuid, &cpuid)); | ||
476 | |||
477 | /* enable interrupts */ | ||
478 | local_irq_enable(); | ||
479 | |||
480 | /* get our bogomips */ | ||
481 | calibrate_delay(); | ||
482 | |||
483 | /* save our processor parameters */ | ||
484 | smp_store_cpu_info(cpuid); | ||
485 | |||
486 | /* if we're a quad, we may need to bootstrap other CPUs */ | ||
487 | do_quad_bootstrap(); | ||
488 | |||
489 | /* FIXME: this is rather a poor hack to prevent the CPU | ||
490 | * activating softirqs while it's supposed to be waiting for | ||
491 | * permission to proceed. Without this, the new per CPU stuff | ||
492 | * in the softirqs will fail */ | ||
493 | local_irq_disable(); | ||
494 | cpu_set(cpuid, cpu_callin_map); | ||
495 | |||
496 | /* signal that we're done */ | ||
497 | cpu_booted_map = 1; | ||
498 | |||
499 | while (!cpu_isset(cpuid, smp_commenced_mask)) | ||
500 | rep_nop(); | ||
501 | local_irq_enable(); | ||
502 | |||
503 | local_flush_tlb(); | ||
504 | |||
505 | cpu_set(cpuid, cpu_online_map); | ||
506 | wmb(); | ||
507 | cpu_idle(); | ||
508 | } | ||
509 | |||
510 | |||
511 | /* Routine to kick start the given CPU and wait for it to report ready | ||
512 | * (or timeout in startup). When this routine returns, the requested | ||
513 | * CPU is either fully running and configured or known to be dead. | ||
514 | * | ||
515 | * We call this routine sequentially 1 CPU at a time, so no need for | ||
516 | * locking */ | ||
517 | |||
518 | static void __init | ||
519 | do_boot_cpu(__u8 cpu) | ||
520 | { | ||
521 | struct task_struct *idle; | ||
522 | int timeout; | ||
523 | unsigned long flags; | ||
524 | int quad_boot = (1<<cpu) & voyager_quad_processors | ||
525 | & ~( voyager_extended_vic_processors | ||
526 | & voyager_allowed_boot_processors); | ||
527 | |||
528 | /* For the 486, we can't use the 4Mb page table trick, so | ||
529 | * must map a region of memory */ | ||
530 | #ifdef CONFIG_M486 | ||
531 | int i; | ||
532 | unsigned long *page_table_copies = (unsigned long *) | ||
533 | __get_free_page(GFP_KERNEL); | ||
534 | #endif | ||
535 | pgd_t orig_swapper_pg_dir0; | ||
536 | |||
537 | /* This is an area in head.S which was used to set up the | ||
538 | * initial kernel stack. We need to alter this to give the | ||
539 | * booting CPU a new stack (taken from its idle process) */ | ||
540 | extern struct { | ||
541 | __u8 *esp; | ||
542 | unsigned short ss; | ||
543 | } stack_start; | ||
544 | /* This is the format of the CPI IDT gate (in real mode) which | ||
545 | * we're hijacking to boot the CPU */ | ||
546 | union IDTFormat { | ||
547 | struct seg { | ||
548 | __u16 Offset; | ||
549 | __u16 Segment; | ||
550 | } idt; | ||
551 | __u32 val; | ||
552 | } hijack_source; | ||
553 | |||
554 | __u32 *hijack_vector; | ||
555 | __u32 start_phys_address = setup_trampoline(); | ||
556 | |||
557 | /* There's a clever trick to this: The linux trampoline is | ||
558 | * compiled to begin at absolute location zero, so make the | ||
559 | * address zero but have the data segment selector compensate | ||
560 | * for the actual address */ | ||
561 | hijack_source.idt.Offset = start_phys_address & 0x000F; | ||
562 | hijack_source.idt.Segment = (start_phys_address >> 4) & 0xFFFF; | ||
563 | |||
564 | cpucount++; | ||
565 | idle = fork_idle(cpu); | ||
566 | if(IS_ERR(idle)) | ||
567 | panic("failed fork for CPU%d", cpu); | ||
568 | idle->thread.eip = (unsigned long) start_secondary; | ||
569 | /* init_tasks (in sched.c) is indexed logically */ | ||
570 | stack_start.esp = (void *) idle->thread.esp; | ||
571 | |||
572 | irq_ctx_init(cpu); | ||
573 | |||
574 | /* Note: Don't modify initial ss override */ | ||
575 | VDEBUG(("VOYAGER SMP: Booting CPU%d at 0x%lx[%x:%x], stack %p\n", cpu, | ||
576 | (unsigned long)hijack_source.val, hijack_source.idt.Segment, | ||
577 | hijack_source.idt.Offset, stack_start.esp)); | ||
578 | /* set the original swapper_pg_dir[0] to map 0 to 4Mb transparently | ||
579 | * (so that the booting CPU can find start_32 */ | ||
580 | orig_swapper_pg_dir0 = swapper_pg_dir[0]; | ||
581 | #ifdef CONFIG_M486 | ||
582 | if(page_table_copies == NULL) | ||
583 | panic("No free memory for 486 page tables\n"); | ||
584 | for(i = 0; i < PAGE_SIZE/sizeof(unsigned long); i++) | ||
585 | page_table_copies[i] = (i * PAGE_SIZE) | ||
586 | | _PAGE_RW | _PAGE_USER | _PAGE_PRESENT; | ||
587 | |||
588 | ((unsigned long *)swapper_pg_dir)[0] = | ||
589 | ((virt_to_phys(page_table_copies)) & PAGE_MASK) | ||
590 | | _PAGE_RW | _PAGE_USER | _PAGE_PRESENT; | ||
591 | #else | ||
592 | ((unsigned long *)swapper_pg_dir)[0] = | ||
593 | (virt_to_phys(pg0) & PAGE_MASK) | ||
594 | | _PAGE_RW | _PAGE_USER | _PAGE_PRESENT; | ||
595 | #endif | ||
596 | |||
597 | if(quad_boot) { | ||
598 | printk("CPU %d: non extended Quad boot\n", cpu); | ||
599 | hijack_vector = (__u32 *)phys_to_virt((VIC_CPU_BOOT_CPI + QIC_DEFAULT_CPI_BASE)*4); | ||
600 | *hijack_vector = hijack_source.val; | ||
601 | } else { | ||
602 | printk("CPU%d: extended VIC boot\n", cpu); | ||
603 | hijack_vector = (__u32 *)phys_to_virt((VIC_CPU_BOOT_CPI + VIC_DEFAULT_CPI_BASE)*4); | ||
604 | *hijack_vector = hijack_source.val; | ||
605 | /* VIC errata, may also receive interrupt at this address */ | ||
606 | hijack_vector = (__u32 *)phys_to_virt((VIC_CPU_BOOT_ERRATA_CPI + VIC_DEFAULT_CPI_BASE)*4); | ||
607 | *hijack_vector = hijack_source.val; | ||
608 | } | ||
609 | /* All non-boot CPUs start with interrupts fully masked. Need | ||
610 | * to lower the mask of the CPI we're about to send. We do | ||
611 | * this in the VIC by masquerading as the processor we're | ||
612 | * about to boot and lowering its interrupt mask */ | ||
613 | local_irq_save(flags); | ||
614 | if(quad_boot) { | ||
615 | send_one_QIC_CPI(cpu, VIC_CPU_BOOT_CPI); | ||
616 | } else { | ||
617 | outb(VIC_CPU_MASQUERADE_ENABLE | cpu, VIC_PROCESSOR_ID); | ||
618 | /* here we're altering registers belonging to `cpu' */ | ||
619 | |||
620 | outb(VIC_BOOT_INTERRUPT_MASK, 0x21); | ||
621 | /* now go back to our original identity */ | ||
622 | outb(boot_cpu_id, VIC_PROCESSOR_ID); | ||
623 | |||
624 | /* and boot the CPU */ | ||
625 | |||
626 | send_CPI((1<<cpu), VIC_CPU_BOOT_CPI); | ||
627 | } | ||
628 | cpu_booted_map = 0; | ||
629 | local_irq_restore(flags); | ||
630 | |||
631 | /* now wait for it to become ready (or timeout) */ | ||
632 | for(timeout = 0; timeout < 50000; timeout++) { | ||
633 | if(cpu_booted_map) | ||
634 | break; | ||
635 | udelay(100); | ||
636 | } | ||
637 | /* reset the page table */ | ||
638 | swapper_pg_dir[0] = orig_swapper_pg_dir0; | ||
639 | local_flush_tlb(); | ||
640 | #ifdef CONFIG_M486 | ||
641 | free_page((unsigned long)page_table_copies); | ||
642 | #endif | ||
643 | |||
644 | if (cpu_booted_map) { | ||
645 | VDEBUG(("CPU%d: Booted successfully, back in CPU %d\n", | ||
646 | cpu, smp_processor_id())); | ||
647 | |||
648 | printk("CPU%d: ", cpu); | ||
649 | print_cpu_info(&cpu_data[cpu]); | ||
650 | wmb(); | ||
651 | cpu_set(cpu, cpu_callout_map); | ||
652 | } | ||
653 | else { | ||
654 | printk("CPU%d FAILED TO BOOT: ", cpu); | ||
655 | if (*((volatile unsigned char *)phys_to_virt(start_phys_address))==0xA5) | ||
656 | printk("Stuck.\n"); | ||
657 | else | ||
658 | printk("Not responding.\n"); | ||
659 | |||
660 | cpucount--; | ||
661 | } | ||
662 | } | ||
663 | |||
664 | void __init | ||
665 | smp_boot_cpus(void) | ||
666 | { | ||
667 | int i; | ||
668 | |||
669 | /* CAT BUS initialisation must be done after the memory */ | ||
670 | /* FIXME: The L4 has a catbus too, it just needs to be | ||
671 | * accessed in a totally different way */ | ||
672 | if(voyager_level == 5) { | ||
673 | voyager_cat_init(); | ||
674 | |||
675 | /* now that the cat has probed the Voyager System Bus, sanity | ||
676 | * check the cpu map */ | ||
677 | if( ((voyager_quad_processors | voyager_extended_vic_processors) | ||
678 | & cpus_addr(phys_cpu_present_map)[0]) != cpus_addr(phys_cpu_present_map)[0]) { | ||
679 | /* should panic */ | ||
680 | printk("\n\n***WARNING*** Sanity check of CPU present map FAILED\n"); | ||
681 | } | ||
682 | } else if(voyager_level == 4) | ||
683 | voyager_extended_vic_processors = cpus_addr(phys_cpu_present_map)[0]; | ||
684 | |||
685 | /* this sets up the idle task to run on the current cpu */ | ||
686 | voyager_extended_cpus = 1; | ||
687 | /* Remove the global_irq_holder setting, it triggers a BUG() on | ||
688 | * schedule at the moment */ | ||
689 | //global_irq_holder = boot_cpu_id; | ||
690 | |||
691 | /* FIXME: Need to do something about this but currently only works | ||
692 | * on CPUs with a tsc which none of mine have. | ||
693 | smp_tune_scheduling(); | ||
694 | */ | ||
695 | smp_store_cpu_info(boot_cpu_id); | ||
696 | printk("CPU%d: ", boot_cpu_id); | ||
697 | print_cpu_info(&cpu_data[boot_cpu_id]); | ||
698 | |||
699 | if(is_cpu_quad()) { | ||
700 | /* booting on a Quad CPU */ | ||
701 | printk("VOYAGER SMP: Boot CPU is Quad\n"); | ||
702 | qic_setup(); | ||
703 | do_quad_bootstrap(); | ||
704 | } | ||
705 | |||
706 | /* enable our own CPIs */ | ||
707 | vic_enable_cpi(); | ||
708 | |||
709 | cpu_set(boot_cpu_id, cpu_online_map); | ||
710 | cpu_set(boot_cpu_id, cpu_callout_map); | ||
711 | |||
712 | /* loop over all the extended VIC CPUs and boot them. The | ||
713 | * Quad CPUs must be bootstrapped by their extended VIC cpu */ | ||
714 | for(i = 0; i < NR_CPUS; i++) { | ||
715 | if(i == boot_cpu_id || !cpu_isset(i, phys_cpu_present_map)) | ||
716 | continue; | ||
717 | do_boot_cpu(i); | ||
718 | /* This udelay seems to be needed for the Quad boots | ||
719 | * don't remove unless you know what you're doing */ | ||
720 | udelay(1000); | ||
721 | } | ||
722 | /* we could compute the total bogomips here, but why bother?, | ||
723 | * Code added from smpboot.c */ | ||
724 | { | ||
725 | unsigned long bogosum = 0; | ||
726 | for (i = 0; i < NR_CPUS; i++) | ||
727 | if (cpu_isset(i, cpu_online_map)) | ||
728 | bogosum += cpu_data[i].loops_per_jiffy; | ||
729 | printk(KERN_INFO "Total of %d processors activated (%lu.%02lu BogoMIPS).\n", | ||
730 | cpucount+1, | ||
731 | bogosum/(500000/HZ), | ||
732 | (bogosum/(5000/HZ))%100); | ||
733 | } | ||
734 | voyager_extended_cpus = hweight32(voyager_extended_vic_processors); | ||
735 | printk("VOYAGER: Extended (interrupt handling CPUs): %d, non-extended: %d\n", voyager_extended_cpus, num_booting_cpus() - voyager_extended_cpus); | ||
736 | /* that's it, switch to symmetric mode */ | ||
737 | outb(0, VIC_PRIORITY_REGISTER); | ||
738 | outb(0, VIC_CLAIM_REGISTER_0); | ||
739 | outb(0, VIC_CLAIM_REGISTER_1); | ||
740 | |||
741 | VDEBUG(("VOYAGER SMP: Booted with %d CPUs\n", num_booting_cpus())); | ||
742 | } | ||
743 | |||
744 | /* Reload the secondary CPUs task structure (this function does not | ||
745 | * return ) */ | ||
746 | void __init | ||
747 | initialize_secondary(void) | ||
748 | { | ||
749 | #if 0 | ||
750 | // AC kernels only | ||
751 | set_current(hard_get_current()); | ||
752 | #endif | ||
753 | |||
754 | /* | ||
755 | * We don't actually need to load the full TSS, | ||
756 | * basically just the stack pointer and the eip. | ||
757 | */ | ||
758 | |||
759 | asm volatile( | ||
760 | "movl %0,%%esp\n\t" | ||
761 | "jmp *%1" | ||
762 | : | ||
763 | :"r" (current->thread.esp),"r" (current->thread.eip)); | ||
764 | } | ||
765 | |||
766 | /* handle a Voyager SYS_INT -- If we don't, the base board will | ||
767 | * panic the system. | ||
768 | * | ||
769 | * System interrupts occur because some problem was detected on the | ||
770 | * various busses. To find out what you have to probe all the | ||
771 | * hardware via the CAT bus. FIXME: At the moment we do nothing. */ | ||
772 | fastcall void | ||
773 | smp_vic_sys_interrupt(struct pt_regs *regs) | ||
774 | { | ||
775 | ack_CPI(VIC_SYS_INT); | ||
776 | printk("Voyager SYSTEM INTERRUPT\n"); | ||
777 | } | ||
778 | |||
779 | /* Handle a voyager CMN_INT; These interrupts occur either because of | ||
780 | * a system status change or because a single bit memory error | ||
781 | * occurred. FIXME: At the moment, ignore all this. */ | ||
782 | fastcall void | ||
783 | smp_vic_cmn_interrupt(struct pt_regs *regs) | ||
784 | { | ||
785 | static __u8 in_cmn_int = 0; | ||
786 | static DEFINE_SPINLOCK(cmn_int_lock); | ||
787 | |||
788 | /* common ints are broadcast, so make sure we only do this once */ | ||
789 | _raw_spin_lock(&cmn_int_lock); | ||
790 | if(in_cmn_int) | ||
791 | goto unlock_end; | ||
792 | |||
793 | in_cmn_int++; | ||
794 | _raw_spin_unlock(&cmn_int_lock); | ||
795 | |||
796 | VDEBUG(("Voyager COMMON INTERRUPT\n")); | ||
797 | |||
798 | if(voyager_level == 5) | ||
799 | voyager_cat_do_common_interrupt(); | ||
800 | |||
801 | _raw_spin_lock(&cmn_int_lock); | ||
802 | in_cmn_int = 0; | ||
803 | unlock_end: | ||
804 | _raw_spin_unlock(&cmn_int_lock); | ||
805 | ack_CPI(VIC_CMN_INT); | ||
806 | } | ||
807 | |||
808 | /* | ||
809 | * Reschedule call back. Nothing to do, all the work is done | ||
810 | * automatically when we return from the interrupt. */ | ||
811 | static void | ||
812 | smp_reschedule_interrupt(void) | ||
813 | { | ||
814 | /* do nothing */ | ||
815 | } | ||
816 | |||
817 | static struct mm_struct * flush_mm; | ||
818 | static unsigned long flush_va; | ||
819 | static DEFINE_SPINLOCK(tlbstate_lock); | ||
820 | #define FLUSH_ALL 0xffffffff | ||
821 | |||
822 | /* | ||
823 | * We cannot call mmdrop() because we are in interrupt context, | ||
824 | * instead update mm->cpu_vm_mask. | ||
825 | * | ||
826 | * We need to reload %cr3 since the page tables may be going | ||
827 | * away from under us.. | ||
828 | */ | ||
829 | static inline void | ||
830 | leave_mm (unsigned long cpu) | ||
831 | { | ||
832 | if (per_cpu(cpu_tlbstate, cpu).state == TLBSTATE_OK) | ||
833 | BUG(); | ||
834 | cpu_clear(cpu, per_cpu(cpu_tlbstate, cpu).active_mm->cpu_vm_mask); | ||
835 | load_cr3(swapper_pg_dir); | ||
836 | } | ||
837 | |||
838 | |||
839 | /* | ||
840 | * Invalidate call-back | ||
841 | */ | ||
842 | static void | ||
843 | smp_invalidate_interrupt(void) | ||
844 | { | ||
845 | __u8 cpu = smp_processor_id(); | ||
846 | |||
847 | if (!test_bit(cpu, &smp_invalidate_needed)) | ||
848 | return; | ||
849 | /* This will flood messages. Don't uncomment unless you see | ||
850 | * Problems with cross cpu invalidation | ||
851 | VDEBUG(("VOYAGER SMP: CPU%d received INVALIDATE_CPI\n", | ||
852 | smp_processor_id())); | ||
853 | */ | ||
854 | |||
855 | if (flush_mm == per_cpu(cpu_tlbstate, cpu).active_mm) { | ||
856 | if (per_cpu(cpu_tlbstate, cpu).state == TLBSTATE_OK) { | ||
857 | if (flush_va == FLUSH_ALL) | ||
858 | local_flush_tlb(); | ||
859 | else | ||
860 | __flush_tlb_one(flush_va); | ||
861 | } else | ||
862 | leave_mm(cpu); | ||
863 | } | ||
864 | smp_mb__before_clear_bit(); | ||
865 | clear_bit(cpu, &smp_invalidate_needed); | ||
866 | smp_mb__after_clear_bit(); | ||
867 | } | ||
868 | |||
869 | /* All the new flush operations for 2.4 */ | ||
870 | |||
871 | |||
872 | /* This routine is called with a physical cpu mask */ | ||
873 | static void | ||
874 | flush_tlb_others (unsigned long cpumask, struct mm_struct *mm, | ||
875 | unsigned long va) | ||
876 | { | ||
877 | int stuck = 50000; | ||
878 | |||
879 | if (!cpumask) | ||
880 | BUG(); | ||
881 | if ((cpumask & cpus_addr(cpu_online_map)[0]) != cpumask) | ||
882 | BUG(); | ||
883 | if (cpumask & (1 << smp_processor_id())) | ||
884 | BUG(); | ||
885 | if (!mm) | ||
886 | BUG(); | ||
887 | |||
888 | spin_lock(&tlbstate_lock); | ||
889 | |||
890 | flush_mm = mm; | ||
891 | flush_va = va; | ||
892 | atomic_set_mask(cpumask, &smp_invalidate_needed); | ||
893 | /* | ||
894 | * We have to send the CPI only to | ||
895 | * CPUs affected. | ||
896 | */ | ||
897 | send_CPI(cpumask, VIC_INVALIDATE_CPI); | ||
898 | |||
899 | while (smp_invalidate_needed) { | ||
900 | mb(); | ||
901 | if(--stuck == 0) { | ||
902 | printk("***WARNING*** Stuck doing invalidate CPI (CPU%d)\n", smp_processor_id()); | ||
903 | break; | ||
904 | } | ||
905 | } | ||
906 | |||
907 | /* Uncomment only to debug invalidation problems | ||
908 | VDEBUG(("VOYAGER SMP: Completed invalidate CPI (CPU%d)\n", cpu)); | ||
909 | */ | ||
910 | |||
911 | flush_mm = NULL; | ||
912 | flush_va = 0; | ||
913 | spin_unlock(&tlbstate_lock); | ||
914 | } | ||
915 | |||
916 | void | ||
917 | flush_tlb_current_task(void) | ||
918 | { | ||
919 | struct mm_struct *mm = current->mm; | ||
920 | unsigned long cpu_mask; | ||
921 | |||
922 | preempt_disable(); | ||
923 | |||
924 | cpu_mask = cpus_addr(mm->cpu_vm_mask)[0] & ~(1 << smp_processor_id()); | ||
925 | local_flush_tlb(); | ||
926 | if (cpu_mask) | ||
927 | flush_tlb_others(cpu_mask, mm, FLUSH_ALL); | ||
928 | |||
929 | preempt_enable(); | ||
930 | } | ||
931 | |||
932 | |||
933 | void | ||
934 | flush_tlb_mm (struct mm_struct * mm) | ||
935 | { | ||
936 | unsigned long cpu_mask; | ||
937 | |||
938 | preempt_disable(); | ||
939 | |||
940 | cpu_mask = cpus_addr(mm->cpu_vm_mask)[0] & ~(1 << smp_processor_id()); | ||
941 | |||
942 | if (current->active_mm == mm) { | ||
943 | if (current->mm) | ||
944 | local_flush_tlb(); | ||
945 | else | ||
946 | leave_mm(smp_processor_id()); | ||
947 | } | ||
948 | if (cpu_mask) | ||
949 | flush_tlb_others(cpu_mask, mm, FLUSH_ALL); | ||
950 | |||
951 | preempt_enable(); | ||
952 | } | ||
953 | |||
954 | void flush_tlb_page(struct vm_area_struct * vma, unsigned long va) | ||
955 | { | ||
956 | struct mm_struct *mm = vma->vm_mm; | ||
957 | unsigned long cpu_mask; | ||
958 | |||
959 | preempt_disable(); | ||
960 | |||
961 | cpu_mask = cpus_addr(mm->cpu_vm_mask)[0] & ~(1 << smp_processor_id()); | ||
962 | if (current->active_mm == mm) { | ||
963 | if(current->mm) | ||
964 | __flush_tlb_one(va); | ||
965 | else | ||
966 | leave_mm(smp_processor_id()); | ||
967 | } | ||
968 | |||
969 | if (cpu_mask) | ||
970 | flush_tlb_others(cpu_mask, mm, va); | ||
971 | |||
972 | preempt_enable(); | ||
973 | } | ||
974 | |||
975 | /* enable the requested IRQs */ | ||
976 | static void | ||
977 | smp_enable_irq_interrupt(void) | ||
978 | { | ||
979 | __u8 irq; | ||
980 | __u8 cpu = get_cpu(); | ||
981 | |||
982 | VDEBUG(("VOYAGER SMP: CPU%d enabling irq mask 0x%x\n", cpu, | ||
983 | vic_irq_enable_mask[cpu])); | ||
984 | |||
985 | spin_lock(&vic_irq_lock); | ||
986 | for(irq = 0; irq < 16; irq++) { | ||
987 | if(vic_irq_enable_mask[cpu] & (1<<irq)) | ||
988 | enable_local_vic_irq(irq); | ||
989 | } | ||
990 | vic_irq_enable_mask[cpu] = 0; | ||
991 | spin_unlock(&vic_irq_lock); | ||
992 | |||
993 | put_cpu_no_resched(); | ||
994 | } | ||
995 | |||
996 | /* | ||
997 | * CPU halt call-back | ||
998 | */ | ||
999 | static void | ||
1000 | smp_stop_cpu_function(void *dummy) | ||
1001 | { | ||
1002 | VDEBUG(("VOYAGER SMP: CPU%d is STOPPING\n", smp_processor_id())); | ||
1003 | cpu_clear(smp_processor_id(), cpu_online_map); | ||
1004 | local_irq_disable(); | ||
1005 | for(;;) | ||
1006 | __asm__("hlt"); | ||
1007 | } | ||
1008 | |||
1009 | static DEFINE_SPINLOCK(call_lock); | ||
1010 | |||
1011 | struct call_data_struct { | ||
1012 | void (*func) (void *info); | ||
1013 | void *info; | ||
1014 | volatile unsigned long started; | ||
1015 | volatile unsigned long finished; | ||
1016 | int wait; | ||
1017 | }; | ||
1018 | |||
1019 | static struct call_data_struct * call_data; | ||
1020 | |||
1021 | /* execute a thread on a new CPU. The function to be called must be | ||
1022 | * previously set up. This is used to schedule a function for | ||
1023 | * execution on all CPU's - set up the function then broadcast a | ||
1024 | * function_interrupt CPI to come here on each CPU */ | ||
1025 | static void | ||
1026 | smp_call_function_interrupt(void) | ||
1027 | { | ||
1028 | void (*func) (void *info) = call_data->func; | ||
1029 | void *info = call_data->info; | ||
1030 | /* must take copy of wait because call_data may be replaced | ||
1031 | * unless the function is waiting for us to finish */ | ||
1032 | int wait = call_data->wait; | ||
1033 | __u8 cpu = smp_processor_id(); | ||
1034 | |||
1035 | /* | ||
1036 | * Notify initiating CPU that I've grabbed the data and am | ||
1037 | * about to execute the function | ||
1038 | */ | ||
1039 | mb(); | ||
1040 | if(!test_and_clear_bit(cpu, &call_data->started)) { | ||
1041 | /* If the bit wasn't set, this could be a replay */ | ||
1042 | printk(KERN_WARNING "VOYAGER SMP: CPU %d received call funtion with no call pending\n", cpu); | ||
1043 | return; | ||
1044 | } | ||
1045 | /* | ||
1046 | * At this point the info structure may be out of scope unless wait==1 | ||
1047 | */ | ||
1048 | irq_enter(); | ||
1049 | (*func)(info); | ||
1050 | irq_exit(); | ||
1051 | if (wait) { | ||
1052 | mb(); | ||
1053 | clear_bit(cpu, &call_data->finished); | ||
1054 | } | ||
1055 | } | ||
1056 | |||
1057 | /* Call this function on all CPUs using the function_interrupt above | ||
1058 | <func> The function to run. This must be fast and non-blocking. | ||
1059 | <info> An arbitrary pointer to pass to the function. | ||
1060 | <retry> If true, keep retrying until ready. | ||
1061 | <wait> If true, wait until function has completed on other CPUs. | ||
1062 | [RETURNS] 0 on success, else a negative status code. Does not return until | ||
1063 | remote CPUs are nearly ready to execute <<func>> or are or have executed. | ||
1064 | */ | ||
1065 | int | ||
1066 | smp_call_function (void (*func) (void *info), void *info, int retry, | ||
1067 | int wait) | ||
1068 | { | ||
1069 | struct call_data_struct data; | ||
1070 | __u32 mask = cpus_addr(cpu_online_map)[0]; | ||
1071 | |||
1072 | mask &= ~(1<<smp_processor_id()); | ||
1073 | |||
1074 | if (!mask) | ||
1075 | return 0; | ||
1076 | |||
1077 | /* Can deadlock when called with interrupts disabled */ | ||
1078 | WARN_ON(irqs_disabled()); | ||
1079 | |||
1080 | data.func = func; | ||
1081 | data.info = info; | ||
1082 | data.started = mask; | ||
1083 | data.wait = wait; | ||
1084 | if (wait) | ||
1085 | data.finished = mask; | ||
1086 | |||
1087 | spin_lock(&call_lock); | ||
1088 | call_data = &data; | ||
1089 | wmb(); | ||
1090 | /* Send a message to all other CPUs and wait for them to respond */ | ||
1091 | send_CPI_allbutself(VIC_CALL_FUNCTION_CPI); | ||
1092 | |||
1093 | /* Wait for response */ | ||
1094 | while (data.started) | ||
1095 | barrier(); | ||
1096 | |||
1097 | if (wait) | ||
1098 | while (data.finished) | ||
1099 | barrier(); | ||
1100 | |||
1101 | spin_unlock(&call_lock); | ||
1102 | |||
1103 | return 0; | ||
1104 | } | ||
1105 | |||
1106 | /* Sorry about the name. In an APIC based system, the APICs | ||
1107 | * themselves are programmed to send a timer interrupt. This is used | ||
1108 | * by linux to reschedule the processor. Voyager doesn't have this, | ||
1109 | * so we use the system clock to interrupt one processor, which in | ||
1110 | * turn, broadcasts a timer CPI to all the others --- we receive that | ||
1111 | * CPI here. We don't use this actually for counting so losing | ||
1112 | * ticks doesn't matter | ||
1113 | * | ||
1114 | * FIXME: For those CPU's which actually have a local APIC, we could | ||
1115 | * try to use it to trigger this interrupt instead of having to | ||
1116 | * broadcast the timer tick. Unfortunately, all my pentium DYADs have | ||
1117 | * no local APIC, so I can't do this | ||
1118 | * | ||
1119 | * This function is currently a placeholder and is unused in the code */ | ||
1120 | fastcall void | ||
1121 | smp_apic_timer_interrupt(struct pt_regs *regs) | ||
1122 | { | ||
1123 | wrapper_smp_local_timer_interrupt(regs); | ||
1124 | } | ||
1125 | |||
1126 | /* All of the QUAD interrupt GATES */ | ||
1127 | fastcall void | ||
1128 | smp_qic_timer_interrupt(struct pt_regs *regs) | ||
1129 | { | ||
1130 | ack_QIC_CPI(QIC_TIMER_CPI); | ||
1131 | wrapper_smp_local_timer_interrupt(regs); | ||
1132 | } | ||
1133 | |||
1134 | fastcall void | ||
1135 | smp_qic_invalidate_interrupt(struct pt_regs *regs) | ||
1136 | { | ||
1137 | ack_QIC_CPI(QIC_INVALIDATE_CPI); | ||
1138 | smp_invalidate_interrupt(); | ||
1139 | } | ||
1140 | |||
1141 | fastcall void | ||
1142 | smp_qic_reschedule_interrupt(struct pt_regs *regs) | ||
1143 | { | ||
1144 | ack_QIC_CPI(QIC_RESCHEDULE_CPI); | ||
1145 | smp_reschedule_interrupt(); | ||
1146 | } | ||
1147 | |||
1148 | fastcall void | ||
1149 | smp_qic_enable_irq_interrupt(struct pt_regs *regs) | ||
1150 | { | ||
1151 | ack_QIC_CPI(QIC_ENABLE_IRQ_CPI); | ||
1152 | smp_enable_irq_interrupt(); | ||
1153 | } | ||
1154 | |||
1155 | fastcall void | ||
1156 | smp_qic_call_function_interrupt(struct pt_regs *regs) | ||
1157 | { | ||
1158 | ack_QIC_CPI(QIC_CALL_FUNCTION_CPI); | ||
1159 | smp_call_function_interrupt(); | ||
1160 | } | ||
1161 | |||
1162 | fastcall void | ||
1163 | smp_vic_cpi_interrupt(struct pt_regs *regs) | ||
1164 | { | ||
1165 | __u8 cpu = smp_processor_id(); | ||
1166 | |||
1167 | if(is_cpu_quad()) | ||
1168 | ack_QIC_CPI(VIC_CPI_LEVEL0); | ||
1169 | else | ||
1170 | ack_VIC_CPI(VIC_CPI_LEVEL0); | ||
1171 | |||
1172 | if(test_and_clear_bit(VIC_TIMER_CPI, &vic_cpi_mailbox[cpu])) | ||
1173 | wrapper_smp_local_timer_interrupt(regs); | ||
1174 | if(test_and_clear_bit(VIC_INVALIDATE_CPI, &vic_cpi_mailbox[cpu])) | ||
1175 | smp_invalidate_interrupt(); | ||
1176 | if(test_and_clear_bit(VIC_RESCHEDULE_CPI, &vic_cpi_mailbox[cpu])) | ||
1177 | smp_reschedule_interrupt(); | ||
1178 | if(test_and_clear_bit(VIC_ENABLE_IRQ_CPI, &vic_cpi_mailbox[cpu])) | ||
1179 | smp_enable_irq_interrupt(); | ||
1180 | if(test_and_clear_bit(VIC_CALL_FUNCTION_CPI, &vic_cpi_mailbox[cpu])) | ||
1181 | smp_call_function_interrupt(); | ||
1182 | } | ||
1183 | |||
1184 | static void | ||
1185 | do_flush_tlb_all(void* info) | ||
1186 | { | ||
1187 | unsigned long cpu = smp_processor_id(); | ||
1188 | |||
1189 | __flush_tlb_all(); | ||
1190 | if (per_cpu(cpu_tlbstate, cpu).state == TLBSTATE_LAZY) | ||
1191 | leave_mm(cpu); | ||
1192 | } | ||
1193 | |||
1194 | |||
1195 | /* flush the TLB of every active CPU in the system */ | ||
1196 | void | ||
1197 | flush_tlb_all(void) | ||
1198 | { | ||
1199 | on_each_cpu(do_flush_tlb_all, 0, 1, 1); | ||
1200 | } | ||
1201 | |||
1202 | /* used to set up the trampoline for other CPUs when the memory manager | ||
1203 | * is sorted out */ | ||
1204 | void __init | ||
1205 | smp_alloc_memory(void) | ||
1206 | { | ||
1207 | trampoline_base = (__u32)alloc_bootmem_low_pages(PAGE_SIZE); | ||
1208 | if(__pa(trampoline_base) >= 0x93000) | ||
1209 | BUG(); | ||
1210 | } | ||
1211 | |||
1212 | /* send a reschedule CPI to one CPU by physical CPU number*/ | ||
1213 | void | ||
1214 | smp_send_reschedule(int cpu) | ||
1215 | { | ||
1216 | send_one_CPI(cpu, VIC_RESCHEDULE_CPI); | ||
1217 | } | ||
1218 | |||
1219 | |||
1220 | int | ||
1221 | hard_smp_processor_id(void) | ||
1222 | { | ||
1223 | __u8 i; | ||
1224 | __u8 cpumask = inb(VIC_PROC_WHO_AM_I); | ||
1225 | if((cpumask & QUAD_IDENTIFIER) == QUAD_IDENTIFIER) | ||
1226 | return cpumask & 0x1F; | ||
1227 | |||
1228 | for(i = 0; i < 8; i++) { | ||
1229 | if(cpumask & (1<<i)) | ||
1230 | return i; | ||
1231 | } | ||
1232 | printk("** WARNING ** Illegal cpuid returned by VIC: %d", cpumask); | ||
1233 | return 0; | ||
1234 | } | ||
1235 | |||
1236 | /* broadcast a halt to all other CPUs */ | ||
1237 | void | ||
1238 | smp_send_stop(void) | ||
1239 | { | ||
1240 | smp_call_function(smp_stop_cpu_function, NULL, 1, 1); | ||
1241 | } | ||
1242 | |||
1243 | /* this function is triggered in time.c when a clock tick fires | ||
1244 | * we need to re-broadcast the tick to all CPUs */ | ||
1245 | void | ||
1246 | smp_vic_timer_interrupt(struct pt_regs *regs) | ||
1247 | { | ||
1248 | send_CPI_allbutself(VIC_TIMER_CPI); | ||
1249 | smp_local_timer_interrupt(regs); | ||
1250 | } | ||
1251 | |||
1252 | static inline void | ||
1253 | wrapper_smp_local_timer_interrupt(struct pt_regs *regs) | ||
1254 | { | ||
1255 | irq_enter(); | ||
1256 | smp_local_timer_interrupt(regs); | ||
1257 | irq_exit(); | ||
1258 | } | ||
1259 | |||
1260 | /* local (per CPU) timer interrupt. It does both profiling and | ||
1261 | * process statistics/rescheduling. | ||
1262 | * | ||
1263 | * We do profiling in every local tick, statistics/rescheduling | ||
1264 | * happen only every 'profiling multiplier' ticks. The default | ||
1265 | * multiplier is 1 and it can be changed by writing the new multiplier | ||
1266 | * value into /proc/profile. | ||
1267 | */ | ||
1268 | void | ||
1269 | smp_local_timer_interrupt(struct pt_regs * regs) | ||
1270 | { | ||
1271 | int cpu = smp_processor_id(); | ||
1272 | long weight; | ||
1273 | |||
1274 | profile_tick(CPU_PROFILING, regs); | ||
1275 | if (--per_cpu(prof_counter, cpu) <= 0) { | ||
1276 | /* | ||
1277 | * The multiplier may have changed since the last time we got | ||
1278 | * to this point as a result of the user writing to | ||
1279 | * /proc/profile. In this case we need to adjust the APIC | ||
1280 | * timer accordingly. | ||
1281 | * | ||
1282 | * Interrupts are already masked off at this point. | ||
1283 | */ | ||
1284 | per_cpu(prof_counter,cpu) = per_cpu(prof_multiplier, cpu); | ||
1285 | if (per_cpu(prof_counter, cpu) != | ||
1286 | per_cpu(prof_old_multiplier, cpu)) { | ||
1287 | /* FIXME: need to update the vic timer tick here */ | ||
1288 | per_cpu(prof_old_multiplier, cpu) = | ||
1289 | per_cpu(prof_counter, cpu); | ||
1290 | } | ||
1291 | |||
1292 | update_process_times(user_mode(regs)); | ||
1293 | } | ||
1294 | |||
1295 | if( ((1<<cpu) & voyager_extended_vic_processors) == 0) | ||
1296 | /* only extended VIC processors participate in | ||
1297 | * interrupt distribution */ | ||
1298 | return; | ||
1299 | |||
1300 | /* | ||
1301 | * We take the 'long' return path, and there every subsystem | ||
1302 | * grabs the apropriate locks (kernel lock/ irq lock). | ||
1303 | * | ||
1304 | * we might want to decouple profiling from the 'long path', | ||
1305 | * and do the profiling totally in assembly. | ||
1306 | * | ||
1307 | * Currently this isn't too much of an issue (performance wise), | ||
1308 | * we can take more than 100K local irqs per second on a 100 MHz P5. | ||
1309 | */ | ||
1310 | |||
1311 | if((++vic_tick[cpu] & 0x7) != 0) | ||
1312 | return; | ||
1313 | /* get here every 16 ticks (about every 1/6 of a second) */ | ||
1314 | |||
1315 | /* Change our priority to give someone else a chance at getting | ||
1316 | * the IRQ. The algorithm goes like this: | ||
1317 | * | ||
1318 | * In the VIC, the dynamically routed interrupt is always | ||
1319 | * handled by the lowest priority eligible (i.e. receiving | ||
1320 | * interrupts) CPU. If >1 eligible CPUs are equal lowest, the | ||
1321 | * lowest processor number gets it. | ||
1322 | * | ||
1323 | * The priority of a CPU is controlled by a special per-CPU | ||
1324 | * VIC priority register which is 3 bits wide 0 being lowest | ||
1325 | * and 7 highest priority.. | ||
1326 | * | ||
1327 | * Therefore we subtract the average number of interrupts from | ||
1328 | * the number we've fielded. If this number is negative, we | ||
1329 | * lower the activity count and if it is positive, we raise | ||
1330 | * it. | ||
1331 | * | ||
1332 | * I'm afraid this still leads to odd looking interrupt counts: | ||
1333 | * the totals are all roughly equal, but the individual ones | ||
1334 | * look rather skewed. | ||
1335 | * | ||
1336 | * FIXME: This algorithm is total crap when mixed with SMP | ||
1337 | * affinity code since we now try to even up the interrupt | ||
1338 | * counts when an affinity binding is keeping them on a | ||
1339 | * particular CPU*/ | ||
1340 | weight = (vic_intr_count[cpu]*voyager_extended_cpus | ||
1341 | - vic_intr_total) >> 4; | ||
1342 | weight += 4; | ||
1343 | if(weight > 7) | ||
1344 | weight = 7; | ||
1345 | if(weight < 0) | ||
1346 | weight = 0; | ||
1347 | |||
1348 | outb((__u8)weight, VIC_PRIORITY_REGISTER); | ||
1349 | |||
1350 | #ifdef VOYAGER_DEBUG | ||
1351 | if((vic_tick[cpu] & 0xFFF) == 0) { | ||
1352 | /* print this message roughly every 25 secs */ | ||
1353 | printk("VOYAGER SMP: vic_tick[%d] = %lu, weight = %ld\n", | ||
1354 | cpu, vic_tick[cpu], weight); | ||
1355 | } | ||
1356 | #endif | ||
1357 | } | ||
1358 | |||
1359 | /* setup the profiling timer */ | ||
1360 | int | ||
1361 | setup_profiling_timer(unsigned int multiplier) | ||
1362 | { | ||
1363 | int i; | ||
1364 | |||
1365 | if ( (!multiplier)) | ||
1366 | return -EINVAL; | ||
1367 | |||
1368 | /* | ||
1369 | * Set the new multiplier for each CPU. CPUs don't start using the | ||
1370 | * new values until the next timer interrupt in which they do process | ||
1371 | * accounting. | ||
1372 | */ | ||
1373 | for (i = 0; i < NR_CPUS; ++i) | ||
1374 | per_cpu(prof_multiplier, i) = multiplier; | ||
1375 | |||
1376 | return 0; | ||
1377 | } | ||
1378 | |||
1379 | |||
1380 | /* The CPIs are handled in the per cpu 8259s, so they must be | ||
1381 | * enabled to be received: FIX: enabling the CPIs in the early | ||
1382 | * boot sequence interferes with bug checking; enable them later | ||
1383 | * on in smp_init */ | ||
1384 | #define VIC_SET_GATE(cpi, vector) \ | ||
1385 | set_intr_gate((cpi) + VIC_DEFAULT_CPI_BASE, (vector)) | ||
1386 | #define QIC_SET_GATE(cpi, vector) \ | ||
1387 | set_intr_gate((cpi) + QIC_DEFAULT_CPI_BASE, (vector)) | ||
1388 | |||
1389 | void __init | ||
1390 | smp_intr_init(void) | ||
1391 | { | ||
1392 | int i; | ||
1393 | |||
1394 | /* initialize the per cpu irq mask to all disabled */ | ||
1395 | for(i = 0; i < NR_CPUS; i++) | ||
1396 | vic_irq_mask[i] = 0xFFFF; | ||
1397 | |||
1398 | VIC_SET_GATE(VIC_CPI_LEVEL0, vic_cpi_interrupt); | ||
1399 | |||
1400 | VIC_SET_GATE(VIC_SYS_INT, vic_sys_interrupt); | ||
1401 | VIC_SET_GATE(VIC_CMN_INT, vic_cmn_interrupt); | ||
1402 | |||
1403 | QIC_SET_GATE(QIC_TIMER_CPI, qic_timer_interrupt); | ||
1404 | QIC_SET_GATE(QIC_INVALIDATE_CPI, qic_invalidate_interrupt); | ||
1405 | QIC_SET_GATE(QIC_RESCHEDULE_CPI, qic_reschedule_interrupt); | ||
1406 | QIC_SET_GATE(QIC_ENABLE_IRQ_CPI, qic_enable_irq_interrupt); | ||
1407 | QIC_SET_GATE(QIC_CALL_FUNCTION_CPI, qic_call_function_interrupt); | ||
1408 | |||
1409 | |||
1410 | /* now put the VIC descriptor into the first 48 IRQs | ||
1411 | * | ||
1412 | * This is for later: first 16 correspond to PC IRQs; next 16 | ||
1413 | * are Primary MC IRQs and final 16 are Secondary MC IRQs */ | ||
1414 | for(i = 0; i < 48; i++) | ||
1415 | irq_desc[i].handler = &vic_irq_type; | ||
1416 | } | ||
1417 | |||
1418 | /* send a CPI at level cpi to a set of cpus in cpuset (set 1 bit per | ||
1419 | * processor to receive CPI */ | ||
1420 | static void | ||
1421 | send_CPI(__u32 cpuset, __u8 cpi) | ||
1422 | { | ||
1423 | int cpu; | ||
1424 | __u32 quad_cpuset = (cpuset & voyager_quad_processors); | ||
1425 | |||
1426 | if(cpi < VIC_START_FAKE_CPI) { | ||
1427 | /* fake CPI are only used for booting, so send to the | ||
1428 | * extended quads as well---Quads must be VIC booted */ | ||
1429 | outb((__u8)(cpuset), VIC_CPI_Registers[cpi]); | ||
1430 | return; | ||
1431 | } | ||
1432 | if(quad_cpuset) | ||
1433 | send_QIC_CPI(quad_cpuset, cpi); | ||
1434 | cpuset &= ~quad_cpuset; | ||
1435 | cpuset &= 0xff; /* only first 8 CPUs vaild for VIC CPI */ | ||
1436 | if(cpuset == 0) | ||
1437 | return; | ||
1438 | for_each_online_cpu(cpu) { | ||
1439 | if(cpuset & (1<<cpu)) | ||
1440 | set_bit(cpi, &vic_cpi_mailbox[cpu]); | ||
1441 | } | ||
1442 | if(cpuset) | ||
1443 | outb((__u8)cpuset, VIC_CPI_Registers[VIC_CPI_LEVEL0]); | ||
1444 | } | ||
1445 | |||
1446 | /* Acknowledge receipt of CPI in the QIC, clear in QIC hardware and | ||
1447 | * set the cache line to shared by reading it. | ||
1448 | * | ||
1449 | * DON'T make this inline otherwise the cache line read will be | ||
1450 | * optimised away | ||
1451 | * */ | ||
1452 | static int | ||
1453 | ack_QIC_CPI(__u8 cpi) { | ||
1454 | __u8 cpu = hard_smp_processor_id(); | ||
1455 | |||
1456 | cpi &= 7; | ||
1457 | |||
1458 | outb(1<<cpi, QIC_INTERRUPT_CLEAR1); | ||
1459 | return voyager_quad_cpi_addr[cpu]->qic_cpi[cpi].cpi; | ||
1460 | } | ||
1461 | |||
1462 | static void | ||
1463 | ack_special_QIC_CPI(__u8 cpi) | ||
1464 | { | ||
1465 | switch(cpi) { | ||
1466 | case VIC_CMN_INT: | ||
1467 | outb(QIC_CMN_INT, QIC_INTERRUPT_CLEAR0); | ||
1468 | break; | ||
1469 | case VIC_SYS_INT: | ||
1470 | outb(QIC_SYS_INT, QIC_INTERRUPT_CLEAR0); | ||
1471 | break; | ||
1472 | } | ||
1473 | /* also clear at the VIC, just in case (nop for non-extended proc) */ | ||
1474 | ack_VIC_CPI(cpi); | ||
1475 | } | ||
1476 | |||
1477 | /* Acknowledge receipt of CPI in the VIC (essentially an EOI) */ | ||
1478 | static void | ||
1479 | ack_VIC_CPI(__u8 cpi) | ||
1480 | { | ||
1481 | #ifdef VOYAGER_DEBUG | ||
1482 | unsigned long flags; | ||
1483 | __u16 isr; | ||
1484 | __u8 cpu = smp_processor_id(); | ||
1485 | |||
1486 | local_irq_save(flags); | ||
1487 | isr = vic_read_isr(); | ||
1488 | if((isr & (1<<(cpi &7))) == 0) { | ||
1489 | printk("VOYAGER SMP: CPU%d lost CPI%d\n", cpu, cpi); | ||
1490 | } | ||
1491 | #endif | ||
1492 | /* send specific EOI; the two system interrupts have | ||
1493 | * bit 4 set for a separate vector but behave as the | ||
1494 | * corresponding 3 bit intr */ | ||
1495 | outb_p(0x60|(cpi & 7),0x20); | ||
1496 | |||
1497 | #ifdef VOYAGER_DEBUG | ||
1498 | if((vic_read_isr() & (1<<(cpi &7))) != 0) { | ||
1499 | printk("VOYAGER SMP: CPU%d still asserting CPI%d\n", cpu, cpi); | ||
1500 | } | ||
1501 | local_irq_restore(flags); | ||
1502 | #endif | ||
1503 | } | ||
1504 | |||
1505 | /* cribbed with thanks from irq.c */ | ||
1506 | #define __byte(x,y) (((unsigned char *)&(y))[x]) | ||
1507 | #define cached_21(cpu) (__byte(0,vic_irq_mask[cpu])) | ||
1508 | #define cached_A1(cpu) (__byte(1,vic_irq_mask[cpu])) | ||
1509 | |||
1510 | static unsigned int | ||
1511 | startup_vic_irq(unsigned int irq) | ||
1512 | { | ||
1513 | enable_vic_irq(irq); | ||
1514 | |||
1515 | return 0; | ||
1516 | } | ||
1517 | |||
1518 | /* The enable and disable routines. This is where we run into | ||
1519 | * conflicting architectural philosophy. Fundamentally, the voyager | ||
1520 | * architecture does not expect to have to disable interrupts globally | ||
1521 | * (the IRQ controllers belong to each CPU). The processor masquerade | ||
1522 | * which is used to start the system shouldn't be used in a running OS | ||
1523 | * since it will cause great confusion if two separate CPUs drive to | ||
1524 | * the same IRQ controller (I know, I've tried it). | ||
1525 | * | ||
1526 | * The solution is a variant on the NCR lazy SPL design: | ||
1527 | * | ||
1528 | * 1) To disable an interrupt, do nothing (other than set the | ||
1529 | * IRQ_DISABLED flag). This dares the interrupt actually to arrive. | ||
1530 | * | ||
1531 | * 2) If the interrupt dares to come in, raise the local mask against | ||
1532 | * it (this will result in all the CPU masks being raised | ||
1533 | * eventually). | ||
1534 | * | ||
1535 | * 3) To enable the interrupt, lower the mask on the local CPU and | ||
1536 | * broadcast an Interrupt enable CPI which causes all other CPUs to | ||
1537 | * adjust their masks accordingly. */ | ||
1538 | |||
1539 | static void | ||
1540 | enable_vic_irq(unsigned int irq) | ||
1541 | { | ||
1542 | /* linux doesn't to processor-irq affinity, so enable on | ||
1543 | * all CPUs we know about */ | ||
1544 | int cpu = smp_processor_id(), real_cpu; | ||
1545 | __u16 mask = (1<<irq); | ||
1546 | __u32 processorList = 0; | ||
1547 | unsigned long flags; | ||
1548 | |||
1549 | VDEBUG(("VOYAGER: enable_vic_irq(%d) CPU%d affinity 0x%lx\n", | ||
1550 | irq, cpu, cpu_irq_affinity[cpu])); | ||
1551 | spin_lock_irqsave(&vic_irq_lock, flags); | ||
1552 | for_each_online_cpu(real_cpu) { | ||
1553 | if(!(voyager_extended_vic_processors & (1<<real_cpu))) | ||
1554 | continue; | ||
1555 | if(!(cpu_irq_affinity[real_cpu] & mask)) { | ||
1556 | /* irq has no affinity for this CPU, ignore */ | ||
1557 | continue; | ||
1558 | } | ||
1559 | if(real_cpu == cpu) { | ||
1560 | enable_local_vic_irq(irq); | ||
1561 | } | ||
1562 | else if(vic_irq_mask[real_cpu] & mask) { | ||
1563 | vic_irq_enable_mask[real_cpu] |= mask; | ||
1564 | processorList |= (1<<real_cpu); | ||
1565 | } | ||
1566 | } | ||
1567 | spin_unlock_irqrestore(&vic_irq_lock, flags); | ||
1568 | if(processorList) | ||
1569 | send_CPI(processorList, VIC_ENABLE_IRQ_CPI); | ||
1570 | } | ||
1571 | |||
1572 | static void | ||
1573 | disable_vic_irq(unsigned int irq) | ||
1574 | { | ||
1575 | /* lazy disable, do nothing */ | ||
1576 | } | ||
1577 | |||
1578 | static void | ||
1579 | enable_local_vic_irq(unsigned int irq) | ||
1580 | { | ||
1581 | __u8 cpu = smp_processor_id(); | ||
1582 | __u16 mask = ~(1 << irq); | ||
1583 | __u16 old_mask = vic_irq_mask[cpu]; | ||
1584 | |||
1585 | vic_irq_mask[cpu] &= mask; | ||
1586 | if(vic_irq_mask[cpu] == old_mask) | ||
1587 | return; | ||
1588 | |||
1589 | VDEBUG(("VOYAGER DEBUG: Enabling irq %d in hardware on CPU %d\n", | ||
1590 | irq, cpu)); | ||
1591 | |||
1592 | if (irq & 8) { | ||
1593 | outb_p(cached_A1(cpu),0xA1); | ||
1594 | (void)inb_p(0xA1); | ||
1595 | } | ||
1596 | else { | ||
1597 | outb_p(cached_21(cpu),0x21); | ||
1598 | (void)inb_p(0x21); | ||
1599 | } | ||
1600 | } | ||
1601 | |||
1602 | static void | ||
1603 | disable_local_vic_irq(unsigned int irq) | ||
1604 | { | ||
1605 | __u8 cpu = smp_processor_id(); | ||
1606 | __u16 mask = (1 << irq); | ||
1607 | __u16 old_mask = vic_irq_mask[cpu]; | ||
1608 | |||
1609 | if(irq == 7) | ||
1610 | return; | ||
1611 | |||
1612 | vic_irq_mask[cpu] |= mask; | ||
1613 | if(old_mask == vic_irq_mask[cpu]) | ||
1614 | return; | ||
1615 | |||
1616 | VDEBUG(("VOYAGER DEBUG: Disabling irq %d in hardware on CPU %d\n", | ||
1617 | irq, cpu)); | ||
1618 | |||
1619 | if (irq & 8) { | ||
1620 | outb_p(cached_A1(cpu),0xA1); | ||
1621 | (void)inb_p(0xA1); | ||
1622 | } | ||
1623 | else { | ||
1624 | outb_p(cached_21(cpu),0x21); | ||
1625 | (void)inb_p(0x21); | ||
1626 | } | ||
1627 | } | ||
1628 | |||
1629 | /* The VIC is level triggered, so the ack can only be issued after the | ||
1630 | * interrupt completes. However, we do Voyager lazy interrupt | ||
1631 | * handling here: It is an extremely expensive operation to mask an | ||
1632 | * interrupt in the vic, so we merely set a flag (IRQ_DISABLED). If | ||
1633 | * this interrupt actually comes in, then we mask and ack here to push | ||
1634 | * the interrupt off to another CPU */ | ||
1635 | static void | ||
1636 | before_handle_vic_irq(unsigned int irq) | ||
1637 | { | ||
1638 | irq_desc_t *desc = irq_desc + irq; | ||
1639 | __u8 cpu = smp_processor_id(); | ||
1640 | |||
1641 | _raw_spin_lock(&vic_irq_lock); | ||
1642 | vic_intr_total++; | ||
1643 | vic_intr_count[cpu]++; | ||
1644 | |||
1645 | if(!(cpu_irq_affinity[cpu] & (1<<irq))) { | ||
1646 | /* The irq is not in our affinity mask, push it off | ||
1647 | * onto another CPU */ | ||
1648 | VDEBUG(("VOYAGER DEBUG: affinity triggered disable of irq %d on cpu %d\n", | ||
1649 | irq, cpu)); | ||
1650 | disable_local_vic_irq(irq); | ||
1651 | /* set IRQ_INPROGRESS to prevent the handler in irq.c from | ||
1652 | * actually calling the interrupt routine */ | ||
1653 | desc->status |= IRQ_REPLAY | IRQ_INPROGRESS; | ||
1654 | } else if(desc->status & IRQ_DISABLED) { | ||
1655 | /* Damn, the interrupt actually arrived, do the lazy | ||
1656 | * disable thing. The interrupt routine in irq.c will | ||
1657 | * not handle a IRQ_DISABLED interrupt, so nothing more | ||
1658 | * need be done here */ | ||
1659 | VDEBUG(("VOYAGER DEBUG: lazy disable of irq %d on CPU %d\n", | ||
1660 | irq, cpu)); | ||
1661 | disable_local_vic_irq(irq); | ||
1662 | desc->status |= IRQ_REPLAY; | ||
1663 | } else { | ||
1664 | desc->status &= ~IRQ_REPLAY; | ||
1665 | } | ||
1666 | |||
1667 | _raw_spin_unlock(&vic_irq_lock); | ||
1668 | } | ||
1669 | |||
1670 | /* Finish the VIC interrupt: basically mask */ | ||
1671 | static void | ||
1672 | after_handle_vic_irq(unsigned int irq) | ||
1673 | { | ||
1674 | irq_desc_t *desc = irq_desc + irq; | ||
1675 | |||
1676 | _raw_spin_lock(&vic_irq_lock); | ||
1677 | { | ||
1678 | unsigned int status = desc->status & ~IRQ_INPROGRESS; | ||
1679 | #ifdef VOYAGER_DEBUG | ||
1680 | __u16 isr; | ||
1681 | #endif | ||
1682 | |||
1683 | desc->status = status; | ||
1684 | if ((status & IRQ_DISABLED)) | ||
1685 | disable_local_vic_irq(irq); | ||
1686 | #ifdef VOYAGER_DEBUG | ||
1687 | /* DEBUG: before we ack, check what's in progress */ | ||
1688 | isr = vic_read_isr(); | ||
1689 | if((isr & (1<<irq) && !(status & IRQ_REPLAY)) == 0) { | ||
1690 | int i; | ||
1691 | __u8 cpu = smp_processor_id(); | ||
1692 | __u8 real_cpu; | ||
1693 | int mask; /* Um... initialize me??? --RR */ | ||
1694 | |||
1695 | printk("VOYAGER SMP: CPU%d lost interrupt %d\n", | ||
1696 | cpu, irq); | ||
1697 | for_each_cpu(real_cpu, mask) { | ||
1698 | |||
1699 | outb(VIC_CPU_MASQUERADE_ENABLE | real_cpu, | ||
1700 | VIC_PROCESSOR_ID); | ||
1701 | isr = vic_read_isr(); | ||
1702 | if(isr & (1<<irq)) { | ||
1703 | printk("VOYAGER SMP: CPU%d ack irq %d\n", | ||
1704 | real_cpu, irq); | ||
1705 | ack_vic_irq(irq); | ||
1706 | } | ||
1707 | outb(cpu, VIC_PROCESSOR_ID); | ||
1708 | } | ||
1709 | } | ||
1710 | #endif /* VOYAGER_DEBUG */ | ||
1711 | /* as soon as we ack, the interrupt is eligible for | ||
1712 | * receipt by another CPU so everything must be in | ||
1713 | * order here */ | ||
1714 | ack_vic_irq(irq); | ||
1715 | if(status & IRQ_REPLAY) { | ||
1716 | /* replay is set if we disable the interrupt | ||
1717 | * in the before_handle_vic_irq() routine, so | ||
1718 | * clear the in progress bit here to allow the | ||
1719 | * next CPU to handle this correctly */ | ||
1720 | desc->status &= ~(IRQ_REPLAY | IRQ_INPROGRESS); | ||
1721 | } | ||
1722 | #ifdef VOYAGER_DEBUG | ||
1723 | isr = vic_read_isr(); | ||
1724 | if((isr & (1<<irq)) != 0) | ||
1725 | printk("VOYAGER SMP: after_handle_vic_irq() after ack irq=%d, isr=0x%x\n", | ||
1726 | irq, isr); | ||
1727 | #endif /* VOYAGER_DEBUG */ | ||
1728 | } | ||
1729 | _raw_spin_unlock(&vic_irq_lock); | ||
1730 | |||
1731 | /* All code after this point is out of the main path - the IRQ | ||
1732 | * may be intercepted by another CPU if reasserted */ | ||
1733 | } | ||
1734 | |||
1735 | |||
1736 | /* Linux processor - interrupt affinity manipulations. | ||
1737 | * | ||
1738 | * For each processor, we maintain a 32 bit irq affinity mask. | ||
1739 | * Initially it is set to all 1's so every processor accepts every | ||
1740 | * interrupt. In this call, we change the processor's affinity mask: | ||
1741 | * | ||
1742 | * Change from enable to disable: | ||
1743 | * | ||
1744 | * If the interrupt ever comes in to the processor, we will disable it | ||
1745 | * and ack it to push it off to another CPU, so just accept the mask here. | ||
1746 | * | ||
1747 | * Change from disable to enable: | ||
1748 | * | ||
1749 | * change the mask and then do an interrupt enable CPI to re-enable on | ||
1750 | * the selected processors */ | ||
1751 | |||
1752 | void | ||
1753 | set_vic_irq_affinity(unsigned int irq, cpumask_t mask) | ||
1754 | { | ||
1755 | /* Only extended processors handle interrupts */ | ||
1756 | unsigned long real_mask; | ||
1757 | unsigned long irq_mask = 1 << irq; | ||
1758 | int cpu; | ||
1759 | |||
1760 | real_mask = cpus_addr(mask)[0] & voyager_extended_vic_processors; | ||
1761 | |||
1762 | if(cpus_addr(mask)[0] == 0) | ||
1763 | /* can't have no cpu's to accept the interrupt -- extremely | ||
1764 | * bad things will happen */ | ||
1765 | return; | ||
1766 | |||
1767 | if(irq == 0) | ||
1768 | /* can't change the affinity of the timer IRQ. This | ||
1769 | * is due to the constraint in the voyager | ||
1770 | * architecture that the CPI also comes in on and IRQ | ||
1771 | * line and we have chosen IRQ0 for this. If you | ||
1772 | * raise the mask on this interrupt, the processor | ||
1773 | * will no-longer be able to accept VIC CPIs */ | ||
1774 | return; | ||
1775 | |||
1776 | if(irq >= 32) | ||
1777 | /* You can only have 32 interrupts in a voyager system | ||
1778 | * (and 32 only if you have a secondary microchannel | ||
1779 | * bus) */ | ||
1780 | return; | ||
1781 | |||
1782 | for_each_online_cpu(cpu) { | ||
1783 | unsigned long cpu_mask = 1 << cpu; | ||
1784 | |||
1785 | if(cpu_mask & real_mask) { | ||
1786 | /* enable the interrupt for this cpu */ | ||
1787 | cpu_irq_affinity[cpu] |= irq_mask; | ||
1788 | } else { | ||
1789 | /* disable the interrupt for this cpu */ | ||
1790 | cpu_irq_affinity[cpu] &= ~irq_mask; | ||
1791 | } | ||
1792 | } | ||
1793 | /* this is magic, we now have the correct affinity maps, so | ||
1794 | * enable the interrupt. This will send an enable CPI to | ||
1795 | * those cpu's who need to enable it in their local masks, | ||
1796 | * causing them to correct for the new affinity . If the | ||
1797 | * interrupt is currently globally disabled, it will simply be | ||
1798 | * disabled again as it comes in (voyager lazy disable). If | ||
1799 | * the affinity map is tightened to disable the interrupt on a | ||
1800 | * cpu, it will be pushed off when it comes in */ | ||
1801 | enable_vic_irq(irq); | ||
1802 | } | ||
1803 | |||
1804 | static void | ||
1805 | ack_vic_irq(unsigned int irq) | ||
1806 | { | ||
1807 | if (irq & 8) { | ||
1808 | outb(0x62,0x20); /* Specific EOI to cascade */ | ||
1809 | outb(0x60|(irq & 7),0xA0); | ||
1810 | } else { | ||
1811 | outb(0x60 | (irq & 7),0x20); | ||
1812 | } | ||
1813 | } | ||
1814 | |||
1815 | /* enable the CPIs. In the VIC, the CPIs are delivered by the 8259 | ||
1816 | * but are not vectored by it. This means that the 8259 mask must be | ||
1817 | * lowered to receive them */ | ||
1818 | static __init void | ||
1819 | vic_enable_cpi(void) | ||
1820 | { | ||
1821 | __u8 cpu = smp_processor_id(); | ||
1822 | |||
1823 | /* just take a copy of the current mask (nop for boot cpu) */ | ||
1824 | vic_irq_mask[cpu] = vic_irq_mask[boot_cpu_id]; | ||
1825 | |||
1826 | enable_local_vic_irq(VIC_CPI_LEVEL0); | ||
1827 | enable_local_vic_irq(VIC_CPI_LEVEL1); | ||
1828 | /* for sys int and cmn int */ | ||
1829 | enable_local_vic_irq(7); | ||
1830 | |||
1831 | if(is_cpu_quad()) { | ||
1832 | outb(QIC_DEFAULT_MASK0, QIC_MASK_REGISTER0); | ||
1833 | outb(QIC_CPI_ENABLE, QIC_MASK_REGISTER1); | ||
1834 | VDEBUG(("VOYAGER SMP: QIC ENABLE CPI: CPU%d: MASK 0x%x\n", | ||
1835 | cpu, QIC_CPI_ENABLE)); | ||
1836 | } | ||
1837 | |||
1838 | VDEBUG(("VOYAGER SMP: ENABLE CPI: CPU%d: MASK 0x%x\n", | ||
1839 | cpu, vic_irq_mask[cpu])); | ||
1840 | } | ||
1841 | |||
1842 | void | ||
1843 | voyager_smp_dump() | ||
1844 | { | ||
1845 | int old_cpu = smp_processor_id(), cpu; | ||
1846 | |||
1847 | /* dump the interrupt masks of each processor */ | ||
1848 | for_each_online_cpu(cpu) { | ||
1849 | __u16 imr, isr, irr; | ||
1850 | unsigned long flags; | ||
1851 | |||
1852 | local_irq_save(flags); | ||
1853 | outb(VIC_CPU_MASQUERADE_ENABLE | cpu, VIC_PROCESSOR_ID); | ||
1854 | imr = (inb(0xa1) << 8) | inb(0x21); | ||
1855 | outb(0x0a, 0xa0); | ||
1856 | irr = inb(0xa0) << 8; | ||
1857 | outb(0x0a, 0x20); | ||
1858 | irr |= inb(0x20); | ||
1859 | outb(0x0b, 0xa0); | ||
1860 | isr = inb(0xa0) << 8; | ||
1861 | outb(0x0b, 0x20); | ||
1862 | isr |= inb(0x20); | ||
1863 | outb(old_cpu, VIC_PROCESSOR_ID); | ||
1864 | local_irq_restore(flags); | ||
1865 | printk("\tCPU%d: mask=0x%x, IMR=0x%x, IRR=0x%x, ISR=0x%x\n", | ||
1866 | cpu, vic_irq_mask[cpu], imr, irr, isr); | ||
1867 | #if 0 | ||
1868 | /* These lines are put in to try to unstick an un ack'd irq */ | ||
1869 | if(isr != 0) { | ||
1870 | int irq; | ||
1871 | for(irq=0; irq<16; irq++) { | ||
1872 | if(isr & (1<<irq)) { | ||
1873 | printk("\tCPU%d: ack irq %d\n", | ||
1874 | cpu, irq); | ||
1875 | local_irq_save(flags); | ||
1876 | outb(VIC_CPU_MASQUERADE_ENABLE | cpu, | ||
1877 | VIC_PROCESSOR_ID); | ||
1878 | ack_vic_irq(irq); | ||
1879 | outb(old_cpu, VIC_PROCESSOR_ID); | ||
1880 | local_irq_restore(flags); | ||
1881 | } | ||
1882 | } | ||
1883 | } | ||
1884 | #endif | ||
1885 | } | ||
1886 | } | ||
1887 | |||
1888 | void | ||
1889 | smp_voyager_power_off(void *dummy) | ||
1890 | { | ||
1891 | if(smp_processor_id() == boot_cpu_id) | ||
1892 | voyager_power_off(); | ||
1893 | else | ||
1894 | smp_stop_cpu_function(NULL); | ||
1895 | } | ||
1896 | |||
1897 | void __init | ||
1898 | smp_prepare_cpus(unsigned int max_cpus) | ||
1899 | { | ||
1900 | /* FIXME: ignore max_cpus for now */ | ||
1901 | smp_boot_cpus(); | ||
1902 | } | ||
1903 | |||
1904 | void __devinit smp_prepare_boot_cpu(void) | ||
1905 | { | ||
1906 | cpu_set(smp_processor_id(), cpu_online_map); | ||
1907 | cpu_set(smp_processor_id(), cpu_callout_map); | ||
1908 | } | ||
1909 | |||
1910 | int __devinit | ||
1911 | __cpu_up(unsigned int cpu) | ||
1912 | { | ||
1913 | /* This only works at boot for x86. See "rewrite" above. */ | ||
1914 | if (cpu_isset(cpu, smp_commenced_mask)) | ||
1915 | return -ENOSYS; | ||
1916 | |||
1917 | /* In case one didn't come up */ | ||
1918 | if (!cpu_isset(cpu, cpu_callin_map)) | ||
1919 | return -EIO; | ||
1920 | /* Unleash the CPU! */ | ||
1921 | cpu_set(cpu, smp_commenced_mask); | ||
1922 | while (!cpu_isset(cpu, cpu_online_map)) | ||
1923 | mb(); | ||
1924 | return 0; | ||
1925 | } | ||
1926 | |||
1927 | void __init | ||
1928 | smp_cpus_done(unsigned int max_cpus) | ||
1929 | { | ||
1930 | zap_low_mappings(); | ||
1931 | } | ||