2 * arch/s390/kernel/machine_kexec.c
4 * Copyright IBM Corp. 2005,2011
6 * Author(s): Rolf Adelsberger,
7 * Heiko Carstens <heiko.carstens@de.ibm.com>
8 * Michael Holzheu <holzheu@linux.vnet.ibm.com>
11 #include <linux/device.h>
13 #include <linux/kexec.h>
14 #include <linux/delay.h>
15 #include <linux/reboot.h>
16 #include <linux/ftrace.h>
18 #include <asm/setup.h>
19 #include <asm/pgtable.h>
20 #include <asm/pgalloc.h>
21 #include <asm/system.h>
23 #include <asm/reset.h>
26 #include <asm/asm-offsets.h>
28 typedef void (*relocate_kernel_t
)(kimage_entry_t
*, unsigned long);
30 extern const unsigned char relocate_kernel
[];
31 extern const unsigned long long relocate_kernel_len
;
33 #ifdef CONFIG_CRASH_DUMP
35 void *fill_cpu_elf_notes(void *ptr
, struct save_area
*sa
);
38 * Create ELF notes for one CPU
40 static void add_elf_notes(int cpu
)
42 struct save_area
*sa
= (void *) 4608 + store_prefix();
45 memcpy((void *) (4608UL + sa
->pref_reg
), sa
, sizeof(*sa
));
46 ptr
= (u64
*) per_cpu_ptr(crash_notes
, cpu
);
47 ptr
= fill_cpu_elf_notes(ptr
, sa
);
48 memset(ptr
, 0, sizeof(struct elf_note
));
52 * Store status of next available physical CPU
54 static int store_status_next(int start_cpu
, int this_cpu
)
56 struct save_area
*sa
= (void *) 4608 + store_prefix();
59 for (cpu
= start_cpu
; cpu
< 65536; cpu
++) {
63 rc
= raw_sigp(cpu
, sigp_stop_and_store_status
);
64 } while (rc
== sigp_busy
);
65 if (rc
!= sigp_order_code_accepted
)
74 * Initialize CPU ELF notes
78 unsigned long sa
= S390_lowcore
.prefixreg_save_area
+ SAVE_AREA_BASE
;
79 int cpu
, this_cpu
, phys_cpu
= 0, first
= 1;
83 if (!S390_lowcore
.prefixreg_save_area
)
85 for_each_online_cpu(cpu
) {
91 phys_cpu
= store_status_next(phys_cpu
, this_cpu
);
97 /* Copy dump CPU store status info to absolute zero */
98 memcpy((void *) SAVE_AREA_BASE
, (void *) sa
, sizeof(struct save_area
));
104 * Start kdump: We expect here that a store status has been done on our CPU
106 static void __do_machine_kdump(void *image
)
108 #ifdef CONFIG_CRASH_DUMP
109 int (*start_kdump
)(int) = (void *)((struct kimage
*) image
)->start
;
111 __load_psw_mask(PSW_BASE_BITS
| PSW_DEFAULT_KEY
);
118 * Check if kdump checksums are valid: We call purgatory with parameter "0"
120 static int kdump_csum_valid(struct kimage
*image
)
122 #ifdef CONFIG_CRASH_DUMP
123 int (*start_kdump
)(int) = (void *)image
->start
;
126 __arch_local_irq_stnsm(0xfb); /* disable DAT */
128 __arch_local_irq_stosm(0x04); /* enable DAT */
129 return rc
? 0 : -EINVAL
;
136 * Give back memory to hypervisor before new kdump is loaded
138 static int machine_kexec_prepare_kdump(void)
140 #ifdef CONFIG_CRASH_DUMP
142 diag10_range(PFN_DOWN(crashk_res
.start
),
143 PFN_DOWN(crashk_res
.end
- crashk_res
.start
+ 1));
150 int machine_kexec_prepare(struct kimage
*image
)
152 void *reboot_code_buffer
;
154 /* Can't replace kernel image since it is read-only. */
155 if (ipl_flags
& IPL_NSS_VALID
)
158 if (image
->type
== KEXEC_TYPE_CRASH
)
159 return machine_kexec_prepare_kdump();
161 /* We don't support anything but the default image type for now. */
162 if (image
->type
!= KEXEC_TYPE_DEFAULT
)
165 /* Get the destination where the assembler code should be copied to.*/
166 reboot_code_buffer
= (void *) page_to_phys(image
->control_code_page
);
169 memcpy(reboot_code_buffer
, relocate_kernel
, relocate_kernel_len
);
173 void machine_kexec_cleanup(struct kimage
*image
)
177 void arch_crash_save_vmcoreinfo(void)
179 VMCOREINFO_SYMBOL(lowcore_ptr
);
180 VMCOREINFO_LENGTH(lowcore_ptr
, NR_CPUS
);
183 void machine_shutdown(void)
190 static void __do_machine_kexec(void *data
)
192 relocate_kernel_t data_mover
;
193 struct kimage
*image
= data
;
195 data_mover
= (relocate_kernel_t
) page_to_phys(image
->control_code_page
);
197 /* Call the moving routine */
198 (*data_mover
)(&image
->head
, image
->start
);
202 * Reset system and call either kdump or normal kexec
204 static void __machine_kexec(void *data
)
206 struct kimage
*image
= data
;
209 if (image
->type
== KEXEC_TYPE_CRASH
)
210 s390_reset_system(__do_machine_kdump
, data
);
212 s390_reset_system(__do_machine_kexec
, data
);
213 disabled_wait((unsigned long) __builtin_return_address(0));
217 * Do either kdump or normal kexec. In case of kdump we first ask
218 * purgatory, if kdump checksums are valid.
220 void machine_kexec(struct kimage
*image
)
222 if (image
->type
== KEXEC_TYPE_CRASH
&& !kdump_csum_valid(image
))
226 smp_switch_to_ipl_cpu(__machine_kexec
, image
);