/*****************************************************************************
 *
 *   arm7.c
 *   Portable ARM7TDMI CPU Emulator
 *
 *   Copyright (c) 2004 Steve Ellenoff, all rights reserved.
 *
 *   - This source code is released as freeware for non-commercial purposes.
 *   - You are free to use and redistribute this code in modified or
 *     unmodified form, provided you list me in the credits.
 *   - If you modify this source code, you must add a notice to each modified
 *     source file that it has been changed.  If you're a nice person, you
 *     will clearly mark each change too.  :)
 *   - If you wish to use this for commercial purposes, please contact me at
 *     sellenoff@hotmail.com
 *   - The author of this copywritten work reserves the right to change the
 *     terms of its usage and license at any time, including retroactively
 *   - This entire notice must remain in the source code.
 *
 *  This work is based on:
 *  #1) 'Atmel Corporation ARM7TDMI (Thumb) Datasheet - January 1999'
 *  #2) Arm 2/3/6 emulator By Bryan McPhail (bmcphail@tendril.co.uk) and Phil Stroffolino (MAME CORE 0.76)
 *
 *****************************************************************************/

/******************************************************************************
 *  Notes:

    ** This is a plain vanilla implementation of an ARM7 cpu which incorporates my ARM7 core.
       It can be used as is, or used to demonstrate how to utilize the arm7 core to create a cpu
       that uses the core, since there are numerous different mcu packages that incorporate an arm7 core.

       See the notes in the arm7core.c file itself regarding issues/limitations of the arm7 core.
    **
*****************************************************************************/
#include <stdio.h>
#include "arm7.h"
#include "state.h"
#include "mamedbg.h"
#include "arm7core.h"   /*include arm7 core */

/* Example for showing how Co-Proc functions work */
#define TEST_COPROC_FUNCS 1

/*prototypes*/
#if TEST_COPROC_FUNCS
static WRITE32_HANDLER(test_do_callback);
static READ32_HANDLER(test_rt_r_callback);
static WRITE32_HANDLER(test_rt_w_callback);
static void test_dt_r_callback (data32_t insn, data32_t* prn, data32_t (*read32)(int addr));
static void test_dt_w_callback (data32_t insn, data32_t* prn, void (*write32)(int addr, data32_t data));
#ifdef MAME_DEBUG
char *Spec_RT( char *pBuf, data32_t opcode, char *pConditionCode, char *pBuf0);
char *Spec_DT( char *pBuf, data32_t opcode, char *pConditionCode, char *pBuf0);
char *Spec_DO( char *pBuf, data32_t opcode, char *pConditionCode, char *pBuf0);
#endif
#endif

/* Macros that can be re-defined for custom cpu implementations - The core expects these to be defined */
/* In this case, we are using the default arm7 handlers (supplied by the core)
   - but simply changes these and define your own if needed for cpu implementation specific needs */
#define READ8(addr)         arm7_cpu_read8(addr)
#define WRITE8(addr,data)   arm7_cpu_write8(addr,data)
#define READ16(addr)        arm7_cpu_read16(addr)
#define WRITE16(addr,data)  arm7_cpu_write16(addr,data)
#define READ32(addr)        arm7_cpu_read32(addr)
#define WRITE32(addr,data)  arm7_cpu_write32(addr,data)
#define PTR_READ32          &arm7_cpu_read32
#define PTR_WRITE32         &arm7_cpu_write32

/* Macros that need to be defined according to the cpu implementation specific need */
#define ARM7REG(reg)        arm7.sArmRegister[reg]
#define ARM7                arm7
#define ARM7_ICOUNT         arm7_icount

/* CPU Registers */
typedef struct
{
    ARM7CORE_REGS               /*these must be included in your cpu specific register implementation */
} ARM7_REGS;

static ARM7_REGS arm7;
static int ARM7_ICOUNT;

/* include the arm7 core */
#include "arm7core.c"

/***************************************************************************
 * CPU SPECIFIC IMPLEMENTATIONS
 **************************************************************************/
