summaryrefslogtreecommitdiff
path: root/m68k_core_x86.c
diff options
context:
space:
mode:
Diffstat (limited to 'm68k_core_x86.c')
-rw-r--r--m68k_core_x86.c245
1 files changed, 6 insertions, 239 deletions
diff --git a/m68k_core_x86.c b/m68k_core_x86.c
index ea11e2a..6c37fad 100644
--- a/m68k_core_x86.c
+++ b/m68k_core_x86.c
@@ -2164,248 +2164,15 @@ void insert_breakpoint(m68k_context * context, uint32_t address, code_ptr bp_han
}
}
-code_ptr gen_mem_fun(cpu_options * opts, memmap_chunk * memmap, uint32_t num_chunks, ftype fun_type)
-{
- code_info *code = &opts->code;
- code_ptr start = code->cur;
- check_cycles(opts);
- cycles(opts, BUS);
- and_ir(code, 0xFFFFFF, opts->scratch1, SZ_D);
- code_ptr lb_jcc = NULL, ub_jcc = NULL;
- uint8_t is_write = fun_type == WRITE_16 || fun_type == WRITE_8;
- uint8_t adr_reg = is_write ? opts->scratch2 : opts->scratch1;
- uint16_t access_flag = is_write ? MMAP_WRITE : MMAP_READ;
- uint8_t size = (fun_type == READ_16 || fun_type == WRITE_16) ? SZ_W : SZ_B;
- for (uint32_t chunk = 0; chunk < num_chunks; chunk++)
- {
- if (memmap[chunk].start > 0) {
- cmp_ir(code, memmap[chunk].start, adr_reg, SZ_D);
- lb_jcc = code->cur + 1;
- jcc(code, CC_C, code->cur + 2);
- }
- if (memmap[chunk].end < 0x1000000) {
- cmp_ir(code, memmap[chunk].end, adr_reg, SZ_D);
- ub_jcc = code->cur + 1;
- jcc(code, CC_NC, code->cur + 2);
- }
-
- if (memmap[chunk].mask != 0xFFFFFF) {
- and_ir(code, memmap[chunk].mask, adr_reg, SZ_D);
- }
- void * cfun;
- switch (fun_type)
- {
- case READ_16:
- cfun = memmap[chunk].read_16;
- break;
- case READ_8:
- cfun = memmap[chunk].read_8;
- break;
- case WRITE_16:
- cfun = memmap[chunk].write_16;
- break;
- case WRITE_8:
- cfun = memmap[chunk].write_8;
- break;
- default:
- cfun = NULL;
- }
- if(memmap[chunk].buffer && memmap[chunk].flags & access_flag) {
- if (memmap[chunk].flags & MMAP_PTR_IDX) {
- if (memmap[chunk].flags & MMAP_FUNC_NULL) {
- cmp_irdisp(code, 0, opts->context_reg, offsetof(m68k_context, mem_pointers) + sizeof(void*) * memmap[chunk].ptr_index, SZ_PTR);
- code_ptr not_null = code->cur + 1;
- jcc(code, CC_NZ, code->cur + 2);
- call(code, opts->save_context);
-#ifdef X86_64
- if (is_write) {
- if (opts->scratch2 != RDI) {
- mov_rr(code, opts->scratch2, RDI, SZ_D);
- }
- mov_rr(code, opts->scratch1, RDX, size);
- } else {
- push_r(code, opts->context_reg);
- mov_rr(code, opts->scratch1, RDI, SZ_D);
- }
- test_ir(code, 8, RSP, SZ_D);
- code_ptr adjust_rsp = code->cur + 1;
- jcc(code, CC_NZ, code->cur + 2);
- call(code, cfun);
- code_ptr no_adjust = code->cur + 1;
- jmp(code, code->cur + 2);
- *adjust_rsp = code->cur - (adjust_rsp + 1);
- sub_ir(code, 8, RSP, SZ_PTR);
- call(code, cfun);
- add_ir(code, 8, RSP, SZ_PTR);
- *no_adjust = code->cur - (no_adjust + 1);
-#else
- if (is_write) {
- push_r(code, opts->scratch1);
- } else {
- push_r(code, opts->context_reg);//save opts->context_reg for later
- }
- push_r(code, opts->context_reg);
- push_r(code, is_write ? opts->scratch2 : opts->scratch1);
- call(code, cfun);
- add_ir(code, is_write ? 12 : 8, RSP, SZ_D);
-#endif
- if (is_write) {
- mov_rr(code, RAX, opts->context_reg, SZ_PTR);
- } else {
- pop_r(code, opts->context_reg);
- mov_rr(code, RAX, opts->scratch1, size);
- }
- jmp(code, opts->load_context);
-
- *not_null = code->cur - (not_null + 1);
- }
- if (size == SZ_B) {
- xor_ir(code, 1, adr_reg, SZ_D);
- }
- add_rdispr(code, opts->context_reg, offsetof(m68k_context, mem_pointers) + sizeof(void*) * memmap[chunk].ptr_index, adr_reg, SZ_PTR);
- if (is_write) {
- mov_rrind(code, opts->scratch1, opts->scratch2, size);
-
- } else {
- mov_rindr(code, opts->scratch1, opts->scratch1, size);
- }
- } else {
- uint8_t tmp_size = size;
- if (size == SZ_B) {
- if ((memmap[chunk].flags & MMAP_ONLY_ODD) || (memmap[chunk].flags & MMAP_ONLY_EVEN)) {
- bt_ir(code, 0, adr_reg, SZ_D);
- code_ptr good_addr = code->cur + 1;
- jcc(code, (memmap[chunk].flags & MMAP_ONLY_ODD) ? CC_C : CC_NC, code->cur + 2);
- if (!is_write) {
- mov_ir(code, 0xFF, opts->scratch1, SZ_B);
- }
- retn(code);
- *good_addr = code->cur - (good_addr + 1);
- shr_ir(code, 1, adr_reg, SZ_D);
- } else {
- xor_ir(code, 1, adr_reg, SZ_D);
- }
- } else if ((memmap[chunk].flags & MMAP_ONLY_ODD) || (memmap[chunk].flags & MMAP_ONLY_EVEN)) {
- tmp_size = SZ_B;
- shr_ir(code, 1, adr_reg, SZ_D);
- if ((memmap[chunk].flags & MMAP_ONLY_EVEN) && is_write) {
- shr_ir(code, 8, opts->scratch1, SZ_W);
- }
- }
- if ((intptr_t)memmap[chunk].buffer <= 0x7FFFFFFF && (intptr_t)memmap[chunk].buffer >= -2147483648) {
- if (is_write) {
- mov_rrdisp(code, opts->scratch1, opts->scratch2, (intptr_t)memmap[chunk].buffer, tmp_size);
- } else {
- mov_rdispr(code, opts->scratch1, (intptr_t)memmap[chunk].buffer, opts->scratch1, tmp_size);
- }
- } else {
- if (is_write) {
- push_r(code, opts->scratch1);
- mov_ir(code, (intptr_t)memmap[chunk].buffer, opts->scratch1, SZ_PTR);
- add_rr(code, opts->scratch1, opts->scratch2, SZ_PTR);
- pop_r(code, opts->scratch1);
- mov_rrind(code, opts->scratch1, opts->scratch2, tmp_size);
- } else {
- mov_ir(code, (intptr_t)memmap[chunk].buffer, opts->scratch2, SZ_PTR);
- mov_rindexr(code, opts->scratch2, opts->scratch1, 1, opts->scratch1, tmp_size);
- }
- }
- if (size != tmp_size && !is_write) {
- if (memmap[chunk].flags & MMAP_ONLY_EVEN) {
- shl_ir(code, 8, opts->scratch1, SZ_W);
- mov_ir(code, 0xFF, opts->scratch1, SZ_B);
- } else {
- or_ir(code, 0xFF00, opts->scratch1, SZ_W);
- }
- }
- }
- if (is_write && (memmap[chunk].flags & MMAP_CODE)) {
- mov_rr(code, opts->scratch2, opts->scratch1, SZ_D);
- shr_ir(code, 11, opts->scratch1, SZ_D);
- bt_rrdisp(code, opts->scratch1, opts->context_reg, offsetof(m68k_context, ram_code_flags), SZ_D);
- code_ptr not_code = code->cur + 1;
- jcc(code, CC_NC, code->cur + 2);
- call(code, opts->save_context);
-#ifdef X86_32
- push_r(code, opts->context_reg);
- push_r(code, opts->scratch2);
-#endif
- call(code, (code_ptr)m68k_handle_code_write);
-#ifdef X86_32
- add_ir(code, 8, RSP, SZ_D);
-#endif
- mov_rr(code, RAX, opts->context_reg, SZ_PTR);
- call(code, opts->load_context);
- *not_code = code->cur - (not_code+1);
- }
- retn(code);
- } else if (cfun) {
- call(code, opts->save_context);
-#ifdef X86_64
- if (is_write) {
- if (opts->scratch2 != RDI) {
- mov_rr(code, opts->scratch2, RDI, SZ_D);
- }
- mov_rr(code, opts->scratch1, RDX, size);
- } else {
- push_r(code, opts->context_reg);
- mov_rr(code, opts->scratch1, RDI, SZ_D);
- }
- test_ir(code, 8, RSP, SZ_D);
- code_ptr adjust_rsp = code->cur + 1;
- jcc(code, CC_NZ, code->cur + 2);
- call(code, cfun);
- code_ptr no_adjust = code->cur + 1;
- jmp(code, code->cur + 2);
- *adjust_rsp = code->cur - (adjust_rsp + 1);
- sub_ir(code, 8, RSP, SZ_PTR);
- call(code, cfun);
- add_ir(code, 8, RSP, SZ_PTR);
- *no_adjust = code->cur - (no_adjust+1);
-#else
- if (is_write) {
- push_r(code, opts->scratch1);
- } else {
- push_r(code, opts->context_reg);//save opts->context_reg for later
- }
- push_r(code, opts->context_reg);
- push_r(code, is_write ? opts->scratch2 : opts->scratch1);
- call(code, cfun);
- add_ir(code, is_write ? 12 : 8, RSP, SZ_D);
-#endif
- if (is_write) {
- mov_rr(code, RAX, opts->context_reg, SZ_PTR);
- } else {
- pop_r(code, opts->context_reg);
- mov_rr(code, RAX, opts->scratch1, size);
- }
- jmp(code, opts->load_context);
- } else {
- //Not sure the best course of action here
- if (!is_write) {
- mov_ir(code, size == SZ_B ? 0xFF : 0xFFFF, opts->scratch1, size);
- }
- retn(code);
- }
- if (lb_jcc) {
- *lb_jcc = code->cur - (lb_jcc+1);
- lb_jcc = NULL;
- }
- if (ub_jcc) {
- *ub_jcc = code->cur - (ub_jcc+1);
- ub_jcc = NULL;
- }
- }
- if (!is_write) {
- mov_ir(code, size == SZ_B ? 0xFF : 0xFFFF, opts->scratch1, size);
- }
- retn(code);
- return start;
-}
-
void init_m68k_opts(m68k_options * opts, memmap_chunk * memmap, uint32_t num_chunks)
{
memset(opts, 0, sizeof(*opts));
+ opts->gen.address_size = SZ_D;
+ opts->gen.address_mask = 0xFFFFFF;
+ opts->gen.max_address = 0x1000000;
+ opts->gen.bus_cycles = BUS;
+ opts->gen.mem_ptr_off = offsetof(m68k_context, mem_pointers);
+ opts->gen.ram_flags_off = offsetof(m68k_context, ram_code_flags);
for (int i = 0; i < 8; i++)
{
opts->dregs[i] = opts->aregs[i] = -1;
generated by cgit v1.2.3 (git 2.25.1) at 2025-06-19 22:41:43 +0000