[linux-2.6-block.git] / arch / powerpc / kernel / kgdb.c

/*
 * PowerPC backend to the KGDB stub.
 *
 * 1998 (c) Michael AK Tesch (tesch@cs.wisc.edu)
 * Copyright (C) 2003 Timesys Corporation.
 * Copyright (C) 2004-2006 MontaVista Software, Inc.
 * PPC64 Mods (C) 2005 Frank Rowand (frowand@mvista.com)
 * PPC32 support restored by Vitaly Wool <vwool@ru.mvista.com> and
 * Sergei Shtylyov <sshtylyov@ru.mvista.com>
 * Copyright (C) 2007-2008 Wind River Systems, Inc.
 *
 * This file is licensed under the terms of the GNU General Public License
 * version 2. This program as licensed "as is" without any warranty of any
 * kind, whether express or implied.
 */

#include <linux/kernel.h>
#include <linux/init.h>
#include <linux/kgdb.h>
#include <linux/smp.h>
#include <linux/signal.h>
#include <linux/ptrace.h>
#include <linux/kdebug.h>
#include <asm/current.h>
#include <asm/processor.h>
#include <asm/machdep.h>
#include <asm/debug.h>

/*
 * This table contains the mapping between PowerPC hardware trap types, and
 * signals, which are primarily what GDB understands.  GDB and the kernel
 * don't always agree on values, so we use constants taken from gdb-6.2.
 */
static struct hard_trap_info
{
	unsigned int tt;		/* Trap type code for powerpc */
	unsigned char signo;		/* Signal that we map this trap into */
} hard_trap_info[] = {
	{ 0x0100, 0x02 /* SIGINT */  },		/* system reset */
	{ 0x0200, 0x0b /* SIGSEGV */ },		/* machine check */
	{ 0x0300, 0x0b /* SIGSEGV */ },		/* data access */
	{ 0x0400, 0x0b /* SIGSEGV */ },		/* instruction access */
	{ 0x0500, 0x02 /* SIGINT */  },		/* external interrupt */
	{ 0x0600, 0x0a /* SIGBUS */  },		/* alignment */
	{ 0x0700, 0x05 /* SIGTRAP */ },		/* program check */
	{ 0x0800, 0x08 /* SIGFPE */  },		/* fp unavailable */
	{ 0x0900, 0x0e /* SIGALRM */ },		/* decrementer */
	{ 0x0c00, 0x14 /* SIGCHLD */ },		/* system call */
#if defined(CONFIG_40x) || defined(CONFIG_BOOKE)
	{ 0x2002, 0x05 /* SIGTRAP */ },		/* debug */
#if defined(CONFIG_FSL_BOOKE)
	{ 0x2010, 0x08 /* SIGFPE */  },		/* spe unavailable */
	{ 0x2020, 0x08 /* SIGFPE */  },		/* spe unavailable */
	{ 0x2030, 0x08 /* SIGFPE */  },		/* spe fp data */
	{ 0x2040, 0x08 /* SIGFPE */  },		/* spe fp data */
	{ 0x2050, 0x08 /* SIGFPE */  },		/* spe fp round */
	{ 0x2060, 0x0e /* SIGILL */  },		/* performance monitor */
	{ 0x2900, 0x08 /* SIGFPE */  },		/* apu unavailable */
	{ 0x3100, 0x0e /* SIGALRM */ },		/* fixed interval timer */
	{ 0x3200, 0x02 /* SIGINT */  }, 	/* watchdog */
#else /* ! CONFIG_FSL_BOOKE */
	{ 0x1000, 0x0e /* SIGALRM */ },		/* prog interval timer */
	{ 0x1010, 0x0e /* SIGALRM */ },		/* fixed interval timer */
	{ 0x1020, 0x02 /* SIGINT */  }, 	/* watchdog */
	{ 0x2010, 0x08 /* SIGFPE */  },		/* fp unavailable */
	{ 0x2020, 0x08 /* SIGFPE */  },		/* ap unavailable */
#endif
#else /* ! (defined(CONFIG_40x) || defined(CONFIG_BOOKE)) */
	{ 0x0d00, 0x05 /* SIGTRAP */ },		/* single-step */
#if defined(CONFIG_8xx)
	{ 0x1000, 0x04 /* SIGILL */  },		/* software emulation */
#else /* ! CONFIG_8xx */
	{ 0x0f00, 0x04 /* SIGILL */  },		/* performance monitor */
	{ 0x0f20, 0x08 /* SIGFPE */  },		/* altivec unavailable */
	{ 0x1300, 0x05 /* SIGTRAP */ }, 	/* instruction address break */
#if defined(CONFIG_PPC64)
	{ 0x1200, 0x05 /* SIGILL */  },		/* system error */
	{ 0x1500, 0x04 /* SIGILL */  },		/* soft patch */
	{ 0x1600, 0x04 /* SIGILL */  },		/* maintenance */
	{ 0x1700, 0x08 /* SIGFPE */  },		/* altivec assist */
	{ 0x1800, 0x04 /* SIGILL */  },		/* thermal */
#else /* ! CONFIG_PPC64 */
	{ 0x1400, 0x02 /* SIGINT */  },		/* SMI */
	{ 0x1600, 0x08 /* SIGFPE */  },		/* altivec assist */
	{ 0x1700, 0x04 /* SIGILL */  },		/* TAU */
	{ 0x2000, 0x05 /* SIGTRAP */ },		/* run mode */
#endif
#endif
#endif
	{ 0x0000, 0x00 }			/* Must be last */
};

