arch/powerpc/kernel/crash.c

   1 /*
   2  * Architecture specific (PPC64) functions for kexec based crash dumps.
   3  *
   4  * Copyright (C) 2005, IBM Corp.
   5  *
   6  * Created by: Haren Myneni
   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
  13 #undef DEBUG
  14
  15 #include <linux/kernel.h>
  16 #include <linux/smp.h>
  17 #include <linux/reboot.h>
  18 #include <linux/kexec.h>
  19 #include <linux/bootmem.h>
  20 #include <linux/crash_dump.h>
  21 #include <linux/delay.h>
  22 #include <linux/elf.h>
  23 #include <linux/elfcore.h>
  24 #include <linux/init.h>
  25 #include <linux/irq.h>
  26 #include <linux/types.h>
  27 #include <linux/lmb.h>
  28
  29 #include <asm/processor.h>
  30 #include <asm/machdep.h>
  31 #include <asm/kexec.h>
  32 #include <asm/kdump.h>
  33 #include <asm/prom.h>
  34 #include <asm/firmware.h>
  35 #include <asm/smp.h>
  36 #include <asm/system.h>
  37 #include <asm/setjmp.h>
  38
  39 #ifdef DEBUG
  40 #include <asm/udbg.h>
  41 #define DBG(fmt...) udbg_printf(fmt)
  42 #else
  43 #define DBG(fmt...)
  44 #endif
  45
  46 /* This keeps a track of which one is crashing cpu. */
  47 int crashing_cpu = -1;
  48 static cpumask_t cpus_in_crash = CPU_MASK_NONE;
  49 cpumask_t cpus_in_sr = CPU_MASK_NONE;
  50
  51 #define CRASH_HANDLER_MAX 2
  52 /* NULL terminated list of shutdown handles */
  53 static crash_shutdown_t crash_shutdown_handles[CRASH_HANDLER_MAX+1];
  54 static DEFINE_SPINLOCK(crash_handlers_lock);
  55
  56 #ifdef CONFIG_SMP
  57 static atomic_t enter_on_soft_reset = ATOMIC_INIT(0);
  58
  59 void crash_ipi_callback(struct pt_regs *regs)
  60 {
  61         int cpu = smp_processor_id();
  62
  63         if (!cpu_online(cpu))
  64                 return;
  65
  66         hard_irq_disable();
  67         if (!cpu_isset(cpu, cpus_in_crash))
  68                 crash_save_cpu(regs, cpu);
  69         cpu_set(cpu, cpus_in_crash);
  70
  71         /*
  72          * Entered via soft-reset - could be the kdump
  73          * process is invoked using soft-reset or user activated
  74          * it if some CPU did not respond to an IPI.
  75          * For soft-reset, the secondary CPU can enter this func
  76          * twice. 1 - using IPI, and 2. soft-reset.
  77          * Tell the kexec CPU that entered via soft-reset and ready
  78          * to go down.
  79          */
  80         if (cpu_isset(cpu, cpus_in_sr)) {
  81                 cpu_clear(cpu, cpus_in_sr);
  82                 atomic_inc(&enter_on_soft_reset);
  83         }
  84
  85         /*
  86          * Starting the kdump boot.
  87          * This barrier is needed to make sure that all CPUs are stopped.
  88          * If not, soft-reset will be invoked to bring other CPUs.
  89          */
  90         while (!cpu_isset(crashing_cpu, cpus_in_crash))
  91                 cpu_relax();
  92
  93         if (ppc_md.kexec_cpu_down)
  94                 ppc_md.kexec_cpu_down(1, 1);
  95
  96 #ifdef CONFIG_PPC64
  97         kexec_smp_wait();
  98 #else
  99         for (;;);       /* FIXME */
 100 #endif
 101
 102         /* NOTREACHED */
 103 }
 104
 105 /*
 106  * Wait until all CPUs are entered via soft-reset.
 107  */
 108 static void crash_soft_reset_check(int cpu)
 109 {
 110         unsigned int ncpus = num_online_cpus() - 1;/* Excluding the panic cpu */
 111
 112         cpu_clear(cpu, cpus_in_sr);
 113         while (atomic_read(&enter_on_soft_reset) != ncpus)
 114                 cpu_relax();
 115 }
 116
 117
 118 static void crash_kexec_prepare_cpus(int cpu)
 119 {
 120         unsigned int msecs;
 121
 122         unsigned int ncpus = num_online_cpus() - 1;/* Excluding the panic cpu */
 123
 124         crash_send_ipi(crash_ipi_callback);
 125         smp_wmb();
 126
 127         /*
 128          * FIXME: Until we will have the way to stop other CPUSs reliabally,
 129          * the crash CPU will send an IPI and wait for other CPUs to
 130          * respond.
 131          * Delay of at least 10 seconds.
 132          */
 133         printk(KERN_EMERG "Sending IPI to other cpus...\n");
 134         msecs = 10000;
 135         while ((cpus_weight(cpus_in_crash) < ncpus) && (--msecs > 0)) {
 136                 cpu_relax();
 137                 mdelay(1);
 138         }
 139
 140         /* Would it be better to replace the trap vector here? */
 141
 142         /*
 143          * FIXME: In case if we do not get all CPUs, one possibility: ask the
 144          * user to do soft reset such that we get all.
 145          * Soft-reset will be used until better mechanism is implemented.
 146          */
 147         if (cpus_weight(cpus_in_crash) < ncpus) {
 148                 printk(KERN_EMERG "done waiting: %d cpu(s) not responding\n",
 149                         ncpus - cpus_weight(cpus_in_crash));
 150                 printk(KERN_EMERG "Activate soft-reset to stop other cpu(s)\n");
 151                 cpus_in_sr = CPU_MASK_NONE;
 152                 atomic_set(&enter_on_soft_reset, 0);
 153                 while (cpus_weight(cpus_in_crash) < ncpus)
 154                         cpu_relax();
 155         }
 156         /*
 157          * Make sure all CPUs are entered via soft-reset if the kdump is
 158          * invoked using soft-reset.
 159          */
 160         if (cpu_isset(cpu, cpus_in_sr))
 161                 crash_soft_reset_check(cpu);
 162         /* Leave the IPI callback set */
 163 }
 164
 165 /* wait for all the CPUs to hit real mode but timeout if they don't come in */
 166 #ifdef CONFIG_PPC_STD_MMU_64
 167 static void crash_kexec_wait_realmode(int cpu)
 168 {
 169         unsigned int msecs;
 170         int i;
 171
 172         msecs = 10000;
 173         for (i=0; i < NR_CPUS && msecs > 0; i++) {
 174                 if (i == cpu)
 175                         continue;
 176
 177                 while (paca[i].kexec_state < KEXEC_STATE_REAL_MODE) {
 178                         barrier();
 179                         if (!cpu_possible(i) || !cpu_online(i) || (msecs <= 0))
 180                                 break;
 181                         msecs--;
 182                         mdelay(1);
 183                 }
 184         }
 185         mb();
 186 }
 187 #endif
 188
 189 /*
 190  * This function will be called by secondary cpus or by kexec cpu
 191  * if soft-reset is activated to stop some CPUs.
 192  */
 193 void crash_kexec_secondary(struct pt_regs *regs)
 194 {
 195         int cpu = smp_processor_id();
 196         unsigned long flags;
 197         int msecs = 5;
 198
 199         local_irq_save(flags);
 200         /* Wait 5ms if the kexec CPU is not entered yet. */
 201         while (crashing_cpu < 0) {
 202                 if (--msecs < 0) {
 203                         /*
 204                          * Either kdump image is not loaded or
 205                          * kdump process is not started - Probably xmon
 206                          * exited using 'x'(exit and recover) or
 207                          * kexec_should_crash() failed for all running tasks.
 208                          */
 209                         cpu_clear(cpu, cpus_in_sr);
 210                         local_irq_restore(flags);
 211                         return;
 212                 }
 213                 mdelay(1);
 214                 cpu_relax();
 215         }
 216         if (cpu == crashing_cpu) {
 217                 /*
 218                  * Panic CPU will enter this func only via soft-reset.
 219                  * Wait until all secondary CPUs entered and
 220                  * then start kexec boot.
 221                  */
 222                 crash_soft_reset_check(cpu);
 223                 cpu_set(crashing_cpu, cpus_in_crash);
 224                 if (ppc_md.kexec_cpu_down)
 225                         ppc_md.kexec_cpu_down(1, 0);
 226                 machine_kexec(kexec_crash_image);
 227                 /* NOTREACHED */
 228         }
 229         crash_ipi_callback(regs);
 230 }
 231
 232 #else
 233 static void crash_kexec_prepare_cpus(int cpu)
 234 {
 235         /*
 236          * move the secondarys to us so that we can copy
 237          * the new kernel 0-0x100 safely
 238          *
 239          * do this if kexec in setup.c ?
 240          */
 241 #ifdef CONFIG_PPC64
 242         smp_release_cpus();
 243 #else
 244         /* FIXME */
 245 #endif
 246 }
 247
 248 void crash_kexec_secondary(struct pt_regs *regs)
 249 {
 250         cpus_in_sr = CPU_MASK_NONE;
 251 }
 252 #endif
 253 #ifdef CONFIG_SPU_BASE
 254
 255 #include <asm/spu.h>
 256 #include <asm/spu_priv1.h>
 257
 258 struct crash_spu_info {
 259         struct spu *spu;
 260         u32 saved_spu_runcntl_RW;
 261         u32 saved_spu_status_R;
 262         u32 saved_spu_npc_RW;
 263         u64 saved_mfc_sr1_RW;
 264         u64 saved_mfc_dar;
 265         u64 saved_mfc_dsisr;
 266 };
 267
 268 #define CRASH_NUM_SPUS  16      /* Enough for current hardware */
 269 static struct crash_spu_info crash_spu_info[CRASH_NUM_SPUS];
 270
 271 static void crash_kexec_stop_spus(void)
 272 {
 273         struct spu *spu;
 274         int i;
 275         u64 tmp;
 276
 277         for (i = 0; i < CRASH_NUM_SPUS; i++) {
 278                 if (!crash_spu_info[i].spu)
 279                         continue;
 280
 281                 spu = crash_spu_info[i].spu;
 282
 283                 crash_spu_info[i].saved_spu_runcntl_RW =
 284                         in_be32(&spu->problem->spu_runcntl_RW);
 285                 crash_spu_info[i].saved_spu_status_R =
 286                         in_be32(&spu->problem->spu_status_R);
 287                 crash_spu_info[i].saved_spu_npc_RW =
 288                         in_be32(&spu->problem->spu_npc_RW);
 289
 290                 crash_spu_info[i].saved_mfc_dar    = spu_mfc_dar_get(spu);
 291                 crash_spu_info[i].saved_mfc_dsisr  = spu_mfc_dsisr_get(spu);
 292                 tmp = spu_mfc_sr1_get(spu);
 293                 crash_spu_info[i].saved_mfc_sr1_RW = tmp;
 294
 295                 tmp &= ~MFC_STATE1_MASTER_RUN_CONTROL_MASK;
 296                 spu_mfc_sr1_set(spu, tmp);
 297
 298                 __delay(200);
 299         }
 300 }
 301
 302 void crash_register_spus(struct list_head *list)
 303 {
 304         struct spu *spu;
 305
 306         list_for_each_entry(spu, list, full_list) {
 307                 if (WARN_ON(spu->number >= CRASH_NUM_SPUS))
 308                         continue;
 309
 310                 crash_spu_info[spu->number].spu = spu;
 311         }
 312 }
 313
 314 #else
 315 static inline void crash_kexec_stop_spus(void)
 316 {
 317 }
 318 #endif /* CONFIG_SPU_BASE */
 319
 320 /*
 321  * Register a function to be called on shutdown.  Only use this if you
 322  * can't reset your device in the second kernel.
 323  */
 324 int crash_shutdown_register(crash_shutdown_t handler)
 325 {
 326         unsigned int i, rc;
 327
 328         spin_lock(&crash_handlers_lock);
 329         for (i = 0 ; i < CRASH_HANDLER_MAX; i++)
 330                 if (!crash_shutdown_handles[i]) {
 331                         /* Insert handle at first empty entry */
 332                         crash_shutdown_handles[i] = handler;
 333                         rc = 0;
 334                         break;
 335                 }
 336
 337         if (i == CRASH_HANDLER_MAX) {
 338                 printk(KERN_ERR "Crash shutdown handles full, "
 339                        "not registered.\n");
 340                 rc = 1;
 341         }
 342
 343         spin_unlock(&crash_handlers_lock);
 344         return rc;
 345 }
 346 EXPORT_SYMBOL(crash_shutdown_register);
 347
 348 int crash_shutdown_unregister(crash_shutdown_t handler)
 349 {
 350         unsigned int i, rc;
 351
 352         spin_lock(&crash_handlers_lock);
 353         for (i = 0 ; i < CRASH_HANDLER_MAX; i++)
 354                 if (crash_shutdown_handles[i] == handler)
 355                         break;
 356
 357         if (i == CRASH_HANDLER_MAX) {
 358                 printk(KERN_ERR "Crash shutdown handle not found\n");
 359                 rc = 1;
 360         } else {
 361                 /* Shift handles down */
 362                 for (; crash_shutdown_handles[i]; i++)
 363                         crash_shutdown_handles[i] =
 364                                 crash_shutdown_handles[i+1];
 365                 rc = 0;
 366         }
 367
 368         spin_unlock(&crash_handlers_lock);
 369         return rc;
 370 }
 371 EXPORT_SYMBOL(crash_shutdown_unregister);
 372
 373 static unsigned long crash_shutdown_buf[JMP_BUF_LEN];
 374 static int crash_shutdown_cpu = -1;
 375
 376 static int handle_fault(struct pt_regs *regs)
 377 {
 378         if (crash_shutdown_cpu == smp_processor_id())
 379                 longjmp(crash_shutdown_buf, 1);
 380         return 0;
 381 }
 382
 383 void default_machine_crash_shutdown(struct pt_regs *regs)
 384 {
 385         unsigned int i;
 386         int (*old_handler)(struct pt_regs *regs);
 387
 388
 389         /*
 390          * This function is only called after the system
 391          * has panicked or is otherwise in a critical state.
 392          * The minimum amount of code to allow a kexec'd kernel
 393          * to run successfully needs to happen here.
 394          *
 395          * In practice this means stopping other cpus in
 396          * an SMP system.
 397          * The kernel is broken so disable interrupts.
 398          */
 399         hard_irq_disable();
 400
 401         for_each_irq(i) {
 402                 struct irq_desc *desc = irq_desc + i;
 403
 404                 if (!desc || !desc->chip || !desc->chip->eoi)
 405                         continue;
 406
 407                 if (desc->status & IRQ_INPROGRESS)
 408                         desc->chip->eoi(i);
 409
 410                 if (!(desc->status & IRQ_DISABLED))
 411                         desc->chip->shutdown(i);
 412         }
 413
 414         /*
 415          * Call registered shutdown routines savely.  Swap out
 416          * __debugger_fault_handler, and replace on exit.
 417          */
 418         old_handler = __debugger_fault_handler;
 419         __debugger_fault_handler = handle_fault;
 420         crash_shutdown_cpu = smp_processor_id();
 421         for (i = 0; crash_shutdown_handles[i]; i++) {
 422                 if (setjmp(crash_shutdown_buf) == 0) {
 423                         /*
 424                          * Insert syncs and delay to ensure
 425                          * instructions in the dangerous region don't
 426                          * leak away from this protected region.
 427                          */
 428                         asm volatile("sync; isync");
 429                         /* dangerous region */
 430                         crash_shutdown_handles[i]();
 431                         asm volatile("sync; isync");
 432                 }
 433         }
 434         crash_shutdown_cpu = -1;
 435         __debugger_fault_handler = old_handler;
 436
 437         /*
 438          * Make a note of crashing cpu. Will be used in machine_kexec
 439          * such that another IPI will not be sent.
 440          */
 441         crashing_cpu = smp_processor_id();
 442         crash_save_cpu(regs, crashing_cpu);
 443         crash_kexec_prepare_cpus(crashing_cpu);
 444         cpu_set(crashing_cpu, cpus_in_crash);
 445         crash_kexec_stop_spus();
 446 #if defined(CONFIG_PPC_STD_MMU_64) && defined(CONFIG_SMP)
 447         crash_kexec_wait_realmode(crashing_cpu);
 448 #endif
 449         if (ppc_md.kexec_cpu_down)
 450                 ppc_md.kexec_cpu_down(1, 0);
 451 }