170 lines
6.0 KiB
C
170 lines
6.0 KiB
C
#include <stdio.h>
|
|
#include "common/types.h"
|
|
#include "exception_handler.h"
|
|
|
|
#define OS_EXCEPTION_MODE_GLOBAL_ALL_CORES 4
|
|
|
|
#define OS_EXCEPTION_DSI 2
|
|
#define OS_EXCEPTION_ISI 3
|
|
#define OS_EXCEPTION_PROGRAM 6
|
|
|
|
/* Exceptions */
|
|
typedef struct OSContext
|
|
{
|
|
/* OSContext identifier */
|
|
uint32_t tag1;
|
|
uint32_t tag2;
|
|
|
|
/* GPRs */
|
|
uint32_t gpr[32];
|
|
|
|
/* Special registers */
|
|
uint32_t cr;
|
|
uint32_t lr;
|
|
uint32_t ctr;
|
|
uint32_t xer;
|
|
|
|
/* Initial PC and MSR */
|
|
uint32_t srr0;
|
|
uint32_t srr1;
|
|
|
|
/* Only valid during DSI exception */
|
|
uint32_t exception_specific0;
|
|
uint32_t exception_specific1;
|
|
|
|
/* There is actually a lot more here but we don't need the rest*/
|
|
} OSContext;
|
|
|
|
#include <coreinit/exception.h>
|
|
#include <coreinit/debug.h>
|
|
|
|
#define CPU_STACK_TRACE_DEPTH 10
|
|
#define __stringify(rn) #rn
|
|
|
|
#define mfspr(_rn) \
|
|
({ register uint32_t _rval = 0; \
|
|
asm volatile("mfspr %0," __stringify(_rn) \
|
|
: "=r" (_rval));\
|
|
_rval; \
|
|
})
|
|
|
|
typedef struct _framerec {
|
|
struct _framerec *up;
|
|
void *lr;
|
|
} frame_rec, *frame_rec_t;
|
|
|
|
static const char *exception_names[] = {
|
|
"DSI",
|
|
"ISI",
|
|
"PROGRAM"
|
|
};
|
|
|
|
static const char exception_print_formats[18][45] = {
|
|
"Exception type %s occurred!\n", // 0
|
|
"GPR00 %08X GPR08 %08X GPR16 %08X GPR24 %08X\n", // 1
|
|
"GPR01 %08X GPR09 %08X GPR17 %08X GPR25 %08X\n", // 2
|
|
"GPR02 %08X GPR10 %08X GPR18 %08X GPR26 %08X\n", // 3
|
|
"GPR03 %08X GPR11 %08X GPR19 %08X GPR27 %08X\n", // 4
|
|
"GPR04 %08X GPR12 %08X GPR20 %08X GPR28 %08X\n", // 5
|
|
"GPR05 %08X GPR13 %08X GPR21 %08X GPR29 %08X\n", // 6
|
|
"GPR06 %08X GPR14 %08X GPR22 %08X GPR30 %08X\n", // 7
|
|
"GPR07 %08X GPR15 %08X GPR23 %08X GPR31 %08X\n", // 8
|
|
"LR %08X SRR0 %08x SRR1 %08x\n", // 9
|
|
"DAR %08X DSISR %08X\n", // 10
|
|
"\nSTACK DUMP:", // 11
|
|
" --> ", // 12
|
|
" -->\n", // 13
|
|
"\n", // 14
|
|
"%p", // 15
|
|
"\nCODE DUMP:\n", // 16
|
|
"%p: %08X %08X %08X %08X\n", // 17
|
|
};
|
|
|
|
static unsigned char exception_cb(OSContext * context, unsigned char exception_type) {
|
|
char buf[850];
|
|
int pos = 0;
|
|
/*
|
|
* This part is mostly from libogc. Thanks to the devs over there.
|
|
*/
|
|
pos += sprintf(buf + pos, exception_print_formats[0], exception_names[exception_type]);
|
|
pos += sprintf(buf + pos, exception_print_formats[1], context->gpr[0], context->gpr[8], context->gpr[16], context->gpr[24]);
|
|
pos += sprintf(buf + pos, exception_print_formats[2], context->gpr[1], context->gpr[9], context->gpr[17], context->gpr[25]);
|
|
pos += sprintf(buf + pos, exception_print_formats[3], context->gpr[2], context->gpr[10], context->gpr[18], context->gpr[26]);
|
|
pos += sprintf(buf + pos, exception_print_formats[4], context->gpr[3], context->gpr[11], context->gpr[19], context->gpr[27]);
|
|
pos += sprintf(buf + pos, exception_print_formats[5], context->gpr[4], context->gpr[12], context->gpr[20], context->gpr[28]);
|
|
pos += sprintf(buf + pos, exception_print_formats[6], context->gpr[5], context->gpr[13], context->gpr[21], context->gpr[29]);
|
|
pos += sprintf(buf + pos, exception_print_formats[7], context->gpr[6], context->gpr[14], context->gpr[22], context->gpr[30]);
|
|
pos += sprintf(buf + pos, exception_print_formats[8], context->gpr[7], context->gpr[15], context->gpr[23], context->gpr[31]);
|
|
pos += sprintf(buf + pos, exception_print_formats[9], context->lr, context->srr0, context->srr1);
|
|
|
|
//if(exception_type == OS_EXCEPTION_DSI) {
|
|
pos += sprintf(buf + pos, exception_print_formats[10], context->exception_specific1, context->exception_specific0); // this freezes
|
|
//}
|
|
|
|
void *pc = (void*)context->srr0;
|
|
void *lr = (void*)context->lr;
|
|
void *r1 = (void*)context->gpr[1];
|
|
register uint32_t i = 0;
|
|
register frame_rec_t l,p = (frame_rec_t)lr;
|
|
|
|
l = p;
|
|
p = r1;
|
|
if(!p)
|
|
asm volatile("mr %0,%%r1" : "=r"(p));
|
|
|
|
pos += sprintf(buf + pos, exception_print_formats[11]);
|
|
|
|
for(i = 0; i < CPU_STACK_TRACE_DEPTH-1 && p->up; p = p->up, i++) {
|
|
if(i % 4)
|
|
pos += sprintf(buf + pos, exception_print_formats[12]);
|
|
else {
|
|
if(i > 0)
|
|
pos += sprintf(buf + pos, exception_print_formats[13]);
|
|
else
|
|
pos += sprintf(buf + pos, exception_print_formats[14]);
|
|
}
|
|
|
|
switch(i) {
|
|
case 0:
|
|
if(pc)
|
|
pos += sprintf(buf + pos, exception_print_formats[15],pc);
|
|
break;
|
|
case 1:
|
|
if(!l)
|
|
l = (frame_rec_t)mfspr(8);
|
|
pos += sprintf(buf + pos, exception_print_formats[15],(void*)l);
|
|
break;
|
|
default:
|
|
pos += sprintf(buf + pos, exception_print_formats[15],(void*)(p->up->lr));
|
|
break;
|
|
}
|
|
}
|
|
|
|
//if(exception_type == OS_EXCEPTION_DSI) {
|
|
uint32_t *pAdd = (uint32_t*)context->srr0;
|
|
pos += sprintf(buf + pos, exception_print_formats[16]);
|
|
// TODO by Dimok: this was actually be 3 instead of 2 lines in libogc .... but there is just no more space anymore on the screen
|
|
for (i = 0; i < 8; i += 4)
|
|
pos += sprintf(buf + pos, exception_print_formats[17], &(pAdd[i]),pAdd[i], pAdd[i+1], pAdd[i+2], pAdd[i+3]);
|
|
//}
|
|
|
|
OSFatal(buf);
|
|
return 1;
|
|
}
|
|
|
|
static unsigned char dsi_exception_cb(void * context) {
|
|
return exception_cb(context, 0);
|
|
}
|
|
static unsigned char isi_exception_cb(void * context) {
|
|
return exception_cb(context, 1);
|
|
}
|
|
static unsigned char program_exception_cb(void * context) {
|
|
return exception_cb(context, 2);
|
|
}
|
|
|
|
void setup_os_exceptions(void) {
|
|
OSSetExceptionCallback(OS_EXCEPTION_DSI, (OSExceptionCallbackFn)dsi_exception_cb);
|
|
OSSetExceptionCallback(OS_EXCEPTION_ISI, (OSExceptionCallbackFn)isi_exception_cb);
|
|
OSSetExceptionCallback(OS_EXCEPTION_PROGRAM, (OSExceptionCallbackFn)program_exception_cb);
|
|
}
|