static int computeSignal(unsigned int tt)
{
	struct hard_trap_info *ht;

	for (ht = hard_trap_info; ht->tt && ht->signo; ht++)
		if (ht->tt == tt)
			return ht->signo;

	return SIGHUP;		/* default for things we don't know about */
}

static int kgdb_call_nmi_hook(struct pt_regs *regs)
{
	kgdb_nmicallback(raw_smp_processor_id(), regs);
	return 0;
}

#ifdef CONFIG_SMP
void kgdb_roundup_cpus(unsigned long flags)
{
	smp_send_debugger_break();
}
#endif

/* KGDB functions to use existing PowerPC64 hooks. */
static int kgdb_debugger(struct pt_regs *regs)
{
	return !kgdb_handle_exception(1, computeSignal(TRAP(regs)),
				      DIE_OOPS, regs);
}

static int kgdb_handle_breakpoint(struct pt_regs *regs)
{
	if (user_mode(regs))
		return 0;

	if (kgdb_handle_exception(1, SIGTRAP, 0, regs) != 0)
		return 0;

	if (*(u32 *) (regs->nip) == *(u32 *) (&arch_kgdb_ops.gdb_bpt_instr))
		regs->nip += BREAK_INSTR_SIZE;

	return 1;
}

static int kgdb_singlestep(struct pt_regs *regs)
{
	struct thread_info *thread_info, *exception_thread_info;

	if (user_mode(regs))
		return 0;

	/*
	 * On Book E and perhaps other processors, singlestep is handled on
	 * the critical exception stack.  This causes current_thread_info()
	 * to fail, since it it locates the thread_info by masking off
	 * the low bits of the current stack pointer.  We work around
	 * this issue by copying the thread_info from the kernel stack
	 * before calling kgdb_handle_exception, and copying it back
	 * afterwards.  On most processors the copy is avoided since
	 * exception_thread_info == thread_info.
	 */
	thread_info = (struct thread_info *)(regs->gpr[1] & ~(THREAD_SIZE-1));
	exception_thread_info = current_thread_info();

	if (thread_info != exception_thread_info)
		memcpy(exception_thread_info, thread_info, sizeof *thread_info);

	kgdb_handle_exception(0, SIGTRAP, 0, regs);

	if (thread_info != exception_thread_info)
		memcpy(thread_info, exception_thread_info, sizeof *thread_info);

	return 1;
}

static int kgdb_iabr_match(struct pt_regs *regs)
{
	if (user_mode(regs))
		return 0;

	if (kgdb_handle_exception(0, computeSignal(TRAP(regs)), 0, regs) != 0)
		return 0;
	return 1;
}

static int kgdb_dabr_match(struct pt_regs *regs)
{
	if (user_mode(regs))
		return 0;

	if (kgdb_handle_exception(0, computeSignal(TRAP(regs)), 0, regs) != 0)
		return 0;
	return 1;
}

#define PACK64(ptr, src) do { *(ptr++) = (src); } while (0)

#define PACK32(ptr, src) do {          \
	u32 *ptr32;                   \
	ptr32 = (u32 *)ptr;           \
	*(ptr32++) = (src);           \
	ptr = (unsigned long *)ptr32; \
	} while (0)

void sleeping_thread_to_gdb_regs(unsigned long *gdb_regs, struct task_struct *p)
{
	struct pt_regs *regs = (struct pt_regs *)(p->thread.ksp +
						  STACK_FRAME_OVERHEAD);
	unsigned long *ptr = gdb_regs;
	int reg;

	memset(gdb_regs, 0, NUMREGBYTES);

	/* Regs GPR0-2 */
	for (reg = 0; reg < 3; reg++)
		PACK64(ptr, regs->gpr[reg]);

	/* Regs GPR3-13 are caller saved, not in regs->gpr[] */
	ptr += 11;

	/* Regs GPR14-31 */
	for (reg = 14; reg < 32; reg++)
		PACK64(ptr, regs->gpr[reg]);

#ifdef CONFIG_FSL_BOOKE
#ifdef CONFIG_SPE
	for (reg = 0; reg < 32; reg++)
		PACK64(ptr, p->thread.evr[reg]);
#else
	ptr += 32;
#endif
#else
	/* fp registers not used by kernel, leave zero */
	ptr += 32 * 8 / sizeof(long);
#endif

	PACK64(ptr, regs->nip);
	PACK64(ptr, regs->msr);
	PACK32(ptr, regs->ccr);
	PACK64(ptr, regs->link);
	PACK64(ptr, regs->ctr);
	PACK32(ptr, regs->xer);

	BUG_ON((unsigned long)ptr >
	       (unsigned long)(((void *)gdb_regs) + NUMREGBYTES));
}

#define GDB_SIZEOF_REG sizeof(unsigned long)
#define GDB_SIZEOF_REG_U32 sizeof(u32)

#ifdef CONFIG_FSL_BOOKE
#define GDB_SIZEOF_FLOAT_REG sizeof(unsigned long)
#else
#define GDB_SIZEOF_FLOAT_REG sizeof(u64)
#endif

