mirror of
https://github.com/array-in-a-matrix/SAROO.git
synced 2025-04-02 10:31:43 -04:00
241 lines
4.6 KiB
C
241 lines
4.6 KiB
C
|
|
#include "main.h"
|
|
#include "smpc.h"
|
|
|
|
/**********************************************************/
|
|
|
|
|
|
|
|
void vbi_isr_entry(void);
|
|
void ubr_isr_entry(void);
|
|
void debug_shell(void *arg);
|
|
|
|
|
|
static int auto_break;
|
|
static int game_break_pc;
|
|
static void (*game_break_handle)(REGS *reg);
|
|
|
|
|
|
/**********************************************************/
|
|
|
|
static inline u32 get_sr(void)
|
|
{
|
|
u32 sr;
|
|
|
|
__asm volatile ( "stc\tsr,%0": "=r" (sr) );
|
|
return sr;
|
|
}
|
|
|
|
static inline void set_sr(u32 sr)
|
|
{
|
|
__asm volatile ( "ldc\t%0,sr":: "r" (sr) );
|
|
}
|
|
|
|
|
|
void show_regs(REGS *reg)
|
|
{
|
|
printk("SH2 Registers:\n");
|
|
printk("R0 =%08x R1 =%08x R2 =%08x R3 =%08x\n", reg->r0, reg->r1, reg->r2, reg->r3);
|
|
printk("R4 =%08x R5 =%08x R6 =%08x R7 =%08x\n", reg->r4, reg->r5, reg->r6, reg->r7);
|
|
printk("R8 =%08x R9 =%08x R10=%08x R11=%08x\n", reg->r8, reg->r9, reg->r10,reg->r11);
|
|
printk("R12=%08x R13=%08x R14=%08x R15=%08x\n", reg->r12,reg->r13,reg->r14,reg->r15);
|
|
printk("PC =%08X PR =%08x SR =%08x GBR=%08x\n", reg->pc, reg->pr, reg->sr, reg->gbr);
|
|
}
|
|
|
|
|
|
/**********************************************************/
|
|
|
|
|
|
void set_break_pc(u32 addr, u32 mask)
|
|
{
|
|
if(addr){
|
|
BARA = addr;
|
|
BAMRA = mask;
|
|
BBRA = 0x0054;
|
|
BRCR = 0x1400;
|
|
}else{
|
|
BBRA = 0;
|
|
}
|
|
}
|
|
|
|
|
|
void set_break_rw(u32 addr, u32 mask, int rw)
|
|
{
|
|
if(addr){
|
|
BARB = addr;
|
|
BAMRB = mask;
|
|
BBRB = (0x0060|rw);
|
|
BRCR = 0x1400;
|
|
}else{
|
|
BBRB = 0;
|
|
}
|
|
}
|
|
|
|
|
|
void ubr_handle(REGS *reg)
|
|
{
|
|
BRCR = 0x1400;
|
|
|
|
if(auto_break){
|
|
// 修改设置SR时的参数, 打开ubr中断
|
|
if(reg->pc==0x0000044c){
|
|
reg->r0 = 0xe0;
|
|
set_break_pc(0x000002b0, 0);
|
|
}
|
|
|
|
// memset
|
|
if(reg->pc==0x000002b2){
|
|
// 避免LRAM被BIOS清0
|
|
if(reg->r3==0x00200000){
|
|
reg->r6 = 0x00020000;
|
|
set_break_pc(0x000002c2, 0);
|
|
}
|
|
}
|
|
|
|
// memcpy
|
|
if(reg->pc==0x000002c4){
|
|
// 避免向量表被BIOS重设
|
|
if(reg->r3==0x06000000){
|
|
reg->r6 = 0x0c;
|
|
set_break_pc(0x000002a4, 0);
|
|
//set_break_pc(0x060011bc, 0); // --> bios:000011bc
|
|
//0x060011bc处会重设cdplayer的地址。
|
|
//设置到这里,有可能断不下来,游戏也不启动了。
|
|
}
|
|
}
|
|
|
|
// last
|
|
if(reg->pc==0x000002a6){
|
|
//if(reg->pc==0x060011be){
|
|
// *(u32*)(0x0600026c) = 0x02000f00;
|
|
if(game_break_pc){
|
|
set_break_pc(game_break_pc, 0);
|
|
printk("Set game break at %08x\n", game_break_pc);
|
|
}
|
|
auto_break = 0;
|
|
}
|
|
return;
|
|
}
|
|
|
|
|
|
sci_init();
|
|
printk("\nubr_handle! BRCR=%04x\n", BRCR);
|
|
show_regs(reg);
|
|
|
|
if(reg->pc==game_break_pc+2 && game_break_handle){
|
|
game_break_handle(reg);
|
|
}else{
|
|
debug_shell(reg);
|
|
}
|
|
}
|
|
|
|
|
|
void vbi_handle(REGS *reg)
|
|
{
|
|
sci_init();
|
|
printk("\nvbi_handle!\n");
|
|
show_regs(reg);
|
|
return;
|
|
}
|
|
|
|
|
|
void break_in_game(int break_pc, void *handle)
|
|
{
|
|
auto_break = 1;
|
|
game_break_pc = break_pc;
|
|
game_break_handle = handle;
|
|
|
|
set_break_pc(0x0000044a, 0);
|
|
install_ubr_isr();
|
|
}
|
|
|
|
|
|
void break_in_game_next(int break_pc, void *handle)
|
|
{
|
|
game_break_pc = break_pc;
|
|
game_break_handle = handle;
|
|
set_break_pc(break_pc, 0);
|
|
}
|
|
|
|
|
|
void install_ubr_isr(void)
|
|
{
|
|
*(u32*)(0x06000030) = (u32)ubr_isr_entry;
|
|
|
|
u32 sr = get_sr();
|
|
sr &= 0xffffffef;
|
|
set_sr(sr);
|
|
}
|
|
|
|
|
|
/**********************************************************/
|
|
|
|
|
|
#define CMD_START if(0){}
|
|
#define CMD(x) else if(strcmp(cmd, #x)==0)
|
|
|
|
void debug_shell(void *ctx)
|
|
{
|
|
char cmd[128];
|
|
u32 argc, arg[4];
|
|
REGS *reg = (REGS*)ctx;
|
|
|
|
while(1){
|
|
gets(cmd, 128);
|
|
char *sp = strchr(cmd, ' ');
|
|
if(sp){
|
|
*sp = 0;
|
|
sp += 1;
|
|
argc = str2hex(sp, arg);
|
|
}else{
|
|
argc = 0;
|
|
}
|
|
|
|
CMD_START
|
|
CMD(rb){ printk("%08x: %02x\n", arg[0], *(u8*)arg[0]); }
|
|
CMD(rw){ printk("%08x: %04x\n", arg[0], *(u16*)arg[0]); }
|
|
CMD(rd){ printk("%08x: %08x\n", arg[0], *(u32*)arg[0]); }
|
|
CMD(wb){ printk("%08x= %02x\n", arg[0], (u8)arg[1]); *(u8*)arg[0] = arg[1]; }
|
|
CMD(ww){ printk("%08x= %04x\n", arg[0], (u16)arg[1]); *(u16*)arg[0] = arg[1]; }
|
|
CMD(wd){ printk("%08x= %08x\n", arg[0], (u32)arg[1]); *(u32*)arg[0] = arg[1]; }
|
|
CMD(db){ dump(argc, arg, 1); }
|
|
CMD(dw){ dump(argc, arg, 2); }
|
|
CMD(dd){ dump(argc, arg, 4); }
|
|
CMD(d) { dump(argc, arg, 0); }
|
|
CMD(go){ void (*go)(void) = (void(*)(void))arg[0]; go(); }
|
|
|
|
CMD(r0){ reg->r0 = arg[0];}
|
|
CMD(r6){ reg->r6 = arg[0];}
|
|
|
|
CMD(b ){
|
|
u32 addr = 0, mask = 0;
|
|
if(argc>0) addr = arg[0];
|
|
if(argc>1) mask = arg[1];
|
|
set_break_pc(addr, mask);
|
|
break;
|
|
}
|
|
CMD(br) {
|
|
u32 addr = 0, mask = 0;
|
|
|
|
if(argc>0) addr = arg[0];
|
|
if(argc>1) mask = arg[1];
|
|
set_break_rw(addr, mask, BRK_READ);
|
|
}
|
|
CMD(bw) {
|
|
u32 addr = 0, mask = 0;
|
|
|
|
if(argc>0) addr = arg[0];
|
|
if(argc>1) mask = arg[1];
|
|
set_break_rw(addr, mask, BRK_WRITE);
|
|
}
|
|
|
|
CMD(c ){ break; }
|
|
}
|
|
|
|
}
|
|
|
|
|
|
/**********************************************************/
|
|
|
|
|
|
|