int I386::debug_dasm(uint32_t pc, _TCHAR *buffer, size_t buffer_len)
{
i386_state *cpustate = (i386_state *)opaque;
UINT64 eip = cpustate->eip;
UINT8 ops[16];
for(int i = 0; i < 16; i++) {
int wait;
ops[i] = d_mem->read_data8w(pc + i, &wait);
}
UINT8 *oprom = ops;
if(cpustate->operand_size) {
return CPU_DISASSEMBLE_CALL(x86_32) & DASMFLAG_LENGTHMASK;
} else {
return CPU_DISASSEMBLE_CALL(x86_16) & DASMFLAG_LENGTHMASK;
}
}
int HUC6280::debug_dasm(uint32_t pc, _TCHAR *buffer, size_t buffer_len)
{
uint8_t oprom[8];
uint8_t *opram = oprom;
for(int i = 0; i < 8; i++) {
int wait;
oprom[i] = d_mem->read_data8w(pc + i, &wait);
}
return CPU_DISASSEMBLE_CALL(h6280) & DASMFLAG_LENGTHMASK;
}
int main( int argc, char *argv[] )
{
FILE *f;
uint8_t i;
uint8_t j;
uint8_t n;
uint8_t p;
uint32_t begin;
uint32_t end;
uint32_t filelen;
uint32_t len;
uint32_t pc;
char buffer[ 80 ];
char *filename;
uint32_t format;
uint32_t cpu;
filename = nullptr;
begin = 0;
end = 0xffffffff;
format = FORMAT_BIN;
cpu = CPU_PSX;
n = 0;
for( i = 1; i < argc; i++ )
{
if( argv[ i ][ 0 ] != '-' )
{
switch( n )
{
case 0:
filename = argv[ i ];
break;
default:
usage();
break;
}
n++;
}
else
{
for( j = 0; Options[ j ]; j++ )
{
if( strcmp( argv[ i ] + 1, Options[ j ] ) == 0 )
{
break;
}
}
switch( j )
{
case 0:
i++;
if( i > argc )
{
usage();
}
begin = strtoul( argv[ i ], 0, 16 );
break;
case 1:
i++;
if( i > argc )
{
usage();
}
end = strtoul( argv[ i ], 0, 16 );
break;
case 2:
i++;
if( i > argc )
{
usage();
}
offset = strtoul( argv[ i ], 0, 16 );
break;
case 3:
i++;
if( i > argc )
{
usage();
}
if( strlen( argv[ i ] ) != 4 )
{
usage();
}
for( p = 0; p < 4; p++ )
{
if( argv[ i ][ p ] < '0' || argv[ i ][ p ] > '3' )
{
usage();
}
order[ p ] = argv[ i ][ p ] - '0';
}
break;
case 4:
i++;
if( i > argc )
{
usage();
}
if( core_stricmp( argv[ i ], "bin" ) == 0 )
{
format = FORMAT_BIN;
}
else if( core_stricmp( argv[ i ], "psx" ) == 0 )
{
format = FORMAT_PSX;
}
else
{
usage();
}
break;
case 5:
i++;
if( i > argc )
{
usage();
}
if( core_stricmp( argv[ i ], "psx" ) == 0 )
{
cpu = CPU_PSX;
}
else if( core_stricmp( argv[ i ], "r3000" ) == 0 )
{
cpu = CPU_R3000;
}
else if( core_stricmp( argv[ i ], "r4000" ) == 0 )
{
cpu = CPU_R4000;
}
else
{
usage();
}
break;
default:
usage();
break;
}
}
}
if (!filename)
{
usage();
return 1;
}
f=fopen (filename,"rb");
if (!f)
{
printf ("Unable to open %s\n",filename);
return 2;
}
fseek (f,0,SEEK_END);
filelen=ftell (f);
if( format == FORMAT_PSX )
{
fseek( f, 0, SEEK_SET );
if( fread( &m_psxexe_header, 1, sizeof( m_psxexe_header ), f ) != sizeof( m_psxexe_header ) )
{
fprintf( stderr, "error reading ps-x exe header\n" );
fclose( f );
return 3;
}
if( memcmp( m_psxexe_header.id, "PS-X EXE", sizeof( m_psxexe_header.id ) ) != 0 )
{
fprintf( stderr, "invalid ps-x exe header\n" );
fclose( f );
return 3;
}
printf( "_start = $%08x\n\n", m_psxexe_header.pc0 );
if( offset == 0 )
{
offset = m_psxexe_header.t_addr;
}
if( begin == 0 )
{
begin = sizeof( m_psxexe_header );
}
if( end == 0xffffffff )
{
end = sizeof( m_psxexe_header ) + m_psxexe_header.t_size;
}
}
fseek (f,begin,SEEK_SET);
len=(filelen>end)? (end-begin+1):(filelen-begin);
filebuf=(uint8_t *)malloc(len+16);
if (!filebuf)
{
printf ("Memory allocation error\n");
fclose (f);
return 3;
}
memset (filebuf,0,len+16);
if (fread(filebuf,1,len,f)!=len)
{
printf ("Read error\n");
fclose (f);
free (filebuf);
return 4;
}
fclose (f);
pc = 0;
while( pc < len )
{
uint8_t op0 = filebuf[ pc + order[ 0 ] ];
uint8_t op1 = filebuf[ pc + order[ 1 ] ];
uint8_t op2 = filebuf[ pc + order[ 2 ] ];
uint8_t op3 = filebuf[ pc + order[ 3 ] ];
filebuf[ pc + 0 ] = op0;
filebuf[ pc + 1 ] = op1;
filebuf[ pc + 2 ] = op2;
filebuf[ pc + 3 ] = op3;
pc += 4;
}
pc = 0;
while( pc < len )
{
switch( cpu )
{
case CPU_PSX:
i = DasmPSXCPU( nullptr, buffer, pc + offset, filebuf + pc );
break;
case CPU_R3000:
{
cpu_device *device = nullptr;
int options = 0;
uint8_t *opram = filebuf + pc;
uint8_t *oprom = opram;
i = CPU_DISASSEMBLE_CALL( r3000le );
}
break;
case CPU_R4000:
{
uint8_t *opram = filebuf + pc;
uint32_t op = ( opram[ 3 ] << 24 ) | ( opram[ 2 ] << 16 ) | ( opram[ 1 ] << 8 ) | ( opram[ 0 ] << 0 );
i = dasmmips3( buffer, pc + offset, op );
}
break;
}
i &= DASMFLAG_LENGTHMASK;
printf( "%08x: ", pc + offset );
for( j = 0; j < i; j++ )
{
printf( "%02x ", filebuf[ pc ] );
pc++;
}
while( j < 10 )
{
printf( " " );
j++;
}
printf( "%s\n", buffer );
}
free (filebuf);
return 0;
}