struct dbg_reg_def_t dbg_reg_def[DBG_MAX_REG_NUM] =
{
	{ "r0", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[0]) },
	{ "r1", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[1]) },
	{ "r2", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[2]) },
	{ "r3", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[3]) },
	{ "r4", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[4]) },
	{ "r5", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[5]) },
	{ "r6", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[6]) },
	{ "r7", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[7]) },
	{ "r8", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[8]) },
	{ "r9", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[9]) },
	{ "r10", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[10]) },
	{ "r11", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[11]) },
	{ "r12", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[12]) },
	{ "r13", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[13]) },
	{ "r14", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[14]) },
	{ "r15", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[15]) },
	{ "r16", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[16]) },
	{ "r17", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[17]) },
	{ "r18", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[18]) },
	{ "r19", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[19]) },
	{ "r20", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[20]) },
	{ "r21", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[21]) },
	{ "r22", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[22]) },
	{ "r23", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[23]) },
	{ "r24", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[24]) },
	{ "r25", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[25]) },
	{ "r26", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[26]) },
	{ "r27", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[27]) },
	{ "r28", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[28]) },
	{ "r29", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[29]) },
	{ "r30", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[30]) },
	{ "r31", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[31]) },

	{ "f0", GDB_SIZEOF_FLOAT_REG, 0 },
	{ "f1", GDB_SIZEOF_FLOAT_REG, 1 },
	{ "f2", GDB_SIZEOF_FLOAT_REG, 2 },
	{ "f3", GDB_SIZEOF_FLOAT_REG, 3 },
	{ "f4", GDB_SIZEOF_FLOAT_REG, 4 },
	{ "f5", GDB_SIZEOF_FLOAT_REG, 5 },
	{ "f6", GDB_SIZEOF_FLOAT_REG, 6 },
	{ "f7", GDB_SIZEOF_FLOAT_REG, 7 },
	{ "f8", GDB_SIZEOF_FLOAT_REG, 8 },
	{ "f9", GDB_SIZEOF_FLOAT_REG, 9 },
	{ "f10", GDB_SIZEOF_FLOAT_REG, 10 },
	{ "f11", GDB_SIZEOF_FLOAT_REG, 11 },
	{ "f12", GDB_SIZEOF_FLOAT_REG, 12 },
	{ "f13", GDB_SIZEOF_FLOAT_REG, 13 },
	{ "f14", GDB_SIZEOF_FLOAT_REG, 14 },
	{ "f15", GDB_SIZEOF_FLOAT_REG, 15 },
	{ "f16", GDB_SIZEOF_FLOAT_REG, 16 },
	{ "f17", GDB_SIZEOF_FLOAT_REG, 17 },
	{ "f18", GDB_SIZEOF_FLOAT_REG, 18 },
	{ "f19", GDB_SIZEOF_FLOAT_REG, 19 },
	{ "f20", GDB_SIZEOF_FLOAT_REG, 20 },
	{ "f21", GDB_SIZEOF_FLOAT_REG, 21 },
	{ "f22", GDB_SIZEOF_FLOAT_REG, 22 },
	{ "f23", GDB_SIZEOF_FLOAT_REG, 23 },
	{ "f24", GDB_SIZEOF_FLOAT_REG, 24 },
	{ "f25", GDB_SIZEOF_FLOAT_REG, 25 },
	{ "f26", GDB_SIZEOF_FLOAT_REG, 26 },
	{ "f27", GDB_SIZEOF_FLOAT_REG, 27 },
	{ "f28", GDB_SIZEOF_FLOAT_REG, 28 },
	{ "f29", GDB_SIZEOF_FLOAT_REG, 29 },
	{ "f30", GDB_SIZEOF_FLOAT_REG, 30 },
	{ "f31", GDB_SIZEOF_FLOAT_REG, 31 },

	{ "pc", GDB_SIZEOF_REG, offsetof(struct pt_regs, nip) },
	{ "msr", GDB_SIZEOF_REG, offsetof(struct pt_regs, msr) },
	{ "cr", GDB_SIZEOF_REG_U32, offsetof(struct pt_regs, ccr) },
	{ "lr", GDB_SIZEOF_REG, offsetof(struct pt_regs, link) },
	{ "ctr", GDB_SIZEOF_REG_U32, offsetof(struct pt_regs, ctr) },
	{ "xer", GDB_SIZEOF_REG, offsetof(struct pt_regs, xer) },
};

char *dbg_get_reg(int regno, void *mem, struct pt_regs *regs)
{
	if (regno >= DBG_MAX_REG_NUM || regno < 0)
		return NULL;

	if (regno < 32 || regno >= 64)
		/* First 0 -> 31 gpr registers*/
		/* pc, msr, ls... registers 64 -> 69 */
		memcpy(mem, (void *)regs + dbg_reg_def[regno].offset,
				dbg_reg_def[regno].size);

	if (regno >= 32 && regno < 64) {
		/* FP registers 32 -> 63 */
#if defined(CONFIG_FSL_BOOKE) && defined(CONFIG_SPE)
		if (current)
			memcpy(mem, &current->thread.evr[regno-32],
					dbg_reg_def[regno].size);
#else
		/* fp registers not used by kernel, leave zero */
		memset(mem, 0, dbg_reg_def[regno].size);
#endif
	}

	return dbg_reg_def[regno].name;
}

