Mercurial > audlegacy-plugins
view src/psf2/psx.c @ 2958:6d8892d78ded
Make delayed execution work, should fix FFX sets.
| author | William Pitcock <nenolod@atheme.org> |
|---|---|
| date | Wed, 15 Oct 2008 15:25:08 -0500 |
| parents | f1482af6384c |
| children | 95d7d8546e7b |
line wrap: on
line source
/* * Sony CXD8530AQ/CXD8530BQ/CXD8530CQ/CXD8661R * * PSX CPU emulator for the MAME project written by smf * Thanks to Farfetch'd for information on the delay slot bug * * The PSX CPU is a custom r3000a with a built in * geometry transform engine, no mmu & no data cache. * * There is a stall circuit for load delays, but * it doesn't work if the load occurs in a branch * delay slot. * */ #include <stdio.h> #include "ao.h" #include "cpuintrf.h" #include "psx.h" #define EXC_INT ( 0 ) #define EXC_ADEL ( 4 ) #define EXC_ADES ( 5 ) #define EXC_SYS ( 8 ) #define EXC_BP ( 9 ) #define EXC_RI ( 10 ) #define EXC_CPU ( 11 ) #define EXC_OVF ( 12 ) #define CP0_RANDOM ( 1 ) #define CP0_BADVADDR ( 8 ) #define CP0_SR ( 12 ) #define CP0_CAUSE ( 13 ) #define CP0_EPC ( 14 ) #define CP0_PRID ( 15 ) #define SR_IEC ( 1L << 0 ) #define SR_KUC ( 1L << 1 ) #define SR_ISC ( 1L << 16 ) #define SR_SWC ( 1L << 17 ) #define SR_TS ( 1L << 21 ) #define SR_BEV ( 1L << 22 ) #define SR_RE ( 1L << 25 ) #define SR_CU0 ( 1L << 28 ) #define SR_CU1 ( 1L << 29 ) #define SR_CU2 ( 1L << 30 ) #define SR_CU3 ( 1L << 31 ) #define CAUSE_EXC ( 31L << 2 ) #define CAUSE_IP ( 255L << 8 ) #define CAUSE_IP2 ( 1L << 10 ) #define CAUSE_IP3 ( 1L << 11 ) #define CAUSE_IP4 ( 1L << 12 ) #define CAUSE_IP5 ( 1L << 13 ) #define CAUSE_IP6 ( 1L << 14 ) #define CAUSE_IP7 ( 1L << 15 ) #define CAUSE_CE ( 3L << 28 ) #define CAUSE_CE0 ( 0L << 28 ) #define CAUSE_CE1 ( 1L << 28 ) #define CAUSE_CE2 ( 2L << 28 ) #define CAUSE_BD ( 1L << 31 ) extern void psx_bios_hle(uint32 pc); extern void psx_iop_call(uint32 pc, uint32 callnum); extern uint8 program_read_byte_32le(offs_t address); extern uint16 program_read_word_32le(offs_t address); extern uint32 program_read_dword_32le(offs_t address); extern void program_write_byte_32le(offs_t address, uint8 data); extern void program_write_word_32le(offs_t address, uint16 data); extern void program_write_dword_32le(offs_t address, uint32 data); static UINT8 mips_reg_layout[] = { MIPS_PC, -1, MIPS_DELAYV, MIPS_DELAYR, -1, MIPS_HI, MIPS_LO, -1, -1, MIPS_R0, MIPS_R1, -1, MIPS_R2, MIPS_R3, -1, MIPS_R4, MIPS_R5, -1, MIPS_R6, MIPS_R7, -1, MIPS_R8, MIPS_R9, -1, MIPS_R10, MIPS_R11, -1, MIPS_R12, MIPS_R13, -1, MIPS_R14, MIPS_R15, -1, MIPS_R16, MIPS_R17, -1, MIPS_R18, MIPS_R19, -1, MIPS_R20, MIPS_R21, -1, MIPS_R22, MIPS_R23, -1, MIPS_R24, MIPS_R25, -1, MIPS_R26, MIPS_R27, -1, MIPS_R28, MIPS_R29, -1, MIPS_R30, MIPS_R31, -1, -1, MIPS_CP0R0, MIPS_CP0R1, -1, MIPS_CP0R2, MIPS_CP0R3, -1, MIPS_CP0R4, MIPS_CP0R5, -1, MIPS_CP0R6, MIPS_CP0R7, -1, MIPS_CP0R8, MIPS_CP0R9, -1, MIPS_CP0R10, MIPS_CP0R11, -1, MIPS_CP0R12, MIPS_CP0R13, -1, MIPS_CP0R14, MIPS_CP0R15, -1, MIPS_CP0R16, MIPS_CP0R17, -1, MIPS_CP0R18, MIPS_CP0R19, -1, MIPS_CP0R20, MIPS_CP0R21, -1, MIPS_CP0R22, MIPS_CP0R23, -1, MIPS_CP0R24, MIPS_CP0R25, -1, MIPS_CP0R26, MIPS_CP0R27, -1, MIPS_CP0R28, MIPS_CP0R29, -1, MIPS_CP0R30, MIPS_CP0R31, -1, -1, MIPS_CP2DR0, MIPS_CP2DR1, -1, MIPS_CP2DR2, MIPS_CP2DR3, -1, MIPS_CP2DR4, MIPS_CP2DR5, -1, MIPS_CP2DR6, MIPS_CP2DR7, -1, MIPS_CP2DR8, MIPS_CP2DR9, -1, MIPS_CP2DR10, MIPS_CP2DR11, -1, MIPS_CP2DR12, MIPS_CP2DR13, -1, MIPS_CP2DR14, MIPS_CP2DR15, -1, MIPS_CP2DR16, MIPS_CP2DR17, -1, MIPS_CP2DR18, MIPS_CP2DR19, -1, MIPS_CP2DR20, MIPS_CP2DR21, -1, MIPS_CP2DR22, MIPS_CP2DR23, -1, MIPS_CP2DR24, MIPS_CP2DR25, -1, MIPS_CP2DR26, MIPS_CP2DR27, -1, MIPS_CP2DR28, MIPS_CP2DR29, -1, MIPS_CP2DR30, MIPS_CP2DR31, -1, -1, MIPS_CP2CR0, MIPS_CP2CR1, -1, MIPS_CP2CR2, MIPS_CP2CR3, -1, MIPS_CP2CR4, MIPS_CP2CR5, -1, MIPS_CP2CR6, MIPS_CP2CR7, -1, MIPS_CP2CR8, MIPS_CP2CR9, -1, MIPS_CP2CR10, MIPS_CP2CR11, -1, MIPS_CP2CR12, MIPS_CP2CR13, -1, MIPS_CP2CR14, MIPS_CP2CR15, -1, MIPS_CP2CR16, MIPS_CP2CR17, -1, MIPS_CP2CR18, MIPS_CP2CR19, -1, MIPS_CP2CR20, MIPS_CP2CR21, -1, MIPS_CP2CR22, MIPS_CP2CR23, -1, MIPS_CP2CR24, MIPS_CP2CR25, -1, MIPS_CP2CR26, MIPS_CP2CR27, -1, MIPS_CP2CR28, MIPS_CP2CR29, -1, MIPS_CP2CR30, MIPS_CP2CR31, 0 }; static UINT8 mips_win_layout[] = { 45, 0,35,13, /* register window (top right) */ 0, 0,44,13, /* disassembler window (left, upper) */ 0,14,44, 8, /* memory #1 window (left, middle) */ 45,14,35, 8, /* memory #2 window (lower) */ 0,23,80, 1 /* command line window (bottom rows) */ }; #define REGPC ( 32 ) typedef struct { UINT32 op; UINT32 pc; UINT32 prevpc; UINT32 delayv; UINT32 delayr; UINT32 hi; UINT32 lo; UINT32 r[ 32 ]; UINT32 cp0r[ 32 ]; PAIR cp2cr[ 32 ]; PAIR cp2dr[ 32 ]; int (*irq_callback)(int irqline); } mips_cpu_context; static mips_cpu_context mipscpu; static int mips_ICount = 0; static UINT32 mips_mtc0_writemask[]= { 0xffffffff, /* INDEX */ 0x00000000, /* RANDOM */ 0xffffff00, /* ENTRYLO */ 0x00000000, 0xffe00000, /* CONTEXT */ 0x00000000, 0x00000000, 0x00000000, 0x00000000, /* BADVADDR */ 0x00000000, 0xffffffc0, /* ENTRYHI */ 0x00000000, 0xf27fff3f, /* SR */ 0x00000300, /* CAUSE */ 0x00000000, /* EPC */ 0x00000000, /* PRID */ 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000 }; #if 0 void GTELOG(const char *a,...) { va_list va; char s_text[ 1024 ]; va_start( va, a ); vsprintf( s_text, a, va ); va_end( va ); logerror( "%08x: GTE: %08x %s\n", mipscpu.pc, INS_COFUN( mipscpu.op ), s_text ); } #else INLINE void GTELOG(const char *a, ...) {} #endif static UINT32 getcp2dr( int n_reg ); static void setcp2dr( int n_reg, UINT32 n_value ); static UINT32 getcp2cr( int n_reg ); static void setcp2cr( int n_reg, UINT32 n_value ); static void docop2( int gteop ); static void mips_exception( int exception ); void mips_stop( void ) { #ifdef MAME_DEBUG extern int debug_key_pressed; debug_key_pressed = 1; CALL_MAME_DEBUG; #endif } INLINE void mips_set_cp0r( int reg, UINT32 value ) { mipscpu.cp0r[ reg ] = value; if( reg == CP0_SR || reg == CP0_CAUSE ) { if( ( mipscpu.cp0r[ CP0_SR ] & SR_IEC ) != 0 && ( mipscpu.cp0r[ CP0_SR ] & mipscpu.cp0r[ CP0_CAUSE ] & CAUSE_IP ) != 0 ) { mips_exception( EXC_INT ); } else if( mipscpu.delayr != REGPC && ( mipscpu.pc & ( ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) | 3 ) ) != 0 ) { mips_exception( EXC_ADEL ); mips_set_cp0r( CP0_BADVADDR, mipscpu.pc ); } } } INLINE void mips_commit_delayed_load( void ) { if( mipscpu.delayr != 0 ) { mipscpu.r[ mipscpu.delayr ] = mipscpu.delayv; mipscpu.delayr = 0; mipscpu.delayv = 0; } } INLINE void mips_delayed_branch( UINT32 n_adr ) { if( ( n_adr & ( ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) | 3 ) ) != 0 ) { mips_exception( EXC_ADEL ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { mips_commit_delayed_load(); mipscpu.delayr = REGPC; mipscpu.delayv = n_adr; mipscpu.pc += 4; } } INLINE void mips_set_pc( unsigned val ) { mipscpu.pc = val; change_pc( val ); mipscpu.delayr = 0; mipscpu.delayv = 0; } INLINE void mips_advance_pc( void ) { if( mipscpu.delayr == REGPC ) { mips_set_pc( mipscpu.delayv ); } else { mips_commit_delayed_load(); mipscpu.pc += 4; } } INLINE void mips_load( UINT32 n_r, UINT32 n_v ) { mips_advance_pc(); if( n_r != 0 ) { mipscpu.r[ n_r ] = n_v; } } INLINE void mips_delayed_load( UINT32 n_r, UINT32 n_v ) { if( mipscpu.delayr == REGPC ) { mips_set_pc( mipscpu.delayv ); mipscpu.delayr = n_r; mipscpu.delayv = n_v; } else { mips_commit_delayed_load(); mipscpu.pc += 4; if( n_r != 0 ) { mipscpu.r[ n_r ] = n_v; } } } static void mips_exception( int exception ) { mips_set_cp0r( CP0_SR, ( mipscpu.cp0r[ CP0_SR ] & ~0x3f ) | ( ( mipscpu.cp0r[ CP0_SR ] << 2 ) & 0x3f ) ); if( mipscpu.delayr == REGPC ) { mips_set_cp0r( CP0_EPC, mipscpu.pc - 4 ); mips_set_cp0r( CP0_CAUSE, ( mipscpu.cp0r[ CP0_CAUSE ] & ~CAUSE_EXC ) | CAUSE_BD | ( exception << 2 ) ); } else { mips_commit_delayed_load(); mips_set_cp0r( CP0_EPC, mipscpu.pc ); mips_set_cp0r( CP0_CAUSE, ( mipscpu.cp0r[ CP0_CAUSE ] & ~( CAUSE_EXC | CAUSE_BD ) ) | ( exception << 2 ) ); } if( mipscpu.cp0r[ CP0_SR ] & SR_BEV ) { mips_set_pc( 0xbfc00180 ); } else { mips_set_pc( 0x80000080 ); } } void mips_init( void ) { #if 0 int cpu = cpu_getactivecpu(); state_save_register_UINT32( "psxcpu", cpu, "op", &mipscpu.op, 1 ); state_save_register_UINT32( "psxcpu", cpu, "pc", &mipscpu.pc, 1 ); state_save_register_UINT32( "psxcpu", cpu, "delayv", &mipscpu.delayv, 1 ); state_save_register_UINT32( "psxcpu", cpu, "delayr", &mipscpu.delayr, 1 ); state_save_register_UINT32( "psxcpu", cpu, "hi", &mipscpu.hi, 1 ); state_save_register_UINT32( "psxcpu", cpu, "lo", &mipscpu.lo, 1 ); state_save_register_UINT32( "psxcpu", cpu, "r", &mipscpu.r[ 0 ], 32 ); state_save_register_UINT32( "psxcpu", cpu, "cp0r", &mipscpu.cp0r[ 0 ], 32 ); state_save_register_UINT32( "psxcpu", cpu, "cp2cr", &mipscpu.cp2cr[ 0 ].d, 32 ); state_save_register_UINT32( "psxcpu", cpu, "cp2dr", &mipscpu.cp2dr[ 0 ].d, 32 ); #endif } void mips_reset( void *param ) { mips_set_cp0r( CP0_SR, ( mipscpu.cp0r[ CP0_SR ] & ~( SR_TS | SR_SWC | SR_KUC | SR_IEC ) ) | SR_BEV ); mips_set_cp0r( CP0_RANDOM, 63 ); /* todo: */ mips_set_cp0r( CP0_PRID, 0x00000200 ); /* todo: */ mips_set_pc( 0xbfc00000 ); mipscpu.prevpc = 0xffffffff; } static void mips_exit( void ) { } void mips_shorten_frame(void) { mips_ICount = 0; } void psx_hw_runcounters(void); int psxcpu_verbose = 0; int mips_execute( int cycles ) { UINT32 n_res; mips_ICount = cycles; do { // CALL_MAME_DEBUG; // psx_hw_runcounters(); mipscpu.op = cpu_readop32( mipscpu.pc ); while (mipscpu.prevpc == mipscpu.pc) { psx_hw_runcounters(); mips_ICount--; if (mips_ICount == 0) return cycles; } // if we're not in a delay slot, update // if we're in a delay slot and the delay instruction is not NOP, update if (( mipscpu.delayr == 0 ) || ((mipscpu.delayr != 0) && (mipscpu.op != 0))) { mipscpu.prevpc = mipscpu.pc; } #if 0 if (1) //psxcpu_verbose) { printf("[%08x: %08x] [SP %08x RA %08x V0 %08x V1 %08x A0 %08x S0 %08x S1 %08x]\n", mipscpu.pc, mipscpu.op, mipscpu.r[29], mipscpu.r[31], mipscpu.r[2], mipscpu.r[3], mipscpu.r[4], mipscpu.r[ 16 ], mipscpu.r[ 17 ]); // psxcpu_verbose--; } #endif switch( INS_OP( mipscpu.op ) ) { case OP_SPECIAL: switch( INS_FUNCT( mipscpu.op ) ) { case FUNCT_HLECALL: // printf("HLECALL, PC = %08x\n", mipscpu.pc); psx_bios_hle(mipscpu.pc); break; case FUNCT_SLL: mips_load( INS_RD( mipscpu.op ), mipscpu.r[ INS_RT( mipscpu.op ) ] << INS_SHAMT( mipscpu.op ) ); break; case FUNCT_SRL: mips_load( INS_RD( mipscpu.op ), mipscpu.r[ INS_RT( mipscpu.op ) ] >> INS_SHAMT( mipscpu.op ) ); break; case FUNCT_SRA: mips_load( INS_RD( mipscpu.op ), (INT32)mipscpu.r[ INS_RT( mipscpu.op ) ] >> INS_SHAMT( mipscpu.op ) ); break; case FUNCT_SLLV: mips_load( INS_RD( mipscpu.op ), mipscpu.r[ INS_RT( mipscpu.op ) ] << ( mipscpu.r[ INS_RS( mipscpu.op ) ] & 31 ) ); break; case FUNCT_SRLV: mips_load( INS_RD( mipscpu.op ), mipscpu.r[ INS_RT( mipscpu.op ) ] >> ( mipscpu.r[ INS_RS( mipscpu.op ) ] & 31 ) ); break; case FUNCT_SRAV: mips_load( INS_RD( mipscpu.op ), (INT32)mipscpu.r[ INS_RT( mipscpu.op ) ] >> ( mipscpu.r[ INS_RS( mipscpu.op ) ] & 31 ) ); break; case FUNCT_JR: if( INS_RD( mipscpu.op ) != 0 ) { mips_exception( EXC_RI ); } else { mips_delayed_branch( mipscpu.r[ INS_RS( mipscpu.op ) ] ); } break; case FUNCT_JALR: n_res = mipscpu.pc + 8; mips_delayed_branch( mipscpu.r[ INS_RS( mipscpu.op ) ] ); if( INS_RD( mipscpu.op ) != 0 ) { mipscpu.r[ INS_RD( mipscpu.op ) ] = n_res; } break; case FUNCT_SYSCALL: mips_exception( EXC_SYS ); break; case FUNCT_BREAK: printf("BREAK!\n"); exit(-1); // mips_exception( EXC_BP ); mips_advance_pc(); break; case FUNCT_MFHI: mips_load( INS_RD( mipscpu.op ), mipscpu.hi ); break; case FUNCT_MTHI: if( INS_RD( mipscpu.op ) != 0 ) { mips_exception( EXC_RI ); } else { mips_advance_pc(); mipscpu.hi = mipscpu.r[ INS_RS( mipscpu.op ) ]; } break; case FUNCT_MFLO: mips_load( INS_RD( mipscpu.op ), mipscpu.lo ); break; case FUNCT_MTLO: if( INS_RD( mipscpu.op ) != 0 ) { mips_exception( EXC_RI ); } else { mips_advance_pc(); mipscpu.lo = mipscpu.r[ INS_RS( mipscpu.op ) ]; } break; case FUNCT_MULT: if( INS_RD( mipscpu.op ) != 0 ) { mips_exception( EXC_RI ); } else { INT64 n_res64; n_res64 = MUL_64_32_32( (INT32)mipscpu.r[ INS_RS( mipscpu.op ) ], (INT32)mipscpu.r[ INS_RT( mipscpu.op ) ] ); mips_advance_pc(); mipscpu.lo = LO32_32_64( n_res64 ); mipscpu.hi = HI32_32_64( n_res64 ); } break; case FUNCT_MULTU: if( INS_RD( mipscpu.op ) != 0 ) { mips_exception( EXC_RI ); } else { UINT64 n_res64; n_res64 = MUL_U64_U32_U32( mipscpu.r[ INS_RS( mipscpu.op ) ], mipscpu.r[ INS_RT( mipscpu.op ) ] ); mips_advance_pc(); mipscpu.lo = LO32_U32_U64( n_res64 ); mipscpu.hi = HI32_U32_U64( n_res64 ); } break; case FUNCT_DIV: if( INS_RD( mipscpu.op ) != 0 ) { mips_exception( EXC_RI ); } else { UINT32 n_div; UINT32 n_mod; if( mipscpu.r[ INS_RT( mipscpu.op ) ] != 0 ) { n_div = (INT32)mipscpu.r[ INS_RS( mipscpu.op ) ] / (INT32)mipscpu.r[ INS_RT( mipscpu.op ) ]; n_mod = (INT32)mipscpu.r[ INS_RS( mipscpu.op ) ] % (INT32)mipscpu.r[ INS_RT( mipscpu.op ) ]; mips_advance_pc(); mipscpu.lo = n_div; mipscpu.hi = n_mod; } else { mips_advance_pc(); } } break; case FUNCT_DIVU: if( INS_RD( mipscpu.op ) != 0 ) { mips_exception( EXC_RI ); } else { UINT32 n_div; UINT32 n_mod; if( mipscpu.r[ INS_RT( mipscpu.op ) ] != 0 ) { n_div = mipscpu.r[ INS_RS( mipscpu.op ) ] / mipscpu.r[ INS_RT( mipscpu.op ) ]; n_mod = mipscpu.r[ INS_RS( mipscpu.op ) ] % mipscpu.r[ INS_RT( mipscpu.op ) ]; mips_advance_pc(); mipscpu.lo = n_div; mipscpu.hi = n_mod; } else { mips_advance_pc(); } } break; case FUNCT_ADD: { n_res = mipscpu.r[ INS_RS( mipscpu.op ) ] + mipscpu.r[ INS_RT( mipscpu.op ) ]; if( (INT32)( ~( mipscpu.r[ INS_RS( mipscpu.op ) ] ^ mipscpu.r[ INS_RT( mipscpu.op ) ] ) & ( mipscpu.r[ INS_RS( mipscpu.op ) ] ^ n_res ) ) < 0 ) { mips_exception( EXC_OVF ); } else { mips_load( INS_RD( mipscpu.op ), n_res ); } } break; case FUNCT_ADDU: mips_load( INS_RD( mipscpu.op ), mipscpu.r[ INS_RS( mipscpu.op ) ] + mipscpu.r[ INS_RT( mipscpu.op ) ] ); break; case FUNCT_SUB: n_res = mipscpu.r[ INS_RS( mipscpu.op ) ] - mipscpu.r[ INS_RT( mipscpu.op ) ]; if( (INT32)( ( mipscpu.r[ INS_RS( mipscpu.op ) ] ^ mipscpu.r[ INS_RT( mipscpu.op ) ] ) & ( mipscpu.r[ INS_RS( mipscpu.op ) ] ^ n_res ) ) < 0 ) { mips_exception( EXC_OVF ); } else { mips_load( INS_RD( mipscpu.op ), n_res ); } break; case FUNCT_SUBU: mips_load( INS_RD( mipscpu.op ), mipscpu.r[ INS_RS( mipscpu.op ) ] - mipscpu.r[ INS_RT( mipscpu.op ) ] ); break; case FUNCT_AND: mips_load( INS_RD( mipscpu.op ), mipscpu.r[ INS_RS( mipscpu.op ) ] & mipscpu.r[ INS_RT( mipscpu.op ) ] ); break; case FUNCT_OR: mips_load( INS_RD( mipscpu.op ), mipscpu.r[ INS_RS( mipscpu.op ) ] | mipscpu.r[ INS_RT( mipscpu.op ) ] ); break; case FUNCT_XOR: mips_load( INS_RD( mipscpu.op ), mipscpu.r[ INS_RS( mipscpu.op ) ] ^ mipscpu.r[ INS_RT( mipscpu.op ) ] ); break; case FUNCT_NOR: mips_load( INS_RD( mipscpu.op ), ~( mipscpu.r[ INS_RS( mipscpu.op ) ] | mipscpu.r[ INS_RT( mipscpu.op ) ] ) ); break; case FUNCT_SLT: mips_load( INS_RD( mipscpu.op ), (INT32)mipscpu.r[ INS_RS( mipscpu.op ) ] < (INT32)mipscpu.r[ INS_RT( mipscpu.op ) ] ); break; case FUNCT_SLTU: mips_load( INS_RD( mipscpu.op ), mipscpu.r[ INS_RS( mipscpu.op ) ] < mipscpu.r[ INS_RT( mipscpu.op ) ] ); break; default: mips_exception( EXC_RI ); break; } break; case OP_REGIMM: switch( INS_RT( mipscpu.op ) ) { case RT_BLTZ: if( (INT32)mipscpu.r[ INS_RS( mipscpu.op ) ] < 0 ) { mips_delayed_branch( mipscpu.pc + 4 + ( MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ) << 2 ) ); } else { mips_advance_pc(); } break; case RT_BGEZ: if( (INT32)mipscpu.r[ INS_RS( mipscpu.op ) ] >= 0 ) { mips_delayed_branch( mipscpu.pc + 4 + ( MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ) << 2 ) ); } else { mips_advance_pc(); } break; case RT_BLTZAL: n_res = mipscpu.pc + 8; if( (INT32)mipscpu.r[ INS_RS( mipscpu.op ) ] < 0 ) { mips_delayed_branch( mipscpu.pc + 4 + ( MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ) << 2 ) ); } else { mips_advance_pc(); } mipscpu.r[ 31 ] = n_res; break; case RT_BGEZAL: n_res = mipscpu.pc + 8; if( (INT32)mipscpu.r[ INS_RS( mipscpu.op ) ] >= 0 ) { mips_delayed_branch( mipscpu.pc + 4 + ( MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ) << 2 ) ); } else { mips_advance_pc(); } mipscpu.r[ 31 ] = n_res; break; } break; case OP_J: mips_delayed_branch( ( ( mipscpu.pc + 4 ) & 0xf0000000 ) + ( INS_TARGET( mipscpu.op ) << 2 ) ); break; case OP_JAL: n_res = mipscpu.pc + 8; mips_delayed_branch( ( ( mipscpu.pc + 4 ) & 0xf0000000 ) + ( INS_TARGET( mipscpu.op ) << 2 ) ); mipscpu.r[ 31 ] = n_res; break; case OP_BEQ: if( mipscpu.r[ INS_RS( mipscpu.op ) ] == mipscpu.r[ INS_RT( mipscpu.op ) ] ) { mips_delayed_branch( mipscpu.pc + 4 + ( MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ) << 2 ) ); } else { mips_advance_pc(); } break; case OP_BNE: if( mipscpu.r[ INS_RS( mipscpu.op ) ] != mipscpu.r[ INS_RT( mipscpu.op ) ] ) { mips_delayed_branch( mipscpu.pc + 4 + ( MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ) << 2 ) ); } else { mips_advance_pc(); } break; case OP_BLEZ: if( INS_RT( mipscpu.op ) != 0 ) { mips_exception( EXC_RI ); } else if( (INT32)mipscpu.r[ INS_RS( mipscpu.op ) ] <= 0 ) { mips_delayed_branch( mipscpu.pc + 4 + ( MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ) << 2 ) ); } else { mips_advance_pc(); } break; case OP_BGTZ: if( INS_RT( mipscpu.op ) != 0 ) { mips_exception( EXC_RI ); } else if( (INT32)mipscpu.r[ INS_RS( mipscpu.op ) ] > 0 ) { mips_delayed_branch( mipscpu.pc + 4 + ( MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ) << 2 ) ); } else { mips_advance_pc(); } break; case OP_ADDI: { UINT32 n_imm; n_imm = MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); n_res = mipscpu.r[ INS_RS( mipscpu.op ) ] + n_imm; if( (INT32)( ~( mipscpu.r[ INS_RS( mipscpu.op ) ] ^ n_imm ) & ( mipscpu.r[ INS_RS( mipscpu.op ) ] ^ n_res ) ) < 0 ) { mips_exception( EXC_OVF ); } else { mips_load( INS_RT( mipscpu.op ), n_res ); } } break; case OP_ADDIU: if (INS_RT( mipscpu.op ) == 0) { psx_iop_call(mipscpu.pc, INS_IMMEDIATE(mipscpu.op)); mips_advance_pc(); } else { mips_load( INS_RT( mipscpu.op ), mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ) ); } break; case OP_SLTI: mips_load( INS_RT( mipscpu.op ), (INT32)mipscpu.r[ INS_RS( mipscpu.op ) ] < MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ) ); break; case OP_SLTIU: mips_load( INS_RT( mipscpu.op ), mipscpu.r[ INS_RS( mipscpu.op ) ] < (UINT32)MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ) ); break; case OP_ANDI: mips_load( INS_RT( mipscpu.op ), mipscpu.r[ INS_RS( mipscpu.op ) ] & INS_IMMEDIATE( mipscpu.op ) ); break; case OP_ORI: mips_load( INS_RT( mipscpu.op ), mipscpu.r[ INS_RS( mipscpu.op ) ] | INS_IMMEDIATE( mipscpu.op ) ); break; case OP_XORI: mips_load( INS_RT( mipscpu.op ), mipscpu.r[ INS_RS( mipscpu.op ) ] ^ INS_IMMEDIATE( mipscpu.op ) ); break; case OP_LUI: mips_load( INS_RT( mipscpu.op ), INS_IMMEDIATE( mipscpu.op ) << 16 ); break; case OP_COP0: if( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) != 0 && ( mipscpu.cp0r[ CP0_SR ] & SR_CU0 ) == 0 ) { mips_exception( EXC_CPU ); mips_set_cp0r( CP0_CAUSE, ( mipscpu.cp0r[ CP0_CAUSE ] & ~CAUSE_CE ) | CAUSE_CE0 ); } else { switch( INS_RS( mipscpu.op ) ) { case RS_MFC: mips_delayed_load( INS_RT( mipscpu.op ), mipscpu.cp0r[ INS_RD( mipscpu.op ) ] ); break; case RS_CFC: /* todo: */ logerror( "%08x: COP0 CFC not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); break; case RS_MTC: n_res = ( mipscpu.cp0r[ INS_RD( mipscpu.op ) ] & ~mips_mtc0_writemask[ INS_RD( mipscpu.op ) ] ) | ( mipscpu.r[ INS_RT( mipscpu.op ) ] & mips_mtc0_writemask[ INS_RD( mipscpu.op ) ] ); mips_advance_pc(); mips_set_cp0r( INS_RD( mipscpu.op ), n_res ); break; case RS_CTC: /* todo: */ logerror( "%08x: COP0 CTC not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); break; case RS_BC: switch( INS_RT( mipscpu.op ) ) { case RT_BCF: /* todo: */ logerror( "%08x: COP0 BCF not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); break; case RT_BCT: /* todo: */ logerror( "%08x: COP0 BCT not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); break; default: /* todo: */ logerror( "%08x: COP0 unknown command %08x\n", mipscpu.pc, mipscpu.op ); mips_stop(); mips_advance_pc(); break; } break; default: switch( INS_CO( mipscpu.op ) ) { case 1: switch( INS_CF( mipscpu.op ) ) { case CF_RFE: mips_advance_pc(); mips_set_cp0r( CP0_SR, ( mipscpu.cp0r[ CP0_SR ] & ~0xf ) | ( ( mipscpu.cp0r[ CP0_SR ] >> 2 ) & 0xf ) ); break; default: /* todo: */ logerror( "%08x: COP0 unknown command %08x\n", mipscpu.pc, mipscpu.op ); mips_stop(); mips_advance_pc(); break; } break; default: /* todo: */ logerror( "%08x: COP0 unknown command %08x\n", mipscpu.pc, mipscpu.op ); mips_stop(); mips_advance_pc(); break; } break; } } break; case OP_COP1: if( ( mipscpu.cp0r[ CP0_SR ] & SR_CU1 ) == 0 ) { mips_exception( EXC_CPU ); mips_set_cp0r( CP0_CAUSE, ( mipscpu.cp0r[ CP0_CAUSE ] & ~CAUSE_CE ) | CAUSE_CE1 ); } else { switch( INS_RS( mipscpu.op ) ) { case RS_MFC: /* todo: */ logerror( "%08x: COP1 BCT not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); break; case RS_CFC: /* todo: */ logerror( "%08x: COP1 CFC not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); break; case RS_MTC: /* todo: */ logerror( "%08x: COP1 MTC not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); break; case RS_CTC: /* todo: */ logerror( "%08x: COP1 CTC not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); break; case RS_BC: switch( INS_RT( mipscpu.op ) ) { case RT_BCF: /* todo: */ logerror( "%08x: COP1 BCF not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); break; case RT_BCT: /* todo: */ logerror( "%08x: COP1 BCT not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); break; default: /* todo: */ logerror( "%08x: COP1 unknown command %08x\n", mipscpu.pc, mipscpu.op ); mips_stop(); mips_advance_pc(); break; } break; default: switch( INS_CO( mipscpu.op ) ) { case 1: /* todo: */ logerror( "%08x: COP1 unknown command %08x\n", mipscpu.pc, mipscpu.op ); mips_stop(); mips_advance_pc(); break; default: /* todo: */ logerror( "%08x: COP1 unknown command %08x\n", mipscpu.pc, mipscpu.op ); mips_stop(); mips_advance_pc(); break; } break; } } break; case OP_COP2: if( ( mipscpu.cp0r[ CP0_SR ] & SR_CU2 ) == 0 ) { mips_exception( EXC_CPU ); mips_set_cp0r( CP0_CAUSE, ( mipscpu.cp0r[ CP0_CAUSE ] & ~CAUSE_CE ) | CAUSE_CE2 ); } else { switch( INS_RS( mipscpu.op ) ) { case RS_MFC: mips_delayed_load( INS_RT( mipscpu.op ), getcp2dr( INS_RD( mipscpu.op ) ) ); break; case RS_CFC: mips_delayed_load( INS_RT( mipscpu.op ), getcp2cr( INS_RD( mipscpu.op ) ) ); break; case RS_MTC: setcp2dr( INS_RD( mipscpu.op ), mipscpu.r[ INS_RT( mipscpu.op ) ] ); mips_advance_pc(); break; case RS_CTC: setcp2cr( INS_RD( mipscpu.op ), mipscpu.r[ INS_RT( mipscpu.op ) ] ); mips_advance_pc(); break; case RS_BC: switch( INS_RT( mipscpu.op ) ) { case RT_BCF: /* todo: */ logerror( "%08x: COP2 BCF not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); break; case RT_BCT: /* todo: */ logerror( "%08x: COP2 BCT not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); break; default: /* todo: */ logerror( "%08x: COP2 unknown command %08x\n", mipscpu.pc, mipscpu.op ); mips_stop(); mips_advance_pc(); break; } break; default: switch( INS_CO( mipscpu.op ) ) { case 1: docop2( INS_COFUN( mipscpu.op ) ); mips_advance_pc(); break; default: /* todo: */ logerror( "%08x: COP2 unknown command %08x\n", mipscpu.pc, mipscpu.op ); mips_stop(); mips_advance_pc(); break; } break; } } break; case OP_LB: if( ( mipscpu.cp0r[ CP0_SR ] & SR_ISC ) != 0 ) { /* todo: */ logerror( "%08x: LB SR_ISC not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); } else if( ( mipscpu.cp0r[ CP0_SR ] & ( SR_RE | SR_KUC ) ) == ( SR_RE | SR_KUC ) ) { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) ) != 0 ) { mips_exception( EXC_ADEL ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { mips_delayed_load( INS_RT( mipscpu.op ), MIPS_BYTE_EXTEND( program_read_byte_32le( n_adr ^ 3 ) ) ); } } else { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) ) != 0 ) { mips_exception( EXC_ADEL ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { mips_delayed_load( INS_RT( mipscpu.op ), MIPS_BYTE_EXTEND( program_read_byte_32le( n_adr ) ) ); } } break; case OP_LH: if( ( mipscpu.cp0r[ CP0_SR ] & SR_ISC ) != 0 ) { /* todo: */ logerror( "%08x: LH SR_ISC not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); } else if( ( mipscpu.cp0r[ CP0_SR ] & ( SR_RE | SR_KUC ) ) == ( SR_RE | SR_KUC ) ) { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) | 1 ) ) != 0 ) { mips_exception( EXC_ADEL ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { mips_delayed_load( INS_RT( mipscpu.op ), MIPS_WORD_EXTEND( program_read_word_32le( n_adr ^ 2 ) ) ); } } else { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) | 1 ) ) != 0 ) { mips_exception( EXC_ADEL ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { mips_delayed_load( INS_RT( mipscpu.op ), MIPS_WORD_EXTEND( program_read_word_32le( n_adr ) ) ); } } break; case OP_LWL: if( ( mipscpu.cp0r[ CP0_SR ] & SR_ISC ) != 0 ) { /* todo: */ logerror( "%08x: LWL SR_ISC not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); } else if( ( mipscpu.cp0r[ CP0_SR ] & ( SR_RE | SR_KUC ) ) == ( SR_RE | SR_KUC ) ) { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) ) != 0 ) { mips_exception( EXC_ADEL ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { switch( n_adr & 3 ) { case 0: n_res = ( mipscpu.r[ INS_RT( mipscpu.op ) ] & 0x00ffffff ) | ( (UINT32)program_read_byte_32le( n_adr + 3 ) << 24 ); break; case 1: n_res = ( mipscpu.r[ INS_RT( mipscpu.op ) ] & 0x0000ffff ) | ( (UINT32)program_read_word_32le( n_adr + 1 ) << 16 ); break; case 2: n_res = ( mipscpu.r[ INS_RT( mipscpu.op ) ] & 0x000000ff ) | ( (UINT32)program_read_byte_32le( n_adr - 1 ) << 8 ) | ( (UINT32)program_read_word_32le( n_adr ) << 16 ); break; default: n_res = program_read_dword_32le( n_adr - 3 ); break; } mips_delayed_load( INS_RT( mipscpu.op ), n_res ); } } else { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) ) != 0 ) { mips_exception( EXC_ADEL ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { switch( n_adr & 3 ) { case 0: n_res = ( mipscpu.r[ INS_RT( mipscpu.op ) ] & 0x00ffffff ) | ( (UINT32)program_read_byte_32le( n_adr ) << 24 ); break; case 1: n_res = ( mipscpu.r[ INS_RT( mipscpu.op ) ] & 0x0000ffff ) | ( (UINT32)program_read_word_32le( n_adr - 1 ) << 16 ); break; case 2: n_res = ( mipscpu.r[ INS_RT( mipscpu.op ) ] & 0x000000ff ) | ( (UINT32)program_read_word_32le( n_adr - 2 ) << 8 ) | ( (UINT32)program_read_byte_32le( n_adr ) << 24 ); break; default: n_res = program_read_dword_32le( n_adr - 3 ); break; } mips_delayed_load( INS_RT( mipscpu.op ), n_res ); } } break; case OP_LW: if( ( mipscpu.cp0r[ CP0_SR ] & SR_ISC ) != 0 ) { /* todo: */ logerror( "%08x: LW SR_ISC not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); } else { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); #if 0 if( ( n_adr & ( ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) | 3 ) ) != 0 ) { printf("ADEL\n"); mips_exception( EXC_ADEL ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else #endif { mips_delayed_load( INS_RT( mipscpu.op ), program_read_dword_32le( n_adr ) ); } } break; case OP_LBU: if( ( mipscpu.cp0r[ CP0_SR ] & SR_ISC ) != 0 ) { /* todo: */ logerror( "%08x: LBU SR_ISC not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); } else if( ( mipscpu.cp0r[ CP0_SR ] & ( SR_RE | SR_KUC ) ) == ( SR_RE | SR_KUC ) ) { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) ) != 0 ) { mips_exception( EXC_ADEL ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { mips_delayed_load( INS_RT( mipscpu.op ), program_read_byte_32le( n_adr ^ 3 ) ); } } else { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) ) != 0 ) { mips_exception( EXC_ADEL ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { mips_delayed_load( INS_RT( mipscpu.op ), program_read_byte_32le( n_adr ) ); } } break; case OP_LHU: if( ( mipscpu.cp0r[ CP0_SR ] & SR_ISC ) != 0 ) { /* todo: */ logerror( "%08x: LHU SR_ISC not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); } else if( ( mipscpu.cp0r[ CP0_SR ] & ( SR_RE | SR_KUC ) ) == ( SR_RE | SR_KUC ) ) { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) | 1 ) ) != 0 ) { mips_exception( EXC_ADEL ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { mips_delayed_load( INS_RT( mipscpu.op ), program_read_word_32le( n_adr ^ 2 ) ); } } else { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) | 1 ) ) != 0 ) { mips_exception( EXC_ADEL ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { mips_delayed_load( INS_RT( mipscpu.op ), program_read_word_32le( n_adr ) ); } } break; case OP_LWR: if( ( mipscpu.cp0r[ CP0_SR ] & SR_ISC ) != 0 ) { /* todo: */ logerror( "%08x: LWR SR_ISC not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); } else if( ( mipscpu.cp0r[ CP0_SR ] & ( SR_RE | SR_KUC ) ) == ( SR_RE | SR_KUC ) ) { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) ) != 0 ) { mips_exception( EXC_ADEL ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { switch( n_adr & 3 ) { case 3: n_res = ( mipscpu.r[ INS_RT( mipscpu.op ) ] & 0xffffff00 ) | program_read_byte_32le( n_adr - 3 ); break; case 2: n_res = ( mipscpu.r[ INS_RT( mipscpu.op ) ] & 0xffff0000 ) | program_read_word_32le( n_adr - 2 ); break; case 1: n_res = ( mipscpu.r[ INS_RT( mipscpu.op ) ] & 0xff000000 ) | program_read_word_32le( n_adr - 1 ) | ( (UINT32)program_read_byte_32le( n_adr + 1 ) << 16 ); break; default: n_res = program_read_dword_32le( n_adr ); break; } mips_delayed_load( INS_RT( mipscpu.op ), n_res ); } } else { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) ) != 0 ) { mips_exception( EXC_ADEL ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { switch( n_adr & 3 ) { case 3: n_res = ( mipscpu.r[ INS_RT( mipscpu.op ) ] & 0xffffff00 ) | program_read_byte_32le( n_adr ); break; case 2: n_res = ( mipscpu.r[ INS_RT( mipscpu.op ) ] & 0xffff0000 ) | program_read_word_32le( n_adr ); break; case 1: n_res = ( mipscpu.r[ INS_RT( mipscpu.op ) ] & 0xff000000 ) | program_read_byte_32le( n_adr ) | ( (UINT32)program_read_word_32le( n_adr + 1 ) << 8 ); break; default: n_res = program_read_dword_32le( n_adr ); break; } mips_delayed_load( INS_RT( mipscpu.op ), n_res ); } } break; case OP_SB: if( ( mipscpu.cp0r[ CP0_SR ] & SR_ISC ) != 0 ) { /* todo: */ logerror( "%08x: SB SR_ISC not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); } else if( ( mipscpu.cp0r[ CP0_SR ] & ( SR_RE | SR_KUC ) ) == ( SR_RE | SR_KUC ) ) { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) ) != 0 ) { mips_exception( EXC_ADES ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { program_write_byte_32le( n_adr ^ 3, mipscpu.r[ INS_RT( mipscpu.op ) ] ); mips_advance_pc(); } } else { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) ) != 0 ) { mips_exception( EXC_ADES ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { program_write_byte_32le( n_adr, mipscpu.r[ INS_RT( mipscpu.op ) ] ); mips_advance_pc(); } } break; case OP_SH: if( ( mipscpu.cp0r[ CP0_SR ] & SR_ISC ) != 0 ) { /* todo: */ logerror( "%08x: SH SR_ISC not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); } else if( ( mipscpu.cp0r[ CP0_SR ] & ( SR_RE | SR_KUC ) ) == ( SR_RE | SR_KUC ) ) { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) | 1 ) ) != 0 ) { mips_exception( EXC_ADES ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { program_write_word_32le( n_adr ^ 2, mipscpu.r[ INS_RT( mipscpu.op ) ] ); mips_advance_pc(); } } else { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) | 1 ) ) != 0 ) { mips_exception( EXC_ADES ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { program_write_word_32le( n_adr, mipscpu.r[ INS_RT( mipscpu.op ) ] ); mips_advance_pc(); } } break; case OP_SWL: if( ( mipscpu.cp0r[ CP0_SR ] & SR_ISC ) != 0 ) { /* todo: */ printf("SR_ISC not supported\n"); logerror( "%08x: SWL SR_ISC not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); } else if( ( mipscpu.cp0r[ CP0_SR ] & ( SR_RE | SR_KUC ) ) == ( SR_RE | SR_KUC ) ) { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) ) != 0 ) { printf("permission violation?\n"); mips_exception( EXC_ADES ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { switch( n_adr & 3 ) { case 0: program_write_byte_32le( n_adr + 3, mipscpu.r[ INS_RT( mipscpu.op ) ] >> 24 ); break; case 1: program_write_word_32le( n_adr + 1, mipscpu.r[ INS_RT( mipscpu.op ) ] >> 16 ); break; case 2: program_write_byte_32le( n_adr - 1, mipscpu.r[ INS_RT( mipscpu.op ) ] >> 8 ); program_write_word_32le( n_adr, mipscpu.r[ INS_RT( mipscpu.op ) ] >> 16 ); break; case 3: program_write_dword_32le( n_adr - 3, mipscpu.r[ INS_RT( mipscpu.op ) ] ); break; } mips_advance_pc(); } } else { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) ) != 0 ) { printf("permission violation 2\n"); mips_exception( EXC_ADES ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { switch( n_adr & 3 ) { case 0: program_write_byte_32le( n_adr, mipscpu.r[ INS_RT( mipscpu.op ) ] >> 24 ); break; case 1: program_write_word_32le( n_adr - 1, mipscpu.r[ INS_RT( mipscpu.op ) ] >> 16 ); break; case 2: program_write_word_32le( n_adr - 2, mipscpu.r[ INS_RT( mipscpu.op ) ] >> 8 ); program_write_byte_32le( n_adr, mipscpu.r[ INS_RT( mipscpu.op ) ] >> 24 ); break; case 3: program_write_dword_32le( n_adr - 3, mipscpu.r[ INS_RT( mipscpu.op ) ] ); break; } mips_advance_pc(); } } break; case OP_SW: if( ( mipscpu.cp0r[ CP0_SR ] & SR_ISC ) != 0 ) { /* todo: */ /* used by bootstrap logerror( "%08x: SW SR_ISC not supported\n", mipscpu.pc ); mips_stop(); */ mips_advance_pc(); } else { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if(0) // ( n_adr & ( ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) | 3 ) ) != 0 ) { mips_exception( EXC_ADES ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { program_write_dword_32le( n_adr, mipscpu.r[ INS_RT( mipscpu.op ) ] ); mips_advance_pc(); } } break; case OP_SWR: if( ( mipscpu.cp0r[ CP0_SR ] & SR_ISC ) != 0 ) { /* todo: */ logerror( "%08x: SWR SR_ISC not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); } else if( ( mipscpu.cp0r[ CP0_SR ] & ( SR_RE | SR_KUC ) ) == ( SR_RE | SR_KUC ) ) { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) ) != 0 ) { mips_exception( EXC_ADES ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { switch( n_adr & 3 ) { case 0: program_write_dword_32le( n_adr, mipscpu.r[ INS_RT( mipscpu.op ) ] ); break; case 1: program_write_word_32le( n_adr - 1, mipscpu.r[ INS_RT( mipscpu.op ) ] ); program_write_byte_32le( n_adr + 1, mipscpu.r[ INS_RT( mipscpu.op ) ] >> 16 ); break; case 2: program_write_word_32le( n_adr - 2, mipscpu.r[ INS_RT( mipscpu.op ) ] ); break; case 3: program_write_byte_32le( n_adr - 3, mipscpu.r[ INS_RT( mipscpu.op ) ] ); break; } mips_advance_pc(); } } else { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) ) != 0 ) { mips_exception( EXC_ADES ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { switch( n_adr & 3 ) { case 0: program_write_dword_32le( n_adr, mipscpu.r[ INS_RT( mipscpu.op ) ] ); break; case 1: program_write_byte_32le( n_adr, mipscpu.r[ INS_RT( mipscpu.op ) ] ); program_write_word_32le( n_adr + 1, mipscpu.r[ INS_RT( mipscpu.op ) ] >> 8 ); break; case 2: program_write_word_32le( n_adr, mipscpu.r[ INS_RT( mipscpu.op ) ] ); break; case 3: program_write_byte_32le( n_adr, mipscpu.r[ INS_RT( mipscpu.op ) ] ); break; } mips_advance_pc(); } } break; case OP_LWC1: /* todo: */ logerror( "%08x: COP1 LWC not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); break; case OP_LWC2: if( ( mipscpu.cp0r[ CP0_SR ] & SR_CU2 ) == 0 ) { mips_exception( EXC_CPU ); mips_set_cp0r( CP0_CAUSE, ( mipscpu.cp0r[ CP0_CAUSE ] & ~CAUSE_CE ) | CAUSE_CE2 ); } else if( ( mipscpu.cp0r[ CP0_SR ] & SR_ISC ) != 0 ) { /* todo: */ logerror( "%08x: LWC2 SR_ISC not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); } else { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) | 3 ) ) != 0 ) { mips_exception( EXC_ADEL ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { /* todo: delay? */ setcp2dr( INS_RT( mipscpu.op ), program_read_dword_32le( n_adr ) ); mips_advance_pc(); } } break; case OP_SWC1: /* todo: */ logerror( "%08x: COP1 SWC not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); break; case OP_SWC2: if( ( mipscpu.cp0r[ CP0_SR ] & SR_CU2 ) == 0 ) { mips_exception( EXC_CPU ); mips_set_cp0r( CP0_CAUSE, ( mipscpu.cp0r[ CP0_CAUSE ] & ~CAUSE_CE ) | CAUSE_CE2 ); } else if( ( mipscpu.cp0r[ CP0_SR ] & SR_ISC ) != 0 ) { /* todo: */ logerror( "%08x: SWC2 SR_ISC not supported\n", mipscpu.pc ); mips_stop(); mips_advance_pc(); } else { UINT32 n_adr; n_adr = mipscpu.r[ INS_RS( mipscpu.op ) ] + MIPS_WORD_EXTEND( INS_IMMEDIATE( mipscpu.op ) ); if( ( n_adr & ( ( ( mipscpu.cp0r[ CP0_SR ] & SR_KUC ) << 30 ) | 3 ) ) != 0 ) { mips_exception( EXC_ADES ); mips_set_cp0r( CP0_BADVADDR, n_adr ); } else { program_write_dword_32le( n_adr, getcp2dr( INS_RT( mipscpu.op ) ) ); mips_advance_pc(); } } break; default: // printf( "%08x: unknown opcode %08x (prev %08x, RA %08x)\n", mipscpu.pc, mipscpu.op, mipscpu.prevpc, mipscpu.r[31] ); // mips_stop(); // mips_exception( EXC_RI ); break; } mips_ICount--; } while( mips_ICount > 0 ); return cycles - mips_ICount; } static void mips_get_context( void *dst ) { if( dst ) { *(mips_cpu_context *)dst = mipscpu; } } static void mips_set_context( void *src ) { if( src ) { mipscpu = *(mips_cpu_context *)src; change_pc( mipscpu.pc ); } } static void set_irq_line( int irqline, int state ) { UINT32 ip; switch( irqline ) { case MIPS_IRQ0: ip = CAUSE_IP2; break; case MIPS_IRQ1: ip = CAUSE_IP3; break; case MIPS_IRQ2: ip = CAUSE_IP4; break; case MIPS_IRQ3: ip = CAUSE_IP5; break; case MIPS_IRQ4: ip = CAUSE_IP6; break; case MIPS_IRQ5: ip = CAUSE_IP7; break; default: return; } switch( state ) { case CLEAR_LINE: mips_set_cp0r( CP0_CAUSE, mipscpu.cp0r[ CP0_CAUSE ] & ~ip ); break; case ASSERT_LINE: mips_set_cp0r( CP0_CAUSE, mipscpu.cp0r[ CP0_CAUSE ] |= ip ); if( mipscpu.irq_callback ) { /* HOLD_LINE interrupts are not supported by the architecture. By acknowledging the interupt here they are treated like PULSE_LINE interrupts, so if the interrupt isn't enabled it will be ignored. There is also a problem with PULSE_LINE interrupts as the interrupt pending bits aren't latched the emulated code won't know what caused the interrupt. */ (*mipscpu.irq_callback)( irqline ); } break; } } /**************************************************************************** * Return a formatted string for a register ****************************************************************************/ offs_t mips_dasm( char *buffer, offs_t pc ) { offs_t ret; change_pc( pc ); #ifdef MAME_DEBUG ret = DasmMIPS( buffer, pc ); #else sprintf( buffer, "$%08x", cpu_readop32( pc ) ); ret = 4; #endif change_pc( mipscpu.pc ); return ret; } /* preliminary gte code */ #define VXY0 ( mipscpu.cp2dr[ 0 ].d ) #define VX0 ( mipscpu.cp2dr[ 0 ].w.l ) #define VY0 ( mipscpu.cp2dr[ 0 ].w.h ) #define VZ0 ( mipscpu.cp2dr[ 1 ].w.l ) #define VXY1 ( mipscpu.cp2dr[ 2 ].d ) #define VX1 ( mipscpu.cp2dr[ 2 ].w.l ) #define VY1 ( mipscpu.cp2dr[ 2 ].w.h ) #define VZ1 ( mipscpu.cp2dr[ 3 ].w.l ) #define VXY2 ( mipscpu.cp2dr[ 4 ].d ) #define VX2 ( mipscpu.cp2dr[ 4 ].w.l ) #define VY2 ( mipscpu.cp2dr[ 4 ].w.h ) #define VZ2 ( mipscpu.cp2dr[ 5 ].w.l ) #define RGB ( mipscpu.cp2dr[ 6 ].d ) #define R ( mipscpu.cp2dr[ 6 ].b.l ) #define G ( mipscpu.cp2dr[ 6 ].b.h ) #define B ( mipscpu.cp2dr[ 6 ].b.h2 ) #define CODE ( mipscpu.cp2dr[ 6 ].b.h3 ) #define OTZ ( mipscpu.cp2dr[ 7 ].w.l ) #define IR0 ( mipscpu.cp2dr[ 8 ].d ) #define IR1 ( mipscpu.cp2dr[ 9 ].d ) #define IR2 ( mipscpu.cp2dr[ 10 ].d ) #define IR3 ( mipscpu.cp2dr[ 11 ].d ) #define SXY0 ( mipscpu.cp2dr[ 12 ].d ) #define SX0 ( mipscpu.cp2dr[ 12 ].w.l ) #define SY0 ( mipscpu.cp2dr[ 12 ].w.h ) #define SXY1 ( mipscpu.cp2dr[ 13 ].d ) #define SX1 ( mipscpu.cp2dr[ 13 ].w.l ) #define SY1 ( mipscpu.cp2dr[ 13 ].w.h ) #define SXY2 ( mipscpu.cp2dr[ 14 ].d ) #define SX2 ( mipscpu.cp2dr[ 14 ].w.l ) #define SY2 ( mipscpu.cp2dr[ 14 ].w.h ) #define SXYP ( mipscpu.cp2dr[ 15 ].d ) #define SXP ( mipscpu.cp2dr[ 15 ].w.l ) #define SYP ( mipscpu.cp2dr[ 15 ].w.h ) #define SZ0 ( mipscpu.cp2dr[ 16 ].w.l ) #define SZ1 ( mipscpu.cp2dr[ 17 ].w.l ) #define SZ2 ( mipscpu.cp2dr[ 18 ].w.l ) #define SZ3 ( mipscpu.cp2dr[ 19 ].w.l ) #define RGB0 ( mipscpu.cp2dr[ 20 ].d ) #define R0 ( mipscpu.cp2dr[ 20 ].b.l ) #define G0 ( mipscpu.cp2dr[ 20 ].b.h ) #define B0 ( mipscpu.cp2dr[ 20 ].b.h2 ) #define CD0 ( mipscpu.cp2dr[ 20 ].b.h3 ) #define RGB1 ( mipscpu.cp2dr[ 21 ].d ) #define R1 ( mipscpu.cp2dr[ 21 ].b.l ) #define G1 ( mipscpu.cp2dr[ 21 ].b.h ) #define B1 ( mipscpu.cp2dr[ 21 ].b.h2 ) #define CD1 ( mipscpu.cp2dr[ 21 ].b.h3 ) #define RGB2 ( mipscpu.cp2dr[ 22 ].d ) #define R2 ( mipscpu.cp2dr[ 22 ].b.l ) #define G2 ( mipscpu.cp2dr[ 22 ].b.h ) #define B2 ( mipscpu.cp2dr[ 22 ].b.h2 ) #define CD2 ( mipscpu.cp2dr[ 22 ].b.h3 ) #define RES1 ( mipscpu.cp2dr[ 23 ].d ) #define MAC0 ( mipscpu.cp2dr[ 24 ].d ) #define MAC1 ( mipscpu.cp2dr[ 25 ].d ) #define MAC2 ( mipscpu.cp2dr[ 26 ].d ) #define MAC3 ( mipscpu.cp2dr[ 27 ].d ) #define IRGB ( mipscpu.cp2dr[ 28 ].d ) #define ORGB ( mipscpu.cp2dr[ 29 ].d ) #define LZCS ( mipscpu.cp2dr[ 30 ].d ) #define LZCR ( mipscpu.cp2dr[ 31 ].d ) #define D1 ( mipscpu.cp2cr[ 0 ].d ) #define R11 ( mipscpu.cp2cr[ 0 ].w.l ) #define R12 ( mipscpu.cp2cr[ 0 ].w.h ) #define R13 ( mipscpu.cp2cr[ 1 ].w.l ) #define R21 ( mipscpu.cp2cr[ 1 ].w.h ) #define D2 ( mipscpu.cp2cr[ 2 ].d ) #define R22 ( mipscpu.cp2cr[ 2 ].w.l ) #define R23 ( mipscpu.cp2cr[ 2 ].w.h ) #define R31 ( mipscpu.cp2cr[ 3 ].w.l ) #define R32 ( mipscpu.cp2cr[ 3 ].w.h ) #define D3 ( mipscpu.cp2cr[ 4 ].d ) #define R33 ( mipscpu.cp2cr[ 4 ].w.l ) #define TRX ( mipscpu.cp2cr[ 5 ].d ) #define TRY ( mipscpu.cp2cr[ 6 ].d ) #define TRZ ( mipscpu.cp2cr[ 7 ].d ) #define L11 ( mipscpu.cp2cr[ 8 ].w.l ) #define L12 ( mipscpu.cp2cr[ 8 ].w.h ) #define L13 ( mipscpu.cp2cr[ 9 ].w.l ) #define L21 ( mipscpu.cp2cr[ 9 ].w.h ) #define L22 ( mipscpu.cp2cr[ 10 ].w.l ) #define L23 ( mipscpu.cp2cr[ 10 ].w.h ) #define L31 ( mipscpu.cp2cr[ 11 ].w.l ) #define L32 ( mipscpu.cp2cr[ 11 ].w.h ) #define L33 ( mipscpu.cp2cr[ 12 ].w.l ) #define RBK ( mipscpu.cp2cr[ 13 ].d ) #define GBK ( mipscpu.cp2cr[ 14 ].d ) #define BBK ( mipscpu.cp2cr[ 15 ].d ) #define LR1 ( mipscpu.cp2cr[ 16 ].w.l ) #define LR2 ( mipscpu.cp2cr[ 16 ].w.h ) #define LR3 ( mipscpu.cp2cr[ 17 ].w.l ) #define LG1 ( mipscpu.cp2cr[ 17 ].w.h ) #define LG2 ( mipscpu.cp2cr[ 18 ].w.l ) #define LG3 ( mipscpu.cp2cr[ 18 ].w.h ) #define LB1 ( mipscpu.cp2cr[ 19 ].w.l ) #define LB2 ( mipscpu.cp2cr[ 19 ].w.h ) #define LB3 ( mipscpu.cp2cr[ 20 ].w.l ) #define RFC ( mipscpu.cp2cr[ 21 ].d ) #define GFC ( mipscpu.cp2cr[ 22 ].d ) #define BFC ( mipscpu.cp2cr[ 23 ].d ) #define OFX ( mipscpu.cp2cr[ 24 ].d ) #define OFY ( mipscpu.cp2cr[ 25 ].d ) #define H ( mipscpu.cp2cr[ 26 ].w.l ) #define DQA ( mipscpu.cp2cr[ 27 ].w.l ) #define DQB ( mipscpu.cp2cr[ 28 ].d ) #define ZSF3 ( mipscpu.cp2cr[ 29 ].w.l ) #define ZSF4 ( mipscpu.cp2cr[ 30 ].w.l ) #define FLAG ( mipscpu.cp2cr[ 31 ].d ) static UINT32 getcp2dr( int n_reg ) { if( n_reg == 1 || n_reg == 3 || n_reg == 5 || n_reg == 8 || n_reg == 9 || n_reg == 10 || n_reg == 11 ) { mipscpu.cp2dr[ n_reg ].d = (INT32)(INT16)mipscpu.cp2dr[ n_reg ].d; } else if( n_reg == 17 || n_reg == 18 || n_reg == 19 ) { mipscpu.cp2dr[ n_reg ].d = (UINT32)(UINT16)mipscpu.cp2dr[ n_reg ].d; } else if( n_reg == 29 ) { ORGB = ( ( IR1 >> 7 ) & 0x1f ) | ( ( IR2 >> 2 ) & 0x3e0 ) | ( ( IR3 << 3 ) & 0x7c00 ); } GTELOG( "get CP2DR%u=%08x", n_reg, mipscpu.cp2dr[ n_reg ].d ); return mipscpu.cp2dr[ n_reg ].d; } static void setcp2dr( int n_reg, UINT32 n_value ) { GTELOG( "set CP2DR%u=%08x", n_reg, n_value ); mipscpu.cp2dr[ n_reg ].d = n_value; if( n_reg == 15 ) { SXY0 = SXY1; SXY1 = SXY2; SXY2 = SXYP; } else if( n_reg == 28 ) { IR1 = ( IRGB & 0x1f ) << 4; IR2 = ( IRGB & 0x3e0 ) >> 1; IR3 = ( IRGB & 0x7c00 ) >> 6; } else if( n_reg == 30 ) { UINT32 n_lzcs = LZCS; UINT32 n_lzcr = 0; if( ( n_lzcs & 0x80000000 ) == 0 ) { n_lzcs = ~n_lzcs; } while( ( n_lzcs & 0x80000000 ) != 0 ) { n_lzcr++; n_lzcs <<= 1; } LZCR = n_lzcr; } } static UINT32 getcp2cr( int n_reg ) { GTELOG( "get CP2CR%u=%08x", n_reg, mipscpu.cp2cr[ n_reg ].d ); return mipscpu.cp2cr[ n_reg ].d; } static void setcp2cr( int n_reg, UINT32 n_value ) { GTELOG( "set CP2CR%u=%08x", n_reg, n_value ); mipscpu.cp2cr[ n_reg ].d = n_value; } INLINE INT32 LIM( INT32 n_value, INT32 n_max, INT32 n_min, UINT32 n_flag ) { if( n_value > n_max ) { FLAG |= n_flag; return n_max; } else if( n_value < n_min ) { FLAG |= n_flag; return n_min; } return n_value; } INLINE INT64 BOUNDS( INT64 n_value, INT64 n_max, int n_maxflag, INT64 n_min, int n_minflag ) { if( n_value > n_max ) { FLAG |= n_maxflag; } else if( n_value < n_min ) { FLAG |= n_minflag; } return n_value; } #define A1( a ) BOUNDS( ( a ), 0x7fffffff, 30, -(INT64)0x80000000, ( 1 << 27 ) ) #define A2( a ) BOUNDS( ( a ), 0x7fffffff, 29, -(INT64)0x80000000, ( 1 << 26 ) ) #define A3( a ) BOUNDS( ( a ), 0x7fffffff, 28, -(INT64)0x80000000, ( 1 << 25 ) ) #define Lm_B1( a, l ) LIM( ( a ), 0x7fff, -0x8000 * !l, ( 1 << 31 ) | ( 1 << 24 ) ) #define Lm_B2( a, l ) LIM( ( a ), 0x7fff, -0x8000 * !l, ( 1 << 31 ) | ( 1 << 23 ) ) #define Lm_B3( a, l ) LIM( ( a ), 0x7fff, -0x8000 * !l, ( 1 << 22 ) ) #define Lm_C1( a ) LIM( ( a ), 0x00ff, 0x0000, ( 1 << 21 ) ) #define Lm_C2( a ) LIM( ( a ), 0x00ff, 0x0000, ( 1 << 20 ) ) #define Lm_C3( a ) LIM( ( a ), 0x00ff, 0x0000, ( 1 << 19 ) ) #define Lm_D( a ) LIM( ( a ), 0xffff, 0x0000, ( 1 << 31 ) | ( 1 << 18 ) ) INLINE UINT32 Lm_E( UINT32 n_z ) { if( n_z <= H / 2 ) { n_z = H / 2; FLAG |= ( 1 << 31 ) | ( 1 << 17 ); } if( n_z == 0 ) { n_z = 1; } return n_z; } #define F( a ) BOUNDS( ( a ), 0x7fffffff, ( 1 << 31 ) | ( 1 << 16 ), -(INT64)0x80000000, ( 1 << 31 ) | ( 1 << 15 ) ) #define Lm_G1( a ) LIM( ( a ), 0x3ff, -0x400, ( 1 << 31 ) | ( 1 << 14 ) ) #define Lm_G2( a ) LIM( ( a ), 0x3ff, -0x400, ( 1 << 31 ) | ( 1 << 13 ) ) #define Lm_H( a ) LIM( ( a ), 0xfff, 0x000, ( 1 << 12 ) ) static void docop2( int gteop ) { int n_sf; int n_v; int n_lm; int n_pass; UINT16 n_v1; UINT16 n_v2; UINT16 n_v3; const UINT16 **p_n_mx; const UINT32 **p_n_cv; static const UINT16 n_zm = 0; static const UINT32 n_zc = 0; static const UINT16 *p_n_vx[] = { &VX0, &VX1, &VX2 }; static const UINT16 *p_n_vy[] = { &VY0, &VY1, &VY2 }; static const UINT16 *p_n_vz[] = { &VZ0, &VZ1, &VZ2 }; static const UINT16 *p_n_rm[] = { &R11, &R12, &R13, &R21, &R22, &R23, &R31, &R32, &R33 }; static const UINT16 *p_n_lm[] = { &L11, &L12, &L13, &L21, &L22, &L23, &L31, &L32, &L33 }; static const UINT16 *p_n_cm[] = { &LR1, &LR2, &LR3, &LG1, &LG2, &LG3, &LB1, &LB2, &LB3 }; static const UINT16 *p_n_zm[] = { &n_zm, &n_zm, &n_zm, &n_zm, &n_zm, &n_zm, &n_zm, &n_zm, &n_zm }; static const UINT16 **p_p_n_mx[] = { p_n_rm, p_n_lm, p_n_cm, p_n_zm }; static const UINT32 *p_n_tr[] = { &TRX, &TRY, &TRZ }; static const UINT32 *p_n_bk[] = { &RBK, &GBK, &BBK }; static const UINT32 *p_n_fc[] = { &RFC, &GFC, &BFC }; static const UINT32 *p_n_zc[] = { &n_zc, &n_zc, &n_zc }; static const UINT32 **p_p_n_cv[] = { p_n_tr, p_n_bk, p_n_fc, p_n_zc }; switch( GTE_FUNCT( gteop ) ) { case 0x01: if( gteop == 0x0180001 ) { GTELOG( "RTPS" ); FLAG = 0; MAC1 = A1( ( ( (INT64)(INT32)TRX << 12 ) + ( (INT16)R11 * (INT16)VX0 ) + ( (INT16)R12 * (INT16)VY0 ) + ( (INT16)R13 * (INT16)VZ0 ) ) >> 12 ); MAC2 = A2( ( ( (INT64)(INT32)TRY << 12 ) + ( (INT16)R21 * (INT16)VX0 ) + ( (INT16)R22 * (INT16)VY0 ) + ( (INT16)R23 * (INT16)VZ0 ) ) >> 12 ); MAC3 = A3( ( ( (INT64)(INT32)TRZ << 12 ) + ( (INT16)R31 * (INT16)VX0 ) + ( (INT16)R32 * (INT16)VY0 ) + ( (INT16)R33 * (INT16)VZ0 ) ) >> 12 ); IR1 = Lm_B1( (INT32)MAC1, 0 ); IR2 = Lm_B2( (INT32)MAC2, 0 ); IR3 = Lm_B3( (INT32)MAC3, 0 ); SZ0 = SZ1; SZ1 = SZ2; SZ2 = SZ3; SZ3 = Lm_D( (INT32)MAC3 ); SXY0 = SXY1; SXY1 = SXY2; SX2 = Lm_G1( F( (INT64)(INT32)OFX + ( (INT64)(INT16)IR1 * ( ( (UINT32)H << 16 ) / Lm_E( SZ3 ) ) ) ) >> 16 ); SY2 = Lm_G2( F( (INT64)(INT32)OFY + ( (INT64)(INT16)IR2 * ( ( (UINT32)H << 16 ) / Lm_E( SZ3 ) ) ) ) >> 16 ); MAC0 = F( (INT64)(INT32)DQB + ( (INT64)(INT16)DQA * ( ( (UINT32)H << 16 ) / Lm_E( SZ3 ) ) ) ); IR0 = Lm_H( (INT32)MAC0 >> 12 ); return; } break; case 0x06: if( gteop == 0x0400006 || gteop == 0x1400006 || gteop == 0x0155cc6 ) { GTELOG( "NCLIP" ); FLAG = 0; MAC0 = F( ( (INT64)(INT16)SX0 * (INT16)SY1 ) + ( (INT16)SX1 * (INT16)SY2 ) + ( (INT16)SX2 * (INT16)SY0 ) - ( (INT16)SX0 * (INT16)SY2 ) - ( (INT16)SX1 * (INT16)SY0 ) - ( (INT16)SX2 * (INT16)SY1 ) ); return; } break; case 0x0c: if( GTE_OP( gteop ) == 0x17 ) { GTELOG( "OP" ); n_sf = 12 * GTE_SF( gteop ); FLAG = 0; MAC1 = A1( ( ( (INT64)(INT32)D2 * (INT16)IR3 ) - ( (INT64)(INT32)D3 * (INT16)IR2 ) ) >> n_sf ); MAC2 = A2( ( ( (INT64)(INT32)D3 * (INT16)IR1 ) - ( (INT64)(INT32)D1 * (INT16)IR3 ) ) >> n_sf ); MAC3 = A3( ( ( (INT64)(INT32)D1 * (INT16)IR2 ) - ( (INT64)(INT32)D2 * (INT16)IR1 ) ) >> n_sf ); IR1 = Lm_B1( (INT32)MAC1, 0 ); IR2 = Lm_B2( (INT32)MAC2, 0 ); IR3 = Lm_B3( (INT32)MAC3, 0 ); return; } break; case 0x10: if( gteop == 0x0780010 ) { GTELOG( "DPCS" ); FLAG = 0; MAC1 = A1( ( ( (INT64)R << 16 ) + ( (INT64)(INT16)IR0 * ( Lm_B1( (INT32)RFC - ( R << 4 ), 0 ) ) ) ) >> 12 ); MAC2 = A2( ( ( (INT64)G << 16 ) + ( (INT64)(INT16)IR0 * ( Lm_B1( (INT32)GFC - ( G << 4 ), 0 ) ) ) ) >> 12 ); MAC3 = A3( ( ( (INT64)B << 16 ) + ( (INT64)(INT16)IR0 * ( Lm_B1( (INT32)BFC - ( B << 4 ), 0 ) ) ) ) >> 12 ); IR1 = Lm_B1( (INT32)MAC1, 0 ); IR2 = Lm_B2( (INT32)MAC2, 0 ); IR3 = Lm_B3( (INT32)MAC3, 0 ); CD0 = CD1; CD1 = CD2; CD2 = CODE; R0 = R1; R1 = R2; R2 = Lm_C1( (INT32)MAC1 >> 4 ); G0 = G1; G1 = G2; G2 = Lm_C2( (INT32)MAC2 >> 4 ); B0 = B1; B1 = B2; B2 = Lm_C3( (INT32)MAC3 >> 4 ); return; } break; case 0x11: if( gteop == 0x0980011 ) { GTELOG( "INTPL" ); FLAG = 0; MAC1 = A1( ( ( (INT64)(INT16)IR1 << 12 ) + ( (INT64)(INT16)IR0 * ( Lm_B1( (INT32)RFC - (INT16)IR1, 0 ) ) ) ) >> 12 ); MAC2 = A2( ( ( (INT64)(INT16)IR2 << 12 ) + ( (INT64)(INT16)IR0 * ( Lm_B1( (INT32)GFC - (INT16)IR2, 0 ) ) ) ) >> 12 ); MAC3 = A3( ( ( (INT64)(INT16)IR3 << 12 ) + ( (INT64)(INT16)IR0 * ( Lm_B1( (INT32)BFC - (INT16)IR3, 0 ) ) ) ) >> 12 ); IR1 = Lm_B1( (INT32)MAC1, 0 ); IR2 = Lm_B2( (INT32)MAC2, 0 ); IR3 = Lm_B3( (INT32)MAC3, 0 ); CD0 = CD1; CD1 = CD2; CD2 = CODE; R0 = R1; R1 = R2; R2 = Lm_C1( (INT32)MAC1 ); G0 = G1; G1 = G2; G2 = Lm_C2( (INT32)MAC2 ); B0 = B1; B1 = B2; B2 = Lm_C3( (INT32)MAC3 ); return; } break; case 0x12: if( GTE_OP( gteop ) == 0x04 ) { GTELOG( "MVMVA" ); n_sf = 12 * GTE_SF( gteop ); p_n_mx = p_p_n_mx[ GTE_MX( gteop ) ]; n_v = GTE_V( gteop ); if( n_v < 3 ) { n_v1 = *p_n_vx[ n_v ]; n_v2 = *p_n_vy[ n_v ]; n_v3 = *p_n_vz[ n_v ]; } else { n_v1 = IR1; n_v2 = IR2; n_v3 = IR3; } p_n_cv = p_p_n_cv[ GTE_CV( gteop ) ]; n_lm = GTE_LM( gteop ); FLAG = 0; MAC1 = A1( ( ( (INT64)(INT32)*p_n_cv[ 0 ] << 12 ) + ( (INT16)*p_n_mx[ 0 ] * (INT16)n_v1 ) + ( (INT16)*p_n_mx[ 1 ] * (INT16)n_v2 ) + ( (INT16)*p_n_mx[ 2 ] * (INT16)n_v3 ) ) >> n_sf ); MAC2 = A2( ( ( (INT64)(INT32)*p_n_cv[ 1 ] << 12 ) + ( (INT16)*p_n_mx[ 3 ] * (INT16)n_v1 ) + ( (INT16)*p_n_mx[ 4 ] * (INT16)n_v2 ) + ( (INT16)*p_n_mx[ 5 ] * (INT16)n_v3 ) ) >> n_sf ); MAC3 = A3( ( ( (INT64)(INT32)*p_n_cv[ 2 ] << 12 ) + ( (INT16)*p_n_mx[ 6 ] * (INT16)n_v1 ) + ( (INT16)*p_n_mx[ 7 ] * (INT16)n_v2 ) + ( (INT16)*p_n_mx[ 8 ] * (INT16)n_v3 ) ) >> n_sf ); IR1 = Lm_B1( (INT32)MAC1, n_lm ); IR2 = Lm_B2( (INT32)MAC2, n_lm ); IR3 = Lm_B3( (INT32)MAC3, n_lm ); return; } break; case 0x13: if( gteop == 0x0e80413 ) { GTELOG( "NCDS" ); FLAG = 0; MAC1 = A1( ( ( (INT64)(INT16)L11 * (INT16)VX0 ) + ( (INT16)L12 * (INT16)VY0 ) + ( (INT16)L13 * (INT16)VZ0 ) ) >> 12 ); MAC2 = A2( ( ( (INT64)(INT16)L21 * (INT16)VX0 ) + ( (INT16)L22 * (INT16)VY0 ) + ( (INT16)L23 * (INT16)VZ0 ) ) >> 12 ); MAC3 = A3( ( ( (INT64)(INT16)L31 * (INT16)VX0 ) + ( (INT16)L32 * (INT16)VY0 ) + ( (INT16)L33 * (INT16)VZ0 ) ) >> 12 ); IR1 = Lm_B1( (INT32)MAC1, 1 ); IR2 = Lm_B2( (INT32)MAC2, 1 ); IR3 = Lm_B3( (INT32)MAC3, 1 ); MAC1 = A1( ( ( (INT64)RBK << 12 ) + ( (INT16)LR1 * (INT16)IR1 ) + ( (INT16)LR2 * (INT16)IR2 ) + ( (INT16)LR3 * (INT16)IR3 ) ) >> 12 ); MAC2 = A2( ( ( (INT64)GBK << 12 ) + ( (INT16)LG1 * (INT16)IR1 ) + ( (INT16)LG2 * (INT16)IR2 ) + ( (INT16)LG3 * (INT16)IR3 ) ) >> 12 ); MAC3 = A3( ( ( (INT64)BBK << 12 ) + ( (INT16)LB1 * (INT16)IR1 ) + ( (INT16)LB2 * (INT16)IR2 ) + ( (INT16)LB3 * (INT16)IR3 ) ) >> 12 ); IR1 = Lm_B1( (INT32)MAC1, 1 ); IR2 = Lm_B2( (INT32)MAC2, 1 ); IR3 = Lm_B3( (INT32)MAC3, 1 ); MAC1 = A1( ( ( ( (INT64)R << 4 ) * (INT16)IR1 ) + ( (INT16)IR0 * Lm_B1( (INT32)RFC - ( ( R * (INT16)IR1 ) >> 8 ), 0 ) ) ) >> 12 ); MAC2 = A2( ( ( ( (INT64)G << 4 ) * (INT16)IR2 ) + ( (INT16)IR0 * Lm_B2( (INT32)GFC - ( ( G * (INT16)IR2 ) >> 8 ), 0 ) ) ) >> 12 ); MAC3 = A3( ( ( ( (INT64)B << 4 ) * (INT16)IR3 ) + ( (INT16)IR0 * Lm_B3( (INT32)BFC - ( ( B * (INT16)IR3 ) >> 8 ), 0 ) ) ) >> 12 ); IR1 = Lm_B1( (INT32)MAC1, 1 ); IR2 = Lm_B2( (INT32)MAC2, 1 ); IR3 = Lm_B3( (INT32)MAC3, 1 ); CD0 = CD1; CD1 = CD2; CD2 = CODE; R0 = R1; R1 = R2; R2 = Lm_C1( (INT32)MAC1 >> 4 ); G0 = G1; G1 = G2; G2 = Lm_C2( (INT32)MAC2 >> 4 ); B0 = B1; B1 = B2; B2 = Lm_C3( (INT32)MAC3 >> 4 ); return; } break; case 0x14: if( gteop == 0x1280414 ) { GTELOG( "CDP" ); FLAG = 0; MAC1 = A1( ( ( (INT64)RBK << 12 ) + ( (INT16)LR1 * (INT16)IR1 ) + ( (INT16)LR2 * (INT16)IR2 ) + ( (INT16)LR3 * (INT16)IR3 ) ) >> 12 ); MAC2 = A2( ( ( (INT64)GBK << 12 ) + ( (INT16)LG1 * (INT16)IR1 ) + ( (INT16)LG2 * (INT16)IR2 ) + ( (INT16)LG3 * (INT16)IR3 ) ) >> 12 ); MAC3 = A3( ( ( (INT64)BBK << 12 ) + ( (INT16)LB1 * (INT16)IR1 ) + ( (INT16)LB2 * (INT16)IR2 ) + ( (INT16)LB3 * (INT16)IR3 ) ) >> 12 ); IR1 = Lm_B1( MAC1, 1 ); IR2 = Lm_B2( MAC2, 1 ); IR3 = Lm_B3( MAC3, 1 ); MAC1 = A1( ( ( ( (INT64)R << 4 ) * (INT16)IR1 ) + ( (INT16)IR0 * Lm_B1( (INT32)RFC - ( ( R * (INT16)IR1 ) >> 8 ), 0 ) ) ) >> 12 ); MAC2 = A2( ( ( ( (INT64)G << 4 ) * (INT16)IR2 ) + ( (INT16)IR0 * Lm_B2( (INT32)GFC - ( ( G * (INT16)IR2 ) >> 8 ), 0 ) ) ) >> 12 ); MAC3 = A3( ( ( ( (INT64)B << 4 ) * (INT16)IR3 ) + ( (INT16)IR0 * Lm_B3( (INT32)BFC - ( ( B * (INT16)IR3 ) >> 8 ), 0 ) ) ) >> 12 ); IR1 = Lm_B1( MAC1, 1 ); IR2 = Lm_B2( MAC2, 1 ); IR3 = Lm_B3( MAC3, 1 ); CD0 = CD1; CD1 = CD2; CD2 = CODE; R0 = R1; R1 = R2; R2 = Lm_C1( (INT32)MAC1 >> 4 ); G0 = G1; G1 = G2; G2 = Lm_C2( (INT32)MAC2 >> 4 ); B0 = B1; B1 = B2; B2 = Lm_C3( (INT32)MAC3 >> 4 ); return; } break; case 0x16: if( gteop == 0x0f80416 ) { GTELOG( "NCDT" ); FLAG = 0; for( n_v = 0; n_v < 3; n_v++ ) { MAC1 = A1( ( ( (INT64)(INT16)L11 * (INT16)*p_n_vx[ n_v ] ) + ( (INT16)L12 * (INT16)*p_n_vy[ n_v ] ) + ( (INT16)L13 * (INT16)*p_n_vz[ n_v ] ) ) >> 12 ); MAC2 = A2( ( ( (INT64)(INT16)L21 * (INT16)*p_n_vx[ n_v ] ) + ( (INT16)L22 * (INT16)*p_n_vy[ n_v ] ) + ( (INT16)L23 * (INT16)*p_n_vz[ n_v ] ) ) >> 12 ); MAC3 = A3( ( ( (INT64)(INT16)L31 * (INT16)*p_n_vx[ n_v ] ) + ( (INT16)L32 * (INT16)*p_n_vy[ n_v ] ) + ( (INT16)L33 * (INT16)*p_n_vz[ n_v ] ) ) >> 12 ); IR1 = Lm_B1( (INT32)MAC1, 1 ); IR2 = Lm_B2( (INT32)MAC2, 1 ); IR3 = Lm_B3( (INT32)MAC3, 1 ); MAC1 = A1( ( ( (INT64)RBK << 12 ) + ( (INT16)LR1 * (INT16)IR1 ) + ( (INT16)LR2 * (INT16)IR2 ) + ( (INT16)LR3 * (INT16)IR3 ) ) >> 12 ); MAC2 = A2( ( ( (INT64)GBK << 12 ) + ( (INT16)LG1 * (INT16)IR1 ) + ( (INT16)LG2 * (INT16)IR2 ) + ( (INT16)LG3 * (INT16)IR3 ) ) >> 12 ); MAC3 = A3( ( ( (INT64)BBK << 12 ) + ( (INT16)LB1 * (INT16)IR1 ) + ( (INT16)LB2 * (INT16)IR2 ) + ( (INT16)LB3 * (INT16)IR3 ) ) >> 12 ); IR1 = Lm_B1( (INT32)MAC1, 1 ); IR2 = Lm_B2( (INT32)MAC2, 1 ); IR3 = Lm_B3( (INT32)MAC3, 1 ); MAC1 = A1( ( ( ( (INT64)R << 4 ) * (INT16)IR1 ) + ( (INT16)IR0 * Lm_B1( (INT32)RFC - ( ( R * (INT16)IR1 ) >> 8 ), 0 ) ) ) >> 12 ); MAC2 = A2( ( ( ( (INT64)G << 4 ) * (INT16)IR2 ) + ( (INT16)IR0 * Lm_B2( (INT32)GFC - ( ( G * (INT16)IR2 ) >> 8 ), 0 ) ) ) >> 12 ); MAC3 = A3( ( ( ( (INT64)B << 4 ) * (INT16)IR3 ) + ( (INT16)IR0 * Lm_B3( (INT32)BFC - ( ( B * (INT16)IR3 ) >> 8 ), 0 ) ) ) >> 12 ); IR1 = Lm_B1( (INT32)MAC1, 1 ); IR2 = Lm_B2( (INT32)MAC2, 1 ); IR3 = Lm_B3( (INT32)MAC3, 1 ); CD0 = CD1; CD1 = CD2; CD2 = CODE; R0 = R1; R1 = R2; R2 = Lm_C1( (INT32)MAC1 >> 4 ); G0 = G1; G1 = G2; G2 = Lm_C2( (INT32)MAC2 >> 4 ); B0 = B1; B1 = B2; B2 = Lm_C3( (INT32)MAC3 >> 4 ); } return; } break; case 0x1b: if( gteop == 0x108041b ) { GTELOG( "NCCS" ); FLAG = 0; MAC1 = A1( ( ( (INT64)(INT16)L11 * (INT16)VX0 ) + ( (INT16)L12 * (INT16)VY0 ) + ( (INT16)L13 * (INT16)VZ0 ) ) >> 12 ); MAC2 = A2( ( ( (INT64)(INT16)L21 * (INT16)VX0 ) + ( (INT16)L22 * (INT16)VY0 ) + ( (INT16)L23 * (INT16)VZ0 ) ) >> 12 ); MAC3 = A3( ( ( (INT64)(INT16)L31 * (INT16)VX0 ) + ( (INT16)L32 * (INT16)VY0 ) + ( (INT16)L33 * (INT16)VZ0 ) ) >> 12 ); IR1 = Lm_B1( (INT32)MAC1, 1 ); IR2 = Lm_B2( (INT32)MAC2, 1 ); IR3 = Lm_B3( (INT32)MAC3, 1 ); MAC1 = A1( ( ( (INT64)RBK << 12 ) + ( (INT16)LR1 * (INT16)IR1 ) + ( (INT16)LR2 * (INT16)IR2 ) + ( (INT16)LR3 * (INT16)IR3 ) ) >> 12 ); MAC2 = A2( ( ( (INT64)GBK << 12 ) + ( (INT16)LG1 * (INT16)IR1 ) + ( (INT16)LG2 * (INT16)IR2 ) + ( (INT16)LG3 * (INT16)IR3 ) ) >> 12 ); MAC3 = A3( ( ( (INT64)BBK << 12 ) + ( (INT16)LB1 * (INT16)IR1 ) + ( (INT16)LB2 * (INT16)IR2 ) + ( (INT16)LB3 * (INT16)IR3 ) ) >> 12 ); IR1 = Lm_B1( (INT32)MAC1, 1 ); IR2 = Lm_B2( (INT32)MAC2, 1 ); IR3 = Lm_B3( (INT32)MAC3, 1 ); MAC1 = A1( ( (INT64)R * (INT16)IR1 ) >> 8 ); MAC2 = A2( ( (INT64)G * (INT16)IR2 ) >> 8 ); MAC3 = A3( ( (INT64)B * (INT16)IR3 ) >> 8 ); IR1 = Lm_B1( (INT32)MAC1, 1 ); IR2 = Lm_B2( (INT32)MAC2, 1 ); IR3 = Lm_B3( (INT32)MAC3, 1 ); CD0 = CD1; CD1 = CD2; CD2 = CODE; R0 = R1; R1 = R2; R2 = Lm_C1( (INT32)MAC1 >> 4 ); G0 = G1; G1 = G2; G2 = Lm_C2( (INT32)MAC2 >> 4 ); B0 = B1; B1 = B2; B2 = Lm_C3( (INT32)MAC3 >> 4 ); return; } break; case 0x1c: if( gteop == 0x138041c ) { GTELOG( "CC" ); FLAG = 0; MAC1 = A1( ( ( (INT64)RBK << 12 ) + ( (INT16)LR1 * (INT16)IR1 ) + ( (INT16)LR2 * (INT16)IR2 ) + ( (INT16)LR3 * (INT16)IR3 ) ) >> 12 ); MAC2 = A2( ( ( (INT64)GBK << 12 ) + ( (INT16)LG1 * (INT16)IR1 ) + ( (INT16)LG2 * (INT16)IR2 ) + ( (INT16)LG3 * (INT16)IR3 ) ) >> 12 ); MAC3 = A3( ( ( (INT64)BBK << 12 ) + ( (INT16)LB1 * (INT16)IR1 ) + ( (INT16)LB2 * (INT16)IR2 ) + ( (INT16)LB3 * (INT16)IR3 ) ) >> 12 ); IR1 = Lm_B1( MAC1, 1 ); IR2 = Lm_B2( MAC2, 1 ); IR3 = Lm_B3( MAC3, 1 ); MAC1 = A1( ( (INT64)R * (INT16)IR1 ) >> 8 ); MAC2 = A2( ( (INT64)G * (INT16)IR2 ) >> 8 ); MAC3 = A3( ( (INT64)B * (INT16)IR3 ) >> 8 ); IR1 = Lm_B1( MAC1, 1 ); IR2 = Lm_B2( MAC2, 1 ); IR3 = Lm_B3( MAC3, 1 ); CD0 = CD1; CD1 = CD2; CD2 = CODE; R0 = R1; R1 = R2; R2 = Lm_C1( (INT32)MAC1 >> 4 ); G0 = G1; G1 = G2; G2 = Lm_C2( (INT32)MAC2 >> 4 ); B0 = B1; B1 = B2; B2 = Lm_C3( (INT32)MAC3 >> 4 ); return; } break; case 0x1e: if( gteop == 0x0c8041e ) { GTELOG( "NCS" ); FLAG = 0; MAC1 = A1( ( ( (INT64)(INT16)L11 * (INT16)VX0 ) + ( (INT16)L12 * (INT16)VY0 ) + ( (INT16)L13 * (INT16)VZ0 ) ) >> 12 ); MAC2 = A2( ( ( (INT64)(INT16)L21 * (INT16)VX0 ) + ( (INT16)L22 * (INT16)VY0 ) + ( (INT16)L23 * (INT16)VZ0 ) ) >> 12 ); MAC3 = A3( ( ( (INT64)(INT16)L31 * (INT16)VX0 ) + ( (INT16)L32 * (INT16)VY0 ) + ( (INT16)L33 * (INT16)VZ0 ) ) >> 12 ); IR1 = Lm_B1( (INT32)MAC1, 1 ); IR2 = Lm_B2( (INT32)MAC2, 1 ); IR3 = Lm_B3( (INT32)MAC3, 1 ); MAC1 = A1( ( ( (INT64)RBK << 12 ) + ( (INT16)LR1 * (INT16)IR1 ) + ( (INT16)LR2 * (INT16)IR2 ) + ( (INT16)LR3 * (INT16)IR3 ) ) >> 12 ); MAC2 = A2( ( ( (INT64)GBK << 12 ) + ( (INT16)LG1 * (INT16)IR1 ) + ( (INT16)LG2 * (INT16)IR2 ) + ( (INT16)LG3 * (INT16)IR3 ) ) >> 12 ); MAC3 = A3( ( ( (INT64)BBK << 12 ) + ( (INT16)LB1 * (INT16)IR1 ) + ( (INT16)LB2 * (INT16)IR2 ) + ( (INT16)LB3 * (INT16)IR3 ) ) >> 12 ); IR1 = Lm_B1( (INT32)MAC1, 1 ); IR2 = Lm_B2( (INT32)MAC2, 1 ); IR3 = Lm_B3( (INT32)MAC3, 1 ); CD0 = CD1; CD1 = CD2; CD2 = CODE; R0 = R1; R1 = R2; R2 = Lm_C1( (INT32)MAC1 >> 4 ); G0 = G1; G1 = G2; G2 = Lm_C2( (INT32)MAC2 >> 4 ); B0 = B1; B1 = B2; B2 = Lm_C3( (INT32)MAC3 >> 4 ); return; } break; case 0x20: if( gteop == 0x0d80420 ) { GTELOG( "NCT" ); FLAG = 0; for( n_v = 0; n_v < 3; n_v++ ) { MAC1 = A1( ( ( (INT64)(INT16)L11 * (INT16)*p_n_vx[ n_v ] ) + ( (INT16)L12 * (INT16)*p_n_vy[ n_v ] ) + ( (INT16)L13 * (INT16)*p_n_vz[ n_v ] ) ) >> 12 ); MAC2 = A2( ( ( (INT64)(INT16)L21 * (INT16)*p_n_vx[ n_v ] ) + ( (INT16)L22 * (INT16)*p_n_vy[ n_v ] ) + ( (INT16)L23 * (INT16)*p_n_vz[ n_v ] ) ) >> 12 ); MAC3 = A3( ( ( (INT64)(INT16)L31 * (INT16)*p_n_vx[ n_v ] ) + ( (INT16)L32 * (INT16)*p_n_vy[ n_v ] ) + ( (INT16)L33 * (INT16)*p_n_vz[ n_v ] ) ) >> 12 ); IR1 = Lm_B1( (INT32)MAC1, 1 ); IR2 = Lm_B2( (INT32)MAC2, 1 ); IR3 = Lm_B3( (INT32)MAC3, 1 ); MAC1 = A1( ( ( (INT64)RBK << 12 ) + ( (INT16)LR1 * (INT16)IR1 ) + ( (INT16)LR2 * (INT16)IR2 ) + ( (INT16)LR3 * (INT16)IR3 ) ) >> 12 ); MAC2 = A2( ( ( (INT64)GBK << 12 ) + ( (INT16)LG1 * (INT16)IR1 ) + ( (INT16)LG2 * (INT16)IR2 ) + ( (INT16)LG3 * (INT16)IR3 ) ) >> 12 ); MAC3 = A3( ( ( (INT64)BBK << 12 ) + ( (INT16)LB1 * (INT16)IR1 ) + ( (INT16)LB2 * (INT16)IR2 ) + ( (INT16)LB3 * (INT16)IR3 ) ) >> 12 ); IR1 = Lm_B1( (INT32)MAC1, 1 ); IR2 = Lm_B2( (INT32)MAC2, 1 ); IR3 = Lm_B3( (INT32)MAC3, 1 ); CD0 = CD1; CD1 = CD2; CD2 = CODE; R0 = R1; R1 = R2; R2 = Lm_C1( (INT32)MAC1 >> 4 ); G0 = G1; G1 = G2; G2 = Lm_C2( (INT32)MAC2 >> 4 ); B0 = B1; B1 = B2; B2 = Lm_C3( (INT32)MAC3 >> 4 ); } return; } break; case 0x28: if( GTE_OP( gteop ) == 0x0a && GTE_LM( gteop ) == 1 ) { GTELOG( "SQR" ); n_sf = 12 * GTE_SF( gteop ); FLAG = 0; MAC1 = A1( ( (INT64)(INT16)IR1 * (INT16)IR1 ) >> n_sf ); MAC2 = A2( ( (INT64)(INT16)IR2 * (INT16)IR2 ) >> n_sf ); MAC3 = A3( ( (INT64)(INT16)IR3 * (INT16)IR3 ) >> n_sf ); IR1 = Lm_B1( MAC1, 1 ); IR2 = Lm_B2( MAC2, 1 ); IR3 = Lm_B3( MAC3, 1 ); return; } break; // DCPL 0x29 case 0x2a: if( gteop == 0x0f8002a ) { GTELOG( "DPCT" ); FLAG = 0; for( n_pass = 0; n_pass < 3; n_pass++ ) { MAC1 = A1( ( ( (INT64)R0 << 16 ) + ( (INT64)(INT16)IR0 * ( Lm_B1( (INT32)RFC - ( R0 << 4 ), 0 ) ) ) ) >> 12 ); MAC2 = A2( ( ( (INT64)G0 << 16 ) + ( (INT64)(INT16)IR0 * ( Lm_B1( (INT32)GFC - ( G0 << 4 ), 0 ) ) ) ) >> 12 ); MAC3 = A3( ( ( (INT64)B0 << 16 ) + ( (INT64)(INT16)IR0 * ( Lm_B1( (INT32)BFC - ( B0 << 4 ), 0 ) ) ) ) >> 12 ); IR1 = Lm_B1( (INT32)MAC1, 0 ); IR2 = Lm_B2( (INT32)MAC2, 0 ); IR3 = Lm_B3( (INT32)MAC3, 0 ); CD0 = CD1; CD1 = CD2; CD2 = CODE; R0 = R1; R1 = R2; R2 = Lm_C1( (INT32)MAC1 >> 4 ); G0 = G1; G1 = G2; G2 = Lm_C2( (INT32)MAC2 >> 4 ); B0 = B1; B1 = B2; B2 = Lm_C3( (INT32)MAC3 >> 4 ); } return; } break; case 0x2d: if( gteop == 0x158002d ) { GTELOG( "AVSZ3" ); FLAG = 0; MAC0 = F( ( (INT64)(INT16)ZSF3 * SZ1 ) + ( (INT16)ZSF3 * SZ2 ) + ( (INT16)ZSF3 * SZ3 ) ); OTZ = Lm_D( (INT32)MAC0 >> 12 ); return; } break; case 0x2e: if( gteop == 0x168002e ) { GTELOG( "AVSZ4" ); FLAG = 0; MAC0 = F( ( (INT64)(INT16)ZSF4 * SZ0 ) + ( (INT16)ZSF4 * SZ1 ) + ( (INT16)ZSF4 * SZ2 ) + ( (INT16)ZSF4 * SZ3 ) ); OTZ = Lm_D( (INT32)MAC0 >> 12 ); return; } break; case 0x30: if( gteop == 0x0280030 ) { GTELOG( "RTPT" ); FLAG = 0; for( n_v = 0; n_v < 3; n_v++ ) { MAC1 = A1( ( ( (INT64)(INT32)TRX << 12 ) + ( (INT16)R11 * (INT16)*p_n_vx[ n_v ] ) + ( (INT16)R12 * (INT16)*p_n_vy[ n_v ] ) + ( (INT16)R13 * (INT16)*p_n_vz[ n_v ] ) ) >> 12 ); MAC2 = A2( ( ( (INT64)(INT32)TRY << 12 ) + ( (INT16)R21 * (INT16)*p_n_vx[ n_v ] ) + ( (INT16)R22 * (INT16)*p_n_vy[ n_v ] ) + ( (INT16)R23 * (INT16)*p_n_vz[ n_v ] ) ) >> 12 ); MAC3 = A3( ( ( (INT64)(INT32)TRZ << 12 ) + ( (INT16)R31 * (INT16)*p_n_vx[ n_v ] ) + ( (INT16)R32 * (INT16)*p_n_vy[ n_v ] ) + ( (INT16)R33 * (INT16)*p_n_vz[ n_v ] ) ) >> 12 ); IR1 = Lm_B1( (INT32)MAC1, 0 ); IR2 = Lm_B2( (INT32)MAC2, 0 ); IR3 = Lm_B3( (INT32)MAC3, 0 ); SZ0 = SZ1; SZ1 = SZ2; SZ2 = SZ3; SZ3 = Lm_D( (INT32)MAC3 ); SXY0 = SXY1; SXY1 = SXY2; SX2 = Lm_G1( F( ( (INT64)(INT32)OFX + ( (INT64)(INT16)IR1 * ( ( (UINT32)H << 16 ) / Lm_E( SZ3 ) ) ) ) >> 16 ) ); SY2 = Lm_G2( F( ( (INT64)(INT32)OFY + ( (INT64)(INT16)IR2 * ( ( (UINT32)H << 16 ) / Lm_E( SZ3 ) ) ) ) >> 16 ) ); MAC0 = F( (INT64)(INT32)DQB + ( (INT64)(INT16)DQA * ( ( (UINT32)H << 16 ) / Lm_E( SZ3 ) ) ) ); IR0 = Lm_H( (INT32)MAC0 >> 12 ); } return; } break; case 0x3d: if( GTE_OP( gteop ) == 0x09 || GTE_OP( gteop ) == 0x19 ) { GTELOG( "GPF" ); n_sf = 12 * GTE_SF( gteop ); FLAG = 0; MAC1 = A1( ( (INT64)(INT16)IR0 * (INT16)IR1 ) >> n_sf ); MAC2 = A2( ( (INT64)(INT16)IR0 * (INT16)IR2 ) >> n_sf ); MAC3 = A3( ( (INT64)(INT16)IR0 * (INT16)IR3 ) >> n_sf ); IR1 = Lm_B1( (INT32)MAC1, 0 ); IR2 = Lm_B2( (INT32)MAC2, 0 ); IR3 = Lm_B3( (INT32)MAC3, 0 ); CD0 = CD1; CD1 = CD2; CD2 = CODE; R0 = R1; R1 = R2; R2 = Lm_C1( (INT32)MAC1 >> 4 ); G0 = G1; G1 = G2; G2 = Lm_C2( (INT32)MAC2 >> 4 ); B0 = B1; B1 = B2; B2 = Lm_C3( (INT32)MAC3 >> 4 ); return; } break; case 0x3e: if( GTE_OP( gteop ) == 0x1a ) { GTELOG( "GPL" ); n_sf = 12 * GTE_SF( gteop ); FLAG = 0; MAC1 = A1( ( ( (INT64)(INT32)MAC1 << n_sf ) + ( (INT16)IR0 * (INT16)IR1 ) ) >> n_sf ); MAC2 = A2( ( ( (INT64)(INT32)MAC2 << n_sf ) + ( (INT16)IR0 * (INT16)IR2 ) ) >> n_sf ); MAC3 = A3( ( ( (INT64)(INT32)MAC3 << n_sf ) + ( (INT16)IR0 * (INT16)IR3 ) ) >> n_sf ); IR1 = Lm_B1( (INT32)MAC1, 0 ); IR2 = Lm_B2( (INT32)MAC2, 0 ); IR3 = Lm_B3( (INT32)MAC3, 0 ); CD0 = CD1; CD1 = CD2; CD2 = CODE; R0 = R1; R1 = R2; R2 = Lm_C1( (INT32)MAC1 >> 4 ); G0 = G1; G1 = G2; G2 = Lm_C2( (INT32)MAC2 >> 4 ); B0 = B1; B1 = B2; B2 = Lm_C3( (INT32)MAC3 >> 4 ); return; } break; case 0x3f: if( gteop == 0x108043f || gteop == 0x118043f ) { GTELOG( "NCCT" ); FLAG = 0; for( n_v = 0; n_v < 3; n_v++ ) { MAC1 = A1( ( ( (INT64)(INT16)L11 * (INT16)*p_n_vx[ n_v ] ) + ( (INT16)L12 * (INT16)*p_n_vy[ n_v ] ) + ( (INT16)L13 * (INT16)*p_n_vz[ n_v ] ) ) >> 12 ); MAC2 = A2( ( ( (INT64)(INT16)L21 * (INT16)*p_n_vx[ n_v ] ) + ( (INT16)L22 * (INT16)*p_n_vy[ n_v ] ) + ( (INT16)L23 * (INT16)*p_n_vz[ n_v ] ) ) >> 12 ); MAC3 = A3( ( ( (INT64)(INT16)L31 * (INT16)*p_n_vx[ n_v ] ) + ( (INT16)L32 * (INT16)*p_n_vy[ n_v ] ) + ( (INT16)L33 * (INT16)*p_n_vz[ n_v ] ) ) >> 12 ); IR1 = Lm_B1( (INT32)MAC1, 1 ); IR2 = Lm_B2( (INT32)MAC2, 1 ); IR3 = Lm_B3( (INT32)MAC3, 1 ); MAC1 = A1( ( ( (INT64)RBK << 12 ) + ( (INT16)LR1 * (INT16)IR1 ) + ( (INT16)LR2 * (INT16)IR2 ) + ( (INT16)LR3 * (INT16)IR3 ) ) >> 12 ); MAC2 = A2( ( ( (INT64)GBK << 12 ) + ( (INT16)LG1 * (INT16)IR1 ) + ( (INT16)LG2 * (INT16)IR2 ) + ( (INT16)LG3 * (INT16)IR3 ) ) >> 12 ); MAC3 = A3( ( ( (INT64)BBK << 12 ) + ( (INT16)LB1 * (INT16)IR1 ) + ( (INT16)LB2 * (INT16)IR2 ) + ( (INT16)LB3 * (INT16)IR3 ) ) >> 12 ); IR1 = Lm_B1( (INT32)MAC1, 1 ); IR2 = Lm_B2( (INT32)MAC2, 1 ); IR3 = Lm_B3( (INT32)MAC3, 1 ); MAC1 = A1( ( (INT64)R * (INT16)IR1 ) >> 8 ); MAC2 = A2( ( (INT64)G * (INT16)IR2 ) >> 8 ); MAC3 = A3( ( (INT64)B * (INT16)IR3 ) >> 8 ); IR1 = Lm_B1( (INT32)MAC1, 1 ); IR2 = Lm_B2( (INT32)MAC2, 1 ); IR3 = Lm_B3( (INT32)MAC3, 1 ); CD0 = CD1; CD1 = CD2; CD2 = CODE; R0 = R1; R1 = R2; R2 = Lm_C1( (INT32)MAC1 >> 4 ); G0 = G1; G1 = G2; G2 = Lm_C2( (INT32)MAC2 >> 4 ); B0 = B1; B1 = B2; B2 = Lm_C3( (INT32)MAC3 >> 4 ); } return; } break; } // usrintf_showmessage_secs( 1, "unknown GTE op %08x", gteop ); logerror( "%08x: unknown GTE op %08x\n", mipscpu.pc, gteop ); mips_stop(); } /************************************************************************** * Generic set_info **************************************************************************/ void mips_set_info(UINT32 state, union cpuinfo *info) { switch (state) { /* --- the following bits of info are set as 64-bit signed integers --- */ case CPUINFO_INT_INPUT_STATE + MIPS_IRQ0: set_irq_line(MIPS_IRQ0, info->i); break; case CPUINFO_INT_INPUT_STATE + MIPS_IRQ1: set_irq_line(MIPS_IRQ1, info->i); break; case CPUINFO_INT_INPUT_STATE + MIPS_IRQ2: set_irq_line(MIPS_IRQ2, info->i); break; case CPUINFO_INT_INPUT_STATE + MIPS_IRQ3: set_irq_line(MIPS_IRQ3, info->i); break; case CPUINFO_INT_INPUT_STATE + MIPS_IRQ4: set_irq_line(MIPS_IRQ4, info->i); break; case CPUINFO_INT_INPUT_STATE + MIPS_IRQ5: set_irq_line(MIPS_IRQ5, info->i); break; case CPUINFO_INT_PC: mips_set_pc( info->i ); break; case CPUINFO_INT_REGISTER + MIPS_PC: mips_set_pc( info->i ); break; case CPUINFO_INT_SP: /* no stack */ break; case CPUINFO_INT_REGISTER + MIPS_DELAYV: mipscpu.delayv = info->i; break; case CPUINFO_INT_REGISTER + MIPS_DELAYR: if( info->i <= REGPC ) mipscpu.delayr = info->i; break; case CPUINFO_INT_REGISTER + MIPS_HI: mipscpu.hi = info->i; break; case CPUINFO_INT_REGISTER + MIPS_LO: mipscpu.lo = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R0: mipscpu.r[ 0 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R1: mipscpu.r[ 1 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R2: mipscpu.r[ 2 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R3: mipscpu.r[ 3 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R4: mipscpu.r[ 4 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R5: mipscpu.r[ 5 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R6: mipscpu.r[ 6 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R7: mipscpu.r[ 7 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R8: mipscpu.r[ 8 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R9: mipscpu.r[ 9 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R10: mipscpu.r[ 10 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R11: mipscpu.r[ 11 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R12: mipscpu.r[ 12 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R13: mipscpu.r[ 13 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R14: mipscpu.r[ 14 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R15: mipscpu.r[ 15 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R16: mipscpu.r[ 16 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R17: mipscpu.r[ 17 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R18: mipscpu.r[ 18 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R19: mipscpu.r[ 19 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R20: mipscpu.r[ 20 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R21: mipscpu.r[ 21 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R22: mipscpu.r[ 22 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R23: mipscpu.r[ 23 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R24: mipscpu.r[ 24 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R25: mipscpu.r[ 25 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R26: mipscpu.r[ 26 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R27: mipscpu.r[ 27 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R28: mipscpu.r[ 28 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R29: mipscpu.r[ 29 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R30: mipscpu.r[ 30 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_R31: mipscpu.r[ 31 ] = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP0R0: mips_set_cp0r( 0, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R1: mips_set_cp0r( 1, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R2: mips_set_cp0r( 2, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R3: mips_set_cp0r( 3, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R4: mips_set_cp0r( 4, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R5: mips_set_cp0r( 5, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R6: mips_set_cp0r( 6, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R7: mips_set_cp0r( 7, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R8: mips_set_cp0r( 8, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R9: mips_set_cp0r( 9, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R10: mips_set_cp0r( 10, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R11: mips_set_cp0r( 11, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R12: mips_set_cp0r( 12, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R13: mips_set_cp0r( 13, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R14: mips_set_cp0r( 14, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R15: mips_set_cp0r( 15, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R16: mips_set_cp0r( 16, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R17: mips_set_cp0r( 17, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R18: mips_set_cp0r( 18, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R19: mips_set_cp0r( 19, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R20: mips_set_cp0r( 20, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R21: mips_set_cp0r( 21, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R22: mips_set_cp0r( 22, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R23: mips_set_cp0r( 23, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R24: mips_set_cp0r( 24, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R25: mips_set_cp0r( 25, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R26: mips_set_cp0r( 26, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R27: mips_set_cp0r( 27, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R28: mips_set_cp0r( 28, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R29: mips_set_cp0r( 29, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R30: mips_set_cp0r( 30, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP0R31: mips_set_cp0r( 31, info->i ); break; case CPUINFO_INT_REGISTER + MIPS_CP2DR0: mipscpu.cp2dr[ 0 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR1: mipscpu.cp2dr[ 1 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR2: mipscpu.cp2dr[ 2 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR3: mipscpu.cp2dr[ 3 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR4: mipscpu.cp2dr[ 4 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR5: mipscpu.cp2dr[ 5 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR6: mipscpu.cp2dr[ 6 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR7: mipscpu.cp2dr[ 7 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR8: mipscpu.cp2dr[ 8 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR9: mipscpu.cp2dr[ 9 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR10: mipscpu.cp2dr[ 10 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR11: mipscpu.cp2dr[ 11 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR12: mipscpu.cp2dr[ 12 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR13: mipscpu.cp2dr[ 13 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR14: mipscpu.cp2dr[ 14 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR15: mipscpu.cp2dr[ 15 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR16: mipscpu.cp2dr[ 16 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR17: mipscpu.cp2dr[ 17 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR18: mipscpu.cp2dr[ 18 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR19: mipscpu.cp2dr[ 19 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR20: mipscpu.cp2dr[ 20 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR21: mipscpu.cp2dr[ 21 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR22: mipscpu.cp2dr[ 22 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR23: mipscpu.cp2dr[ 23 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR24: mipscpu.cp2dr[ 24 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR25: mipscpu.cp2dr[ 25 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR26: mipscpu.cp2dr[ 26 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR27: mipscpu.cp2dr[ 27 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR28: mipscpu.cp2dr[ 28 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR29: mipscpu.cp2dr[ 29 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR30: mipscpu.cp2dr[ 30 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR31: mipscpu.cp2dr[ 31 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR0: mipscpu.cp2cr[ 0 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR1: mipscpu.cp2cr[ 1 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR2: mipscpu.cp2cr[ 2 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR3: mipscpu.cp2cr[ 3 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR4: mipscpu.cp2cr[ 4 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR5: mipscpu.cp2cr[ 5 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR6: mipscpu.cp2cr[ 6 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR7: mipscpu.cp2cr[ 7 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR8: mipscpu.cp2cr[ 8 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR9: mipscpu.cp2cr[ 9 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR10: mipscpu.cp2cr[ 10 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR11: mipscpu.cp2cr[ 11 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR12: mipscpu.cp2cr[ 12 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR13: mipscpu.cp2cr[ 13 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR14: mipscpu.cp2cr[ 14 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR15: mipscpu.cp2cr[ 15 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR16: mipscpu.cp2cr[ 16 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR17: mipscpu.cp2cr[ 17 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR18: mipscpu.cp2cr[ 18 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR19: mipscpu.cp2cr[ 19 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR20: mipscpu.cp2cr[ 20 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR21: mipscpu.cp2cr[ 21 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR22: mipscpu.cp2cr[ 22 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR23: mipscpu.cp2cr[ 23 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR24: mipscpu.cp2cr[ 24 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR25: mipscpu.cp2cr[ 25 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR26: mipscpu.cp2cr[ 26 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR27: mipscpu.cp2cr[ 27 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR28: mipscpu.cp2cr[ 28 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR29: mipscpu.cp2cr[ 29 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR30: mipscpu.cp2cr[ 30 ].d = info->i; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR31: mipscpu.cp2cr[ 31 ].d = info->i; break; /* --- the following bits of info are set as pointers to data or functions --- */ case CPUINFO_PTR_IRQ_CALLBACK: mipscpu.irq_callback = info->irqcallback; break; } } /************************************************************************** * Generic get_info **************************************************************************/ void mips_get_info(UINT32 state, union cpuinfo *info) { switch (state) { /* --- the following bits of info are returned as 64-bit signed integers --- */ case CPUINFO_INT_CONTEXT_SIZE: info->i = sizeof(mipscpu); break; case CPUINFO_INT_INPUT_LINES: info->i = 6; break; case CPUINFO_INT_DEFAULT_IRQ_VECTOR: info->i = 0; break; case CPUINFO_INT_ENDIANNESS: info->i = CPU_IS_LE; break; case CPUINFO_INT_CLOCK_DIVIDER: info->i = 1; break; case CPUINFO_INT_MIN_INSTRUCTION_BYTES: info->i = 4; break; case CPUINFO_INT_MAX_INSTRUCTION_BYTES: info->i = 4; break; case CPUINFO_INT_MIN_CYCLES: info->i = 1; break; case CPUINFO_INT_MAX_CYCLES: info->i = 40; break; case CPUINFO_INT_DATABUS_WIDTH + ADDRESS_SPACE_PROGRAM: info->i = 32; break; case CPUINFO_INT_ADDRBUS_WIDTH + ADDRESS_SPACE_PROGRAM: info->i = 32; break; case CPUINFO_INT_ADDRBUS_SHIFT + ADDRESS_SPACE_PROGRAM: info->i = 0; break; case CPUINFO_INT_DATABUS_WIDTH + ADDRESS_SPACE_DATA: info->i = 0; break; case CPUINFO_INT_ADDRBUS_WIDTH + ADDRESS_SPACE_DATA: info->i = 0; break; case CPUINFO_INT_ADDRBUS_SHIFT + ADDRESS_SPACE_DATA: info->i = 0; break; case CPUINFO_INT_DATABUS_WIDTH + ADDRESS_SPACE_IO: info->i = 0; break; case CPUINFO_INT_ADDRBUS_WIDTH + ADDRESS_SPACE_IO: info->i = 0; break; case CPUINFO_INT_ADDRBUS_SHIFT + ADDRESS_SPACE_IO: info->i = 0; break; case CPUINFO_INT_INPUT_STATE + MIPS_IRQ0: info->i = (mipscpu.cp0r[ CP0_CAUSE ] & 0x400) ? ASSERT_LINE : CLEAR_LINE; break; case CPUINFO_INT_INPUT_STATE + MIPS_IRQ1: info->i = (mipscpu.cp0r[ CP0_CAUSE ] & 0x800) ? ASSERT_LINE : CLEAR_LINE; break; case CPUINFO_INT_INPUT_STATE + MIPS_IRQ2: info->i = (mipscpu.cp0r[ CP0_CAUSE ] & 0x1000) ? ASSERT_LINE : CLEAR_LINE; break; case CPUINFO_INT_INPUT_STATE + MIPS_IRQ3: info->i = (mipscpu.cp0r[ CP0_CAUSE ] & 0x2000) ? ASSERT_LINE : CLEAR_LINE; break; case CPUINFO_INT_INPUT_STATE + MIPS_IRQ4: info->i = (mipscpu.cp0r[ CP0_CAUSE ] & 0x4000) ? ASSERT_LINE : CLEAR_LINE; break; case CPUINFO_INT_INPUT_STATE + MIPS_IRQ5: info->i = (mipscpu.cp0r[ CP0_CAUSE ] & 0x8000) ? ASSERT_LINE : CLEAR_LINE; break; case CPUINFO_INT_PREVIOUSPC: /* not implemented */ break; case CPUINFO_INT_PC: info->i = mipscpu.pc; break; case CPUINFO_INT_REGISTER + MIPS_PC: info->i = mipscpu.pc; break; case CPUINFO_INT_SP: /* because there is no hardware stack and the pipeline causes the cpu to execute the instruction after a subroutine call before the subroutine is executed there is little chance of cmd_step_over() in mamedbg.c working. */ info->i = 0; break; case CPUINFO_INT_REGISTER + MIPS_DELAYV: info->i = mipscpu.delayv; break; case CPUINFO_INT_REGISTER + MIPS_DELAYR: info->i = mipscpu.delayr; break; case CPUINFO_INT_REGISTER + MIPS_HI: info->i = mipscpu.hi; break; case CPUINFO_INT_REGISTER + MIPS_LO: info->i = mipscpu.lo; break; case CPUINFO_INT_REGISTER + MIPS_R0: info->i = mipscpu.r[ 0 ]; break; case CPUINFO_INT_REGISTER + MIPS_R1: info->i = mipscpu.r[ 1 ]; break; case CPUINFO_INT_REGISTER + MIPS_R2: info->i = mipscpu.r[ 2 ]; break; case CPUINFO_INT_REGISTER + MIPS_R3: info->i = mipscpu.r[ 3 ]; break; case CPUINFO_INT_REGISTER + MIPS_R4: info->i = mipscpu.r[ 4 ]; break; case CPUINFO_INT_REGISTER + MIPS_R5: info->i = mipscpu.r[ 5 ]; break; case CPUINFO_INT_REGISTER + MIPS_R6: info->i = mipscpu.r[ 6 ]; break; case CPUINFO_INT_REGISTER + MIPS_R7: info->i = mipscpu.r[ 7 ]; break; case CPUINFO_INT_REGISTER + MIPS_R8: info->i = mipscpu.r[ 8 ]; break; case CPUINFO_INT_REGISTER + MIPS_R9: info->i = mipscpu.r[ 9 ]; break; case CPUINFO_INT_REGISTER + MIPS_R10: info->i = mipscpu.r[ 10 ]; break; case CPUINFO_INT_REGISTER + MIPS_R11: info->i = mipscpu.r[ 11 ]; break; case CPUINFO_INT_REGISTER + MIPS_R12: info->i = mipscpu.r[ 12 ]; break; case CPUINFO_INT_REGISTER + MIPS_R13: info->i = mipscpu.r[ 13 ]; break; case CPUINFO_INT_REGISTER + MIPS_R14: info->i = mipscpu.r[ 14 ]; break; case CPUINFO_INT_REGISTER + MIPS_R15: info->i = mipscpu.r[ 15 ]; break; case CPUINFO_INT_REGISTER + MIPS_R16: info->i = mipscpu.r[ 16 ]; break; case CPUINFO_INT_REGISTER + MIPS_R17: info->i = mipscpu.r[ 17 ]; break; case CPUINFO_INT_REGISTER + MIPS_R18: info->i = mipscpu.r[ 18 ]; break; case CPUINFO_INT_REGISTER + MIPS_R19: info->i = mipscpu.r[ 19 ]; break; case CPUINFO_INT_REGISTER + MIPS_R20: info->i = mipscpu.r[ 20 ]; break; case CPUINFO_INT_REGISTER + MIPS_R21: info->i = mipscpu.r[ 21 ]; break; case CPUINFO_INT_REGISTER + MIPS_R22: info->i = mipscpu.r[ 22 ]; break; case CPUINFO_INT_REGISTER + MIPS_R23: info->i = mipscpu.r[ 23 ]; break; case CPUINFO_INT_REGISTER + MIPS_R24: info->i = mipscpu.r[ 24 ]; break; case CPUINFO_INT_REGISTER + MIPS_R25: info->i = mipscpu.r[ 25 ]; break; case CPUINFO_INT_REGISTER + MIPS_R26: info->i = mipscpu.r[ 26 ]; break; case CPUINFO_INT_REGISTER + MIPS_R27: info->i = mipscpu.r[ 27 ]; break; case CPUINFO_INT_REGISTER + MIPS_R28: info->i = mipscpu.r[ 28 ]; break; case CPUINFO_INT_REGISTER + MIPS_R29: info->i = mipscpu.r[ 29 ]; break; case CPUINFO_INT_REGISTER + MIPS_R30: info->i = mipscpu.r[ 30 ]; break; case CPUINFO_INT_REGISTER + MIPS_R31: info->i = mipscpu.r[ 31 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R0: info->i = mipscpu.cp0r[ 0 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R1: info->i = mipscpu.cp0r[ 1 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R2: info->i = mipscpu.cp0r[ 2 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R3: info->i = mipscpu.cp0r[ 3 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R4: info->i = mipscpu.cp0r[ 4 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R5: info->i = mipscpu.cp0r[ 5 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R6: info->i = mipscpu.cp0r[ 6 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R7: info->i = mipscpu.cp0r[ 7 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R8: info->i = mipscpu.cp0r[ 8 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R9: info->i = mipscpu.cp0r[ 9 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R10: info->i = mipscpu.cp0r[ 10 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R11: info->i = mipscpu.cp0r[ 11 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R12: info->i = mipscpu.cp0r[ 12 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R13: info->i = mipscpu.cp0r[ 13 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R14: info->i = mipscpu.cp0r[ 14 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R15: info->i = mipscpu.cp0r[ 15 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R16: info->i = mipscpu.cp0r[ 16 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R17: info->i = mipscpu.cp0r[ 17 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R18: info->i = mipscpu.cp0r[ 18 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R19: info->i = mipscpu.cp0r[ 19 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R20: info->i = mipscpu.cp0r[ 20 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R21: info->i = mipscpu.cp0r[ 21 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R22: info->i = mipscpu.cp0r[ 22 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R23: info->i = mipscpu.cp0r[ 23 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R24: info->i = mipscpu.cp0r[ 24 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R25: info->i = mipscpu.cp0r[ 25 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R26: info->i = mipscpu.cp0r[ 26 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R27: info->i = mipscpu.cp0r[ 27 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R28: info->i = mipscpu.cp0r[ 28 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R29: info->i = mipscpu.cp0r[ 29 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R30: info->i = mipscpu.cp0r[ 30 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP0R31: info->i = mipscpu.cp0r[ 31 ]; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR0: info->i = mipscpu.cp2dr[ 0 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR1: info->i = mipscpu.cp2dr[ 1 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR2: info->i = mipscpu.cp2dr[ 2 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR3: info->i = mipscpu.cp2dr[ 3 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR4: info->i = mipscpu.cp2dr[ 4 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR5: info->i = mipscpu.cp2dr[ 5 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR6: info->i = mipscpu.cp2dr[ 6 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR7: info->i = mipscpu.cp2dr[ 7 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR8: info->i = mipscpu.cp2dr[ 8 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR9: info->i = mipscpu.cp2dr[ 9 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR10: info->i = mipscpu.cp2dr[ 10 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR11: info->i = mipscpu.cp2dr[ 11 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR12: info->i = mipscpu.cp2dr[ 12 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR13: info->i = mipscpu.cp2dr[ 13 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR14: info->i = mipscpu.cp2dr[ 14 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR15: info->i = mipscpu.cp2dr[ 15 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR16: info->i = mipscpu.cp2dr[ 16 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR17: info->i = mipscpu.cp2dr[ 17 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR18: info->i = mipscpu.cp2dr[ 18 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR19: info->i = mipscpu.cp2dr[ 19 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR20: info->i = mipscpu.cp2dr[ 20 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR21: info->i = mipscpu.cp2dr[ 21 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR22: info->i = mipscpu.cp2dr[ 22 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR23: info->i = mipscpu.cp2dr[ 23 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR24: info->i = mipscpu.cp2dr[ 24 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR25: info->i = mipscpu.cp2dr[ 25 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR26: info->i = mipscpu.cp2dr[ 26 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR27: info->i = mipscpu.cp2dr[ 27 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR28: info->i = mipscpu.cp2dr[ 28 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR29: info->i = mipscpu.cp2dr[ 29 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR30: info->i = mipscpu.cp2dr[ 30 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2DR31: info->i = mipscpu.cp2dr[ 31 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR0: info->i = mipscpu.cp2cr[ 0 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR1: info->i = mipscpu.cp2cr[ 1 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR2: info->i = mipscpu.cp2cr[ 2 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR3: info->i = mipscpu.cp2cr[ 3 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR4: info->i = mipscpu.cp2cr[ 4 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR5: info->i = mipscpu.cp2cr[ 5 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR6: info->i = mipscpu.cp2cr[ 6 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR7: info->i = mipscpu.cp2cr[ 7 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR8: info->i = mipscpu.cp2cr[ 8 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR9: info->i = mipscpu.cp2cr[ 9 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR10: info->i = mipscpu.cp2cr[ 10 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR11: info->i = mipscpu.cp2cr[ 11 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR12: info->i = mipscpu.cp2cr[ 12 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR13: info->i = mipscpu.cp2cr[ 13 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR14: info->i = mipscpu.cp2cr[ 14 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR15: info->i = mipscpu.cp2cr[ 15 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR16: info->i = mipscpu.cp2cr[ 16 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR17: info->i = mipscpu.cp2cr[ 17 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR18: info->i = mipscpu.cp2cr[ 18 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR19: info->i = mipscpu.cp2cr[ 19 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR20: info->i = mipscpu.cp2cr[ 20 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR21: info->i = mipscpu.cp2cr[ 21 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR22: info->i = mipscpu.cp2cr[ 22 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR23: info->i = mipscpu.cp2cr[ 23 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR24: info->i = mipscpu.cp2cr[ 24 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR25: info->i = mipscpu.cp2cr[ 25 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR26: info->i = mipscpu.cp2cr[ 26 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR27: info->i = mipscpu.cp2cr[ 27 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR28: info->i = mipscpu.cp2cr[ 28 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR29: info->i = mipscpu.cp2cr[ 29 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR30: info->i = mipscpu.cp2cr[ 30 ].d; break; case CPUINFO_INT_REGISTER + MIPS_CP2CR31: info->i = mipscpu.cp2cr[ 31 ].d; break; /* --- the following bits of info are returned as pointers to data or functions --- */ case CPUINFO_PTR_SET_INFO: info->setinfo = mips_set_info; break; case CPUINFO_PTR_GET_CONTEXT: info->getcontext = mips_get_context; break; case CPUINFO_PTR_SET_CONTEXT: info->setcontext = mips_set_context; break; case CPUINFO_PTR_INIT: info->init = mips_init; break; case CPUINFO_PTR_RESET: info->reset = mips_reset; break; case CPUINFO_PTR_EXIT: info->exit = mips_exit; break; case CPUINFO_PTR_EXECUTE: info->execute = mips_execute; break; case CPUINFO_PTR_BURN: info->burn = NULL; break; case CPUINFO_PTR_DISASSEMBLE: info->disassemble = mips_dasm; break; case CPUINFO_PTR_IRQ_CALLBACK: info->irqcallback = mipscpu.irq_callback; break; case CPUINFO_PTR_INSTRUCTION_COUNTER: info->icount = &mips_ICount; break; case CPUINFO_PTR_REGISTER_LAYOUT: info->p = mips_reg_layout; break; case CPUINFO_PTR_WINDOW_LAYOUT: info->p = mips_win_layout; break; } } uint32 mips_get_cause(void) { return mipscpu.cp0r[ CP0_CAUSE ]; } uint32 mips_get_status(void) { return mipscpu.cp0r[ CP0_SR ]; } void mips_set_status(uint32 status) { mipscpu.cp0r[ CP0_SR ] = status; } uint32 mips_get_ePC(void) { return mipscpu.cp0r[ CP0_EPC ]; } int mips_get_icount(void) { return mips_ICount; } void mips_set_icount(int count) { mips_ICount = count; } #if (HAS_PSXCPU) /************************************************************************** * CPU-specific set_info **************************************************************************/ void psxcpu_get_info(UINT32 state, union cpuinfo *info) { switch (state) { /* --- the following bits of info are returned as NULL-terminated strings --- */ // case CPUINFO_STR_NAME: strcpy(info->s = cpuintrf_temp_str(), "PSX CPU"); break; default: mips_get_info(state, info); break; } } #endif