1634 lines
45 KiB
C
Executable file
1634 lines
45 KiB
C
Executable file
/*
|
|
mipsdis.c
|
|
redistribute and modify at will, my name is spinout, keep it here.
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <assert.h>
|
|
#include <stdint.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)
|
|
|
|
typedef uint8_t u8;
|
|
typedef uint16_t u16;
|
|
typedef uint32_t u32;
|
|
typedef int8_t s8;
|
|
typedef int16_t s16;
|
|
typedef int32_t s32;
|
|
typedef float f32;
|
|
|
|
typedef struct {
|
|
unsigned addr;
|
|
char * name;
|
|
} function;
|
|
|
|
unsigned int pc = 0x80000000;
|
|
char *dis_op;
|
|
int map_branches;
|
|
int *branches;
|
|
int noBranches=0;
|
|
int EndOfFunction=-1;
|
|
unsigned local_start;
|
|
unsigned local_end;
|
|
int jaltaken=0;
|
|
|
|
int target_count = 0;
|
|
char *mapped_functions;
|
|
function **functions;
|
|
|
|
unsigned gpr_regs[32]={
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 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_soft(void)
|
|
{
|
|
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<target_count; i++)
|
|
{
|
|
if (functions[i]->addr == addr)
|
|
return i;
|
|
}
|
|
return -1;
|
|
}
|
|
|
|
int add_function(int addr, char * name)
|
|
{
|
|
if(target2label(addr)>=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);
|
|
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 = (float *) &gpr_regs[getRT(word)];
|
|
sprintf(dis_op, "mtc1\t%s, %s\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, %i", 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, %i", gpr_rn[getRD(word)],gpr_rn[getRT(word)],getSA(word));
|
|
}
|
|
|
|
void SRA(unsigned long word)
|
|
{ //03 (03)
|
|
sprintf(dis_op, "sra\t%s, %s, %i", 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; %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, %i", gpr_rn[getRD(word)],gpr_rn[getRT(word)],getSA(word));
|
|
}
|
|
|
|
void DSRL(unsigned long word)
|
|
{ //58 (3A)
|
|
sprintf(dis_op, "dsrl\t%s, %s, %i", gpr_rn[getRD(word)],gpr_rn[getRT(word)],getSA(word));
|
|
}
|
|
|
|
void DSRA(unsigned long word)
|
|
{ //59 (3B)
|
|
sprintf(dis_op, "dsra\t%s, %s, %i", gpr_rn[getRD(word)],gpr_rn[getRT(word)],getSA(word));
|
|
}
|
|
|
|
void DSLL32(unsigned long word)
|
|
{ //60 (3C)
|
|
sprintf(dis_op, "dsll32\t%s, %s, %i", gpr_rn[getRD(word)],gpr_rn[getRT(word)],getSA(word));
|
|
}
|
|
|
|
void DSRL32(unsigned long word)
|
|
{ //62 (3E)
|
|
sprintf(dis_op, "dsrl32\t%s, %s, %i", gpr_rn[getRD(word)],gpr_rn[getRT(word)],getSA(word));
|
|
}
|
|
|
|
void DSRA32(unsigned long word)
|
|
{ //63 (3F)
|
|
sprintf(dis_op, "dsra32\t%s, %s, %i", 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\t; %08X", functions[functionno]->name, target);
|
|
}
|
|
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; %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; %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; %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; %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; %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; %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)
|
|
{
|
|
//printf("%08X\n", (unsigned int) word);
|
|
MAIN_T[ word >> 26 ](word);
|
|
return dis_op;
|
|
}
|
|
|
|
int main(int argc, char * argv[])
|
|
{
|
|
int i;
|
|
char * buff;
|
|
FILE * ROM;
|
|
int targetnum;
|
|
|
|
#define XBOX_HUGE (1024*1024*8)
|
|
char *tmp = calloc(1, XBOX_HUGE);
|
|
dis_op = calloc(1, XBOX_HUGE);
|
|
branches = calloc(1, XBOX_HUGE);
|
|
mapped_functions = calloc(1, XBOX_HUGE);
|
|
#define FUNCTIONS (XBOX_HUGE / sizeof(function))
|
|
functions = calloc(FUNCTIONS, sizeof(function));
|
|
function *functions_data = calloc(FUNCTIONS, sizeof(function));
|
|
for (i = 0; i < FUNCTIONS; i++) {
|
|
functions[i] = functions_data;
|
|
functions_data += sizeof(function);
|
|
}
|
|
|
|
/* Well gee scooby I hope they gave enough arguments */
|
|
if(argc != 2)
|
|
{
|
|
printf("usage: %s {code file} \n", argv[0]);
|
|
return EXIT_FAILURE;
|
|
}
|
|
|
|
FILE *outputf=stdout;
|
|
|
|
ROM = fopen(argv[1],"rb");
|
|
if (!ROM)
|
|
{
|
|
printf("Error opening file `%s`\n",argv[1]);
|
|
return EXIT_FAILURE;
|
|
}
|
|
|
|
fseek(ROM, 0, SEEK_END);
|
|
int fend = ftell(ROM);
|
|
rewind(ROM);
|
|
buff=(char*)malloc(fend);
|
|
fread(buff, 1, fend, ROM);
|
|
fclose(ROM);
|
|
|
|
//#define RAM_CODE 0x8001CE60 // TODO: don't hardcode
|
|
#define RAM_CODE 0x800110A0 // TODO: don't hardcode
|
|
pc=RAM_CODE;
|
|
// int text_size = 0xF5260; // TODO: don't hardcode
|
|
int text_size = 0xD206C; // TODO: don't hardcode
|
|
//int data_size = fend - text_size;
|
|
//int rodata_size = 0; // TODO?
|
|
|
|
unsigned long (*words)[] = (void*)buff;
|
|
|
|
map_branches = 1;
|
|
int function_count=0;
|
|
sprintf(tmp, "code_Func_0");
|
|
add_function(pc, tmp);
|
|
function_count++;
|
|
|
|
/* 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, "code_Func_%i", function_count);
|
|
//puts(tmp);
|
|
if(add_function(pc, tmp))function_count++;
|
|
reset_gpr_regs_soft();
|
|
}
|
|
else
|
|
EndOfFunction+=4;
|
|
}
|
|
getOP(flip32((*words)[i]));
|
|
pc+=4;
|
|
}
|
|
pc=RAM_CODE;
|
|
map_branches = 0;
|
|
reset_gpr_regs_soft();
|
|
|
|
/*
|
|
fprintf(outputf, "/\*\n");
|
|
for (i=0; i<target_count; i++)
|
|
{
|
|
fprintf(outputf, "%s = 0x%08X;\n", functions[i]->name, functions[i]->addr);
|
|
}
|
|
fprintf(outputf, "*\/\n\n\t.text\n\t\n\t\n");
|
|
*/
|
|
|
|
char currFuncName[256];
|
|
sprintf(currFuncName, "code_Func_0");
|
|
|
|
//fprintf(outputf, "\t.set\tnoreorder\n\t.set\tnoat\n\t.global\t%s\n\t.ent\t%s\n\n", currFuncName, currFuncName);
|
|
fprintf(outputf, "\n%s:\t\t\t; %08X (%08X)\n", currFuncName, pc, pc - RAM_CODE);
|
|
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);
|
|
fprintf(outputf, "\n%s:\t\t\t; %08X (%08X)\n", currFuncName, pc, pc - RAM_CODE);
|
|
function_count++;
|
|
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",currFuncName);
|
|
//fprintf(outputf, "\n/* ~~~~~~~~~~ */\n");
|
|
|
|
}
|
|
if (jaltaken)
|
|
{
|
|
jaltaken--;
|
|
if (!jaltaken)
|
|
reset_gpr_regs_soft();
|
|
}
|
|
|
|
pc+=4;
|
|
|
|
targetnum=isTarget(pc+4);
|
|
if (targetnum>0)
|
|
fprintf(outputf, "$lbl_%i:\t\t\t; %08X\n", targetnum, pc);
|
|
}
|
|
|
|
// fprintf(outputf, "\n\n\n\t.data\n\n\t/*\n\tAddr: %08X\n\t\n\t",text_size);
|
|
// int j;
|
|
// for (i=text_size; i<text_size+data_size; i+=16)
|
|
// {
|
|
// /*
|
|
// for (j=i;j<i+16;j+=4)
|
|
// fprintf(outputf, "%08X ", flip32((*words)[j>>2]));
|
|
// fprintf(outputf, "\n\t");
|
|
// */
|
|
// }
|
|
// if (rodata_size > 0)
|
|
// fprintf(outputf, "\n\t*/\n\n\t.rodata\n\n\t/*\n\tAddr: %08X\n\t\n\t",text_size+rodata_size);
|
|
//
|
|
// for (; i<text_size+data_size+rodata_size; i+=16)
|
|
// {
|
|
// for (j=i;j<i+16;j+=4)
|
|
// fprintf(outputf, "%08X ", flip32((*words)[j>>2]));
|
|
// fprintf(outputf, "\n\t");
|
|
// }
|
|
// fprintf(outputf, "\n\t*/\n");
|
|
|
|
fclose(outputf);
|
|
free(buff);
|
|
|
|
return EXIT_SUCCESS;
|
|
}
|