int dbg_set_reg(int regno, void *mem, struct pt_regs *regs)
{
	if (regno >= DBG_MAX_REG_NUM || regno < 0)
		return -EINVAL;

	if (regno < 32 || regno >= 64)
		/* First 0 -> 31 gpr registers*/
		/* pc, msr, ls... registers 64 -> 69 */
		memcpy((void *)regs + dbg_reg_def[regno].offset, mem,
				dbg_reg_def[regno].size);

	if (regno >= 32 && regno < 64) {
		/* FP registers 32 -> 63 */
#if defined(CONFIG_FSL_BOOKE) && defined(CONFIG_SPE)
		memcpy(&current->thread.evr[regno-32], mem,
				dbg_reg_def[regno].size);
#else
		/* fp registers not used by kernel, leave zero */
		return 0;
#endif
	}

	return 0;
}

void kgdb_arch_set_pc(struct pt_regs *regs, unsigned long pc)
{
	regs->nip = pc;
}

/*
 * This function does PowerPC specific procesing for interfacing to gdb.
 */
int kgdb_arch_handle_exception(int vector, int signo, int err_code,
			       char *remcom_in_buffer, char *remcom_out_buffer,
			       struct pt_regs *linux_regs)
{
	char *ptr = &remcom_in_buffer[1];
	unsigned long addr;

	switch (remcom_in_buffer[0]) {
		/*
		 * sAA..AA   Step one instruction from AA..AA
		 * This will return an error to gdb ..
		 */
	case 's':
	case 'c':
		/* handle the optional parameter */
		if (kgdb_hex2long(&ptr, &addr))
			linux_regs->nip = addr;

		atomic_set(&kgdb_cpu_doing_single_step, -1);
		/* set the trace bit if we're stepping */
		if (remcom_in_buffer[0] == 's') {
#ifdef CONFIG_PPC_ADV_DEBUG_REGS
			mtspr(SPRN_DBCR0,
			      mfspr(SPRN_DBCR0) | DBCR0_IC | DBCR0_IDM);
			linux_regs->msr |= MSR_DE;
#else
			linux_regs->msr |= MSR_SE;
#endif
			atomic_set(&kgdb_cpu_doing_single_step,
				   raw_smp_processor_id());
		}
		return 0;
	}

	return -1;
}

/*
 * Global data
 */
struct kgdb_arch arch_kgdb_ops = {
	.gdb_bpt_instr = {0x7d, 0x82, 0x10, 0x08},
};

static int kgdb_not_implemented(struct pt_regs *regs)
{
	return 0;
}

static void *old__debugger_ipi;
static void *old__debugger;
static void *old__debugger_bpt;
static void *old__debugger_sstep;
static void *old__debugger_iabr_match;
static void *old__debugger_dabr_match;
static void *old__debugger_fault_handler;

int kgdb_arch_init(void)
{
	old__debugger_ipi = __debugger_ipi;
	old__debugger = __debugger;
	old__debugger_bpt = __debugger_bpt;
	old__debugger_sstep = __debugger_sstep;
	old__debugger_iabr_match = __debugger_iabr_match;
	old__debugger_dabr_match = __debugger_dabr_match;
	old__debugger_fault_handler = __debugger_fault_handler;

	__debugger_ipi = kgdb_call_nmi_hook;
	__debugger = kgdb_debugger;
	__debugger_bpt = kgdb_handle_breakpoint;
	__debugger_sstep = kgdb_singlestep;
	__debugger_iabr_match = kgdb_iabr_match;
	__debugger_dabr_match = kgdb_dabr_match;
	__debugger_fault_handler = kgdb_not_implemented;

	return 0;
}

void kgdb_arch_exit(void)
{
	__debugger_ipi = old__debugger_ipi;
	__debugger = old__debugger;
	__debugger_bpt = old__debugger_bpt;
	__debugger_sstep = old__debugger_sstep;
	__debugger_iabr_match = old__debugger_iabr_match;
	__debugger_dabr_match = old__debugger_dabr_match;
	__debugger_fault_handler = old__debugger_fault_handler;
}
Commit	Line	Data
17ce452f JW	1	/*
	2	* PowerPC backend to the KGDB stub.
	3	*
	4	* 1998 (c) Michael AK Tesch (tesch@cs.wisc.edu)
	5	* Copyright (C) 2003 Timesys Corporation.
	6	* Copyright (C) 2004-2006 MontaVista Software, Inc.
	7	* PPC64 Mods (C) 2005 Frank Rowand (frowand@mvista.com)
	8	* PPC32 support restored by Vitaly Wool <vwool@ru.mvista.com> and
	9	* Sergei Shtylyov <sshtylyov@ru.mvista.com>
	10	* Copyright (C) 2007-2008 Wind River Systems, Inc.
	11	*
	12	* This file is licensed under the terms of the GNU General Public License
	13	* version 2. This program as licensed "as is" without any warranty of any
	14	* kind, whether express or implied.
	15	*/
	16
	17	#include <linux/kernel.h>
	18	#include <linux/init.h>
	19	#include <linux/kgdb.h>
	20	#include <linux/smp.h>
	21	#include <linux/signal.h>
	22	#include <linux/ptrace.h>
ba797b28	23	#include <linux/kdebug.h>
17ce452f JW	24	#include <asm/current.h>
	25	#include <asm/processor.h>
	26	#include <asm/machdep.h>
