1 /* 2 * machine_kexec.c - handle transition of Linux booting another kernel 3 * Copyright (C) 2002-2003 Eric Biederman <ebiederm@xmission.com> 4 * 5 * GameCube/ppc32 port Copyright (C) 2004 Albert Herranz 6 * LANDISK/sh4 supported by kogiidena 7 * 8 * This source code is licensed under the GNU General Public License, 9 * Version 2. See the file COPYING for more details. 10 */ 11 #include <linux/mm.h> 12 #include <linux/kexec.h> 13 #include <linux/delay.h> 14 #include <linux/reboot.h> 15 #include <linux/numa.h> 16 #include <linux/ftrace.h> 17 #include <linux/suspend.h> 18 #include <linux/memblock.h> 19 #include <asm/pgtable.h> 20 #include <asm/pgalloc.h> 21 #include <asm/mmu_context.h> 22 #include <asm/io.h> 23 #include <asm/cacheflush.h> 24 #include <asm/sh_bios.h> 25 #include <asm/reboot.h> 26 27 typedef void (*relocate_new_kernel_t)(unsigned long indirection_page, 28 unsigned long reboot_code_buffer, 29 unsigned long start_address); 30 31 extern const unsigned char relocate_new_kernel[]; 32 extern const unsigned int relocate_new_kernel_size; 33 extern void *vbr_base; 34 35 void native_machine_crash_shutdown(struct pt_regs *regs) 36 { 37 /* Nothing to do for UP, but definitely broken for SMP.. */ 38 } 39 40 /* 41 * Do what every setup is needed on image and the 42 * reboot code buffer to allow us to avoid allocations 43 * later. 44 */ 45 int machine_kexec_prepare(struct kimage *image) 46 { 47 return 0; 48 } 49 50 void machine_kexec_cleanup(struct kimage *image) 51 { 52 } 53 54 static void kexec_info(struct kimage *image) 55 { 56 int i; 57 printk("kexec information\n"); 58 for (i = 0; i < image->nr_segments; i++) { 59 printk(" segment[%d]: 0x%08x - 0x%08x (0x%08x)\n", 60 i, 61 (unsigned int)image->segment[i].mem, 62 (unsigned int)image->segment[i].mem + 63 image->segment[i].memsz, 64 (unsigned int)image->segment[i].memsz); 65 } 66 printk(" start : 0x%08x\n\n", (unsigned int)image->start); 67 } 68 69 /* 70 * Do not allocate memory (or fail in any way) in machine_kexec(). 71 * We are past the point of no return, committed to rebooting now. 72 */ 73 void machine_kexec(struct kimage *image) 74 { 75 unsigned long page_list; 76 unsigned long reboot_code_buffer; 77 relocate_new_kernel_t rnk; 78 unsigned long entry; 79 unsigned long *ptr; 80 int save_ftrace_enabled; 81 82 /* 83 * Nicked from the mips version of machine_kexec(): 84 * The generic kexec code builds a page list with physical 85 * addresses. Use phys_to_virt() to convert them to virtual. 86 */ 87 for (ptr = &image->head; (entry = *ptr) && !(entry & IND_DONE); 88 ptr = (entry & IND_INDIRECTION) ? 89 phys_to_virt(entry & PAGE_MASK) : ptr + 1) { 90 if (*ptr & IND_SOURCE || *ptr & IND_INDIRECTION || 91 *ptr & IND_DESTINATION) 92 *ptr = (unsigned long) phys_to_virt(*ptr); 93 } 94 95 #ifdef CONFIG_KEXEC_JUMP 96 if (image->preserve_context) 97 save_processor_state(); 98 #endif 99 100 save_ftrace_enabled = __ftrace_enabled_save(); 101 102 /* Interrupts aren't acceptable while we reboot */ 103 local_irq_disable(); 104 105 page_list = image->head; 106 107 /* we need both effective and real address here */ 108 reboot_code_buffer = 109 (unsigned long)page_address(image->control_code_page); 110 111 /* copy our kernel relocation code to the control code page */ 112 memcpy((void *)reboot_code_buffer, relocate_new_kernel, 113 relocate_new_kernel_size); 114 115 kexec_info(image); 116 flush_cache_all(); 117 118 sh_bios_vbr_reload(); 119 120 /* now call it */ 121 rnk = (relocate_new_kernel_t) reboot_code_buffer; 122 (*rnk)(page_list, reboot_code_buffer, 123 (unsigned long)phys_to_virt(image->start)); 124 125 #ifdef CONFIG_KEXEC_JUMP 126 asm volatile("ldc %0, vbr" : : "r" (&vbr_base) : "memory"); 127 128 if (image->preserve_context) 129 restore_processor_state(); 130 131 /* Convert page list back to physical addresses, what a mess. */ 132 for (ptr = &image->head; (entry = *ptr) && !(entry & IND_DONE); 133 ptr = (*ptr & IND_INDIRECTION) ? 134 phys_to_virt(*ptr & PAGE_MASK) : ptr + 1) { 135 if (*ptr & IND_SOURCE || *ptr & IND_INDIRECTION || 136 *ptr & IND_DESTINATION) 137 *ptr = virt_to_phys(*ptr); 138 } 139 #endif 140 141 __ftrace_enabled_restore(save_ftrace_enabled); 142 } 143 144 void arch_crash_save_vmcoreinfo(void) 145 { 146 #ifdef CONFIG_NUMA 147 VMCOREINFO_SYMBOL(node_data); 148 VMCOREINFO_LENGTH(node_data, MAX_NUMNODES); 149 #endif 150 #ifdef CONFIG_X2TLB 151 VMCOREINFO_CONFIG(X2TLB); 152 #endif 153 } 154 155 void __init reserve_crashkernel(void) 156 { 157 unsigned long long crash_size, crash_base; 158 int ret; 159 160 /* this is necessary because of memblock_phys_mem_size() */ 161 memblock_analyze(); 162 163 ret = parse_crashkernel(boot_command_line, memblock_phys_mem_size(), 164 &crash_size, &crash_base); 165 if (ret == 0 && crash_size > 0) { 166 crashk_res.start = crash_base; 167 crashk_res.end = crash_base + crash_size - 1; 168 } 169 170 if (crashk_res.end == crashk_res.start) 171 goto disable; 172 173 crash_size = PAGE_ALIGN(crashk_res.end - crashk_res.start + 1); 174 if (!crashk_res.start) { 175 unsigned long max = memblock_end_of_DRAM() - memory_limit; 176 crashk_res.start = __memblock_alloc_base(crash_size, PAGE_SIZE, max); 177 if (!crashk_res.start) { 178 pr_err("crashkernel allocation failed\n"); 179 goto disable; 180 } 181 } else { 182 ret = memblock_reserve(crashk_res.start, crash_size); 183 if (unlikely(ret < 0)) { 184 pr_err("crashkernel reservation failed - " 185 "memory is in use\n"); 186 goto disable; 187 } 188 } 189 190 crashk_res.end = crashk_res.start + crash_size - 1; 191 192 /* 193 * Crash kernel trumps memory limit 194 */ 195 if ((memblock_end_of_DRAM() - memory_limit) <= crashk_res.end) { 196 memory_limit = 0; 197 pr_info("Disabled memory limit for crashkernel\n"); 198 } 199 200 pr_info("Reserving %ldMB of memory at 0x%08lx " 201 "for crashkernel (System RAM: %ldMB)\n", 202 (unsigned long)(crash_size >> 20), 203 (unsigned long)(crashk_res.start), 204 (unsigned long)(memblock_phys_mem_size() >> 20)); 205 206 return; 207 208 disable: 209 crashk_res.start = crashk_res.end = 0; 210 } 211