static void arm7_init(void)
{
    /*must call core */
    arm7_core_init("arm7");

#if TEST_COPROC_FUNCS
    /*setup co-proc callbacks example */
    arm7_coproc_do_callback = test_do_callback;
    arm7_coproc_rt_r_callback = test_rt_r_callback;
    arm7_coproc_rt_w_callback = test_rt_w_callback;
    arm7_coproc_dt_r_callback = test_dt_r_callback;
    arm7_coproc_dt_w_callback = test_dt_w_callback;
#ifdef MAME_DEBUG
    /*setup dasm callbacks - direct method example */
    arm7_dasm_cop_dt_callback = Spec_DT;
    arm7_dasm_cop_rt_callback = Spec_RT;
    arm7_dasm_cop_do_callback = Spec_DO;
#endif
#endif

    return;
}

static void arm7_reset(void *param)
{
    /*must call core reset */
    arm7_core_reset(param);
}

static void arm7_exit(void)
{
    /* nothing to do here */
}

static int arm7_execute( int cycles )
{
/*include the arm7 core execute code*/
#include "arm7exec.c"
} /* arm7_execute */


static void set_irq_line(int irqline, int state)
{
    /*must call core */
    arm7_core_set_irq_line(irqline,state);
}

static void arm7_get_context(void *dst)
{
    if( dst )
    {
        memcpy( dst, &ARM7, sizeof(ARM7) );
    }
}

static void arm7_set_context(void *src)
{
    if (src)
    {
        memcpy( &ARM7, src, sizeof(ARM7) );
    }
}

static offs_t arm7_dasm(char *buffer, offs_t pc)
{
#ifdef MAME_DEBUG
    arm7_disasm( buffer, pc, READ32(pc));
    return 4;
#else
    sprintf(buffer, "$%08x", READ32(pc));
    return 4;
#endif
}

static data8_t arm7_reg_layout[] =
{
    -1,
    ARM7_R0,  ARM7_IR13, -1,
    ARM7_R1,  ARM7_IR14, -1,
    ARM7_R2,  ARM7_ISPSR, -1,
    ARM7_R3,  -1,
    ARM7_R4,  ARM7_FR8,  -1,
    ARM7_R5,  ARM7_FR9,  -1,
    ARM7_R6,  ARM7_FR10, -1,
    ARM7_R7,  ARM7_FR11, -1,
    ARM7_R8,  ARM7_FR12, -1,
    ARM7_R9,  ARM7_FR13, -1,
    ARM7_R10, ARM7_FR14, -1,
    ARM7_R11, ARM7_FSPSR, -1,
    ARM7_R12, -1,
    ARM7_R13, ARM7_AR13, -1,
    ARM7_R14, ARM7_AR14, -1,
    ARM7_R15, ARM7_ASPSR, -1,
    -1,
    ARM7_SR13, ARM7_UR13, -1,
    ARM7_SR14, ARM7_UR14, -1,
    ARM7_SSPSR, ARM7_USPSR, 0
};


static UINT8 arm7_win_layout[] = {
     0, 0,30,17,    /* register window (top rows) */
    31, 0,49,17,    /* disassembler window (left colums) */
     0,18,48, 4,    /* memory #1 window (right, upper middle) */
    49,18,31, 4,    /* memory #2 window (right, lower middle) */
     0,23,80, 1,    /* command line window (bottom rows) */
};


/**************************************************************************
 * Generic set_info
 **************************************************************************/