cad3c834	27	#include <asm/debug.h>
17ce452f JW	28
	29	/*
	30	* This table contains the mapping between PowerPC hardware trap types, and
	31	* signals, which are primarily what GDB understands. GDB and the kernel
	32	* don't always agree on values, so we use constants taken from gdb-6.2.
	33	*/
	34	static struct hard_trap_info
	35	{
	36	unsigned int tt; /* Trap type code for powerpc */
	37	unsigned char signo; /* Signal that we map this trap into */
	38	} hard_trap_info[] = {
	39	{ 0x0100, 0x02 /* SIGINT / }, / system reset */
	40	{ 0x0200, 0x0b /* SIGSEGV / }, / machine check */
	41	{ 0x0300, 0x0b /* SIGSEGV / }, / data access */
	42	{ 0x0400, 0x0b /* SIGSEGV / }, / instruction access */
	43	{ 0x0500, 0x02 /* SIGINT / }, / external interrupt */
	44	{ 0x0600, 0x0a /* SIGBUS / }, / alignment */
	45	{ 0x0700, 0x05 /* SIGTRAP / }, / program check */
	46	{ 0x0800, 0x08 /* SIGFPE / }, / fp unavailable */
	47	{ 0x0900, 0x0e /* SIGALRM / }, / decrementer */
	48	{ 0x0c00, 0x14 /* SIGCHLD / }, / system call */
	49	#if defined(CONFIG_40x) \|\| defined(CONFIG_BOOKE)
	50	{ 0x2002, 0x05 /* SIGTRAP / }, / debug */
	51	#if defined(CONFIG_FSL_BOOKE)
	52	{ 0x2010, 0x08 /* SIGFPE / }, / spe unavailable */
	53	{ 0x2020, 0x08 /* SIGFPE / }, / spe unavailable */
	54	{ 0x2030, 0x08 /* SIGFPE / }, / spe fp data */
	55	{ 0x2040, 0x08 /* SIGFPE / }, / spe fp data */
	56	{ 0x2050, 0x08 /* SIGFPE / }, / spe fp round */
af901ca1	57	{ 0x2060, 0x0e /* SIGILL / }, / performance monitor */
17ce452f JW	58	{ 0x2900, 0x08 /* SIGFPE / }, / apu unavailable */
	59	{ 0x3100, 0x0e /* SIGALRM / }, / fixed interval timer */
	60	{ 0x3200, 0x02 /* SIGINT / }, / watchdog */
	61	#else /* ! CONFIG_FSL_BOOKE */
	62	{ 0x1000, 0x0e /* SIGALRM / }, / prog interval timer */
	63	{ 0x1010, 0x0e /* SIGALRM / }, / fixed interval timer */
	64	{ 0x1020, 0x02 /* SIGINT / }, / watchdog */
	65	{ 0x2010, 0x08 /* SIGFPE / }, / fp unavailable */
	66	{ 0x2020, 0x08 /* SIGFPE / }, / ap unavailable */
	67	#endif
	68	#else /* ! (defined(CONFIG_40x) \|\| defined(CONFIG_BOOKE)) */
	69	{ 0x0d00, 0x05 /* SIGTRAP / }, / single-step */
	70	#if defined(CONFIG_8xx)
	71	{ 0x1000, 0x04 /* SIGILL / }, / software emulation */
	72	#else /* ! CONFIG_8xx */
	73	{ 0x0f00, 0x04 /* SIGILL / }, / performance monitor */
	74	{ 0x0f20, 0x08 /* SIGFPE / }, / altivec unavailable */
	75	{ 0x1300, 0x05 /* SIGTRAP / }, / instruction address break */
	76	#if defined(CONFIG_PPC64)
	77	{ 0x1200, 0x05 /* SIGILL / }, / system error */
	78	{ 0x1500, 0x04 /* SIGILL / }, / soft patch */
	79	{ 0x1600, 0x04 /* SIGILL / }, / maintenance */
	80	{ 0x1700, 0x08 /* SIGFPE / }, / altivec assist */
	81	{ 0x1800, 0x04 /* SIGILL / }, / thermal */
	82	#else /* ! CONFIG_PPC64 */
	83	{ 0x1400, 0x02 /* SIGINT / }, / SMI */
	84	{ 0x1600, 0x08 /* SIGFPE / }, / altivec assist */
	85	{ 0x1700, 0x04 /* SIGILL / }, / TAU */
	86	{ 0x2000, 0x05 /* SIGTRAP / }, / run mode */
	87	#endif
	88	#endif
	89	#endif
	90	{ 0x0000, 0x00 } /* Must be last */
	91	};
	92
	93	static int computeSignal(unsigned int tt)
	94	{
	95	struct hard_trap_info *ht;
	96
	97	for (ht = hard_trap_info; ht->tt && ht->signo; ht++)
	98	if (ht->tt == tt)
	99	return ht->signo;
	100
	101	return SIGHUP; /* default for things we don't know about */
	102	}
	103
	104	static int kgdb_call_nmi_hook(struct pt_regs *regs)
	105	{
	106	kgdb_nmicallback(raw_smp_processor_id(), regs);
	107	return 0;
	108	}
	109
	110	#ifdef CONFIG_SMP
	111	void kgdb_roundup_cpus(unsigned long flags)
	112	{
e0476371	113	smp_send_debugger_break();
17ce452f JW	114	}
	115	#endif
	116
	117	/* KGDB functions to use existing PowerPC64 hooks. */
	118	static int kgdb_debugger(struct pt_regs *regs)
	119	{
ba797b28 JW	120	return !kgdb_handle_exception(1, computeSignal(TRAP(regs)),
ba797b28 JW	121	DIE_OOPS, regs);
17ce452f JW	122	}
	123
	124	static int kgdb_handle_breakpoint(struct pt_regs *regs)
	125	{
	126	if (user_mode(regs))
	127	return 0;
	128
ba797b28	129	if (kgdb_handle_exception(1, SIGTRAP, 0, regs) != 0)
17ce452f JW	130	return 0;
	131
	132	if ((u32 ) (regs->nip) == (u32 ) (&arch_kgdb_ops.gdb_bpt_instr))
3f0a55e3	133	regs->nip += BREAK_INSTR_SIZE;
17ce452f JW	134
	135	return 1;
	136	}
	137
	138	static int kgdb_singlestep(struct pt_regs *regs)
	139	{
	140	struct thread_info thread_info, exception_thread_info;
	141
	142	if (user_mode(regs))
	143	return 0;
	144
	145	/*
70f23fd6	146	* On Book E and perhaps other processors, singlestep is handled on
17ce452f JW	147	* the critical exception stack. This causes current_thread_info()
	148	* to fail, since it it locates the thread_info by masking off
	149	* the low bits of the current stack pointer. We work around
	150	* this issue by copying the thread_info from the kernel stack
	151	* before calling kgdb_handle_exception, and copying it back
	152	* afterwards. On most processors the copy is avoided since
	153	* exception_thread_info == thread_info.
	154	*/
	155	thread_info = (struct thread_info *)(regs->gpr[1] & ~(THREAD_SIZE-1));
	156	exception_thread_info = current_thread_info();
	157
	158	if (thread_info != exception_thread_info)
	159	memcpy(exception_thread_info, thread_info, sizeof *thread_info);
	160
	161	kgdb_handle_exception(0, SIGTRAP, 0, regs);
	162
	163	if (thread_info != exception_thread_info)
	164	memcpy(thread_info, exception_thread_info, sizeof *thread_info);
	165
	166	return 1;
	167	}
	168
	169	static int kgdb_iabr_match(struct pt_regs *regs)
	170	{
	171	if (user_mode(regs))
	172	return 0;
	173
	174	if (kgdb_handle_exception(0, computeSignal(TRAP(regs)), 0, regs) != 0)
	175	return 0;
	176	return 1;
	177	}
	178
	179	static int kgdb_dabr_match(struct pt_regs *regs)
	180	{
	181	if (user_mode(regs))
	182	return 0;
	183
	184	if (kgdb_handle_exception(0, computeSignal(TRAP(regs)), 0, regs) != 0)
	185	return 0;
	186	return 1;
	187	}
	188
	189	#define PACK64(ptr, src) do { *(ptr++) = (src); } while (0)
	190
	191	#define PACK32(ptr, src) do { \
	192	u32 *ptr32; \
	193	ptr32 = (u32 *)ptr; \
	194	*(ptr32++) = (src); \
	195	ptr = (unsigned long *)ptr32; \
	196	} while (0)
	197
17ce452f JW	198	void sleeping_thread_to_gdb_regs(unsigned long gdb_regs, struct task_struct p)
	199	{
	200	struct pt_regs regs = (struct pt_regs )(p->thread.ksp +
	201	STACK_FRAME_OVERHEAD);
	202	unsigned long *ptr = gdb_regs;
	203	int reg;
	204
	205	memset(gdb_regs, 0, NUMREGBYTES);
	206
	207	/* Regs GPR0-2 */
	208	for (reg = 0; reg < 3; reg++)
	209	PACK64(ptr, regs->gpr[reg]);
	210
	211	/* Regs GPR3-13 are caller saved, not in regs->gpr[] */
	212	ptr += 11;
	213
	214	/* Regs GPR14-31 */
	215	for (reg = 14; reg < 32; reg++)
	216	PACK64(ptr, regs->gpr[reg]);
	217
	218	#ifdef CONFIG_FSL_BOOKE
	219	#ifdef CONFIG_SPE
	220	for (reg = 0; reg < 32; reg++)
	221	PACK64(ptr, p->thread.evr[reg]);
	222	#else
	223	ptr += 32;
	224	#endif
	225	#else
	226	/* fp registers not used by kernel, leave zero */
	227	ptr += 32 * 8 / sizeof(long);
	228	#endif
	229
	230	PACK64(ptr, regs->nip);
	231	PACK64(ptr, regs->msr);
	232	PACK32(ptr, regs->ccr);
	233	PACK64(ptr, regs->link);
	234	PACK64(ptr, regs->ctr);
	235	PACK32(ptr, regs->xer);
	236
	237	BUG_ON((unsigned long)ptr >
	238	(unsigned long)(((void *)gdb_regs) + NUMREGBYTES));
	239	}
	240
ff10b88b DD	241	#define GDB_SIZEOF_REG sizeof(unsigned long)
ff10b88b DD	242	#define GDB_SIZEOF_REG_U32 sizeof(u32)
17ce452f	243
ff10b88b DD	244	#ifdef CONFIG_FSL_BOOKE
	245	#define GDB_SIZEOF_FLOAT_REG sizeof(unsigned long)
	246	#else
	247	#define GDB_SIZEOF_FLOAT_REG sizeof(u64)
	248	#endif
17ce452f	249
ff10b88b	250	struct dbg_reg_def_t dbg_reg_def[DBG_MAX_REG_NUM] =
17ce452f	251	{
ff10b88b DD	252	{ "r0", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[0]) },
	253	{ "r1", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[1]) },
	254	{ "r2", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[2]) },
	255	{ "r3", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[3]) },
	256	{ "r4", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[4]) },
	257	{ "r5", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[5]) },
	258	{ "r6", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[6]) },
	259	{ "r7", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[7]) },
	260	{ "r8", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[8]) },
	261	{ "r9", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[9]) },
	262	{ "r10", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[10]) },
	263	{ "r11", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[11]) },
	264	{ "r12", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[12]) },
	265	{ "r13", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[13]) },
	266	{ "r14", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[14]) },
	267	{ "r15", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[15]) },
	268	{ "r16", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[16]) },
	269	{ "r17", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[17]) },
	270	{ "r18", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[18]) },
	271	{ "r19", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[19]) },
	272	{ "r20", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[20]) },
	273	{ "r21", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[21]) },
	274	{ "r22", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[22]) },
	275	{ "r23", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[23]) },
	276	{ "r24", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[24]) },
	277	{ "r25", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[25]) },
	278	{ "r26", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[26]) },
	279	{ "r27", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[27]) },
	280	{ "r28", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[28]) },
	281	{ "r29", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[29]) },
	282	{ "r30", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[30]) },
	283	{ "r31", GDB_SIZEOF_REG, offsetof(struct pt_regs, gpr[31]) },
	284
	285	{ "f0", GDB_SIZEOF_FLOAT_REG, 0 },
	286	{ "f1", GDB_SIZEOF_FLOAT_REG, 1 },
	287	{ "f2", GDB_SIZEOF_FLOAT_REG, 2 },
	288	{ "f3", GDB_SIZEOF_FLOAT_REG, 3 },
	289	{ "f4", GDB_SIZEOF_FLOAT_REG, 4 },
	290	{ "f5", GDB_SIZEOF_FLOAT_REG, 5 },
	291	{ "f6", GDB_SIZEOF_FLOAT_REG, 6 },
	292	{ "f7", GDB_SIZEOF_FLOAT_REG, 7 },
	293	{ "f8", GDB_SIZEOF_FLOAT_REG, 8 },
	294	{ "f9", GDB_SIZEOF_FLOAT_REG, 9 },
	295	{ "f10", GDB_SIZEOF_FLOAT_REG, 10 },
	296	{ "f11", GDB_SIZEOF_FLOAT_REG, 11 },
	297	{ "f12", GDB_SIZEOF_FLOAT_REG, 12 },
	298	{ "f13", GDB_SIZEOF_FLOAT_REG, 13 },
	299	{ "f14", GDB_SIZEOF_FLOAT_REG, 14 },
	300	{ "f15", GDB_SIZEOF_FLOAT_REG, 15 },
	301	{ "f16", GDB_SIZEOF_FLOAT_REG, 16 },
	302	{ "f17", GDB_SIZEOF_FLOAT_REG, 17 },
	303	{ "f18", GDB_SIZEOF_FLOAT_REG, 18 },
	304	{ "f19", GDB_SIZEOF_FLOAT_REG, 19 },
	305	{ "f20", GDB_SIZEOF_FLOAT_REG, 20 },
	306	{ "f21", GDB_SIZEOF_FLOAT_REG, 21 },
	307	{ "f22", GDB_SIZEOF_FLOAT_REG, 22 },
	308	{ "f23", GDB_SIZEOF_FLOAT_REG, 23 },
	309	{ "f24", GDB_SIZEOF_FLOAT_REG, 24 },
	310	{ "f25", GDB_SIZEOF_FLOAT_REG, 25 },
	311	{ "f26", GDB_SIZEOF_FLOAT_REG, 26 },
	312	{ "f27", GDB_SIZEOF_FLOAT_REG, 27 },
	313	{ "f28", GDB_SIZEOF_FLOAT_REG, 28 },
	314	{ "f29", GDB_SIZEOF_FLOAT_REG, 29 },
	315	{ "f30", GDB_SIZEOF_FLOAT_REG, 30 },
316	{ "f31", GDB_SIZEOF_FLOAT_REG, 31 },
317
318	{ "pc", GDB_SIZEOF_REG, offsetof(struct pt_regs, nip) },
319	{ "msr", GDB_SIZEOF_REG, offsetof(struct pt_regs, msr) },
320	{ "cr", GDB_SIZEOF_REG_U32, offsetof(struct pt_regs, ccr) },
321	{ "lr", GDB_SIZEOF_REG, offsetof(struct pt_regs, link) },
322	{ "ctr", GDB_SIZEOF_REG_U32, offsetof(struct pt_regs, ctr) },
323	{ "xer", GDB_SIZEOF_REG, offsetof(struct pt_regs, xer) },
324	};
17ce452f	325
ff10b88b DD	326	char dbg_get_reg(int regno, void mem, struct pt_regs *regs)
	327	{
	328	if (regno >= DBG_MAX_REG_NUM \|\| regno < 0)
	329	return NULL;
	330
	331	if (regno < 32 \|\| regno >= 64)
	332	/* First 0 -> 31 gpr registers*/
	333	/* pc, msr, ls... registers 64 -> 69 */
	334	memcpy(mem, (void *)regs + dbg_reg_def[regno].offset,
	335	dbg_reg_def[regno].size);
	336
	337	if (regno >= 32 && regno < 64) {
	338	/* FP registers 32 -> 63 */
	339	#if defined(CONFIG_FSL_BOOKE) && defined(CONFIG_SPE)
	340	if (current)
e3839ed8	341	memcpy(mem, &current->thread.evr[regno-32],
ff10b88b	342	dbg_reg_def[regno].size);
17ce452f	343	#else
ff10b88b DD	344	/* fp registers not used by kernel, leave zero */
ff10b88b DD	345	memset(mem, 0, dbg_reg_def[regno].size);
17ce452f	346	#endif
ff10b88b DD	347	}
	348
	349	return dbg_reg_def[regno].name;
	350	}
	351
	352	int dbg_set_reg(int regno, void mem, struct pt_regs regs)
	353	{
	354	if (regno >= DBG_MAX_REG_NUM \|\| regno < 0)
	355	return -EINVAL;
	356
	357	if (regno < 32 \|\| regno >= 64)
	358	/* First 0 -> 31 gpr registers*/
	359	/* pc, msr, ls... registers 64 -> 69 */
	360	memcpy((void *)regs + dbg_reg_def[regno].offset, mem,
	361	dbg_reg_def[regno].size);
	362
	363	if (regno >= 32 && regno < 64) {
	364	/* FP registers 32 -> 63 */
	365	#if defined(CONFIG_FSL_BOOKE) && defined(CONFIG_SPE)
e3839ed8	366	memcpy(&current->thread.evr[regno-32], mem,
ff10b88b	367	dbg_reg_def[regno].size);
17ce452f	368	#else
ff10b88b DD	369	/* fp registers not used by kernel, leave zero */
ff10b88b DD	370	return 0;
17ce452f	371	#endif
ff10b88b	372	}
17ce452f	373
ff10b88b	374	return 0;
17ce452f JW	375	}
17ce452f JW	376
dcc78711 JW	377	void kgdb_arch_set_pc(struct pt_regs *regs, unsigned long pc)
	378	{
	379	regs->nip = pc;
	380	}
	381
17ce452f JW	382	/*
	383	* This function does PowerPC specific procesing for interfacing to gdb.
	384	*/
	385	int kgdb_arch_handle_exception(int vector, int signo, int err_code,
	386	char remcom_in_buffer, char remcom_out_buffer,
	387	struct pt_regs *linux_regs)
	388	{
	389	char *ptr = &remcom_in_buffer[1];
	390	unsigned long addr;
	391
	392	switch (remcom_in_buffer[0]) {
	393	/*
	394	* sAA..AA Step one instruction from AA..AA
	395	* This will return an error to gdb ..
	396	*/
	397	case 's':
	398	case 'c':
	399	/* handle the optional parameter */
	400	if (kgdb_hex2long(&ptr, &addr))
	401	linux_regs->nip = addr;
	402
	403	atomic_set(&kgdb_cpu_doing_single_step, -1);
	404	/* set the trace bit if we're stepping */
	405	if (remcom_in_buffer[0] == 's') {
172ae2e7	406	#ifdef CONFIG_PPC_ADV_DEBUG_REGS
17ce452f JW	407	mtspr(SPRN_DBCR0,
	408	mfspr(SPRN_DBCR0) \| DBCR0_IC \| DBCR0_IDM);
	409	linux_regs->msr \|= MSR_DE;
	410	#else
	411	linux_regs->msr \|= MSR_SE;
	412	#endif
d7161a65 JW	413	atomic_set(&kgdb_cpu_doing_single_step,
d7161a65 JW	414	raw_smp_processor_id());
17ce452f JW	415	}
	416	return 0;
	417	}
	418
	419	return -1;
	420	}
	421
	422	/*
	423	* Global data
	424	*/
	425	struct kgdb_arch arch_kgdb_ops = {
	426	.gdb_bpt_instr = {0x7d, 0x82, 0x10, 0x08},
	427	};
	428
	429	static int kgdb_not_implemented(struct pt_regs *regs)
	430	{
	431	return 0;
	432	}
	433
	434	static void *old__debugger_ipi;
	435	static void *old__debugger;
	436	static void *old__debugger_bpt;
	437	static void *old__debugger_sstep;
	438	static void *old__debugger_iabr_match;
	439	static void *old__debugger_dabr_match;
	440	static void *old__debugger_fault_handler;
	441
	442	int kgdb_arch_init(void)
	443	{
	444	old__debugger_ipi = __debugger_ipi;
	445	old__debugger = __debugger;
	446	old__debugger_bpt = __debugger_bpt;
	447	old__debugger_sstep = __debugger_sstep;
	448	old__debugger_iabr_match = __debugger_iabr_match;
	449	old__debugger_dabr_match = __debugger_dabr_match;
	450	old__debugger_fault_handler = __debugger_fault_handler;
	451
	452	__debugger_ipi = kgdb_call_nmi_hook;
	453	__debugger = kgdb_debugger;
	454	__debugger_bpt = kgdb_handle_breakpoint;
	455	__debugger_sstep = kgdb_singlestep;
	456	__debugger_iabr_match = kgdb_iabr_match;
	457	__debugger_dabr_match = kgdb_dabr_match;
	458	__debugger_fault_handler = kgdb_not_implemented;
	459
	460	return 0;
	461	}
	462
	463	void kgdb_arch_exit(void)
	464	{
	465	__debugger_ipi = old__debugger_ipi;
	466	__debugger = old__debugger;
	467	__debugger_bpt = old__debugger_bpt;
	468	__debugger_sstep = old__debugger_sstep;
	469	__debugger_iabr_match = old__debugger_iabr_match;
	470	__debugger_dabr_match = old__debugger_dabr_match;
	471	__debugger_fault_handler = old__debugger_fault_handler;
	472	}