xref: /openbmc/linux/arch/ia64/kernel/crash.c (revision 1eeb66a1bb973534dc3d064920a5ca683823372e)
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 #include <linux/kdebug.h>
20 
21 #include <asm/mca.h>
22 
23 int kdump_status[NR_CPUS];
24 static atomic_t kdump_cpu_frozen;
25 atomic_t kdump_in_progress;
26 static 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(void)
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_frozen) == 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 	/* not all cpu response to IPI, send INIT to freeze them */
112 	if (kdump_wait_cpu_freeze() && kdump_on_init) 	{
113 		kdump_smp_send_init();
114 	}
115 #endif
116 }
117 
118 static void
119 machine_kdump_on_init(void)
120 {
121 	if (!ia64_kimage) {
122 		printk(KERN_NOTICE "machine_kdump_on_init(): "
123 				"kdump not configured\n");
124 		return;
125 	}
126 	local_irq_disable();
127 	kexec_disable_iosapic();
128 	machine_kexec(ia64_kimage);
129 }
130 
131 void
132 kdump_cpu_freeze(struct unw_frame_info *info, void *arg)
133 {
134 	int cpuid;
135 	local_irq_disable();
136 	cpuid = smp_processor_id();
137 	crash_save_this_cpu();
138 	current->thread.ksp = (__u64)info->sw - 16;
139 	atomic_inc(&kdump_cpu_frozen);
140 	kdump_status[cpuid] = 1;
141 	mb();
142 #ifdef CONFIG_HOTPLUG_CPU
143 	if (cpuid != 0)
144 		ia64_jump_to_sal(&sal_boot_rendez_state[cpuid]);
145 #endif
146 	for (;;)
147 		cpu_relax();
148 }
149 
150 static int
151 kdump_init_notifier(struct notifier_block *self, unsigned long val, void *data)
152 {
153 	struct ia64_mca_notify_die *nd;
154 	struct die_args *args = data;
155 
156 	if (!kdump_on_init)
157 		return NOTIFY_DONE;
158 
159 	if (val != DIE_INIT_MONARCH_ENTER &&
160 	    val != DIE_INIT_SLAVE_ENTER &&
161 	    val != DIE_MCA_RENDZVOUS_LEAVE &&
162 	    val != DIE_MCA_MONARCH_LEAVE)
163 		return NOTIFY_DONE;
164 
165 	nd = (struct ia64_mca_notify_die *)args->err;
166 	/* Reason code 1 means machine check rendezous*/
167 	if ((val == DIE_INIT_MONARCH_ENTER || val == DIE_INIT_SLAVE_ENTER) &&
168 		 nd->sos->rv_rc == 1)
169 		return NOTIFY_DONE;
170 
171 	switch (val) {
172 		case DIE_INIT_MONARCH_ENTER:
173 			machine_kdump_on_init();
174 			break;
175 		case DIE_INIT_SLAVE_ENTER:
176 			unw_init_running(kdump_cpu_freeze, NULL);
177 			break;
178 		case DIE_MCA_RENDZVOUS_LEAVE:
179 			if (atomic_read(&kdump_in_progress))
180 				unw_init_running(kdump_cpu_freeze, NULL);
181 			break;
182 		case DIE_MCA_MONARCH_LEAVE:
183 		     /* die_register->signr indicate if MCA is recoverable */
184 			if (!args->signr)
185 				machine_kdump_on_init();
186 			break;
187 	}
188 	return NOTIFY_DONE;
189 }
190 
191 #ifdef CONFIG_SYSCTL
192 static ctl_table kdump_on_init_table[] = {
193 	{
194 		.ctl_name = CTL_UNNUMBERED,
195 		.procname = "kdump_on_init",
196 		.data = &kdump_on_init,
197 		.maxlen = sizeof(int),
198 		.mode = 0644,
199 		.proc_handler = &proc_dointvec,
200 	},
201 	{ .ctl_name = 0 }
202 };
203 
204 static ctl_table sys_table[] = {
205 	{
206 	  .ctl_name = CTL_KERN,
207 	  .procname = "kernel",
208 	  .mode = 0555,
209 	  .child = kdump_on_init_table,
210 	},
211 	{ .ctl_name = 0 }
212 };
213 #endif
214 
215 static int
216 machine_crash_setup(void)
217 {
218 	static struct notifier_block kdump_init_notifier_nb = {
219 		.notifier_call = kdump_init_notifier,
220 	};
221 	int ret;
222 	if((ret = register_die_notifier(&kdump_init_notifier_nb)) != 0)
223 		return ret;
224 #ifdef CONFIG_SYSCTL
225 	register_sysctl_table(sys_table);
226 #endif
227 	return 0;
228 }
229 
230 __initcall(machine_crash_setup);
231 
232