double f;
} fp_reg;
+typedef struct
+{
+ unsigned int lower;
+ unsigned int upper;
+ unsigned char *offset;
+} address_translation_cache;
+
+
+
typedef struct
{
uint cpu_type; /* CPU Type: 68000, 68008, 68010, 68EC020, 68020, 68EC030, 68030, 68EC040, or 68040 */
void (*set_fc_callback)(unsigned int new_fc); /* Called when the CPU function code changes */
void (*instr_hook_callback)(unsigned int pc); /* Called every instruction cycle prior to execution */
+ /* address translation caches */
+
+ unsigned char read_ranges;
+ unsigned int read_addr[8];
+ unsigned int read_upper[8];
+ unsigned char *read_data[8];
+ unsigned char write_ranges;
+ unsigned int write_addr[8];
+ unsigned int write_upper[8];
+ unsigned char *write_data[8];
+ address_translation_cache code_translation_cache;
+
+
} m68ki_cpu_core;
/* ---------------------------- Read Immediate ---------------------------- */
-extern unsigned char read_ranges;
-extern unsigned int read_addr[8];
-extern unsigned int read_upper[8];
-extern unsigned char *read_data[8];
-extern unsigned char write_ranges;
-extern unsigned int write_addr[8];
-extern unsigned int write_upper[8];
-extern unsigned char *write_data[8];
-
// clear the instruction cache
inline void m68ki_ic_clear()
{
/* Handles all immediate reads, does address error check, function code setting,
* and prefetching if they are enabled in m68kconf.h
*/
-static inline uint m68ki_read_imm_16(void)
-{
- uint32_t address = ADDRESS_68K(REG_PC);
- for (int i = 0; i < read_ranges; i++) {
- if(address >= read_addr[i] && address < read_upper[i]) {
- REG_PC += 2;
- return be16toh(((unsigned short *)(read_data[i] + (address - read_addr[i])))[0]);
- }
- }
+uint m68ki_read_imm6_addr_slowpath(uint32_t pc, address_translation_cache *cache);
- m68ki_set_fc(FLAG_S | FUNCTION_CODE_USER_PROGRAM); /* auto-disable (see m68kcpu.h) */
- m68ki_cpu.mmu_tmp_fc = FLAG_S | FUNCTION_CODE_USER_PROGRAM;
- m68ki_cpu.mmu_tmp_rw = 1;
- m68ki_cpu.mmu_tmp_sz = M68K_SZ_WORD;
- m68ki_check_address_error(REG_PC, MODE_READ, FLAG_S | FUNCTION_CODE_USER_PROGRAM); /* auto-disable (see m68kcpu.h) */
-#if M68K_EMULATE_PREFETCH
-{
- uint result;
- if(REG_PC != CPU_PREF_ADDR)
- {
- CPU_PREF_DATA = m68ki_ic_readimm16(REG_PC);
- CPU_PREF_ADDR = m68ki_cpu.mmu_tmp_buserror_occurred ? ((uint32)~0) : REG_PC;
- }
- result = MASK_OUT_ABOVE_16(CPU_PREF_DATA);
- REG_PC += 2;
- if (!m68ki_cpu.mmu_tmp_buserror_occurred) {
- // prefetch only if no bus error occurred in opcode fetch
- CPU_PREF_DATA = m68ki_ic_readimm16(REG_PC);
- CPU_PREF_ADDR = m68ki_cpu.mmu_tmp_buserror_occurred ? ((uint32)~0) : REG_PC;
- // ignore bus error on prefetch
- m68ki_cpu.mmu_tmp_buserror_occurred = 0;
- }
- return result;
-}
-#else
- uint32_t address = ADDRESS_68K(REG_PC);
- REG_PC += 2;
+static inline uint m68ki_read_imm_16(void)
+{
+ uint32_t pc = REG_PC;
- for (int i = 0; i < read_ranges; i++) {
- if(address >= read_addr[i] && address < read_upper[i]) {
- return be16toh(((unsigned short *)(read_data[i] + (address - read_addr[i])))[0]);
- }
+ address_translation_cache *cache = &m68ki_cpu.code_translation_cache;
+ if(pc >= cache->lower && pc < cache->upper)
+ {
+ REG_PC += 2;
+ return be16toh(((unsigned short *)(cache->offset + pc))[0]);
}
-
- return m68k_read_immediate_16(address);
-#endif /* M68K_EMULATE_PREFETCH */
+ return m68ki_read_imm6_addr_slowpath(pc, cache);
}
static inline uint m68ki_read_imm_8(void)
#endif
#endif
uint32_t address = ADDRESS_68K(REG_PC);
- for (int i = 0; i < read_ranges; i++) {
- if(address >= read_addr[i] && address < read_upper[i]) {
+ for (int i = 0; i < m68ki_cpu.read_ranges; i++) {
+ if(address >= m68ki_cpu.read_addr[i] && address < m68ki_cpu.read_upper[i]) {
REG_PC += 4;
- return be32toh(((unsigned int *)(read_data[i] + (address - read_addr[i])))[0]);
+ return be32toh(((unsigned int *)(m68ki_cpu.read_data[i] + (address - m68ki_cpu.read_addr[i])))[0]);
}
}
return temp_val;
#else
- m68ki_set_fc(FLAG_S | FUNCTION_CODE_USER_PROGRAM); /* auto-disable (see m68kcpu.h) */
- m68ki_check_address_error(REG_PC, MODE_READ, FLAG_S | FUNCTION_CODE_USER_PROGRAM); /* auto-disable (see m68kcpu.h) */
- uint32_t address = ADDRESS_68K(REG_PC);
REG_PC += 4;
- for (int i = 0; i < read_ranges; i++) {
- if(address >= read_addr[i] && address < read_upper[i]) {
- return be32toh(((unsigned int *)(read_data[i] + (address - read_addr[i])))[0]);
- }
- }
return m68k_read_immediate_32(address);
#endif /* M68K_EMULATE_PREFETCH */
address = pmmu_translate_addr(address,1);
#endif
- for (int i = 0; i < read_ranges; i++) {
- if(address >= read_addr[i] && address < read_upper[i]) {
- return read_data[i][address - read_addr[i]];
+ for (int i = 0; i < m68ki_cpu.read_ranges; i++) {
+ if(address >= m68ki_cpu.read_addr[i] && address < m68ki_cpu.read_upper[i]) {
+ return m68ki_cpu.read_data[i][address - m68ki_cpu.read_addr[i]];
}
}
address = pmmu_translate_addr(address,1);
#endif
- for (int i = 0; i < read_ranges; i++) {
- if(address >= read_addr[i] && address < read_upper[i]) {
- return be16toh(((unsigned short *)(read_data[i] + (address - read_addr[i])))[0]);
+ for (int i = 0; i < m68ki_cpu.read_ranges; i++) {
+ if(address >= m68ki_cpu.read_addr[i] && address < m68ki_cpu.read_upper[i]) {
+ return be16toh(((unsigned short *)(m68ki_cpu.read_data[i] + (address - m68ki_cpu.read_addr[i])))[0]);
}
}
address = pmmu_translate_addr(address,1);
#endif
- for (int i = 0; i < read_ranges; i++) {
- if(address >= read_addr[i] && address < read_upper[i]) {
- return be32toh(((unsigned int *)(read_data[i] + (address - read_addr[i])))[0]);
+ for (int i = 0; i < m68ki_cpu.read_ranges; i++) {
+ if(address >= m68ki_cpu.read_addr[i] && address < m68ki_cpu.read_upper[i]) {
+ return be32toh(((unsigned int *)(m68ki_cpu.read_data[i] + (address - m68ki_cpu.read_addr[i])))[0]);
}
}
address = pmmu_translate_addr(address,0);
#endif
- for (int i = 0; i < write_ranges; i++) {
- if(address >= write_addr[i] && address < write_upper[i]) {
- write_data[i][address - write_addr[i]] = (unsigned char)value;
+ for (int i = 0; i < m68ki_cpu.write_ranges; i++) {
+ if(address >= m68ki_cpu.write_addr[i] && address < m68ki_cpu.write_upper[i]) {
+ m68ki_cpu.write_data[i][address - m68ki_cpu.write_addr[i]] = (unsigned char)value;
return;
}
}
address = pmmu_translate_addr(address,0);
#endif
- for (int i = 0; i < write_ranges; i++) {
- if(address >= write_addr[i] && address < write_upper[i]) {
- ((short *)(write_data[i] + (address - write_addr[i])))[0] = htobe16(value);
+ for (int i = 0; i < m68ki_cpu.write_ranges; i++) {
+ if(address >= m68ki_cpu.write_addr[i] && address < m68ki_cpu.write_upper[i]) {
+ ((short *)(m68ki_cpu.write_data[i] + (address - m68ki_cpu.write_addr[i])))[0] = htobe16(value);
return;
}
}
address = pmmu_translate_addr(address,0);
#endif
- for (int i = 0; i < write_ranges; i++) {
- if(address >= write_addr[i] && address < write_upper[i]) {
- ((int *)(write_data[i] + (address - write_addr[i])))[0] = htobe32(value);
+ for (int i = 0; i < m68ki_cpu.write_ranges; i++) {
+ if(address >= m68ki_cpu.write_addr[i] && address < m68ki_cpu.write_upper[i]) {
+ ((int *)(m68ki_cpu.write_data[i] + (address - m68ki_cpu.write_addr[i])))[0] = htobe32(value);
return;
}
}