static void arm7_set_info(UINT32 state, union cpuinfo *info)
{
    switch (state)
    {
        /* --- the following bits of info are set as 64-bit signed integers --- */

        /* interrupt lines/exceptions */
        case CPUINFO_INT_INPUT_STATE + ARM7_IRQ_LINE:                   set_irq_line(ARM7_IRQ_LINE, info->i);                   break;
        case CPUINFO_INT_INPUT_STATE + ARM7_FIRQ_LINE:                  set_irq_line(ARM7_FIRQ_LINE, info->i);                  break;
        case CPUINFO_INT_INPUT_STATE + ARM7_ABORT_EXCEPTION:            set_irq_line(ARM7_ABORT_EXCEPTION, info->i);            break;
        case CPUINFO_INT_INPUT_STATE + ARM7_ABORT_PREFETCH_EXCEPTION:   set_irq_line(ARM7_ABORT_PREFETCH_EXCEPTION, info->i);   break;
        case CPUINFO_INT_INPUT_STATE + ARM7_UNDEFINE_EXCEPTION:         set_irq_line(ARM7_UNDEFINE_EXCEPTION, info->i);         break;

        /* registers shared by all operating modes */
        case CPUINFO_INT_REGISTER + ARM7_R0:    ARM7REG( 0) = info->i;                  break;
        case CPUINFO_INT_REGISTER + ARM7_R1:    ARM7REG( 1) = info->i;                  break;
        case CPUINFO_INT_REGISTER + ARM7_R2:    ARM7REG( 2) = info->i;                  break;
        case CPUINFO_INT_REGISTER + ARM7_R3:    ARM7REG( 3) = info->i;                  break;
        case CPUINFO_INT_REGISTER + ARM7_R4:    ARM7REG( 4) = info->i;                  break;
        case CPUINFO_INT_REGISTER + ARM7_R5:    ARM7REG( 5) = info->i;                  break;
        case CPUINFO_INT_REGISTER + ARM7_R6:    ARM7REG( 6) = info->i;                  break;
        case CPUINFO_INT_REGISTER + ARM7_R7:    ARM7REG( 7) = info->i;                  break;
        case CPUINFO_INT_REGISTER + ARM7_R8:    ARM7REG( 8) = info->i;                  break;
        case CPUINFO_INT_REGISTER + ARM7_R9:    ARM7REG( 9) = info->i;                  break;
        case CPUINFO_INT_REGISTER + ARM7_R10:   ARM7REG(10) = info->i;                  break;
        case CPUINFO_INT_REGISTER + ARM7_R11:   ARM7REG(11) = info->i;                  break;
        case CPUINFO_INT_REGISTER + ARM7_R12:   ARM7REG(12) = info->i;                  break;
        case CPUINFO_INT_REGISTER + ARM7_R13:   ARM7REG(13) = info->i;                  break;
        case CPUINFO_INT_REGISTER + ARM7_R14:   ARM7REG(14) = info->i;                  break;
        case CPUINFO_INT_REGISTER + ARM7_R15:   ARM7REG(15) = info->i;                  break;
        case CPUINFO_INT_REGISTER + ARM7_CPSR:  SET_CPSR(info->i);                      break;

        case CPUINFO_INT_PC:
        case CPUINFO_INT_REGISTER + ARM7_PC:    R15 = info->i;                          break;
        case CPUINFO_INT_SP:                    SetRegister(13,info->i);                break;

        /* FIRQ Mode Shadowed Registers */
        case CPUINFO_INT_REGISTER + ARM7_FR8:   ARM7REG(eR8_FIQ)  = info->i;            break;
        case CPUINFO_INT_REGISTER + ARM7_FR9:   ARM7REG(eR9_FIQ)  = info->i;            break;
        case CPUINFO_INT_REGISTER + ARM7_FR10:  ARM7REG(eR10_FIQ) = info->i;            break;
        case CPUINFO_INT_REGISTER + ARM7_FR11:  ARM7REG(eR11_FIQ) = info->i;            break;
        case CPUINFO_INT_REGISTER + ARM7_FR12:  ARM7REG(eR12_FIQ) = info->i;            break;
        case CPUINFO_INT_REGISTER + ARM7_FR13:  ARM7REG(eR13_FIQ) = info->i;            break;
        case CPUINFO_INT_REGISTER + ARM7_FR14:  ARM7REG(eR14_FIQ) = info->i;            break;
        case CPUINFO_INT_REGISTER + ARM7_FSPSR: ARM7REG(eSPSR_FIQ) = info->i;           break;

        /* IRQ Mode Shadowed Registers */
        case CPUINFO_INT_REGISTER + ARM7_IR13:  ARM7REG(eR13_IRQ) = info->i;            break;
        case CPUINFO_INT_REGISTER + ARM7_IR14:  ARM7REG(eR14_IRQ) = info->i;            break;
        case CPUINFO_INT_REGISTER + ARM7_ISPSR: ARM7REG(eSPSR_IRQ) = info->i;           break;

        /* Supervisor Mode Shadowed Registers */
        case CPUINFO_INT_REGISTER + ARM7_SR13:  ARM7REG(eR13_SVC) = info->i;            break;
        case CPUINFO_INT_REGISTER + ARM7_SR14:  ARM7REG(eR14_SVC) = info->i;            break;
        case CPUINFO_INT_REGISTER + ARM7_SSPSR: ARM7REG(eSPSR_SVC) = info->i;           break;

        /* Abort Mode Shadowed Registers */
        case CPUINFO_INT_REGISTER + ARM7_AR13:  ARM7REG(eR13_ABT) = info->i;            break;
        case CPUINFO_INT_REGISTER + ARM7_AR14:  ARM7REG(eR14_ABT) = info->i;            break;
        case CPUINFO_INT_REGISTER + ARM7_ASPSR: ARM7REG(eSPSR_ABT) = info->i;           break;

        /* Undefined Mode Shadowed Registers */
        case CPUINFO_INT_REGISTER + ARM7_UR13:  ARM7REG(eR13_UND) = info->i;            break;
        case CPUINFO_INT_REGISTER + ARM7_UR14:  ARM7REG(eR14_UND) = info->i;            break;
        case CPUINFO_INT_REGISTER + ARM7_USPSR: ARM7REG(eSPSR_UND) = info->i;           break;

        /* --- the following bits of info are set as pointers to data or functions --- */
        case CPUINFO_PTR_IRQ_CALLBACK:          ARM7.irq_callback = info->irqcallback;  break;
    }
}



