LXR linux/arch/sh/kernel/machine

   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
  12#include <linux/mm.h>
  13#include <linux/kexec.h>
  14#include <linux/delay.h>
  15#include <linux/reboot.h>
  16#include <linux/numa.h>
  17#include <linux/ftrace.h>
  18#include <linux/suspend.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
  25typedef void (*relocate_new_kernel_t)(unsigned long indirection_page,
  26                                      unsigned long reboot_code_buffer,
  27                                      unsigned long start_address);
  28
  29extern const unsigned char relocate_new_kernel[];
  30extern const unsigned int relocate_new_kernel_size;
  31extern void *gdb_vbr_vector;
  32extern void *vbr_base;
  33
  34void machine_shutdown(void)
  35{
  36}
  37
  38void machine_crash_shutdown(struct pt_regs *regs)
  39{
  40}
  41
  42/*
  43 * Do what every setup is needed on image and the
  44 * reboot code buffer to allow us to avoid allocations
  45 * later.
  46 */
  47int machine_kexec_prepare(struct kimage *image)
  48{
  49        /* older versions of kexec-tools are passing
  50         * the zImage entry point as a virtual address.
  51         */
  52        if (image->start != PHYSADDR(image->start))
  53                return -EINVAL; /* upgrade your kexec-tools */
  54
  55        return 0;
  56}
  57
  58void machine_kexec_cleanup(struct kimage *image)
  59{
  60}
  61
  62static void kexec_info(struct kimage *image)
  63{
  64        int i;
  65        printk("kexec information\n");
  66        for (i = 0; i < image->nr_segments; i++) {
  67                printk("  segment[%d]: 0x%08x - 0x%08x (0x%08x)\n",
  68                       i,
  69                       (unsigned int)image->segment[i].mem,
  70                       (unsigned int)image->segment[i].mem +
  71                                     image->segment[i].memsz,
  72                       (unsigned int)image->segment[i].memsz);
  73        }
  74        printk("  start     : 0x%08x\n\n", (unsigned int)image->start);
  75}
  76
  77/*
  78 * Do not allocate memory (or fail in any way) in machine_kexec().
  79 * We are past the point of no return, committed to rebooting now.
  80 */
  81void machine_kexec(struct kimage *image)
  82{
  83        unsigned long page_list;
  84        unsigned long reboot_code_buffer;
  85        relocate_new_kernel_t rnk;
  86        unsigned long entry;
  87        unsigned long *ptr;
  88        int save_ftrace_enabled;
  89
  90        /*
  91         * Nicked from the mips version of machine_kexec():
  92         * The generic kexec code builds a page list with physical
  93         * addresses. Use phys_to_virt() to convert them to virtual.
  94         */
  95        for (ptr = &image->head; (entry = *ptr) && !(entry & IND_DONE);
  96             ptr = (entry & IND_INDIRECTION) ?
  97               phys_to_virt(entry & PAGE_MASK) : ptr + 1) {
  98                if (*ptr & IND_SOURCE || *ptr & IND_INDIRECTION ||
  99                    *ptr & IND_DESTINATION)
 100                        *ptr = (unsigned long) phys_to_virt(*ptr);
 101        }
 102
 103#ifdef CONFIG_KEXEC_JUMP
 104        if (image->preserve_context)
 105                save_processor_state();
 106#endif
 107
 108        save_ftrace_enabled = __ftrace_enabled_save();
 109
 110        /* Interrupts aren't acceptable while we reboot */
 111        local_irq_disable();
 112
 113        page_list = image->head;
 114
 115        /* we need both effective and real address here */
 116        reboot_code_buffer =
 117                        (unsigned long)page_address(image->control_code_page);
 118
 119        /* copy our kernel relocation code to the control code page */
 120        memcpy((void *)reboot_code_buffer, relocate_new_kernel,
 121                                                relocate_new_kernel_size);
 122
 123        kexec_info(image);
 124        flush_cache_all();
 125
 126#if defined(CONFIG_SH_STANDARD_BIOS)
 127        asm volatile("ldc %0, vbr" :
 128                     : "r" (((unsigned long) gdb_vbr_vector) - 0x100)
 129                     : "memory");
 130#endif
 131
 132        /* now call it */
 133        rnk = (relocate_new_kernel_t) reboot_code_buffer;
 134        (*rnk)(page_list, reboot_code_buffer,
 135               (unsigned long)phys_to_virt(image->start));
 136
 137#ifdef CONFIG_KEXEC_JUMP
 138        asm volatile("ldc %0, vbr" : : "r" (&vbr_base) : "memory");
 139
 140        if (image->preserve_context)
 141                restore_processor_state();
 142
 143        /* Convert page list back to physical addresses, what a mess. */
 144        for (ptr = &image->head; (entry = *ptr) && !(entry & IND_DONE);
 145             ptr = (*ptr & IND_INDIRECTION) ?
 146               phys_to_virt(*ptr & PAGE_MASK) : ptr + 1) {
 147                if (*ptr & IND_SOURCE || *ptr & IND_INDIRECTION ||
 148                    *ptr & IND_DESTINATION)
 149                        *ptr = virt_to_phys(*ptr);
 150        }
 151#endif
 152
 153        __ftrace_enabled_restore(save_ftrace_enabled);
 154}
 155
 156void arch_crash_save_vmcoreinfo(void)
 157{
 158#ifdef CONFIG_NUMA
 159        VMCOREINFO_SYMBOL(node_data);
 160        VMCOREINFO_LENGTH(node_data, MAX_NUMNODES);
 161#endif
 162}
 163