wdenk | 1dda0b1 | 2002-08-27 10:52:29 +0000 | [diff] [blame] | 1 | #include <common.h> |
| 2 | #include <command.h> |
wdenk | 1dda0b1 | 2002-08-27 10:52:29 +0000 | [diff] [blame] | 3 | #include <kgdb.h> |
| 4 | #include <asm/signal.h> |
| 5 | #include <asm/processor.h> |
| 6 | |
| 7 | #define PC_REGNUM 64 |
| 8 | #define SP_REGNUM 1 |
| 9 | |
| 10 | void breakinst(void); |
| 11 | |
| 12 | int |
| 13 | kgdb_setjmp(long *buf) |
| 14 | { |
Timur Tabi | 4705e00 | 2010-12-14 17:18:51 -0600 | [diff] [blame] | 15 | unsigned long temp; |
| 16 | |
| 17 | asm volatile("mflr %0; stw %0,0(%1);" |
| 18 | "stw %%r1,4(%1); stw %%r2,8(%1);" |
| 19 | "mfcr %0; stw %0,12(%1);" |
| 20 | "stmw %%r13,16(%1)" |
| 21 | : "=&r"(temp) : "r" (buf)); |
wdenk | 1dda0b1 | 2002-08-27 10:52:29 +0000 | [diff] [blame] | 22 | /* XXX should save fp regs as well */ |
| 23 | return 0; |
| 24 | } |
| 25 | |
| 26 | void |
| 27 | kgdb_longjmp(long *buf, int val) |
| 28 | { |
Timur Tabi | 4705e00 | 2010-12-14 17:18:51 -0600 | [diff] [blame] | 29 | unsigned long temp; |
| 30 | |
wdenk | 1dda0b1 | 2002-08-27 10:52:29 +0000 | [diff] [blame] | 31 | if (val == 0) |
| 32 | val = 1; |
Timur Tabi | 4705e00 | 2010-12-14 17:18:51 -0600 | [diff] [blame] | 33 | |
| 34 | asm volatile("lmw %%r13,16(%1);" |
| 35 | "lwz %0,12(%1); mtcrf 0x38,%0;" |
| 36 | "lwz %0,0(%1); lwz %%r1,4(%1); lwz %%r2,8(%1);" |
| 37 | "mtlr %0; mr %%r3,%2" |
| 38 | : "=&r"(temp) : "r" (buf), "r" (val)); |
wdenk | 1dda0b1 | 2002-08-27 10:52:29 +0000 | [diff] [blame] | 39 | } |
| 40 | |
| 41 | static inline unsigned long |
| 42 | get_msr(void) |
| 43 | { |
| 44 | unsigned long msr; |
| 45 | asm volatile("mfmsr %0" : "=r" (msr):); |
| 46 | return msr; |
| 47 | } |
| 48 | |
| 49 | static inline void |
| 50 | set_msr(unsigned long msr) |
| 51 | { |
| 52 | asm volatile("mtmsr %0" : : "r" (msr)); |
| 53 | } |
| 54 | |
| 55 | /* Convert the SPARC hardware trap type code to a unix signal number. */ |
| 56 | /* |
| 57 | * This table contains the mapping between PowerPC hardware trap types, and |
| 58 | * signals, which are primarily what GDB understands. |
| 59 | */ |
| 60 | static struct hard_trap_info |
| 61 | { |
| 62 | unsigned int tt; /* Trap type code for powerpc */ |
| 63 | unsigned char signo; /* Signal that we map this trap into */ |
| 64 | } hard_trap_info[] = { |
| 65 | { 0x200, SIGSEGV }, /* machine check */ |
| 66 | { 0x300, SIGSEGV }, /* address error (store) */ |
| 67 | { 0x400, SIGBUS }, /* instruction bus error */ |
| 68 | { 0x500, SIGINT }, /* interrupt */ |
| 69 | { 0x600, SIGBUS }, /* alingment */ |
| 70 | { 0x700, SIGTRAP }, /* breakpoint trap */ |
| 71 | { 0x800, SIGFPE }, /* fpu unavail */ |
| 72 | { 0x900, SIGALRM }, /* decrementer */ |
| 73 | { 0xa00, SIGILL }, /* reserved */ |
| 74 | { 0xb00, SIGILL }, /* reserved */ |
| 75 | { 0xc00, SIGCHLD }, /* syscall */ |
| 76 | { 0xd00, SIGTRAP }, /* single-step/watch */ |
| 77 | { 0xe00, SIGFPE }, /* fp assist */ |
| 78 | { 0, 0} /* Must be last */ |
| 79 | }; |
| 80 | |
| 81 | static int |
| 82 | computeSignal(unsigned int tt) |
| 83 | { |
| 84 | struct hard_trap_info *ht; |
| 85 | |
| 86 | for (ht = hard_trap_info; ht->tt && ht->signo; ht++) |
| 87 | if (ht->tt == tt) |
| 88 | return ht->signo; |
| 89 | |
| 90 | return SIGHUP; /* default for things we don't know about */ |
| 91 | } |
| 92 | |
| 93 | void |
| 94 | kgdb_enter(struct pt_regs *regs, kgdb_data *kdp) |
| 95 | { |
| 96 | unsigned long msr; |
| 97 | |
| 98 | kdp->private[0] = msr = get_msr(); |
| 99 | set_msr(msr & ~MSR_EE); /* disable interrupts */ |
| 100 | |
| 101 | if (regs->nip == (unsigned long)breakinst) { |
| 102 | /* Skip over breakpoint trap insn */ |
| 103 | regs->nip += 4; |
| 104 | } |
| 105 | regs->msr &= ~MSR_SE; |
| 106 | |
| 107 | /* reply to host that an exception has occurred */ |
| 108 | kdp->sigval = computeSignal(regs->trap); |
| 109 | |
| 110 | kdp->nregs = 2; |
| 111 | |
| 112 | kdp->regs[0].num = PC_REGNUM; |
| 113 | kdp->regs[0].val = regs->nip; |
| 114 | |
| 115 | kdp->regs[1].num = SP_REGNUM; |
| 116 | kdp->regs[1].val = regs->gpr[SP_REGNUM]; |
| 117 | } |
| 118 | |
| 119 | void |
| 120 | kgdb_exit(struct pt_regs *regs, kgdb_data *kdp) |
| 121 | { |
| 122 | unsigned long msr = kdp->private[0]; |
| 123 | |
| 124 | if (kdp->extype & KGDBEXIT_WITHADDR) |
| 125 | regs->nip = kdp->exaddr; |
| 126 | |
| 127 | switch (kdp->extype & KGDBEXIT_TYPEMASK) { |
| 128 | |
| 129 | case KGDBEXIT_KILL: |
| 130 | case KGDBEXIT_CONTINUE: |
| 131 | set_msr(msr); |
| 132 | break; |
| 133 | |
| 134 | case KGDBEXIT_SINGLE: |
| 135 | regs->msr |= MSR_SE; |
| 136 | #if 0 |
| 137 | set_msr(msr | MSR_SE); |
| 138 | #endif |
| 139 | break; |
| 140 | } |
| 141 | } |
| 142 | |
| 143 | int |
| 144 | kgdb_trap(struct pt_regs *regs) |
| 145 | { |
| 146 | return (regs->trap); |
| 147 | } |
| 148 | |
| 149 | /* return the value of the CPU registers. |
| 150 | * some of them are non-PowerPC names :( |
| 151 | * they are stored in gdb like: |
| 152 | * struct { |
| 153 | * u32 gpr[32]; |
| 154 | * f64 fpr[32]; |
| 155 | * u32 pc, ps, cnd, lr; (ps=msr) |
| 156 | * u32 cnt, xer, mq; |
| 157 | * } |
| 158 | */ |
| 159 | |
| 160 | #define SPACE_REQUIRED ((32*4)+(32*8)+(6*4)) |
| 161 | |
wdenk | 1dda0b1 | 2002-08-27 10:52:29 +0000 | [diff] [blame] | 162 | int |
| 163 | kgdb_getregs(struct pt_regs *regs, char *buf, int max) |
| 164 | { |
| 165 | int i; |
| 166 | unsigned long *ptr = (unsigned long *)buf; |
| 167 | |
| 168 | if (max < SPACE_REQUIRED) |
| 169 | kgdb_error(KGDBERR_NOSPACE); |
| 170 | |
| 171 | if ((unsigned long)ptr & 3) |
| 172 | kgdb_error(KGDBERR_ALIGNFAULT); |
| 173 | |
| 174 | /* General Purpose Regs */ |
| 175 | for (i = 0; i < 32; i++) |
| 176 | *ptr++ = regs->gpr[i]; |
| 177 | |
| 178 | /* Floating Point Regs */ |
wdenk | 1dda0b1 | 2002-08-27 10:52:29 +0000 | [diff] [blame] | 179 | for (i = 0; i < 32; i++) { |
| 180 | *ptr++ = 0; |
| 181 | *ptr++ = 0; |
| 182 | } |
wdenk | 1dda0b1 | 2002-08-27 10:52:29 +0000 | [diff] [blame] | 183 | |
| 184 | /* pc, msr, cr, lr, ctr, xer, (mq is unused) */ |
| 185 | *ptr++ = regs->nip; |
| 186 | *ptr++ = regs->msr; |
| 187 | *ptr++ = regs->ccr; |
| 188 | *ptr++ = regs->link; |
| 189 | *ptr++ = regs->ctr; |
| 190 | *ptr++ = regs->xer; |
| 191 | |
| 192 | return (SPACE_REQUIRED); |
| 193 | } |
| 194 | |
| 195 | /* set the value of the CPU registers */ |
wdenk | 1dda0b1 | 2002-08-27 10:52:29 +0000 | [diff] [blame] | 196 | void |
| 197 | kgdb_putreg(struct pt_regs *regs, int regno, char *buf, int length) |
| 198 | { |
| 199 | unsigned long *ptr = (unsigned long *)buf; |
| 200 | |
| 201 | if (regno < 0 || regno >= 70) |
| 202 | kgdb_error(KGDBERR_BADPARAMS); |
| 203 | else if (regno >= 32 && regno < 64) { |
| 204 | if (length < 8) |
| 205 | kgdb_error(KGDBERR_NOSPACE); |
| 206 | } |
| 207 | else { |
| 208 | if (length < 4) |
| 209 | kgdb_error(KGDBERR_NOSPACE); |
| 210 | } |
| 211 | |
| 212 | if ((unsigned long)ptr & 3) |
| 213 | kgdb_error(KGDBERR_ALIGNFAULT); |
| 214 | |
| 215 | if (regno >= 0 && regno < 32) |
| 216 | regs->gpr[regno] = *ptr; |
| 217 | else switch (regno) { |
wdenk | 1dda0b1 | 2002-08-27 10:52:29 +0000 | [diff] [blame] | 218 | case 64: regs->nip = *ptr; break; |
| 219 | case 65: regs->msr = *ptr; break; |
| 220 | case 66: regs->ccr = *ptr; break; |
| 221 | case 67: regs->link = *ptr; break; |
| 222 | case 68: regs->ctr = *ptr; break; |
| 223 | case 69: regs->ctr = *ptr; break; |
| 224 | |
| 225 | default: |
| 226 | kgdb_error(KGDBERR_BADPARAMS); |
| 227 | } |
| 228 | } |
| 229 | |
| 230 | void |
| 231 | kgdb_putregs(struct pt_regs *regs, char *buf, int length) |
| 232 | { |
| 233 | int i; |
| 234 | unsigned long *ptr = (unsigned long *)buf; |
| 235 | |
| 236 | if (length < SPACE_REQUIRED) |
| 237 | kgdb_error(KGDBERR_NOSPACE); |
| 238 | |
| 239 | if ((unsigned long)ptr & 3) |
| 240 | kgdb_error(KGDBERR_ALIGNFAULT); |
| 241 | |
| 242 | /* |
| 243 | * If the stack pointer has moved, you should pray. |
| 244 | * (cause only god can help you). |
| 245 | */ |
| 246 | |
| 247 | /* General Purpose Regs */ |
| 248 | for (i = 0; i < 32; i++) |
| 249 | regs->gpr[i] = *ptr++; |
| 250 | |
| 251 | /* Floating Point Regs */ |
wdenk | 1dda0b1 | 2002-08-27 10:52:29 +0000 | [diff] [blame] | 252 | ptr += 32*2; |
| 253 | |
| 254 | /* pc, msr, cr, lr, ctr, xer, (mq is unused) */ |
| 255 | regs->nip = *ptr++; |
| 256 | regs->msr = *ptr++; |
| 257 | regs->ccr = *ptr++; |
| 258 | regs->link = *ptr++; |
| 259 | regs->ctr = *ptr++; |
| 260 | regs->xer = *ptr++; |
| 261 | } |
| 262 | |
| 263 | /* This function will generate a breakpoint exception. It is used at the |
| 264 | beginning of a program to sync up with a debugger and can be used |
| 265 | otherwise as a quick means to stop program execution and "break" into |
| 266 | the debugger. */ |
| 267 | |
| 268 | void |
Wolfgang Denk | 6262d021 | 2010-06-28 22:00:46 +0200 | [diff] [blame] | 269 | kgdb_breakpoint(int argc, char * const argv[]) |
wdenk | 1dda0b1 | 2002-08-27 10:52:29 +0000 | [diff] [blame] | 270 | { |
| 271 | asm(" .globl breakinst\n\ |
| 272 | breakinst: .long 0x7d821008\n\ |
wdenk | 57b2d80 | 2003-06-27 21:31:46 +0000 | [diff] [blame] | 273 | "); |
wdenk | 1dda0b1 | 2002-08-27 10:52:29 +0000 | [diff] [blame] | 274 | } |