2 * arch/s390/kernel/smp.c
4 * Copyright IBM Corp. 1999,2007
5 * Author(s): Denis Joseph Barrow (djbarrow@de.ibm.com,barrow_dj@yahoo.com),
6 * Martin Schwidefsky (schwidefsky@de.ibm.com)
7 * Heiko Carstens (heiko.carstens@de.ibm.com)
9 * based on other smp stuff by
10 * (c) 1995 Alan Cox, CymruNET Ltd <alan@cymru.net>
11 * (c) 1998 Ingo Molnar
13 * We work with logical cpu numbering everywhere we can. The only
14 * functions using the real cpu address (got from STAP) are the sigp
15 * functions. For all other functions we use the identity mapping.
16 * That means that cpu_number_map[i] == i for every cpu. cpu_number_map is
17 * used e.g. to find the idle task belonging to a logical cpu. Every array
18 * in the kernel is sorted by the logical cpu number and not by the physical
19 * one which is causing all the confusion with __cpu_logical_map and
20 * cpu_number_map in other architectures.
23 #include <linux/module.h>
24 #include <linux/init.h>
26 #include <linux/err.h>
27 #include <linux/spinlock.h>
28 #include <linux/kernel_stat.h>
29 #include <linux/delay.h>
30 #include <linux/cache.h>
31 #include <linux/interrupt.h>
32 #include <linux/cpu.h>
33 #include <linux/timex.h>
34 #include <linux/bootmem.h>
36 #include <asm/setup.h>
38 #include <asm/pgalloc.h>
40 #include <asm/s390_ext.h>
41 #include <asm/cpcmd.h>
42 #include <asm/tlbflush.h>
43 #include <asm/timer.h>
44 #include <asm/lowcore.h>
50 * An array with a pointer the lowcore of every CPU.
52 struct _lowcore
*lowcore_ptr
[NR_CPUS
];
53 EXPORT_SYMBOL(lowcore_ptr
);
55 cpumask_t cpu_online_map
= CPU_MASK_NONE
;
56 EXPORT_SYMBOL(cpu_online_map
);
58 cpumask_t cpu_possible_map
= CPU_MASK_ALL
;
59 EXPORT_SYMBOL(cpu_possible_map
);
61 static struct task_struct
*current_set
[NR_CPUS
];
63 static u8 smp_cpu_type
;
64 static int smp_use_sigp_detection
;
71 DEFINE_MUTEX(smp_cpu_state_mutex
);
72 int smp_cpu_polarization
[NR_CPUS
];
73 static int smp_cpu_state
[NR_CPUS
];
74 static int cpu_management
;
76 static DEFINE_PER_CPU(struct cpu
, cpu_devices
);
78 static void smp_ext_bitcall(int, ec_bit_sig
);
81 * Structure and data for __smp_call_function_map(). This is designed to
82 * minimise static memory requirements. It also looks cleaner.
84 static DEFINE_SPINLOCK(call_lock
);
86 struct call_data_struct
{
87 void (*func
) (void *info
);
94 static struct call_data_struct
*call_data
;
97 * 'Call function' interrupt callback
99 static void do_call_function(void)
101 void (*func
) (void *info
) = call_data
->func
;
102 void *info
= call_data
->info
;
103 int wait
= call_data
->wait
;
105 cpu_set(smp_processor_id(), call_data
->started
);
108 cpu_set(smp_processor_id(), call_data
->finished
);;
111 static void __smp_call_function_map(void (*func
) (void *info
), void *info
,
112 int wait
, cpumask_t map
)
114 struct call_data_struct data
;
118 * Can deadlock when interrupts are disabled or if in wrong context.
120 WARN_ON(irqs_disabled() || in_irq());
123 * Check for local function call. We have to have the same call order
124 * as in on_each_cpu() because of machine_restart_smp().
126 if (cpu_isset(smp_processor_id(), map
)) {
128 cpu_clear(smp_processor_id(), map
);
131 cpus_and(map
, map
, cpu_online_map
);
137 data
.started
= CPU_MASK_NONE
;
140 data
.finished
= CPU_MASK_NONE
;
144 for_each_cpu_mask(cpu
, map
)
145 smp_ext_bitcall(cpu
, ec_call_function
);
147 /* Wait for response */
148 while (!cpus_equal(map
, data
.started
))
151 while (!cpus_equal(map
, data
.finished
))
163 * @func: the function to run; this must be fast and non-blocking
164 * @info: an arbitrary pointer to pass to the function
165 * @wait: if true, wait (atomically) until function has completed on other CPUs
167 * Run a function on all other CPUs.
169 * You must not call this function with disabled interrupts, from a
170 * hardware interrupt handler or from a bottom half.
172 int smp_call_function(void (*func
) (void *info
), void *info
, int wait
)
176 spin_lock(&call_lock
);
177 map
= cpu_online_map
;
178 cpu_clear(smp_processor_id(), map
);
179 __smp_call_function_map(func
, info
, wait
, map
);
180 spin_unlock(&call_lock
);
183 EXPORT_SYMBOL(smp_call_function
);
186 * smp_call_function_single:
187 * @cpu: the CPU where func should run
188 * @func: the function to run; this must be fast and non-blocking
189 * @info: an arbitrary pointer to pass to the function
190 * @wait: if true, wait (atomically) until function has completed on other CPUs
192 * Run a function on one processor.
194 * You must not call this function with disabled interrupts, from a
195 * hardware interrupt handler or from a bottom half.
197 int smp_call_function_single(int cpu
, void (*func
) (void *info
), void *info
,
200 spin_lock(&call_lock
);
201 __smp_call_function_map(func
, info
, wait
, cpumask_of_cpu(cpu
));
202 spin_unlock(&call_lock
);
205 EXPORT_SYMBOL(smp_call_function_single
);
208 * smp_call_function_mask(): Run a function on a set of other CPUs.
209 * @mask: The set of cpus to run on. Must not include the current cpu.
210 * @func: The function to run. This must be fast and non-blocking.
211 * @info: An arbitrary pointer to pass to the function.
212 * @wait: If true, wait (atomically) until function has completed on other CPUs.
214 * Returns 0 on success, else a negative status code.
216 * If @wait is true, then returns once @func has returned; otherwise
217 * it returns just before the target cpu calls @func.
219 * You must not call this function with disabled interrupts or from a
220 * hardware interrupt handler or from a bottom half handler.
222 int smp_call_function_mask(cpumask_t mask
, void (*func
)(void *), void *info
,
225 spin_lock(&call_lock
);
226 cpu_clear(smp_processor_id(), mask
);
227 __smp_call_function_map(func
, info
, wait
, mask
);
228 spin_unlock(&call_lock
);
231 EXPORT_SYMBOL(smp_call_function_mask
);
233 void smp_send_stop(void)
237 /* Disable all interrupts/machine checks */
238 __load_psw_mask(psw_kernel_bits
& ~PSW_MASK_MCHECK
);
240 /* write magic number to zero page (absolute 0) */
241 lowcore_ptr
[smp_processor_id()]->panic_magic
= __PANIC_MAGIC
;
243 /* stop all processors */
244 for_each_online_cpu(cpu
) {
245 if (cpu
== smp_processor_id())
248 rc
= signal_processor(cpu
, sigp_stop
);
249 } while (rc
== sigp_busy
);
251 while (!smp_cpu_not_running(cpu
))
257 * This is the main routine where commands issued by other
261 static void do_ext_call_interrupt(__u16 code
)
266 * handle bit signal external calls
268 * For the ec_schedule signal we have to do nothing. All the work
269 * is done automatically when we return from the interrupt.
271 bits
= xchg(&S390_lowcore
.ext_call_fast
, 0);
273 if (test_bit(ec_call_function
, &bits
))
278 * Send an external call sigp to another cpu and return without waiting
279 * for its completion.
281 static void smp_ext_bitcall(int cpu
, ec_bit_sig sig
)
284 * Set signaling bit in lowcore of target cpu and kick it
286 set_bit(sig
, (unsigned long *) &lowcore_ptr
[cpu
]->ext_call_fast
);
287 while (signal_processor(cpu
, sigp_emergency_signal
) == sigp_busy
)
293 * this function sends a 'purge tlb' signal to another CPU.
295 static void smp_ptlb_callback(void *info
)
300 void smp_ptlb_all(void)
302 on_each_cpu(smp_ptlb_callback
, NULL
, 1);
304 EXPORT_SYMBOL(smp_ptlb_all
);
305 #endif /* ! CONFIG_64BIT */
308 * this function sends a 'reschedule' IPI to another CPU.
309 * it goes straight through and wastes no time serializing
310 * anything. Worst case is that we lose a reschedule ...
312 void smp_send_reschedule(int cpu
)
314 smp_ext_bitcall(cpu
, ec_schedule
);
318 * parameter area for the set/clear control bit callbacks
320 struct ec_creg_mask_parms
{
321 unsigned long orvals
[16];
322 unsigned long andvals
[16];
326 * callback for setting/clearing control bits
328 static void smp_ctl_bit_callback(void *info
)
330 struct ec_creg_mask_parms
*pp
= info
;
331 unsigned long cregs
[16];
334 __ctl_store(cregs
, 0, 15);
335 for (i
= 0; i
<= 15; i
++)
336 cregs
[i
] = (cregs
[i
] & pp
->andvals
[i
]) | pp
->orvals
[i
];
337 __ctl_load(cregs
, 0, 15);
341 * Set a bit in a control register of all cpus
343 void smp_ctl_set_bit(int cr
, int bit
)
345 struct ec_creg_mask_parms parms
;
347 memset(&parms
.orvals
, 0, sizeof(parms
.orvals
));
348 memset(&parms
.andvals
, 0xff, sizeof(parms
.andvals
));
349 parms
.orvals
[cr
] = 1 << bit
;
350 on_each_cpu(smp_ctl_bit_callback
, &parms
, 1);
352 EXPORT_SYMBOL(smp_ctl_set_bit
);
355 * Clear a bit in a control register of all cpus
357 void smp_ctl_clear_bit(int cr
, int bit
)
359 struct ec_creg_mask_parms parms
;
361 memset(&parms
.orvals
, 0, sizeof(parms
.orvals
));
362 memset(&parms
.andvals
, 0xff, sizeof(parms
.andvals
));
363 parms
.andvals
[cr
] = ~(1L << bit
);
364 on_each_cpu(smp_ctl_bit_callback
, &parms
, 1);
366 EXPORT_SYMBOL(smp_ctl_clear_bit
);
369 * In early ipl state a temp. logically cpu number is needed, so the sigp
370 * functions can be used to sense other cpus. Since NR_CPUS is >= 2 on
371 * CONFIG_SMP and the ipl cpu is logical cpu 0, it must be 1.
373 #define CPU_INIT_NO 1
375 #if defined(CONFIG_ZFCPDUMP) || defined(CONFIG_ZFCPDUMP_MODULE)
378 * zfcpdump_prefix_array holds prefix registers for the following scenario:
379 * 64 bit zfcpdump kernel and 31 bit kernel which is to be dumped. We have to
380 * save its prefix registers, since they get lost, when switching from 31 bit
383 unsigned int zfcpdump_prefix_array
[NR_CPUS
+ 1] \
384 __attribute__((__section__(".data")));
386 static void __init
smp_get_save_area(unsigned int cpu
, unsigned int phy_cpu
)
388 if (ipl_info
.type
!= IPL_TYPE_FCP_DUMP
)
390 if (cpu
>= NR_CPUS
) {
391 printk(KERN_WARNING
"Registers for cpu %i not saved since dump "
392 "kernel was compiled with NR_CPUS=%i\n", cpu
, NR_CPUS
);
395 zfcpdump_save_areas
[cpu
] = kmalloc(sizeof(union save_area
), GFP_KERNEL
);
396 __cpu_logical_map
[CPU_INIT_NO
] = (__u16
) phy_cpu
;
397 while (signal_processor(CPU_INIT_NO
, sigp_stop_and_store_status
) ==
400 memcpy(zfcpdump_save_areas
[cpu
],
401 (void *)(unsigned long) store_prefix() + SAVE_AREA_BASE
,
404 /* copy original prefix register */
405 zfcpdump_save_areas
[cpu
]->s390x
.pref_reg
= zfcpdump_prefix_array
[cpu
];
409 union save_area
*zfcpdump_save_areas
[NR_CPUS
+ 1];
410 EXPORT_SYMBOL_GPL(zfcpdump_save_areas
);
414 static inline void smp_get_save_area(unsigned int cpu
, unsigned int phy_cpu
) { }
416 #endif /* CONFIG_ZFCPDUMP || CONFIG_ZFCPDUMP_MODULE */
418 static int cpu_stopped(int cpu
)
422 /* Check for stopped state */
423 if (signal_processor_ps(&status
, 0, cpu
, sigp_sense
) ==
424 sigp_status_stored
) {
431 static int cpu_known(int cpu_id
)
435 for_each_present_cpu(cpu
) {
436 if (__cpu_logical_map
[cpu
] == cpu_id
)
442 static int smp_rescan_cpus_sigp(cpumask_t avail
)
444 int cpu_id
, logical_cpu
;
446 logical_cpu
= first_cpu(avail
);
447 if (logical_cpu
== NR_CPUS
)
449 for (cpu_id
= 0; cpu_id
<= 65535; cpu_id
++) {
450 if (cpu_known(cpu_id
))
452 __cpu_logical_map
[logical_cpu
] = cpu_id
;
453 smp_cpu_polarization
[logical_cpu
] = POLARIZATION_UNKNWN
;
454 if (!cpu_stopped(logical_cpu
))
456 cpu_set(logical_cpu
, cpu_present_map
);
457 smp_cpu_state
[logical_cpu
] = CPU_STATE_CONFIGURED
;
458 logical_cpu
= next_cpu(logical_cpu
, avail
);
459 if (logical_cpu
== NR_CPUS
)
465 static int smp_rescan_cpus_sclp(cpumask_t avail
)
467 struct sclp_cpu_info
*info
;
468 int cpu_id
, logical_cpu
, cpu
;
471 logical_cpu
= first_cpu(avail
);
472 if (logical_cpu
== NR_CPUS
)
474 info
= kmalloc(sizeof(*info
), GFP_KERNEL
);
477 rc
= sclp_get_cpu_info(info
);
480 for (cpu
= 0; cpu
< info
->combined
; cpu
++) {
481 if (info
->has_cpu_type
&& info
->cpu
[cpu
].type
!= smp_cpu_type
)
483 cpu_id
= info
->cpu
[cpu
].address
;
484 if (cpu_known(cpu_id
))
486 __cpu_logical_map
[logical_cpu
] = cpu_id
;
487 smp_cpu_polarization
[logical_cpu
] = POLARIZATION_UNKNWN
;
488 cpu_set(logical_cpu
, cpu_present_map
);
489 if (cpu
>= info
->configured
)
490 smp_cpu_state
[logical_cpu
] = CPU_STATE_STANDBY
;
492 smp_cpu_state
[logical_cpu
] = CPU_STATE_CONFIGURED
;
493 logical_cpu
= next_cpu(logical_cpu
, avail
);
494 if (logical_cpu
== NR_CPUS
)
502 static int __smp_rescan_cpus(void)
506 cpus_xor(avail
, cpu_possible_map
, cpu_present_map
);
507 if (smp_use_sigp_detection
)
508 return smp_rescan_cpus_sigp(avail
);
510 return smp_rescan_cpus_sclp(avail
);
513 static void __init
smp_detect_cpus(void)
515 unsigned int cpu
, c_cpus
, s_cpus
;
516 struct sclp_cpu_info
*info
;
517 u16 boot_cpu_addr
, cpu_addr
;
521 boot_cpu_addr
= S390_lowcore
.cpu_data
.cpu_addr
;
522 info
= kmalloc(sizeof(*info
), GFP_KERNEL
);
524 panic("smp_detect_cpus failed to allocate memory\n");
525 /* Use sigp detection algorithm if sclp doesn't work. */
526 if (sclp_get_cpu_info(info
)) {
527 smp_use_sigp_detection
= 1;
528 for (cpu
= 0; cpu
<= 65535; cpu
++) {
529 if (cpu
== boot_cpu_addr
)
531 __cpu_logical_map
[CPU_INIT_NO
] = cpu
;
532 if (!cpu_stopped(CPU_INIT_NO
))
534 smp_get_save_area(c_cpus
, cpu
);
540 if (info
->has_cpu_type
) {
541 for (cpu
= 0; cpu
< info
->combined
; cpu
++) {
542 if (info
->cpu
[cpu
].address
== boot_cpu_addr
) {
543 smp_cpu_type
= info
->cpu
[cpu
].type
;
549 for (cpu
= 0; cpu
< info
->combined
; cpu
++) {
550 if (info
->has_cpu_type
&& info
->cpu
[cpu
].type
!= smp_cpu_type
)
552 cpu_addr
= info
->cpu
[cpu
].address
;
553 if (cpu_addr
== boot_cpu_addr
)
555 __cpu_logical_map
[CPU_INIT_NO
] = cpu_addr
;
556 if (!cpu_stopped(CPU_INIT_NO
)) {
560 smp_get_save_area(c_cpus
, cpu_addr
);
565 printk(KERN_INFO
"CPUs: %d configured, %d standby\n", c_cpus
, s_cpus
);
572 * Activate a secondary processor.
574 int __cpuinit
start_secondary(void *cpuvoid
)
579 /* Enable TOD clock interrupts on the secondary cpu. */
581 #ifdef CONFIG_VIRT_TIMER
582 /* Enable cpu timer interrupts on the secondary cpu. */
585 /* Enable pfault pseudo page faults on this cpu. */
588 /* Mark this cpu as online */
589 spin_lock(&call_lock
);
590 cpu_set(smp_processor_id(), cpu_online_map
);
591 spin_unlock(&call_lock
);
592 /* Switch on interrupts */
594 /* Print info about this processor */
595 print_cpu_info(&S390_lowcore
.cpu_data
);
596 /* cpu_idle will call schedule for us */
601 static void __init
smp_create_idle(unsigned int cpu
)
603 struct task_struct
*p
;
606 * don't care about the psw and regs settings since we'll never
607 * reschedule the forked task.
611 panic("failed fork for CPU %u: %li", cpu
, PTR_ERR(p
));
612 current_set
[cpu
] = p
;
613 spin_lock_init(&(&per_cpu(s390_idle
, cpu
))->lock
);
616 static int __cpuinit
smp_alloc_lowcore(int cpu
)
618 unsigned long async_stack
, panic_stack
;
619 struct _lowcore
*lowcore
;
622 lc_order
= sizeof(long) == 8 ? 1 : 0;
623 lowcore
= (void *) __get_free_pages(GFP_KERNEL
| GFP_DMA
, lc_order
);
626 async_stack
= __get_free_pages(GFP_KERNEL
, ASYNC_ORDER
);
627 panic_stack
= __get_free_page(GFP_KERNEL
);
628 if (!panic_stack
|| !async_stack
)
630 memcpy(lowcore
, &S390_lowcore
, 512);
631 memset((char *)lowcore
+ 512, 0, sizeof(*lowcore
) - 512);
632 lowcore
->async_stack
= async_stack
+ ASYNC_SIZE
;
633 lowcore
->panic_stack
= panic_stack
+ PAGE_SIZE
;
636 if (MACHINE_HAS_IEEE
) {
637 unsigned long save_area
;
639 save_area
= get_zeroed_page(GFP_KERNEL
);
642 lowcore
->extended_save_area_addr
= (u32
) save_area
;
645 lowcore_ptr
[cpu
] = lowcore
;
650 free_page(panic_stack
);
653 free_pages(async_stack
, ASYNC_ORDER
);
654 free_pages((unsigned long) lowcore
, lc_order
);
658 #ifdef CONFIG_HOTPLUG_CPU
659 static void smp_free_lowcore(int cpu
)
661 struct _lowcore
*lowcore
;
664 lc_order
= sizeof(long) == 8 ? 1 : 0;
665 lowcore
= lowcore_ptr
[cpu
];
667 if (MACHINE_HAS_IEEE
)
668 free_page((unsigned long) lowcore
->extended_save_area_addr
);
670 free_page(lowcore
->panic_stack
- PAGE_SIZE
);
671 free_pages(lowcore
->async_stack
- ASYNC_SIZE
, ASYNC_ORDER
);
672 free_pages((unsigned long) lowcore
, lc_order
);
673 lowcore_ptr
[cpu
] = NULL
;
675 #endif /* CONFIG_HOTPLUG_CPU */
677 /* Upping and downing of CPUs */
678 int __cpuinit
__cpu_up(unsigned int cpu
)
680 struct task_struct
*idle
;
681 struct _lowcore
*cpu_lowcore
;
682 struct stack_frame
*sf
;
685 if (smp_cpu_state
[cpu
] != CPU_STATE_CONFIGURED
)
687 if (smp_alloc_lowcore(cpu
))
690 ccode
= signal_processor_p((__u32
)(unsigned long)(lowcore_ptr
[cpu
]),
691 cpu
, sigp_set_prefix
);
693 printk("sigp_set_prefix failed for cpu %d "
694 "with condition code %d\n",
695 (int) cpu
, (int) ccode
);
699 idle
= current_set
[cpu
];
700 cpu_lowcore
= lowcore_ptr
[cpu
];
701 cpu_lowcore
->kernel_stack
= (unsigned long)
702 task_stack_page(idle
) + THREAD_SIZE
;
703 cpu_lowcore
->thread_info
= (unsigned long) task_thread_info(idle
);
704 sf
= (struct stack_frame
*) (cpu_lowcore
->kernel_stack
705 - sizeof(struct pt_regs
)
706 - sizeof(struct stack_frame
));
707 memset(sf
, 0, sizeof(struct stack_frame
));
708 sf
->gprs
[9] = (unsigned long) sf
;
709 cpu_lowcore
->save_area
[15] = (unsigned long) sf
;
710 __ctl_store(cpu_lowcore
->cregs_save_area
, 0, 15);
713 : : "a" (&cpu_lowcore
->access_regs_save_area
) : "memory");
714 cpu_lowcore
->percpu_offset
= __per_cpu_offset
[cpu
];
715 cpu_lowcore
->current_task
= (unsigned long) idle
;
716 cpu_lowcore
->cpu_data
.cpu_nr
= cpu
;
717 cpu_lowcore
->kernel_asce
= S390_lowcore
.kernel_asce
;
718 cpu_lowcore
->ipl_device
= S390_lowcore
.ipl_device
;
721 while (signal_processor(cpu
, sigp_restart
) == sigp_busy
)
724 while (!cpu_online(cpu
))
729 static int __init
setup_possible_cpus(char *s
)
733 pcpus
= simple_strtoul(s
, NULL
, 0);
734 cpu_possible_map
= cpumask_of_cpu(0);
735 for (cpu
= 1; cpu
< pcpus
&& cpu
< NR_CPUS
; cpu
++)
736 cpu_set(cpu
, cpu_possible_map
);
739 early_param("possible_cpus", setup_possible_cpus
);
741 #ifdef CONFIG_HOTPLUG_CPU
743 int __cpu_disable(void)
745 struct ec_creg_mask_parms cr_parms
;
746 int cpu
= smp_processor_id();
748 cpu_clear(cpu
, cpu_online_map
);
750 /* Disable pfault pseudo page faults on this cpu. */
753 memset(&cr_parms
.orvals
, 0, sizeof(cr_parms
.orvals
));
754 memset(&cr_parms
.andvals
, 0xff, sizeof(cr_parms
.andvals
));
756 /* disable all external interrupts */
757 cr_parms
.orvals
[0] = 0;
758 cr_parms
.andvals
[0] = ~(1 << 15 | 1 << 14 | 1 << 13 | 1 << 12 |
759 1 << 11 | 1 << 10 | 1 << 6 | 1 << 4);
760 /* disable all I/O interrupts */
761 cr_parms
.orvals
[6] = 0;
762 cr_parms
.andvals
[6] = ~(1 << 31 | 1 << 30 | 1 << 29 | 1 << 28 |
763 1 << 27 | 1 << 26 | 1 << 25 | 1 << 24);
764 /* disable most machine checks */
765 cr_parms
.orvals
[14] = 0;
766 cr_parms
.andvals
[14] = ~(1 << 28 | 1 << 27 | 1 << 26 |
769 smp_ctl_bit_callback(&cr_parms
);
774 void __cpu_die(unsigned int cpu
)
776 /* Wait until target cpu is down */
777 while (!smp_cpu_not_running(cpu
))
779 smp_free_lowcore(cpu
);
780 printk(KERN_INFO
"Processor %d spun down\n", cpu
);
786 signal_processor(smp_processor_id(), sigp_stop
);
791 #endif /* CONFIG_HOTPLUG_CPU */
793 void __init
smp_prepare_cpus(unsigned int max_cpus
)
796 unsigned long save_area
= 0;
798 unsigned long async_stack
, panic_stack
;
799 struct _lowcore
*lowcore
;
805 /* request the 0x1201 emergency signal external interrupt */
806 if (register_external_interrupt(0x1201, do_ext_call_interrupt
) != 0)
807 panic("Couldn't request external interrupt 0x1201");
808 print_cpu_info(&S390_lowcore
.cpu_data
);
810 /* Reallocate current lowcore, but keep its contents. */
811 lc_order
= sizeof(long) == 8 ? 1 : 0;
812 lowcore
= (void *) __get_free_pages(GFP_KERNEL
| GFP_DMA
, lc_order
);
813 panic_stack
= __get_free_page(GFP_KERNEL
);
814 async_stack
= __get_free_pages(GFP_KERNEL
, ASYNC_ORDER
);
816 if (MACHINE_HAS_IEEE
)
817 save_area
= get_zeroed_page(GFP_KERNEL
);
820 local_mcck_disable();
821 lowcore_ptr
[smp_processor_id()] = lowcore
;
822 *lowcore
= S390_lowcore
;
823 lowcore
->panic_stack
= panic_stack
+ PAGE_SIZE
;
824 lowcore
->async_stack
= async_stack
+ ASYNC_SIZE
;
826 if (MACHINE_HAS_IEEE
)
827 lowcore
->extended_save_area_addr
= (u32
) save_area
;
829 set_prefix((u32
)(unsigned long) lowcore
);
832 for_each_possible_cpu(cpu
)
833 if (cpu
!= smp_processor_id())
834 smp_create_idle(cpu
);
837 void __init
smp_prepare_boot_cpu(void)
839 BUG_ON(smp_processor_id() != 0);
841 current_thread_info()->cpu
= 0;
842 cpu_set(0, cpu_present_map
);
843 cpu_set(0, cpu_online_map
);
844 S390_lowcore
.percpu_offset
= __per_cpu_offset
[0];
845 current_set
[0] = current
;
846 smp_cpu_state
[0] = CPU_STATE_CONFIGURED
;
847 smp_cpu_polarization
[0] = POLARIZATION_UNKNWN
;
848 spin_lock_init(&(&__get_cpu_var(s390_idle
))->lock
);
851 void __init
smp_cpus_done(unsigned int max_cpus
)
856 * the frequency of the profiling timer can be changed
857 * by writing a multiplier value into /proc/profile.
859 * usually you want to run this on all CPUs ;)
861 int setup_profiling_timer(unsigned int multiplier
)
866 #ifdef CONFIG_HOTPLUG_CPU
867 static ssize_t
cpu_configure_show(struct sys_device
*dev
,
868 struct sysdev_attribute
*attr
, char *buf
)
872 mutex_lock(&smp_cpu_state_mutex
);
873 count
= sprintf(buf
, "%d\n", smp_cpu_state
[dev
->id
]);
874 mutex_unlock(&smp_cpu_state_mutex
);
878 static ssize_t
cpu_configure_store(struct sys_device
*dev
,
879 struct sysdev_attribute
*attr
,
880 const char *buf
, size_t count
)
886 if (sscanf(buf
, "%d %c", &val
, &delim
) != 1)
888 if (val
!= 0 && val
!= 1)
892 mutex_lock(&smp_cpu_state_mutex
);
899 if (smp_cpu_state
[cpu
] == CPU_STATE_CONFIGURED
) {
900 rc
= sclp_cpu_deconfigure(__cpu_logical_map
[cpu
]);
902 smp_cpu_state
[cpu
] = CPU_STATE_STANDBY
;
903 smp_cpu_polarization
[cpu
] = POLARIZATION_UNKNWN
;
908 if (smp_cpu_state
[cpu
] == CPU_STATE_STANDBY
) {
909 rc
= sclp_cpu_configure(__cpu_logical_map
[cpu
]);
911 smp_cpu_state
[cpu
] = CPU_STATE_CONFIGURED
;
912 smp_cpu_polarization
[cpu
] = POLARIZATION_UNKNWN
;
920 mutex_unlock(&smp_cpu_state_mutex
);
922 return rc
? rc
: count
;
924 static SYSDEV_ATTR(configure
, 0644, cpu_configure_show
, cpu_configure_store
);
925 #endif /* CONFIG_HOTPLUG_CPU */
927 static ssize_t
cpu_polarization_show(struct sys_device
*dev
,
928 struct sysdev_attribute
*attr
, char *buf
)
933 mutex_lock(&smp_cpu_state_mutex
);
934 switch (smp_cpu_polarization
[cpu
]) {
935 case POLARIZATION_HRZ
:
936 count
= sprintf(buf
, "horizontal\n");
938 case POLARIZATION_VL
:
939 count
= sprintf(buf
, "vertical:low\n");
941 case POLARIZATION_VM
:
942 count
= sprintf(buf
, "vertical:medium\n");
944 case POLARIZATION_VH
:
945 count
= sprintf(buf
, "vertical:high\n");
948 count
= sprintf(buf
, "unknown\n");
951 mutex_unlock(&smp_cpu_state_mutex
);
954 static SYSDEV_ATTR(polarization
, 0444, cpu_polarization_show
, NULL
);
956 static ssize_t
show_cpu_address(struct sys_device
*dev
,
957 struct sysdev_attribute
*attr
, char *buf
)
959 return sprintf(buf
, "%d\n", __cpu_logical_map
[dev
->id
]);
961 static SYSDEV_ATTR(address
, 0444, show_cpu_address
, NULL
);
964 static struct attribute
*cpu_common_attrs
[] = {
965 #ifdef CONFIG_HOTPLUG_CPU
966 &attr_configure
.attr
,
969 &attr_polarization
.attr
,
973 static struct attribute_group cpu_common_attr_group
= {
974 .attrs
= cpu_common_attrs
,
977 static ssize_t
show_capability(struct sys_device
*dev
,
978 struct sysdev_attribute
*attr
, char *buf
)
980 unsigned int capability
;
983 rc
= get_cpu_capability(&capability
);
986 return sprintf(buf
, "%u\n", capability
);
988 static SYSDEV_ATTR(capability
, 0444, show_capability
, NULL
);
990 static ssize_t
show_idle_count(struct sys_device
*dev
,
991 struct sysdev_attribute
*attr
, char *buf
)
993 struct s390_idle_data
*idle
;
994 unsigned long long idle_count
;
996 idle
= &per_cpu(s390_idle
, dev
->id
);
997 spin_lock_irq(&idle
->lock
);
998 idle_count
= idle
->idle_count
;
999 spin_unlock_irq(&idle
->lock
);
1000 return sprintf(buf
, "%llu\n", idle_count
);
1002 static SYSDEV_ATTR(idle_count
, 0444, show_idle_count
, NULL
);
1004 static ssize_t
show_idle_time(struct sys_device
*dev
,
1005 struct sysdev_attribute
*attr
, char *buf
)
1007 struct s390_idle_data
*idle
;
1008 unsigned long long new_time
;
1010 idle
= &per_cpu(s390_idle
, dev
->id
);
1011 spin_lock_irq(&idle
->lock
);
1012 if (idle
->in_idle
) {
1013 new_time
= get_clock();
1014 idle
->idle_time
+= new_time
- idle
->idle_enter
;
1015 idle
->idle_enter
= new_time
;
1017 new_time
= idle
->idle_time
;
1018 spin_unlock_irq(&idle
->lock
);
1019 return sprintf(buf
, "%llu\n", new_time
>> 12);
1021 static SYSDEV_ATTR(idle_time_us
, 0444, show_idle_time
, NULL
);
1023 static struct attribute
*cpu_online_attrs
[] = {
1024 &attr_capability
.attr
,
1025 &attr_idle_count
.attr
,
1026 &attr_idle_time_us
.attr
,
1030 static struct attribute_group cpu_online_attr_group
= {
1031 .attrs
= cpu_online_attrs
,
1034 static int __cpuinit
smp_cpu_notify(struct notifier_block
*self
,
1035 unsigned long action
, void *hcpu
)
1037 unsigned int cpu
= (unsigned int)(long)hcpu
;
1038 struct cpu
*c
= &per_cpu(cpu_devices
, cpu
);
1039 struct sys_device
*s
= &c
->sysdev
;
1040 struct s390_idle_data
*idle
;
1044 case CPU_ONLINE_FROZEN
:
1045 idle
= &per_cpu(s390_idle
, cpu
);
1046 spin_lock_irq(&idle
->lock
);
1047 idle
->idle_enter
= 0;
1048 idle
->idle_time
= 0;
1049 idle
->idle_count
= 0;
1050 spin_unlock_irq(&idle
->lock
);
1051 if (sysfs_create_group(&s
->kobj
, &cpu_online_attr_group
))
1055 case CPU_DEAD_FROZEN
:
1056 sysfs_remove_group(&s
->kobj
, &cpu_online_attr_group
);
1062 static struct notifier_block __cpuinitdata smp_cpu_nb
= {
1063 .notifier_call
= smp_cpu_notify
,
1066 static int __devinit
smp_add_present_cpu(int cpu
)
1068 struct cpu
*c
= &per_cpu(cpu_devices
, cpu
);
1069 struct sys_device
*s
= &c
->sysdev
;
1072 c
->hotpluggable
= 1;
1073 rc
= register_cpu(c
, cpu
);
1076 rc
= sysfs_create_group(&s
->kobj
, &cpu_common_attr_group
);
1079 if (!cpu_online(cpu
))
1081 rc
= sysfs_create_group(&s
->kobj
, &cpu_online_attr_group
);
1084 sysfs_remove_group(&s
->kobj
, &cpu_common_attr_group
);
1086 #ifdef CONFIG_HOTPLUG_CPU
1093 #ifdef CONFIG_HOTPLUG_CPU
1095 int __ref
smp_rescan_cpus(void)
1102 mutex_lock(&smp_cpu_state_mutex
);
1103 newcpus
= cpu_present_map
;
1104 rc
= __smp_rescan_cpus();
1107 cpus_andnot(newcpus
, cpu_present_map
, newcpus
);
1108 for_each_cpu_mask(cpu
, newcpus
) {
1109 rc
= smp_add_present_cpu(cpu
);
1111 cpu_clear(cpu
, cpu_present_map
);
1115 mutex_unlock(&smp_cpu_state_mutex
);
1117 if (!cpus_empty(newcpus
))
1118 topology_schedule_update();
1122 static ssize_t __ref
rescan_store(struct sys_device
*dev
,
1123 struct sysdev_attribute
*attr
,
1129 rc
= smp_rescan_cpus();
1130 return rc
? rc
: count
;
1132 static SYSDEV_ATTR(rescan
, 0200, NULL
, rescan_store
);
1133 #endif /* CONFIG_HOTPLUG_CPU */
1135 static ssize_t
dispatching_show(struct sys_device
*dev
,
1136 struct sysdev_attribute
*attr
,
1141 mutex_lock(&smp_cpu_state_mutex
);
1142 count
= sprintf(buf
, "%d\n", cpu_management
);
1143 mutex_unlock(&smp_cpu_state_mutex
);
1147 static ssize_t
dispatching_store(struct sys_device
*dev
,
1148 struct sysdev_attribute
*attr
,
1149 const char *buf
, size_t count
)
1154 if (sscanf(buf
, "%d %c", &val
, &delim
) != 1)
1156 if (val
!= 0 && val
!= 1)
1160 mutex_lock(&smp_cpu_state_mutex
);
1161 if (cpu_management
== val
)
1163 rc
= topology_set_cpu_management(val
);
1165 cpu_management
= val
;
1167 mutex_unlock(&smp_cpu_state_mutex
);
1169 return rc
? rc
: count
;
1171 static SYSDEV_ATTR(dispatching
, 0644, dispatching_show
, dispatching_store
);
1173 static int __init
topology_init(void)
1178 register_cpu_notifier(&smp_cpu_nb
);
1180 #ifdef CONFIG_HOTPLUG_CPU
1181 rc
= sysfs_create_file(&cpu_sysdev_class
.kset
.kobj
,
1186 rc
= sysfs_create_file(&cpu_sysdev_class
.kset
.kobj
,
1187 &attr_dispatching
.attr
);
1190 for_each_present_cpu(cpu
) {
1191 rc
= smp_add_present_cpu(cpu
);
1197 subsys_initcall(topology_init
);