/**************************************************************************
 * Generic get_info
 **************************************************************************/

void arm7_get_info(UINT32 state, union cpuinfo *info)
{
    switch (state)
    {
        /* --- the following bits of info are returned as 64-bit signed integers --- */

        /* cpu implementation data */
        case CPUINFO_INT_CONTEXT_SIZE:                  info->i = sizeof(ARM7);                 break;
        case CPUINFO_INT_INPUT_LINES:                   info->i = ARM7_NUM_LINES;               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 = 3;                            break;
        case CPUINFO_INT_MAX_CYCLES:                    info->i = 4;                            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;

        /* interrupt lines/exceptions */
        case CPUINFO_INT_INPUT_STATE + ARM7_IRQ_LINE:                   info->i = ARM7.pendingIrq;  break;
        case CPUINFO_INT_INPUT_STATE + ARM7_FIRQ_LINE:                  info->i = ARM7.pendingFiq;  break;
        case CPUINFO_INT_INPUT_STATE + ARM7_ABORT_EXCEPTION:            info->i = ARM7.pendingAbtD; break;
        case CPUINFO_INT_INPUT_STATE + ARM7_ABORT_PREFETCH_EXCEPTION:   info->i = ARM7.pendingAbtP; break;
        case CPUINFO_INT_INPUT_STATE + ARM7_UNDEFINE_EXCEPTION:         info->i = ARM7.pendingUnd;  break;

        /* registers shared by all operating modes */
        case CPUINFO_INT_REGISTER + ARM7_R0:            info->i = ARM7REG( 0);          break;
        case CPUINFO_INT_REGISTER + ARM7_R1:            info->i = ARM7REG( 1);          break;
        case CPUINFO_INT_REGISTER + ARM7_R2:            info->i = ARM7REG( 2);          break;
        case CPUINFO_INT_REGISTER + ARM7_R3:            info->i = ARM7REG( 3);          break;
        case CPUINFO_INT_REGISTER + ARM7_R4:            info->i = ARM7REG( 4);          break;
        case CPUINFO_INT_REGISTER + ARM7_R5:            info->i = ARM7REG( 5);          break;
        case CPUINFO_INT_REGISTER + ARM7_R6:            info->i = ARM7REG( 6);          break;
        case CPUINFO_INT_REGISTER + ARM7_R7:            info->i = ARM7REG( 7);          break;
        case CPUINFO_INT_REGISTER + ARM7_R8:            info->i = ARM7REG( 8);          break;
        case CPUINFO_INT_REGISTER + ARM7_R9:            info->i = ARM7REG( 9);          break;
        case CPUINFO_INT_REGISTER + ARM7_R10:           info->i = ARM7REG(10);          break;
        case CPUINFO_INT_REGISTER + ARM7_R11:           info->i = ARM7REG(11);          break;
        case CPUINFO_INT_REGISTER + ARM7_R12:           info->i = ARM7REG(12);          break;
        case CPUINFO_INT_REGISTER + ARM7_R13:           info->i = ARM7REG(13);          break;
        case CPUINFO_INT_REGISTER + ARM7_R14:           info->i = ARM7REG(14);          break;
        case CPUINFO_INT_REGISTER + ARM7_R15:           info->i = ARM7REG(15);          break;

        case CPUINFO_INT_PREVIOUSPC:                    info->i = 0;    /* not implemented */   break;
        case CPUINFO_INT_PC:
        case CPUINFO_INT_REGISTER + ARM7_PC:            info->i = R15;                  break;
        case CPUINFO_INT_SP:                            info->i = GetRegister(13);      break;

        /* FIRQ Mode Shadowed Registers */
        case CPUINFO_INT_REGISTER + ARM7_FR8:           info->i = ARM7REG(eR8_FIQ);     break;
        case CPUINFO_INT_REGISTER + ARM7_FR9:           info->i = ARM7REG(eR9_FIQ);     break;
        case CPUINFO_INT_REGISTER + ARM7_FR10:          info->i = ARM7REG(eR10_FIQ);    break;
        case CPUINFO_INT_REGISTER + ARM7_FR11:          info->i = ARM7REG(eR11_FIQ);    break;
        case CPUINFO_INT_REGISTER + ARM7_FR12:          info->i = ARM7REG(eR12_FIQ);    break;
        case CPUINFO_INT_REGISTER + ARM7_FR13:          info->i = ARM7REG(eR13_FIQ);    break;
        case CPUINFO_INT_REGISTER + ARM7_FR14:          info->i = ARM7REG(eR14_FIQ);    break;
        case CPUINFO_INT_REGISTER + ARM7_FSPSR:         info->i = ARM7REG(eSPSR_FIQ);   break;

        /* IRQ Mode Shadowed Registers */
        case CPUINFO_INT_REGISTER + ARM7_IR13:          info->i = ARM7REG(eR13_IRQ);    break;
        case CPUINFO_INT_REGISTER + ARM7_IR14:          info->i = ARM7REG(eR14_IRQ);    break;
        case CPUINFO_INT_REGISTER + ARM7_ISPSR:         info->i = ARM7REG(eSPSR_IRQ);   break;

        /* Supervisor Mode Shadowed Registers */
        case CPUINFO_INT_REGISTER + ARM7_SR13:          info->i = ARM7REG(eR13_SVC);    break;
        case CPUINFO_INT_REGISTER + ARM7_SR14:          info->i = ARM7REG(eR14_SVC);    break;
        case CPUINFO_INT_REGISTER + ARM7_SSPSR:         info->i = ARM7REG(eSPSR_SVC);   break;

        /* Abort Mode Shadowed Registers */
        case CPUINFO_INT_REGISTER + ARM7_AR13:          info->i = ARM7REG(eR13_ABT);    break;
        case CPUINFO_INT_REGISTER + ARM7_AR14:          info->i = ARM7REG(eR14_ABT);    break;
        case CPUINFO_INT_REGISTER + ARM7_ASPSR:         info->i = ARM7REG(eSPSR_ABT);   break;

        /* Undefined Mode Shadowed Registers */
        case CPUINFO_INT_REGISTER + ARM7_UR13:          info->i = ARM7REG(eR13_UND);    break;
        case CPUINFO_INT_REGISTER + ARM7_UR14:          info->i = ARM7REG(eR14_UND);    break;
        case CPUINFO_INT_REGISTER + ARM7_USPSR:         info->i = ARM7REG(eSPSR_UND);   break;

        /* --- the following bits of info are returned as pointers to data or functions --- */
        case CPUINFO_PTR_SET_INFO:                      info->setinfo = arm7_set_info;          break;
        case CPUINFO_PTR_GET_CONTEXT:                   info->getcontext = arm7_get_context;    break;
        case CPUINFO_PTR_SET_CONTEXT:                   info->setcontext = arm7_set_context;    break;
        case CPUINFO_PTR_INIT:                          info->init = arm7_init;                 break;
        case CPUINFO_PTR_RESET:                         info->reset = arm7_reset;               break;
        case CPUINFO_PTR_EXIT:                          info->exit = arm7_exit;                 break;
        case CPUINFO_PTR_EXECUTE:                       info->execute = arm7_execute;           break;
        case CPUINFO_PTR_BURN:                          info->burn = NULL;                      break;
        case CPUINFO_PTR_DISASSEMBLE:                   info->disassemble = arm7_dasm;          break;
        case CPUINFO_PTR_IRQ_CALLBACK:                  info->irqcallback = ARM7.irq_callback;  break;
        case CPUINFO_PTR_INSTRUCTION_COUNTER:           info->icount = &ARM7_ICOUNT;            break;
        case CPUINFO_PTR_REGISTER_LAYOUT:               info->p = arm7_reg_layout;              break;
        case CPUINFO_PTR_WINDOW_LAYOUT:                 info->p = arm7_win_layout;              break;

        /* --- the following bits of info are returned as NULL-terminated strings --- */
        case CPUINFO_STR_NAME:                          strcpy(info->s = cpuintrf_temp_str(), "ARM7"); break;
        case CPUINFO_STR_CORE_FAMILY:                   strcpy(info->s = cpuintrf_temp_str(), "Acorn Risc Machine"); break;
        case CPUINFO_STR_CORE_VERSION:                  strcpy(info->s = cpuintrf_temp_str(), "1.2"); break;
        case CPUINFO_STR_CORE_FILE:                     strcpy(info->s = cpuintrf_temp_str(), __FILE__); break;
        case CPUINFO_STR_CORE_CREDITS:                  strcpy(info->s = cpuintrf_temp_str(), "Copyright 2004 Steve Ellenoff, sellenoff@hotmail.com"); break;

        case CPUINFO_STR_FLAGS:
            sprintf(info->s = cpuintrf_temp_str(), "%c%c%c%c%c%c%c %s",
                (ARM7REG(eCPSR) & N_MASK) ? 'N' : '-',
                (ARM7REG(eCPSR) & Z_MASK) ? 'Z' : '-',
                (ARM7REG(eCPSR) & C_MASK) ? 'C' : '-',
                (ARM7REG(eCPSR) & V_MASK) ? 'V' : '-',
                (ARM7REG(eCPSR) & I_MASK) ? 'I' : '-',
                (ARM7REG(eCPSR) & F_MASK) ? 'F' : '-',
                (ARM7REG(eCPSR) & T_MASK) ? 'T' : '-',
                GetModeText(ARM7REG(eCPSR)));
        break;

        /* registers shared by all operating modes */
        case CPUINFO_STR_REGISTER + ARM7_PC: sprintf( info->s = cpuintrf_temp_str(), "PC  :%08x", R15 );  break;
        case CPUINFO_STR_REGISTER + ARM7_R0: sprintf( info->s = cpuintrf_temp_str(), "R0  :%08x", ARM7REG( 0) );  break;
        case CPUINFO_STR_REGISTER + ARM7_R1: sprintf( info->s = cpuintrf_temp_str(), "R1  :%08x", ARM7REG( 1) );  break;
        case CPUINFO_STR_REGISTER + ARM7_R2: sprintf( info->s = cpuintrf_temp_str(), "R2  :%08x", ARM7REG( 2) );  break;
        case CPUINFO_STR_REGISTER + ARM7_R3: sprintf( info->s = cpuintrf_temp_str(), "R3  :%08x", ARM7REG( 3) );  break;
        case CPUINFO_STR_REGISTER + ARM7_R4: sprintf( info->s = cpuintrf_temp_str(), "R4  :%08x", ARM7REG( 4) );  break;
        case CPUINFO_STR_REGISTER + ARM7_R5: sprintf( info->s = cpuintrf_temp_str(), "R5  :%08x", ARM7REG( 5) );  break;
        case CPUINFO_STR_REGISTER + ARM7_R6: sprintf( info->s = cpuintrf_temp_str(), "R6  :%08x", ARM7REG( 6) );  break;
        case CPUINFO_STR_REGISTER + ARM7_R7: sprintf( info->s = cpuintrf_temp_str(), "R7  :%08x", ARM7REG( 7) );  break;
        case CPUINFO_STR_REGISTER + ARM7_R8: sprintf( info->s = cpuintrf_temp_str(), "R8  :%08x", ARM7REG( 8) );  break;
        case CPUINFO_STR_REGISTER + ARM7_R9: sprintf( info->s = cpuintrf_temp_str(), "R9  :%08x", ARM7REG( 9) );  break;
        case CPUINFO_STR_REGISTER + ARM7_R10:sprintf( info->s = cpuintrf_temp_str(), "R10 :%08x", ARM7REG(10) );  break;
        case CPUINFO_STR_REGISTER + ARM7_R11:sprintf( info->s = cpuintrf_temp_str(), "R11 :%08x", ARM7REG(11) );  break;
        case CPUINFO_STR_REGISTER + ARM7_R12:sprintf( info->s = cpuintrf_temp_str(), "R12 :%08x", ARM7REG(12) );  break;
        case CPUINFO_STR_REGISTER + ARM7_R13:sprintf( info->s = cpuintrf_temp_str(), "R13 :%08x", ARM7REG(13) );  break;
        case CPUINFO_STR_REGISTER + ARM7_R14:sprintf( info->s = cpuintrf_temp_str(), "R14 :%08x", ARM7REG(14) );  break;
        case CPUINFO_STR_REGISTER + ARM7_R15:sprintf( info->s = cpuintrf_temp_str(), "R15 :%08x", ARM7REG(15) );  break;

        /* FIRQ Mode Shadowed Registers */
        case CPUINFO_STR_REGISTER + ARM7_FR8: sprintf( info->s = cpuintrf_temp_str(), "FR8 :%08x", ARM7REG(eR8_FIQ) );   break;
        case CPUINFO_STR_REGISTER + ARM7_FR9: sprintf( info->s = cpuintrf_temp_str(), "FR9 :%08x", ARM7REG(eR9_FIQ) );   break;
        case CPUINFO_STR_REGISTER + ARM7_FR10:sprintf( info->s = cpuintrf_temp_str(), "FR10:%08x", ARM7REG(eR10_FIQ) );  break;
        case CPUINFO_STR_REGISTER + ARM7_FR11:sprintf( info->s = cpuintrf_temp_str(), "FR11:%08x", ARM7REG(eR11_FIQ));   break;
        case CPUINFO_STR_REGISTER + ARM7_FR12:sprintf( info->s = cpuintrf_temp_str(), "FR12:%08x", ARM7REG(eR12_FIQ) );  break;
        case CPUINFO_STR_REGISTER + ARM7_FR13:sprintf( info->s = cpuintrf_temp_str(), "FR13:%08x", ARM7REG(eR13_FIQ) );  break;
        case CPUINFO_STR_REGISTER + ARM7_FR14:sprintf( info->s = cpuintrf_temp_str(), "FR14:%08x", ARM7REG(eR14_FIQ) );  break;
        case CPUINFO_STR_REGISTER + ARM7_FSPSR:sprintf(info->s = cpuintrf_temp_str(), "FR16:%08x", ARM7REG(eSPSR_FIQ) ); break;

        /* IRQ Mode Shadowed Registers */
        case CPUINFO_STR_REGISTER + ARM7_IR13:sprintf( info->s = cpuintrf_temp_str(), "IR13:%08x", ARM7REG(eR13_IRQ) );  break;
        case CPUINFO_STR_REGISTER + ARM7_IR14:sprintf( info->s = cpuintrf_temp_str(), "IR14:%08x", ARM7REG(eR14_IRQ) );  break;
        case CPUINFO_STR_REGISTER + ARM7_ISPSR:sprintf(info->s = cpuintrf_temp_str(), "IR16:%08x", ARM7REG(eSPSR_IRQ) ); break;

        /* Supervisor Mode Shadowed Registers */
        case CPUINFO_STR_REGISTER + ARM7_SR13:sprintf( info->s = cpuintrf_temp_str(), "SR13:%08x", ARM7REG(eR13_SVC) );  break;
        case CPUINFO_STR_REGISTER + ARM7_SR14:sprintf( info->s = cpuintrf_temp_str(), "SR14:%08x", ARM7REG(eR14_SVC) );  break;
        case CPUINFO_STR_REGISTER + ARM7_SSPSR:sprintf(info->s = cpuintrf_temp_str(), "SR16:%08x", ARM7REG(eSPSR_SVC) ); break;

        /* Abort Mode Shadowed Registers */
        case CPUINFO_STR_REGISTER + ARM7_AR13:sprintf( info->s = cpuintrf_temp_str(), "AR13:%08x", ARM7REG(eR13_ABT) );  break;
        case CPUINFO_STR_REGISTER + ARM7_AR14:sprintf( info->s = cpuintrf_temp_str(), "AR14:%08x", ARM7REG(eR14_ABT) );  break;
        case CPUINFO_STR_REGISTER + ARM7_ASPSR:sprintf(info->s = cpuintrf_temp_str(), "AR16:%08x", ARM7REG(eSPSR_ABT) ); break;

        /* Undefined Mode Shadowed Registers */
        case CPUINFO_STR_REGISTER + ARM7_UR13:sprintf( info->s = cpuintrf_temp_str(), "UR13:%08x", ARM7REG(eR13_UND) );  break;
        case CPUINFO_STR_REGISTER + ARM7_UR14:sprintf( info->s = cpuintrf_temp_str(), "UR14:%08x", ARM7REG(eR14_UND) );  break;
        case CPUINFO_STR_REGISTER + ARM7_USPSR:sprintf(info->s = cpuintrf_temp_str(), "UR16:%08x", ARM7REG(eSPSR_UND) ); break;
    }
}

