Linux-2.6.12-rc2
[linux-flexiantxendom0-natty.git] / drivers / s390 / char / sclp_quiesce.c
1 /*
2  *  drivers/s390/char/sclp_quiesce.c
3  *     signal quiesce handler
4  *
5  *  (C) Copyright IBM Corp. 1999,2004
6  *  Author(s): Martin Schwidefsky <schwidefsky@de.ibm.com>
7  *             Peter Oberparleiter <peter.oberparleiter@de.ibm.com>
8  */
9
10 #include <linux/config.h>
11 #include <linux/module.h>
12 #include <linux/types.h>
13 #include <linux/cpumask.h>
14 #include <linux/smp.h>
15 #include <linux/init.h>
16 #include <asm/atomic.h>
17 #include <asm/ptrace.h>
18 #include <asm/sigp.h>
19
20 #include "sclp.h"
21
22
23 #ifdef CONFIG_SMP
24 /* Signal completion of shutdown process. All CPUs except the first to enter
25  * this function: go to stopped state. First CPU: wait until all other
26  * CPUs are in stopped or check stop state. Afterwards, load special PSW
27  * to indicate completion. */
28 static void
29 do_load_quiesce_psw(void * __unused)
30 {
31         static atomic_t cpuid = ATOMIC_INIT(-1);
32         psw_t quiesce_psw;
33         int cpu;
34
35         if (atomic_compare_and_swap(-1, smp_processor_id(), &cpuid))
36                 signal_processor(smp_processor_id(), sigp_stop);
37         /* Wait for all other cpus to enter stopped state */
38         for_each_online_cpu(cpu) {
39                 if (cpu == smp_processor_id())
40                         continue;
41                 while(!smp_cpu_not_running(cpu))
42                         cpu_relax();
43         }
44         /* Quiesce the last cpu with the special psw */
45         quiesce_psw.mask = PSW_BASE_BITS | PSW_MASK_WAIT;
46         quiesce_psw.addr = 0xfff;
47         __load_psw(quiesce_psw);
48 }
49
50 /* Shutdown handler. Perform shutdown function on all CPUs. */
51 static void
52 do_machine_quiesce(void)
53 {
54         on_each_cpu(do_load_quiesce_psw, NULL, 0, 0);
55 }
56 #else
57 /* Shutdown handler. Signal completion of shutdown by loading special PSW. */
58 static void
59 do_machine_quiesce(void)
60 {
61         psw_t quiesce_psw;
62
63         quiesce_psw.mask = PSW_BASE_BITS | PSW_MASK_WAIT;
64         quiesce_psw.addr = 0xfff;
65         __load_psw(quiesce_psw);
66 }
67 #endif
68
69 extern void ctrl_alt_del(void);
70
71 /* Handler for quiesce event. Start shutdown procedure. */
72 static void
73 sclp_quiesce_handler(struct evbuf_header *evbuf)
74 {
75         _machine_restart = (void *) do_machine_quiesce;
76         _machine_halt = do_machine_quiesce;
77         _machine_power_off = do_machine_quiesce;
78         ctrl_alt_del();
79 }
80
81 static struct sclp_register sclp_quiesce_event = {
82         .receive_mask = EvTyp_SigQuiesce_Mask,
83         .receiver_fn = sclp_quiesce_handler
84 };
85
86 /* Initialize quiesce driver. */
87 static int __init
88 sclp_quiesce_init(void)
89 {
90         int rc;
91
92         rc = sclp_register(&sclp_quiesce_event);
93         if (rc)
94                 printk(KERN_WARNING "sclp: could not register quiesce handler "
95                        "(rc=%d)\n", rc);
96         return rc;
97 }
98
99 module_init(sclp_quiesce_init);