This commit was manufactured by cvs2svn to create branch 'vserver'.
[linux-2.6.git] / arch / ia64 / kernel / crash.c
1 /*
2  * arch/ia64/kernel/crash.c
3  *
4  * Architecture specific (ia64) functions for kexec based crash dumps.
5  *
6  * Created by: Khalid Aziz <khalid.aziz@hp.com>
7  * Copyright (C) 2005 Hewlett-Packard Development Company, L.P.
8  * Copyright (C) 2005 Intel Corp        Zou Nan hai <nanhai.zou@intel.com>
9  *
10  */
11 #include <linux/smp.h>
12 #include <linux/delay.h>
13 #include <linux/crash_dump.h>
14 #include <linux/bootmem.h>
15 #include <linux/kexec.h>
16 #include <linux/elfcore.h>
17 #include <linux/sysctl.h>
18 #include <linux/init.h>
19
20 #include <asm/kdebug.h>
21 #include <asm/mca.h>
22
23 int kdump_status[NR_CPUS];
24 atomic_t kdump_cpu_freezed;
25 atomic_t kdump_in_progress;
26 int kdump_on_init = 1;
27
28 static inline Elf64_Word
29 *append_elf_note(Elf64_Word *buf, char *name, unsigned type, void *data,
30                 size_t data_len)
31 {
32         struct elf_note *note = (struct elf_note *)buf;
33         note->n_namesz = strlen(name) + 1;
34         note->n_descsz = data_len;
35         note->n_type   = type;
36         buf += (sizeof(*note) + 3)/4;
37         memcpy(buf, name, note->n_namesz);
38         buf += (note->n_namesz + 3)/4;
39         memcpy(buf, data, data_len);
40         buf += (data_len + 3)/4;
41         return buf;
42 }
43
44 static void
45 final_note(void *buf)
46 {
47         memset(buf, 0, sizeof(struct elf_note));
48 }
49
50 extern void ia64_dump_cpu_regs(void *);
51
52 static DEFINE_PER_CPU(struct elf_prstatus, elf_prstatus);
53
54 void
55 crash_save_this_cpu()
56 {
57         void *buf;
58         unsigned long cfm, sof, sol;
59
60         int cpu = smp_processor_id();
61         struct elf_prstatus *prstatus = &per_cpu(elf_prstatus, cpu);
62
63         elf_greg_t *dst = (elf_greg_t *)&(prstatus->pr_reg);
64         memset(prstatus, 0, sizeof(*prstatus));
65         prstatus->pr_pid = current->pid;
66
67         ia64_dump_cpu_regs(dst);
68         cfm = dst[43];
69         sol = (cfm >> 7) & 0x7f;
70         sof = cfm & 0x7f;
71         dst[46] = (unsigned long)ia64_rse_skip_regs((unsigned long *)dst[46],
72                         sof - sol);
73
74         buf = (u64 *) per_cpu_ptr(crash_notes, cpu);
75         if (!buf)
76                 return;
77         buf = append_elf_note(buf, "CORE", NT_PRSTATUS, prstatus,
78                         sizeof(*prstatus));
79         final_note(buf);
80 }
81
82 #ifdef CONFIG_SMP
83 static int
84 kdump_wait_cpu_freeze(void)
85 {
86         int cpu_num = num_online_cpus() - 1;
87         int timeout = 1000;
88         while(timeout-- > 0) {
89                 if (atomic_read(&kdump_cpu_freezed) == cpu_num)
90                         return 0;
91                 udelay(1000);
92         }
93         return 1;
94 }
95 #endif
96
97 void
98 machine_crash_shutdown(struct pt_regs *pt)
99 {
100         /* This function is only called after the system
101          * has paniced or is otherwise in a critical state.
102          * The minimum amount of code to allow a kexec'd kernel
103          * to run successfully needs to happen here.
104          *
105          * In practice this means shooting down the other cpus in
106          * an SMP system.
107          */
108         kexec_disable_iosapic();
109 #ifdef CONFIG_SMP
110         kdump_smp_send_stop();
111         if (kdump_wait_cpu_freeze() && kdump_on_init)   {
112                 //not all cpu response to IPI, send INIT to freeze them
113                 kdump_smp_send_init();
114         }
115 #endif
116 }
117
118 static void
119 machine_kdump_on_init(void)
120 {
121         local_irq_disable();
122         kexec_disable_iosapic();
123         machine_kexec(ia64_kimage);
124 }
125
126 void
127 kdump_cpu_freeze(struct unw_frame_info *info, void *arg)
128 {
129         int cpuid;
130         local_irq_disable();
131         cpuid = smp_processor_id();
132         crash_save_this_cpu();
133         current->thread.ksp = (__u64)info->sw - 16;
134         atomic_inc(&kdump_cpu_freezed);
135         kdump_status[cpuid] = 1;
136         mb();
137 #ifdef CONFIG_HOTPLUG_CPU
138         if (cpuid != 0)
139                 ia64_jump_to_sal(&sal_boot_rendez_state[cpuid]);
140 #endif
141         for (;;)
142                 cpu_relax();
143 }
144
145 static int
146 kdump_init_notifier(struct notifier_block *self, unsigned long val, void *data)
147 {
148         struct ia64_mca_notify_die *nd;
149         struct die_args *args = data;
150
151         if (!kdump_on_init)
152                 return NOTIFY_DONE;
153
154         if (val != DIE_INIT_MONARCH_ENTER &&
155             val != DIE_INIT_SLAVE_ENTER &&
156             val != DIE_MCA_RENDZVOUS_LEAVE &&
157             val != DIE_MCA_MONARCH_LEAVE)
158                 return NOTIFY_DONE;
159
160         nd = (struct ia64_mca_notify_die *)args->err;
161         /* Reason code 1 means machine check rendezous*/
162         if ((val == DIE_INIT_MONARCH_ENTER || DIE_INIT_SLAVE_ENTER) &&
163                  nd->sos->rv_rc == 1)
164                 return NOTIFY_DONE;
165
166         switch (val) {
167                 case DIE_INIT_MONARCH_ENTER:
168                         machine_kdump_on_init();
169                         break;
170                 case DIE_INIT_SLAVE_ENTER:
171                         unw_init_running(kdump_cpu_freeze, NULL);
172                         break;
173                 case DIE_MCA_RENDZVOUS_LEAVE:
174                         if (atomic_read(&kdump_in_progress))
175                                 unw_init_running(kdump_cpu_freeze, NULL);
176                         break;
177                 case DIE_MCA_MONARCH_LEAVE:
178                      /* die_register->signr indicate if MCA is recoverable */
179                         if (!args->signr)
180                                 machine_kdump_on_init();
181                         break;
182         }
183         return NOTIFY_DONE;
184 }
185
186 #ifdef CONFIG_SYSCTL
187 static ctl_table kdump_on_init_table[] = {
188         {
189                 .ctl_name = CTL_UNNUMBERED,
190                 .procname = "kdump_on_init",
191                 .data = &kdump_on_init,
192                 .maxlen = sizeof(int),
193                 .mode = 0644,
194                 .proc_handler = &proc_dointvec,
195         },
196         { .ctl_name = 0 }
197 };
198
199 static ctl_table sys_table[] = {
200         {
201           .ctl_name = CTL_KERN,
202           .procname = "kernel",
203           .mode = 0555,
204           .child = kdump_on_init_table,
205         },
206         { .ctl_name = 0 }
207 };
208 #endif
209
210 static int
211 machine_crash_setup(void)
212 {
213         static struct notifier_block kdump_init_notifier_nb = {
214                 .notifier_call = kdump_init_notifier,
215         };
216         int ret;
217         if((ret = register_die_notifier(&kdump_init_notifier_nb)) != 0)
218                 return ret;
219 #ifdef CONFIG_SYSCTL
220         register_sysctl_table(sys_table, 0);
221 #endif
222         return 0;
223 }
224
225 __initcall(machine_crash_setup);
226