/* TEST COPROC CALLBACK HANDLERS - Used for example on how to implement only */
#if TEST_COPROC_FUNCS

static WRITE32_HANDLER(test_do_callback)
{
    LOG(("test_do_callback opcode=%x, =%x\n",offset,data));
}
static READ32_HANDLER(test_rt_r_callback)
{
    data32_t data=0;
    LOG(("test_rt_r_callback opcode=%x\n",offset));
    return data;
}
static WRITE32_HANDLER(test_rt_w_callback)
{
    LOG(("test_rt_w_callback opcode=%x, data from ARM7 register=%x\n",offset,data));
}
static void test_dt_r_callback (data32_t insn, data32_t* prn, data32_t (*read32)(int addr))
{
    LOG(("test_dt_r_callback: insn = %x\n",insn));
}
static void test_dt_w_callback (data32_t insn, data32_t* prn, void (*write32)(int addr, data32_t data))
{
    LOG(("test_dt_w_callback: opcode = %x\n",insn));
}

/* Custom Co-proc DASM handlers */
#ifdef MAME_DEBUG
char *Spec_RT( char *pBuf, data32_t opcode, char *pConditionCode, char *pBuf0)
{
    pBuf += sprintf( pBuf, "SPECRT");
    return pBuf;
}
char *Spec_DT( char *pBuf, data32_t opcode, char *pConditionCode, char *pBuf0)
{
    pBuf += sprintf( pBuf, "SPECDT");
    return pBuf;
}
char *Spec_DO( char *pBuf, data32_t opcode, char *pConditionCode, char *pBuf0)
{
    pBuf += sprintf( pBuf, "SPECDO");
    return pBuf;
}
#endif
#endif

