From 814cd636c0d6a94ee344b946c93c9b7b2657a374 Mon Sep 17 00:00:00 2001 From: Connor Olding Date: Tue, 9 Feb 2016 00:07:42 -0800 Subject: [PATCH] clone spinout182.com/mipsdis/actordis/ --- .dummy | 1 - adis.c | 1723 ++++++++++++++++++++++++++++++++++++++++++++++++++++++ adis.h | 54 ++ r3400i.h | 56 ++ 4 files changed, 1833 insertions(+), 1 deletion(-) delete mode 100644 .dummy create mode 100755 adis.c create mode 100755 adis.h create mode 100755 r3400i.h diff --git a/.dummy b/.dummy deleted file mode 100644 index 945c9b4..0000000 --- a/.dummy +++ /dev/null @@ -1 +0,0 @@ -. \ No newline at end of file diff --git a/adis.c b/adis.c new file mode 100755 index 0000000..d2c7d0a --- /dev/null +++ b/adis.c @@ -0,0 +1,1723 @@ +/* + mipsdis.c + redistribute and modify at will, my name is spinout, keep it here. +*/ + +#include +#include +#include "../r3400i.h" +#include "adis.h" + +unsigned int pc = 0x80000000; +char dis_op[100]; +int map_branches; +int branches[1000]; +int noBranches=0; +int EndOfFunction=-1; +unsigned local_start; +unsigned local_end; +int jaltaken=0; +int html = 0; +const char * actTypes[12]={ + "Unknown", + "Prop", + "Unknown", + "Bomb", + "NPC", + "Enemy", + "Prop", + "Item/Action", + "Miscellaneous", + "Boss", + "Unknown", + "Door/Chest" +}; + +typedef union { + u8 ubyte[1048576]; + s8 sbyte[1048576]; + u16 uhalf[524288]; + s16 shalf[524288]; + u32 uword[262144]; + s32 sword[262144]; + f32 sfloat[262144]; +} memoryUnion; + +#ifdef OOTDEBUG +int target_count = 11; +#else +int target_count = 0; +#endif + +char * mapped_functions; + +function functions[256] = { +#ifdef OOTDEBUG + {0x80002130, "DebugMessage" }, + {0x800FB3AC, "SetTextRGBA" }, + {0x800FB41C, "SetTextXY" }, + {0x800FBCB4, "SetTextString" }, + {0x80031F50, "ActorSpawn" }, + {0x801031E0, "sqrtf" }, + {0x801067E0, "absf" }, + {0x80104610, "cosf" }, + {0x80100290, "sinf" }, + {0x80104780, "coss" }, + {0x80100450, "sins" } +#endif +}; +//memoryUnion memory; + +unsigned gpr_regs[32]={ +0, 0, 0, 0, 0x802245B0, 0x80212020, 0, 0, +0, 0, 0, 0, 0, 0, 0, 0, +0, 0, 0, 0, 0, 0, 0, 0, +0, 0, 0, 0, 0, 0x80160000, 0, 0, +}; + +const char * gpr_rn[32]={ +"$zero", "at", "v0", "v1", "a0", "a1", "a2", "a3", +"t0", "t1", "t2", "t3", "t4", "t5", "t6", "t7", +"s0", "s1", "s2", "s3", "s4", "s5", "s6", "s7", +"t8", "t9", "k0", "k1", "gp", "$sp", "s8", "$ra" +}; + +const char * cop_rn[32]={ +"Index", "Random", "EntryLo0", "EntryLo1", "Context", "PageMask", "Wired", "Reserved", +"BadVAddr", "Count", "EntryHi", "Compare", "Status", "Cause", "Epc", "PRevID", +"Config", "LLAddr", "WatchLo", "WatchHi", "XContext", "Reserved", "Reserved", "Reserved", +"Reserved", "Reserved", "PErr", "CacheErr", "TagLo", "TagHi", "ErrorEpc", "Reserved" +}; + +const char * fpr_rn[32]={ +"$f0", "$f1", "$f2", "$f3", "$f4", "$f5", "$f6", "$f7", +"$f8", "$f9", "$f10", "$f11", "$f12", "$f13", "$f14", "$f15", +"$f16", "$f17", "$f18", "$f19", "$f20", "$f21", "$f22", "$f23", +"$f24", "$f25", "$f26", "$f27", "$f28", "$f29", "$f30", "$f31" +}; + +void reset_gpr_regs(void) +{ + int i; + for (i=0;i<32;i++) + { + gpr_regs[i]=0; + } + gpr_regs[4] = 0x802245B0; + gpr_regs[5] = 0x80212020; + gpr_regs[29] = 0x80160000; +} + +void reset_gpr_regs_soft(void) /* for jals */ +{ + gpr_regs[1] = 0; + gpr_regs[2] = 0; + gpr_regs[3] = 0; + gpr_regs[4] = 0; + gpr_regs[5] = 0; + gpr_regs[6] = 0; + gpr_regs[7] = 0; + gpr_regs[8] = 0; + gpr_regs[9] = 0; + gpr_regs[10] = 0; + gpr_regs[11] = 0; + gpr_regs[12] = 0; + gpr_regs[13] = 0; + gpr_regs[14] = 0; + gpr_regs[15] = 0; + gpr_regs[24] = 0; + gpr_regs[25] = 0; + +} + +int target2label(int addr) +{ + int i; + addr |= 0x80000000; + for (i=0; i=0) /* Function already mapped? */ + return 0; + char * name_ = (char*)malloc(32); + int i; + + + for (i=0; i<32;i++)name_[i]=name[i]; + + functions[target_count].name = name_; + functions[target_count].addr = addr|0x80000000; + + target_count+=1; + return target_count-1; +} + +int isTarget(int pc) +{ + int i; + for (i=0; i<=noBranches; i++) + { + if (pc==branches[i]) + return i; + } + return -1; +} + +char label[16]; + +char * branch2label(int addr) +{ + + if (map_branches) + { + noBranches++; + branches[noBranches]=addr; + sprintf(label, "0x%08X", addr); + } + else + { + int lbl_no = isTarget(addr); + if (html) + sprintf(label, "$lbl_%i", lbl_no, lbl_no); + else + sprintf(label, "$lbl_%i", lbl_no); + } + return label; +} + +void COP1_NONE(unsigned long word) +{ + sprintf(dis_op, "(Invalid COP1: %08X)", (unsigned int)word); +} + +void TLB_NONE(unsigned long word) +{ + sprintf(dis_op, "(Invalid TLB: %08X)", (unsigned int)word); +} + +void COP0_NONE(unsigned long word) +{ + sprintf(dis_op, "(Invalid COP0: %08X)", (unsigned int)word); +} + +void NONE(unsigned long word) +{ + sprintf(dis_op, "(Invalid opcode: %08X)", (unsigned int)word); +} +/* + cop1 + MIPS R3400i Co-processor 1 (FPU processor) +*/ + +//COP1.L +void CVT_S_L(unsigned long word) +{ + sprintf(dis_op, "cvt.s.l\t%s, %s", fpr_rn[getFD(word)],fpr_rn[getFS(word)]); +} + +void CVT_D_L(unsigned long word) +{ + sprintf(dis_op, "cvt.d.l\t%s, %s", fpr_rn[getFD(word)],fpr_rn[getFS(word)]); +} + +//COP1.W +void CVT_S_W(unsigned long word) +{ + sprintf(dis_op, "cvt.s.w\t%s, %s", fpr_rn[getFD(word)],fpr_rn[getFS(word)]); +} + +void CVT_D_W(unsigned long word) +{ + sprintf(dis_op, "cvt.d.w\t%s, %s", fpr_rn[getFD(word)],fpr_rn[getFS(word)]); +} + +//COP1.S +void ADD_S(unsigned long word) +{ //00 (00) + sprintf(dis_op, "add.s\t%s, %s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)], fpr_rn[getFT(word)]); +} + +void SUB_S(unsigned long word) +{ //01 (01) + sprintf(dis_op, "sub.s\t%s, %s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)], fpr_rn[getFT(word)]); +} + +void MUL_S(unsigned long word) +{ //02 (02) + sprintf(dis_op, "mul.s\t%s, %s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)], fpr_rn[getFT(word)]); +} + +void DIV_S(unsigned long word) +{ //03 (03) + sprintf(dis_op, "div.s\t%s, %s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)], fpr_rn[getFT(word)]); +} + +void SQRT_S(unsigned long word) +{ //04 (04) + sprintf(dis_op, "sqrt.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void ABS_S(unsigned long word) +{ //05 (05) + sprintf(dis_op, "abs.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void MOV_S(unsigned long word) +{ //06 (06) + sprintf(dis_op, "mov.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void NEG_S(unsigned long word) +{ //07 (07) + sprintf(dis_op, "neg.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void ROUND_L_S(unsigned long word) +{ //08 (08) + sprintf(dis_op, "round.l.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void TRUNC_L_S(unsigned long word) +{ //09 (09) + sprintf(dis_op, "trunc.l.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void CEIL_L_S(unsigned long word) +{ //10 (0A) + sprintf(dis_op, "ceil.l.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void FLOOR_L_S(unsigned long word) +{ //11 (0B) + sprintf(dis_op, "floor.l.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void ROUND_W_S(unsigned long word) +{ //12 (0C) + sprintf(dis_op, "round.w.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void TRUNC_W_S(unsigned long word) +{ //13 (0D) + sprintf(dis_op, "trunc.w.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void CEIL_W_S(unsigned long word) +{ //14 (0E) + sprintf(dis_op, "ceil.w.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void FLOOR_W_S(unsigned long word) +{ //15 (0F) + sprintf(dis_op, "floor.w.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void CVT_D_S(unsigned long word) +{ //33 (21) + sprintf(dis_op, "cvt.d.s\t%s, %s", fpr_rn[getFD(word)],fpr_rn[getFS(word)]); +} + +void CVT_W_S(unsigned long word) +{ //36 (24) + sprintf(dis_op, "cvt.w.s\t%s, %s", fpr_rn[getFD(word)],fpr_rn[getFS(word)]); +} + +void CVT_L_S(unsigned long word) +{ //37 (25) + sprintf(dis_op, "cvt.l.s\t%s, %s", fpr_rn[getFD(word)],fpr_rn[getFS(word)]); +} + +void C_F_S(unsigned long word) +{ //48 (30) + sprintf(dis_op, "c.f.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_UN_S(unsigned long word) +{ //49 (31) + sprintf(dis_op, "c.un.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_EQ_S(unsigned long word) +{ //50 (32) + sprintf(dis_op, "c.eq.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_UEQ_S(unsigned long word) +{ //51 (33) + sprintf(dis_op, "c.ueq.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_OLT_S(unsigned long word) +{ //52 (34) + sprintf(dis_op, "c.olt.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_ULT_S(unsigned long word) +{ //53 (35) + sprintf(dis_op, "c.ult.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_OLE_S(unsigned long word) +{ //54 (36) + sprintf(dis_op, "c.ole.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_ULE_S(unsigned long word) +{ //55 (37) + sprintf(dis_op, "c.ule.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_SF_S(unsigned long word) +{ //56 (38) + sprintf(dis_op, "c.sf.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_NGLE_S(unsigned long word) +{ //57 (39) + sprintf(dis_op, "c.ngle.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_SEQ_S(unsigned long word) +{ //58 (3A) + sprintf(dis_op, "c.seq.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_NGL_S(unsigned long word) +{ //59 (3B) + sprintf(dis_op, "c.ngl.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_LT_S(unsigned long word) +{ //60 (3C) + sprintf(dis_op, "c.lt.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_NGE_S(unsigned long word) +{ //61 (3D) + sprintf(dis_op, "c.nge.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_LE_S(unsigned long word) +{ //62 (3E) + sprintf(dis_op, "c.le.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_NGT_S(unsigned long word) +{ //63 (3F) + sprintf(dis_op, "c.ngt.s\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +Handler S_T[64] = { +ADD_S, SUB_S, MUL_S, DIV_S, SQRT_S, ABS_S, MOV_S, NEG_S, +ROUND_L_S, TRUNC_L_S, CEIL_L_S, FLOOR_L_S, ROUND_W_S, TRUNC_W_S, CEIL_W_S, FLOOR_W_S, +COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, +COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, +COP1_NONE, CVT_D_S, COP1_NONE, COP1_NONE, CVT_W_S, CVT_L_S, COP1_NONE, COP1_NONE, +COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, +C_F_S, C_UN_S, C_EQ_S, C_UEQ_S, C_OLT_S, C_ULT_S, C_OLE_S, C_ULE_S, +C_SF_S, C_NGLE_S, C_SEQ_S, C_NGL_S, C_LT_S, C_NGE_S, C_LE_S, C_NGT_S +}; + +//COP1.D +void ADD_D(unsigned long word) +{ //00 (00) + sprintf(dis_op, "add.d\t%s, %s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)], fpr_rn[getFT(word)]); +} + +void SUB_D(unsigned long word) +{ //01 (01) + sprintf(dis_op, "sub.d\t%s, %s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)], fpr_rn[getFT(word)]); +} + +void MUL_D(unsigned long word) +{ //02 (02) + sprintf(dis_op, "mul.d\t%s, %s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)], fpr_rn[getFT(word)]); +} + +void DIV_D(unsigned long word) +{ //03 (03) + sprintf(dis_op, "add.d\t%s, %s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)], fpr_rn[getFT(word)]); +} + +void SQRT_D(unsigned long word) +{ //04 (04) + sprintf(dis_op, "sqrt.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void ABS_D(unsigned long word) +{ //05 (05) + sprintf(dis_op, "abs.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void MOV_D(unsigned long word) +{ //06 (06) + sprintf(dis_op, "mov.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void NEG_D(unsigned long word) +{ //07 (07) + sprintf(dis_op, "neg.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void ROUND_L_D(unsigned long word) +{ //08 (08) + sprintf(dis_op, "round.l.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void TRUNC_L_D(unsigned long word) +{ //09 (09) + sprintf(dis_op, "trunc.l.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void CEIL_L_D(unsigned long word) +{ //10 (0A) + sprintf(dis_op, "ceil.l.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void FLOOR_L_D(unsigned long word) +{ //11 (0B) + sprintf(dis_op, "floor.l.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void ROUND_W_D(unsigned long word) +{ //12 (0C) + sprintf(dis_op, "round.w.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void TRUNC_W_D(unsigned long word) +{ //13 (0D) + sprintf(dis_op, "trunc.w.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void CEIL_W_D(unsigned long word) +{ //14 (0E) + sprintf(dis_op, "ceil.w.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void FLOOR_W_D(unsigned long word) +{ //15 (0F) + sprintf(dis_op, "floor.w.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void CVT_S_D(unsigned long word) +{ //32 (20) + sprintf(dis_op, "cvt.s.d\t%s, %s", fpr_rn[getFD(word)],fpr_rn[getFS(word)]); +} + +void CVT_W_D(unsigned long word) +{ //36 (24) + sprintf(dis_op, "cvt.w.d\t%s, %s", fpr_rn[getFD(word)],fpr_rn[getFS(word)]); +} + +void CVT_L_D(unsigned long word) +{ //37 (25) + sprintf(dis_op, "cvt.l.d\t%s, %s", fpr_rn[getFD(word)],fpr_rn[getFS(word)]); +} + +void C_F_D(unsigned long word) +{ //48 (30) + sprintf(dis_op, "c.f.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_UN_D(unsigned long word) +{ //49 (31) + sprintf(dis_op, "c.un.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_EQ_D(unsigned long word) +{ //50 (32) + sprintf(dis_op, "c.eq.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_UEQ_D(unsigned long word) +{ //51 (33) + sprintf(dis_op, "c.ueq.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_OLT_D(unsigned long word) +{ //52 (34) + sprintf(dis_op, "c.olt.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_ULT_D(unsigned long word) +{ //53 (35) + sprintf(dis_op, "c.ult.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_OLE_D(unsigned long word) +{ //54 (36) + sprintf(dis_op, "c.ole.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_ULE_D(unsigned long word) +{ //55 (37) + sprintf(dis_op, "c.ule.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_SF_D(unsigned long word) +{ //56 (38) + sprintf(dis_op, "c.df.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_NGLE_D(unsigned long word) +{ //57 (39) + sprintf(dis_op, "c.ngle.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_SEQ_D(unsigned long word) +{ //58 (3A) + sprintf(dis_op, "c.deq.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_NGL_D(unsigned long word) +{ //59 (3B) + sprintf(dis_op, "c.ngl.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_LT_D(unsigned long word) +{ //60 (3C) + sprintf(dis_op, "c.lt.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_NGE_D(unsigned long word) +{ //61 (3D) + sprintf(dis_op, "c.nge.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_LE_D(unsigned long word) +{ //62 (3E) + sprintf(dis_op, "c.le.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +void C_NGT_D(unsigned long word) +{ //63 (3F) + sprintf(dis_op, "c.ngt.d\t%s, %s", fpr_rn[getFD(word)], fpr_rn[getFS(word)]); +} + +Handler D_T[64] = { +ADD_D, SUB_D, MUL_D, DIV_D, SQRT_D, ABS_D, MOV_D, NEG_D, +ROUND_L_D, TRUNC_L_D, CEIL_L_D, FLOOR_L_D, ROUND_W_D, TRUNC_W_D, CEIL_W_D, FLOOR_W_D, +COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, +COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, +CVT_S_D, COP1_NONE, COP1_NONE, COP1_NONE, CVT_W_D, CVT_L_D, COP1_NONE, COP1_NONE, +COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, +C_F_D, C_UN_D, C_EQ_D, C_UEQ_D, C_OLT_D, C_ULT_D, C_OLE_D, C_ULE_D, +C_SF_D, C_NGLE_D, C_SEQ_D, C_NGL_D, C_LT_D, C_NGE_D, C_LE_D, C_NGT_D +}; + +//COP1.BC opcodes +void BC1F(unsigned long word) +{ + sprintf(dis_op, "bc1f\t%s", branch2label(getOFFSET(word) + (pc | 0x80000000) + 4)); +} + +void BC1T(unsigned long word) +{ + sprintf(dis_op, "bc1t\t%s", branch2label(getOFFSET(word) + (pc | 0x80000000) + 4)); +} + +void BC1FL(unsigned long word) +{ + sprintf(dis_op, "bc1fl\t%s", branch2label(getOFFSET(word) + (pc | 0x80000000) + 4)); +} + +void BC1TL(unsigned long word) +{ + sprintf(dis_op, "bc1tl\t%s", branch2label(getOFFSET(word) + (pc | 0x80000000) + 4)); +} + +Handler BC_T[4] = {BC1F, BC1T, BC1FL, BC1TL}; + +//COP1 op types + +void MFC1(unsigned long word) +{ //00 (00) + sprintf(dis_op, "mfc1\t%s, %s", gpr_rn[getRT(word)], fpr_rn[getFD(word)]); +} + +void DMFC1(unsigned long word) +{ //01 (01) + sprintf(dis_op, "dmfc1\t%s, %s", gpr_rn[getRT(word)], fpr_rn[getFD(word)]); +} + +void CFC1(unsigned long word) +{ //02 (02) + sprintf(dis_op, "cfc1\t%s, %s", gpr_rn[getRT(word)], fpr_rn[getFD(word)]); +} + +void MTC1(unsigned long word) +{ //04 (04) + float * value = &gpr_regs[getRT(word)]; + sprintf(dis_op, "mtc1\t%s, %s\t\t\t/* %s = %f */", gpr_rn[getRT(word)], fpr_rn[getFD(word)], fpr_rn[getFD(word)], *value ); +} + +void DMTC1(unsigned long word) +{ //05 (05) + sprintf(dis_op, "dmtc1\t%s, %s", gpr_rn[getRT(word)], fpr_rn[getFD(word)]); +} + +void CTC1(unsigned long word) +{ //06 (06) + sprintf(dis_op, "ctc1\t%s, %s", gpr_rn[getRT(word)], fpr_rn[getFD(word)]); +} + +void BC(unsigned long word) +{ //08 (08) + BC_T[(word >> 16) & 3](word); +} + +void S(unsigned long word) +{ //16 (10) + S_T[word & 63](word); +} + +void D(unsigned long word) +{ //17 (11) + D_T[word & 63](word); +} + +void W(unsigned long word) +{ //20 (14) + if (!(word & 0x1E)) + { + if (word & 1) + CVT_D_W(word); + else + CVT_S_W(word); + } + else + COP1_NONE(word); +} + +void L(unsigned long word) +{ //21 (15) + if (!(word & 0x1E)) + { + if (word & 1) + CVT_D_L(word); + else + CVT_S_L(word); + } + else + COP1_NONE(word); +} + +Handler COP1_T[32] = { +MFC1, DMFC1, CFC1, COP1_NONE, MTC1, DMTC1, CTC1, COP1_NONE, +BC, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, +S, D, COP1_NONE, COP1_NONE, W, L, COP1_NONE, COP1_NONE, +COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE, COP1_NONE +}; + +/* + cop0 + MIPS R3400i Co-processor 0 (Status processor) +*/ + +/* TLB op types */ + + +void TLBR(unsigned long word) +{ + sprintf(dis_op, "tlbr"); +} + +void TLBWI(unsigned long word) +{ + sprintf(dis_op, "tlbwi"); +} + +void TLBWR(unsigned long word) +{ + sprintf(dis_op, "tlbwr"); +} + +void TLBP(unsigned long word) +{ + sprintf(dis_op, "tlbp"); +} + +void ERET(unsigned long word) +{ + sprintf(dis_op, "eret"); +} + +Handler TLB_T[64] = { +TLB_NONE, TLBR, TLBWI, TLB_NONE, TLB_NONE, TLB_NONE, TLBWR, TLB_NONE, +TLBP, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, +TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, +ERET, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, +TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, +TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, +TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, +TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE, TLB_NONE +}; + +/* COP0 op types */ + +void MFC0(unsigned long word) +{ /* 00 */ + sprintf(dis_op, "mfc0\t%s, %s", gpr_rn[getRT(word)], cop_rn[getFS(word)]); +} + +void MTC0(unsigned long word) +{ /* 04 */ + sprintf(dis_op, "mtc0\t%s, %s", gpr_rn[getRT(word)], cop_rn[getFS(word)]); +} + +void TLB(unsigned long word) +{ + TLB_T[word & 63](word); +} + +Handler COP0_T[32] = { +MFC0, COP0_NONE, COP0_NONE, COP0_NONE, MTC0, COP0_NONE, COP0_NONE, COP0_NONE, +NONE, COP0_NONE, COP0_NONE, COP0_NONE, COP0_NONE, COP0_NONE, COP0_NONE, COP0_NONE, +TLB, COP0_NONE, COP0_NONE, COP0_NONE, COP0_NONE, COP0_NONE, COP0_NONE, COP0_NONE, +NONE, COP0_NONE, COP0_NONE, COP0_NONE, COP0_NONE, COP0_NONE, COP0_NONE, COP0_NONE +}; + +/* + mips + Main Processor +*/ + +// REGIMM op types +void BLTZ(unsigned long word) +{ + sprintf(dis_op, "bltz\t%s, %s", gpr_rn[getRS(word)], branch2label(getOFFSET(word) + (pc | 0x80000000) + 4)); +} + +void BGEZ(unsigned long word) +{ + sprintf(dis_op, "bgez\t%s, %s", gpr_rn[getRS(word)], branch2label(getOFFSET(word) + (pc | 0x80000000) + 4)); +} + +void BLTZL(unsigned long word) +{ + sprintf(dis_op, "bltzl\t%s, %s", gpr_rn[getRS(word)], branch2label(getOFFSET(word) + (pc | 0x80000000) + 4)); +} + +void BGEZL(unsigned long word) +{ + sprintf(dis_op, "bgezl\t%s, %s", gpr_rn[getRS(word)], branch2label(getOFFSET(word) + (pc | 0x80000000) + 4)); +} + +void TGEI(unsigned long word) +{ + sprintf(dis_op, "tgei\t%s, 0x%08X", gpr_rn[getRS(word)], getIMM(word)); +} + +void TGEIU(unsigned long word) +{ + sprintf(dis_op, "tgeiu\t%s 0x%08X", gpr_rn[getRS(word)], getIMM(word)); +} + +void TLTI(unsigned long word) +{ + sprintf(dis_op, "tlti\t%s, 0x%08X", gpr_rn[getRS(word)], getIMM(word)); +} + +void TLTIU(unsigned long word) +{ + sprintf(dis_op, "tltiu\t%s, 0x%08X", gpr_rn[getRS(word)], getIMM(word)); +} + +void TEQI(unsigned long word) +{ + sprintf(dis_op, "tqei\t%s, 0x%08X", gpr_rn[getRS(word)], getIMM(word)); +} + +void TNEI(unsigned long word) +{ + sprintf(dis_op, "tnei\t%s, 0x%08X", gpr_rn[getRS(word)], getIMM(word)); +} + +void BLTZAL(unsigned long word) +{ + sprintf(dis_op, "bltzal\t%s, %s", gpr_rn[getRS(word)], branch2label(getOFFSET(word) + (pc | 0x80000000) + 4)); +} + +void BGEZAL(unsigned long word) +{ + sprintf(dis_op, "bgezal\t%s, %s", gpr_rn[getRS(word)], branch2label(getOFFSET(word) + (pc | 0x80000000) + 4)); +} + +void BLTZALL(unsigned long word) +{ + sprintf(dis_op, "bltzall\t%s, %s", gpr_rn[getRS(word)], branch2label(getOFFSET(word) + (pc | 0x80000000) + 4)); +} + +void BGEZALL(unsigned long word) +{ + sprintf(dis_op, "bgezall\t%s, %s", gpr_rn[getRS(word)], branch2label(getOFFSET(word) + (pc | 0x80000000) + 4)); +} + +Handler REGIMM_T[32] = { +BLTZ, BGEZ, BLTZL, BGEZL, NONE, NONE, NONE, NONE, +TGEI, TGEIU, TLTI, TLTIU, TEQI, NONE, TNEI, NONE, +BLTZAL,BGEZAL, BLTZALL,BGEZALL,NONE, NONE, NONE, NONE, +NONE, NONE, NONE, NONE, NONE, NONE, NONE, NONE +}; + +//SPECIAL op types +void SLL(unsigned long word) +{ //00 (00) + if (word) + sprintf(dis_op, "sll\t%s, %s, %02X", gpr_rn[getRD(word)], gpr_rn[getRT(word)], getSA(word) ); + else + sprintf(dis_op, "nop"); +} +void SRL(unsigned long word) +{ //02 (02) + sprintf(dis_op, "srl\t%s, %s, %02X", gpr_rn[getRD(word)],gpr_rn[getRT(word)],getSA(word)); +} + +void SRA(unsigned long word) +{ //03 (03) + sprintf(dis_op, "sra\t%s, %s, %02X", gpr_rn[getRD(word)],gpr_rn[getRT(word)],getSA(word)); +} + +void SLLV(unsigned long word) +{ //04 (04) + sprintf(dis_op, "sllv\t%s, %s, %s", gpr_rn[getRD(word)],gpr_rn[getRT(word)],gpr_rn[getRS(word)]); +} + +void SRLV(unsigned long word) +{ //06 (06) + sprintf(dis_op, "srlv\t%s, %s, %s", gpr_rn[getRD(word)],gpr_rn[getRT(word)],gpr_rn[getRS(word)]); +} + +void SRAV(unsigned long word) +{ //07 (07) + sprintf(dis_op, "srav\t%s, %s, %s", gpr_rn[getRD(word)],gpr_rn[getRT(word)],gpr_rn[getRS(word)]); +} + +void JR(unsigned long word) +{ //08 (08) + sprintf(dis_op, "jr\t%s", gpr_rn[getRS(word)]); + if (getRS(word) == 31) + EndOfFunction=pc+4; +} + +void JALR(unsigned long word) +{ //09 (09) + sprintf(dis_op, "jalr\t%s, %s", gpr_rn[getRS(word)],gpr_rn[getRD(word)]); + jaltaken=2; +} + +void SYSCALL(unsigned long word) +{ //12 (0C) + sprintf(dis_op, "syscall\t0x%04X", getIMM(word)); +} + +void BREAK(unsigned long word) +{ //13 (0D) + sprintf(dis_op, "break\t0x%04X", getIMM(word)); +} + +void SYNC(unsigned long word) +{ //15 (0F) + sprintf(dis_op, "sync"); +} + +void MFHI(unsigned long word) +{ //16 (10) + sprintf(dis_op, "mfhi\t%s", gpr_rn[getRD(word)]); +} + +void MTHI(unsigned long word) +{ //17 (11) + sprintf(dis_op, "mthi\t%s", gpr_rn[getRD(word)]); +} + +void MFLO(unsigned long word) +{ //18 (12) + sprintf(dis_op, "mflo\t%s", gpr_rn[getRD(word)]); +} + +void MTLO(unsigned long word) +{ //19 (13) + sprintf(dis_op, "mtlo\t%s", gpr_rn[getRD(word)]); +} + +void DSLLV(unsigned long word) +{ //20 (14) + sprintf(dis_op, "dsllv\t%s, %s, %s", gpr_rn[getRD(word)],gpr_rn[getRT(word)],gpr_rn[getRS(word)]); +} + +void DSRLV(unsigned long word) +{ //22 (16) + sprintf(dis_op, "dsrlv\t%s, %s, %s", gpr_rn[getRD(word)],gpr_rn[getRT(word)],gpr_rn[getRS(word)]); +} + +void DSRAV(unsigned long word) +{ //23 (17) + sprintf(dis_op, "dsrav\t%s, %s, %s", gpr_rn[getRD(word)],gpr_rn[getRT(word)],gpr_rn[getRS(word)]); +} + +void MULT(unsigned long word) +{ //24 (18) + sprintf(dis_op, "mult\t%s, %s", gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void MULTU(unsigned long word) +{ //25 (19) + sprintf(dis_op, "multu\t%s, %s", gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void DIV(unsigned long word) +{ //26 (1A) + sprintf(dis_op, "div\t%s, %s", gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void DIVU(unsigned long word) +{ //27 (1B) + sprintf(dis_op, "divu\t%s, %s", gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void DMULT(unsigned long word) +{ //28 (1C) + sprintf(dis_op, "dmult\t%s, %s", gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void DMULTU(unsigned long word) +{ //29 (1D) + sprintf(dis_op, "dmultu\t%s, %s", gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void DDIV(unsigned long word) +{ //30 (1E) + sprintf(dis_op, "ddiv\t%s, %s", gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void DDIVU(unsigned long word) +{ //31 (1F) + sprintf(dis_op, "ddivu\t%s, %s", gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void ADD(unsigned long word) +{ //32 (20) + sprintf(dis_op, "add\t%s, %s, %s", gpr_rn[getRD(word)],gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void ADDU(unsigned long word) +{ //33 (21) + sprintf(dis_op, "addu\t%s, %s, %s", gpr_rn[getRD(word)],gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void SUB(unsigned long word) +{ //34 (22) + sprintf(dis_op, "sub\t%s, %s, %s", gpr_rn[getRD(word)],gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void SUBU(unsigned long word) +{ //35 (23) + sprintf(dis_op, "subu\t%s, %s, %s", gpr_rn[getRD(word)],gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void AND(unsigned long word) +{ //36 (24) + sprintf(dis_op, "and\t%s, %s, %s", gpr_rn[getRD(word)],gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void OR(unsigned long word) +{ //37 (25) + gpr_regs[getRD(word)]=gpr_regs[getRS(word)] | gpr_regs[getRT(word)]; + sprintf(dis_op, "or\t%s, %s, %s\t\t/*%s = %08X*/", gpr_rn[getRD(word)],gpr_rn[getRS(word)],gpr_rn[getRT(word)], gpr_rn[getRD(word)],gpr_regs[getRD(word)]); + +} + +void XOR(unsigned long word) +{ //38 (26) + sprintf(dis_op, "xor\t%s, %s, %s", gpr_rn[getRD(word)],gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void NOR(unsigned long word) +{ //39 (27) + sprintf(dis_op, "nor\t%s, %s, %s", gpr_rn[getRD(word)],gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void SLT(unsigned long word) +{ //42 (2A) + sprintf(dis_op, "slt\t%s, %s, %s", gpr_rn[getRD(word)],gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void SLTU(unsigned long word) +{ //43 (2B) + sprintf(dis_op, "sltu\t%s, %s, %s", gpr_rn[getRD(word)],gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void DADD(unsigned long word) +{ //44 (2C) + sprintf(dis_op, "dadd\t%s, %s, %s", gpr_rn[getRD(word)],gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void DADDU(unsigned long word) +{ //45 (2D) + sprintf(dis_op, "daddu\t%s, %s, %s", gpr_rn[getRD(word)],gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void DSUB(unsigned long word) +{ //46 (2E) + sprintf(dis_op, "dsub\t%s, %s, %s", gpr_rn[getRD(word)],gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void DSUBU(unsigned long word) +{ //47 (2F) + sprintf(dis_op, "dsubu\t%s, %s, %s", gpr_rn[getRD(word)],gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void TGE(unsigned long word) +{ //48 (30) + sprintf(dis_op, "tge\t%s, %s", gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void TGEU(unsigned long word) +{ //49 (31) + sprintf(dis_op, "tgeu\t%s, %s", gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void TLT(unsigned long word) +{ //50 (32) + sprintf(dis_op, "tlt\t%s, %s", gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void TLTU(unsigned long word) +{ //51 (33) + sprintf(dis_op, "tltu\t%s, %s", gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void TEQ(unsigned long word) +{ //52 (34) + sprintf(dis_op, "teq\t%s, %s", gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void TNE(unsigned long word) +{ //54 (36) + sprintf(dis_op, "tne\t%s, %s", gpr_rn[getRS(word)],gpr_rn[getRT(word)]); +} + +void DSLL(unsigned long word) +{ //56 (38) + sprintf(dis_op, "dsll\t%s, %s, %02X", gpr_rn[getRD(word)],gpr_rn[getRT(word)],getSA(word)); +} + +void DSRL(unsigned long word) +{ //58 (3A) + sprintf(dis_op, "dsrl\t%s, %s, %02X", gpr_rn[getRD(word)],gpr_rn[getRT(word)],getSA(word)); +} + +void DSRA(unsigned long word) +{ //59 (3B) + sprintf(dis_op, "dsra\t%s, %s, %02X", gpr_rn[getRD(word)],gpr_rn[getRT(word)],getSA(word)); +} + +void DSLL32(unsigned long word) +{ //60 (3C) + sprintf(dis_op, "dsll32\t%s, %s, %02X", gpr_rn[getRD(word)],gpr_rn[getRT(word)],getSA(word)); +} + +void DSRL32(unsigned long word) +{ //62 (3E) + sprintf(dis_op, "dsrl32\t%s, %s, %02X", gpr_rn[getRD(word)],gpr_rn[getRT(word)],getSA(word)); +} + +void DSRA32(unsigned long word) +{ //63 (3F) + sprintf(dis_op, "dsra32\t%s, %s, %02X", gpr_rn[getRD(word)],gpr_rn[getRT(word)],getSA(word)); +}; +Handler SPECIAL_T[64] = { +SLL, NONE, SRL, SRA, SLLV, NONE, SRLV, SRAV, +JR, JALR, NONE, NONE, SYSCALL,BREAK, NONE, SYNC, +MFHI, MTHI, MFLO, MTLO, DSLLV, NONE, DSRLV, DSRAV, +MULT, MULTU, DIV, DIVU, DMULT, DMULTU, DDIV, DDIVU, +ADD, ADDU, SUB, SUBU, AND, OR, XOR, NOR, +NONE, NONE, SLT, SLTU, DADD, DADDU, DSUB, DSUBU, +TGE, TGEU, TLT, TLTU, TEQ, NONE, TNE, NONE, +DSLL, NONE, DSRL, DSRA, DSLL32, NONE, DSRL32, DSRA32 +}; + +//Main op types +void SPECIAL(unsigned long word) +{ //00(00) + SPECIAL_T[word & 63](word); +} + +void REGIMM(unsigned long word) +{ //01(01) + REGIMM_T[getRT(word)](word); +} + +void J(unsigned long word) +{ //02(02) + sprintf(dis_op, "j\t0x0%08X", 0x80000000 | getTARGET(word)); +} + +void JAL(unsigned long word) +{ //03(03) + int target = getTARGET(word); + int functionno = target2label(target); + if(functionno >= 0) + { + sprintf(dis_op, "jal\t%s", functions[functionno].name); + } + else + sprintf(dis_op, "jal\t0x%08X", target|0x80000000); + + jaltaken=2; +} + +void BEQ(unsigned long word) +{ //04(04) + sprintf(dis_op, "beq\t%s, %s, %s", gpr_rn[getRS(word)], gpr_rn[getRT(word)], branch2label(getOFFSET(word) + (pc | 0x80000000) + 4) ); +} + +void BNE(unsigned long word) +{ //05(05) + sprintf(dis_op, "bne\t%s, %s, %s", gpr_rn[getRS(word)], gpr_rn[getRT(word)], branch2label(getOFFSET(word) + (pc | 0x80000000) + 4) ); +} + +void BLEZ(unsigned long word) +{ //06(06) + sprintf(dis_op, "blez\t%s, %s", gpr_rn[getRS(word)], branch2label(getOFFSET(word) + (pc | 0x80000000) + 4)); +} + +void BGTZ(unsigned long word) +{ //07(07) + sprintf(dis_op, "bgtz\t%s, %s", gpr_rn[getRS(word)], branch2label(getOFFSET(word) + (pc | 0x80000000) + 4)); +} + +void ADDI(unsigned long word) +{ //08(08) + gpr_regs[getRT(word)] = gpr_regs[getRS(word)] + getSIMM(word); + sprintf(dis_op, "addi\t%s, %s, 0x%04X\t\t/*%s = %08X*/", gpr_rn[getRT(word)], gpr_rn[getRS(word)], getIMM(word), gpr_rn[getRT(word)], gpr_regs[getRT(word)]); +} + +void ADDIU(unsigned long word) +{ //09(09) + gpr_regs[getRT(word)] = gpr_regs[getRS(word)] + getSIMM(word); + sprintf(dis_op, "addiu\t%s, %s, 0x%04X\t\t/*%s = %08X*/", gpr_rn[getRT(word)], gpr_rn[getRS(word)], getIMM(word), gpr_rn[getRT(word)], gpr_regs[getRT(word)]); +} + +void SLTI(unsigned long word) +{ //10(0A) + sprintf(dis_op, "slti\t%s, %s, 0x%04X", gpr_rn[getRT(word)], gpr_rn[getRS(word)], getIMM(word)); +} + +void SLTIU(unsigned long word) +{ //11(0B) + sprintf(dis_op, "sltiu\t%s, %s, 0x%04X", gpr_rn[getRT(word)], gpr_rn[getRS(word)], getIMM(word)); +} + +void ANDI(unsigned long word) +{ //12(0C) + gpr_regs[getRT(word)] = gpr_regs[getRS(word)] & getIMM(word); + sprintf(dis_op, "andi\t%s, %s, 0x%04X\t\t/*%s = %08X*/", gpr_rn[getRT(word)], gpr_rn[getRS(word)], getIMM(word), gpr_rn[getRT(word)], gpr_regs[getRT(word)]); +} + +void ORI(unsigned long word) +{ //13(0D) + gpr_regs[getRT(word)] = gpr_regs[getRS(word)] | getIMM(word); + sprintf(dis_op, "ori\t%s, %s, 0x%04X\t\t/*%s = %08X*/", gpr_rn[getRT(word)], gpr_rn[getRS(word)], getIMM(word), gpr_rn[getRT(word)], gpr_regs[getRT(word)]); +} + +void XORI(unsigned long word) +{ //14(0E) + gpr_regs[getRT(word)] = gpr_regs[getRS(word)] ^ getIMM(word); + sprintf(dis_op, "xori\t%s, %s, 0x%04X\t\t/*%s = %08X*/", gpr_rn[getRT(word)], gpr_rn[getRS(word)], getIMM(word), gpr_rn[getRT(word)], gpr_regs[getRT(word)]); +} + +void LUI(unsigned long word) +{ //15(0F) + gpr_regs[getRT(word)] = getIMM(word)<<16; + sprintf(dis_op, "lui\t%s, 0x%04X\t\t/*%s = %08X*/", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getRT(word)], gpr_regs[getRT(word)]); +} + +void COP0(unsigned long word) +{ //16(10) + COP0_T[getRS(word)](word); +} + +void COP1(unsigned long word) +{ //17(11) + COP1_T[getRS(word)](word); +} + +void BEQL(unsigned long word) +{ //20(14) + sprintf(dis_op, "beql\t%s, %s, %s", gpr_rn[getRS(word)], gpr_rn[getRT(word)], branch2label(getOFFSET(word) + (pc | 0x80000000) + 4)); +} + +void BNEL(unsigned long word) +{ //21(15) + sprintf(dis_op, "bnel\t%s, %s, %s", gpr_rn[getRS(word)], gpr_rn[getRT(word)], branch2label(getOFFSET(word) + (pc | 0x80000000) + 4)); +} + +void BLEZL(unsigned long word) +{ //22(16) + sprintf(dis_op, "blezl\t%s, %s", gpr_rn[getRS(word)], branch2label(getOFFSET(word) + (pc | 0x80000000) + 4)); +} + +void BGTZL(unsigned long word) +{ //23(17) + sprintf(dis_op, "bgtzl\t%s, %s", gpr_rn[getRS(word)], branch2label(getOFFSET(word) + (pc | 0x80000000) + 4)); +} + +void DADDI(unsigned long word) +{ //24(18) + sprintf(dis_op, "daddi\t%s, %s, 0x%04X", gpr_rn[getRT(word)], gpr_rn[getRS(word)], getIMM(word)); +} + +void DADDIU(unsigned long word) +{ //25(19) + sprintf(dis_op, "daddiu\t%s, %s, 0x%04X", gpr_rn[getRT(word)], gpr_rn[getRS(word)], getIMM(word)); +} + +void LDL(unsigned long word) +{ //26(1A) + sprintf(dis_op, "ldl\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void LDR(unsigned long word) +{ //27(1B) + sprintf(dis_op, "ldr\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void LB(unsigned long word) +{ //32(20) + //gpr_regs[getRT(word)] = memory.sbyte[getIMM(word)+gpr_regs[getBASE(word)]]; + sprintf(dis_op, "lb\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void LH(unsigned long word) +{ //33(21) + //gpr_regs[getRT(word)] = memory.shalf[(getIMM(word)+gpr_regs[getBASE(word)])>>1]; + sprintf(dis_op, "lh\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void LWL(unsigned long word) +{ //34(22) + sprintf(dis_op, "lwl\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void LW(unsigned long word) +{ //35(23) + //gpr_regs[getRT(word)] = memory.sword[(getIMM(word)+gpr_regs[getBASE(word)])>>2]; + sprintf(dis_op, "lw\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void LBU(unsigned long word) +{ //36(24) + //gpr_regs[getRT(word)] = memory.ubyte[getIMM(word)+gpr_regs[getBASE(word)]]; + sprintf(dis_op, "lbu\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void LHU(unsigned long word) +{ //37(25) + //gpr_regs[getRT(word)] = memory.uhalf[(getIMM(word)+gpr_regs[getBASE(word)])>>1]; + sprintf(dis_op, "lhu\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void LWR(unsigned long word) +{ //38(26) + sprintf(dis_op, "lwr\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void LWU(unsigned long word) +{ //39(27) + //gpr_regs[getRT(word)] = memory.uword[(getIMM(word)+gpr_regs[getBASE(word)])>>2]; + sprintf(dis_op, "lwu\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void SB(unsigned long word) +{ //40(28) + //memory.sbyte[getIMM(word)+gpr_regs[getBASE(word)]] = gpr_regs[getRT(word)]; + sprintf(dis_op, "sb\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void SH(unsigned long word) +{ //41(29) + //memory.shalf[(getIMM(word)+gpr_regs[getBASE(word)])>>2] = gpr_regs[getRT(word)]; + sprintf(dis_op, "sh\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void SWL(unsigned long word) +{ //42(2A) + sprintf(dis_op, "swl\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void SW(unsigned long word) +{ //43(2B) + sprintf(dis_op, "sw\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void SDL(unsigned long word) +{ //44(2C) + sprintf(dis_op, "sdl\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void SDR(unsigned long word) +{ //45(2D) + sprintf(dis_op, "sdr\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void SWR(unsigned long word) +{ //46(2E) + sprintf(dis_op, "swr\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void CACHE(unsigned long word) +{ //47(2F) + sprintf(dis_op, "cache\t0x%02X, 0x%04X(%s)", getRT(word), getIMM(word), gpr_rn[getBASE(word)]); +} + +void LL(unsigned long word) +{ //48(30) + sprintf(dis_op, "ll\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void LWC1(unsigned long word) +{ //49(31) + sprintf(dis_op, "lwc1\t%s, 0x%04X(%s)", fpr_rn[getFS(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void LLD(unsigned long word) +{ //52(34) + sprintf(dis_op, "lld\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void LDC1(unsigned long word) +{ //53(35) + sprintf(dis_op, "ldc1\t%s, 0x%04X(%s)", gpr_rn[getFT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void LDC2(unsigned long word) +{ //54(36) + sprintf(dis_op, "ldc2\t%s, 0x%04X(%s)", gpr_rn[getFT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void LD(unsigned long word) +{ //55(37) + sprintf(dis_op, "ld\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void SC(unsigned long word) +{ //56(38) + sprintf(dis_op, "sc\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void SWC1(unsigned long word) +{ //57(39) + sprintf(dis_op, "swc1\t%s, 0x%04X(%s)", gpr_rn[getFT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void SCD(unsigned long word) +{ //60(3C) + sprintf(dis_op, "sdc\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void SDC1(unsigned long word) +{ //61(3D) + sprintf(dis_op, "sdc1\t%s, 0x%04X(%s)", gpr_rn[getFT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void SDC2(unsigned long word) +{ //62(3E) + sprintf(dis_op, "sdc2\t%s, 0x%04X(%s)", gpr_rn[getFT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +void SD(unsigned long word) +{ //63(3F) + sprintf(dis_op, "sd\t%s, 0x%04X(%s)", gpr_rn[getRT(word)], getIMM(word), gpr_rn[getBASE(word)]); +} + +Handler MAIN_T[64] = { +SPECIAL,REGIMM,J, JAL, BEQ, BNE, BLEZ, BGTZ, +ADDI, ADDIU, SLTI, SLTIU, ANDI, ORI, XORI, LUI, +COP0, COP1, NONE, NONE, BEQL, BNEL, BLEZL, BGTZL, +DADDI, DADDIU, LDL, LDR, NONE, NONE, NONE, NONE, +LB, LH, LWL, LW, LBU, LHU, LWR, LWU, +SB, SH, SWL, SW, SDL, SDR, SWR, CACHE, +LL, LWC1, NONE, NONE, LLD, LDC1, LDC2, LD, +SC, SWC1, NONE, NONE, SCD, SDC1, SDC2, SD +}; + +char * getOP(unsigned long int word) +{ + MAIN_T[ word >> 26 ](word); + return dis_op; +} + +/* prototype: + adis o stalfo.s 2 ZELOOTMA.z64 +*/ + +int main(int argc, char * argv[]) +{ + int wordc=0; + int i; + char * buff; + int argcp=1; + int arge=argc-2; + char * outname; + FILE * outputf; + FILE * ROM; + int targetnum; + + int ATABLE_START= OOT_DEBUG_ATABLE_START; + int NAMETABLE_ADD = 0xA771A0; + int output=0; + html = 0; + int little_endian = 0; + int anum; + int text_size, data_size, rodata_size, bss_size, rel_count; + + /* Well gee I hope they gave enough arguments */ + if(argc < 3) + { + printf("invalid usage\n"); + return EXIT_FAILURE; + } + + /* Actor number*/ + sscanf(argv[arge], "%i", &anum); + + /* Parse options */ + while (argcp < arge) + { + if(!strcmp(argv[argcp],"o")) /* output */ + { + argcp++; + output=1; + outname = argv[argcp]; + } + else if(!strcmp(argv[argcp],"f")) /* format to html */ + html=1; + else if(!strcmp(argv[argcp],"at")){ /* set actor table offset */ + argcp++; + sscanf(argv[argcp],"%x", &ATABLE_START); + argcp++; + sscanf(argv[argcp],"%x", &NAMETABLE_ADD); + } + else + printf("Unknown/unhandled argument: %s\n", argv[argcp]); + argcp++; + } + + //printf("Output: %s\n", outname); + if (output) + outputf=fopen(outname, "w"); + else + outputf=stdout; + + ROM = fopen(argv[arge+1],"rb"); + if (!ROM) + { + printf("Error opening file `%s`\n",argv[arge]); + return EXIT_FAILURE; + } + /* Read ROM */ + fseek(ROM, 0, SEEK_END); + int fend = ftell(ROM); + rewind(ROM); + buff=(char*)malloc(fend); + fread(buff, 1, fend, ROM); + fclose(ROM); + + /* Interpret ROM */ + actorCodeEntry (*actors)[470] = (void*)(ATABLE_START + buff); + + int actorsize = (flip32((*actors)[anum].rom_end) - flip32((*actors)[anum].rom_start)); + char * actor = (char*)(flip32((*actors)[anum].rom_start) + buff); + unsigned long *header_inset = (void*)(actor + actorsize - 4); + local_start = flip32((*actors)[anum].virtual_start); + local_end = flip32((*actors)[anum].virtual_end); + char * aname = (char*) ( (flip32((*actors)[anum].name)&0xFFFFFF) + NAMETABLE_ADD + buff ); + + actorHeader *actorHeader = (void*)(actor + actorsize - flip32(*header_inset)); + actorInformation *actorInfo = (void*)(actor + (flip32((*actors)[anum].virtual_ainfo) - local_start)); + + text_size = flip32(actorHeader->text_size); + data_size = flip32(actorHeader->data_size); + rodata_size = flip32(actorHeader->rodata_size); + bss_size = flip32(actorHeader->bss_size); + rel_count = flip32(actorHeader->rel_count); + + unsigned long (*words)[] = (void*)actor; + if (html) + fprintf(outputf, "\n \n %s Notes\n \n \n
\n#include <mips.h>", aname);
+    else
+        fprintf(outputf, "#include ");
+    fprintf(outputf, "\n\n/*\n INFO:\n Actor %i \"%s\"\n ROM offsets 0x%08X-0x%08X\n Virtual offsets: 0x%08X-0x%08X\n .text size: 0x%08X\n .data size: 0x%08X\n .rodata size: 0x%08X\n .bss size: 0x%08X\n Initial register values used in comments:\n  a0: 0x%08X\n  a1: 0x%08X\n  sp: 0x%08X\n Others: 0\n \n Type: %s (%02X)\n Object: %04X\n\n generated by %s\n*/\n\n\n",
+        anum,
+        aname,
+        flip32((*actors)[anum].rom_start),
+        flip32((*actors)[anum].rom_end),
+        local_start,
+        local_end,
+        text_size,
+        data_size,
+        rodata_size,
+        bss_size,
+        gpr_regs[4],
+        gpr_regs[5],
+        gpr_regs[29],
+        actTypes[actorInfo->type],
+        actorInfo->type,
+        flip16(actorInfo->object_number),
+        argv[0]
+    );
+    
+    map_branches = 1;
+    int function_count=0;
+    pc=local_start;
+    /* Read relocations - TODO */
+    char tmp [32];
+    sprintf(tmp, "%s_Init", aname);
+    add_function(flip32(actorInfo->init_func), tmp);
+    if(actorInfo->draw_func){
+        sprintf(tmp, "%s_Draw", aname);
+        add_function(flip32(actorInfo->draw_func), tmp);
+    }
+    sprintf(tmp, "%s_Exec", aname);
+    if(actorInfo->code_func){
+        add_function(flip32(actorInfo->code_func), tmp);
+        sprintf(tmp, "%s_Other", aname);
+    }
+    if(actorInfo->unknown_func){
+        add_function(flip32(actorInfo->unknown_func), tmp);
+        sprintf(tmp, "%s_Func_0", aname);
+    }
+    add_function(pc, tmp);
+    function_count=1;
+    
+    mapped_functions = malloc(256);
+    //memset(mapped_functions, 0x0, 256);
+    
+    /* First scan - just to map out branches/jumps */
+    for (i=0; i<(text_size >> 2); i++)
+    {
+        if (pc == EndOfFunction+4)
+        {
+            getOP( flip32((*words)[i]) );
+            if((*words)[i])
+            {
+                sprintf(tmp, "%s_Func_%i", aname, function_count);
+                if(add_function(pc, &tmp[0]))function_count++;
+                reset_gpr_regs();
+            }
+            else
+                EndOfFunction+=4;
+        }
+        getOP( flip32((*words)[i]));
+        pc+=4;
+    }
+    pc = local_start;
+    map_branches = 0;
+    reset_gpr_regs();
+    
+    //FILE * conf = fopen("conf.ld", "w");
+    fprintf(outputf, "\n\n/*\n");
+    for (i=0; i%s:\t/* %08X */\n\n", currFuncName, currFuncName, currFuncName, pc);
+    else
+        fprintf(outputf, "%s:\t/* %08X */\n\n", currFuncName, pc);
+    function_count=1;
+    
+    /* Second scan - fprintf()s */
+    for (i=0; i<(text_size >> 2); i++)
+    {
+        
+        map_branches = 0;
+        if (pc == EndOfFunction+4)
+        {
+            if((*words)[i])
+            {
+                int functionno = target2label(pc);
+                if(functionno >= 0)
+                    sprintf(currFuncName, "%s", functions[functionno].name);
+                else
+                    sprintf(currFuncName, "function_%08X", pc|0x80000000);
+                
+                fprintf(outputf, "\t.set\tnoreorder\n\t.set\tnoat\n\t.global\t%s\n\t.ent\t%s\n\n",currFuncName, currFuncName);
+                if (html)
+                    fprintf(outputf, "%s:\t/* %08X */\n\n", currFuncName, currFuncName, currFuncName, pc);
+                else
+                    fprintf(outputf, "%s:\t/* %08X */\n\n", currFuncName, pc);
+                function_count++;
+                reset_gpr_regs();
+                EndOfFunction = -1;
+            }
+            else
+                EndOfFunction+=4;
+        }
+        
+        fprintf(outputf, "\t%s\n", getOP( flip32((*words)[i]) ));
+        gpr_regs[0] = 0;	/* Just in case anything tries to change $zero */
+        if (pc == EndOfFunction && !(mapped_functions[function_count]))
+        {
+            mapped_functions[function_count] = 1;
+            fprintf(outputf, "\n\t.end\t%s\n\t.set\tat\n\t.set\tnoreorder\n\n    /* #~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~# */\n\n",currFuncName);
+            
+        }
+        if (jaltaken)
+        {
+            jaltaken--;
+            if (!jaltaken)
+                reset_gpr_regs_soft();
+        }
+        
+        pc+=4;
+        
+        targetnum=isTarget(pc+4);
+        if (targetnum>0)
+            if (html)
+                fprintf(outputf, "$lbl_%i:\n", targetnum, targetnum, targetnum);
+            else
+                fprintf(outputf, "$lbl_%i:\n", targetnum);
+    }
+    local_start = flip32((*actors)[anum].virtual_start);
+    
+    fprintf(outputf, "\n/* TODO: */\n\n\n\t.data\n\n\t/*\n\tAddr: %08X\n\t\n\t",local_start+text_size);
+    int j;
+    for (i=text_size; i>2]));
+        fprintf(outputf, "\n\t");
+    }
+    fprintf(outputf, "\n\t*/\n\n\t.rodata\n\n\t/*\n\tAddr: %08X\n\t\n\t",local_start+text_size+rodata_size);
+    
+    for (; i>2]));
+        fprintf(outputf, "\n\t");
+    }
+    fprintf(outputf, "\n\t*/\n");
+    if (html)
+        fprintf(outputf, "  
\n \n"); + fclose(outputf); + free(buff); + + return EXIT_SUCCESS; +} diff --git a/adis.h b/adis.h new file mode 100755 index 0000000..7990b8d --- /dev/null +++ b/adis.h @@ -0,0 +1,54 @@ +/* + sinep +*/ + +#define OOT_DEBUG_ATABLE_START 0x00B8D440 + +typedef char u8; +typedef unsigned short u16; +typedef unsigned u32; +typedef signed char s8; +typedef signed short s16; +typedef signed s32; +typedef float f32; + +typedef struct { + unsigned text_size; + unsigned data_size; + unsigned rodata_size; + unsigned bss_size; + unsigned rel_count; +} actorHeader; + +typedef struct { + unsigned rom_start; + unsigned rom_end; + unsigned virtual_start; + unsigned virtual_end; + unsigned unknown_0; + unsigned virtual_ainfo; + unsigned name; + unsigned unknown_1; +} actorCodeEntry; + +typedef struct { + unsigned short number; + unsigned char type; + unsigned char status; + unsigned long unknown_0; + unsigned short object_number; + unsigned short unknown_1; + unsigned long unknown_2; + unsigned long init_func; + unsigned long code_func; + unsigned long draw_func; + unsigned long unknown_func; +} actorInformation; + +typedef struct { + unsigned addr; + char * name; +} function; + + + diff --git a/r3400i.h b/r3400i.h new file mode 100755 index 0000000..de3f0bd --- /dev/null +++ b/r3400i.h @@ -0,0 +1,56 @@ +/* + r3400i.h +*/ + +typedef void (*Handler)( unsigned long int word ); + +#define getRS(word)\ + (unsigned int)(unsigned int)((word >> 21) & 31) + +#define getRT(word)\ + (unsigned int)((word >> 16) & 31) + +#define getRD(word)\ + (unsigned int)((word >> 11) & 31) + +#define getSA(word)\ + (unsigned int)((word >> 6) & 31) +/* +#define getFT(word)\ + (unsigned int)((word >> 16) & 31) + +#define getFS(word)\ + (unsigned int)((word >> 11) & 31) + +#define getFD(word)\ + (unsigned int)((word >> 6) & 31) +*/ +#define getFT(word)\ + (unsigned int)(unsigned int)((word >> 21) & 31) + +#define getFS(word)\ + (unsigned int)((word >> 16) & 31) + +#define getFD(word)\ + (unsigned int)((word >> 11) & 31) + +#define getBASE(word)\ + (unsigned int)((word >> 21) & 31) + +#define getIMM(word)\ + (unsigned short int)(word & 0xFFFF) + +#define getSIMM(word)\ + (signed short int)(word & 0xFFFF) + +#define getOFFSET(word)\ + ((signed short)(word & 0xFFFF)) * 4 + +#define getTARGET(word)\ + (unsigned int)((word & 0x3FFFFFF) << 2) + +#define flip32(word)\ + (unsigned int)(((word&0xFF000000)>>24)|((word&0x00FF0000)>>8)|((word&0x0000FF00)<<8)|((word&0x000000FF)<<24)) + +#define flip16(value)\ + (unsigned short) ((value&0xFF00)>>8) | ((value&0xFF)<<8)