1 // memory map related stuff
5 typedef unsigned char u8;
6 typedef unsigned short u16;
7 typedef unsigned int u32;
8 typedef uintptr_t uptr; // unsigned pointer-sized int
10 #define M68K_MEM_SHIFT 16
11 // minimum size we can map
12 #define M68K_BANK_SIZE (1 << M68K_MEM_SHIFT)
13 #define M68K_BANK_MASK (M68K_BANK_SIZE - 1)
15 extern uptr m68k_read8_map [0x1000000 >> M68K_MEM_SHIFT];
16 extern uptr m68k_read16_map [0x1000000 >> M68K_MEM_SHIFT];
17 extern uptr m68k_write8_map [0x1000000 >> M68K_MEM_SHIFT];
18 extern uptr m68k_write16_map[0x1000000 >> M68K_MEM_SHIFT];
20 extern uptr s68k_read8_map [0x1000000 >> M68K_MEM_SHIFT];
21 extern uptr s68k_read16_map [0x1000000 >> M68K_MEM_SHIFT];
22 extern uptr s68k_write8_map [0x1000000 >> M68K_MEM_SHIFT];
23 extern uptr s68k_write16_map[0x1000000 >> M68K_MEM_SHIFT];
25 // top-level handlers that cores can use
26 // (or alternatively build them into themselves)
27 // XXX: unhandled: *16 and *32 might cross the bank boundaries
28 typedef u32 (cpu68k_read_f)(u32 a);
29 typedef void (cpu68k_write_f)(u32 a, u32 d);
31 extern u32 m68k_read8(u32 a);
32 extern u32 m68k_read16(u32 a);
33 extern void m68k_write8(u32 a, u8 d);
34 extern void m68k_write16(u32 a, u16 d);
37 #define Z80_MEM_SHIFT 13
38 extern uptr z80_read_map [0x10000 >> Z80_MEM_SHIFT];
39 extern uptr z80_write_map[0x10000 >> Z80_MEM_SHIFT];
40 typedef unsigned char (z80_read_f)(unsigned short a);
41 typedef void (z80_write_f)(unsigned int a, unsigned char data);
43 void z80_map_set(uptr *map, int start_addr, int end_addr,
44 const void *func_or_mh, int is_func);
45 void cpu68k_map_set(uptr *map, int start_addr, int end_addr,
46 const void *func_or_mh, int is_func);
47 void cpu68k_map_all_ram(int start_addr, int end_addr, void *ptr, int is_sub);
48 void m68k_map_unmap(int start_addr, int end_addr);
50 #define MAP_FLAG ((uptr)1 << (sizeof(uptr) * 8 - 1))
51 #define map_flag_set(x) ((x) & MAP_FLAG)
53 #define MAKE_68K_READ8(name, map) \
58 v = map[a >> M68K_MEM_SHIFT]; \
59 if (map_flag_set(v)) \
60 return ((cpu68k_read_f *)(v << 1))(a); \
62 return *(u8 *)((v << 1) + (a ^ 1)); \
65 #define MAKE_68K_READ16(name, map) \
70 v = map[a >> M68K_MEM_SHIFT]; \
71 if (map_flag_set(v)) \
72 return ((cpu68k_read_f *)(v << 1))(a); \
74 return *(u16 *)((v << 1) + a); \
77 #define MAKE_68K_READ32(name, map) \
83 v = map[a >> M68K_MEM_SHIFT]; \
85 if (map_flag_set(v)) { \
86 d = ((cpu68k_read_f *)vs)(a) << 16; \
87 d |= ((cpu68k_read_f *)vs)(a + 2); \
90 u16 *m = (u16 *)(vs + a); \
91 d = (m[0] << 16) | m[1]; \
96 #define MAKE_68K_WRITE8(name, map) \
97 void name(u32 a, u8 d) \
101 v = map[a >> M68K_MEM_SHIFT]; \
102 if (map_flag_set(v)) \
103 ((cpu68k_write_f *)(v << 1))(a, d); \
105 *(u8 *)((v << 1) + (a ^ 1)) = d; \
108 #define MAKE_68K_WRITE16(name, map) \
109 void name(u32 a, u16 d) \
113 v = map[a >> M68K_MEM_SHIFT]; \
114 if (map_flag_set(v)) \
115 ((cpu68k_write_f *)(v << 1))(a, d); \
117 *(u16 *)((v << 1) + a) = d; \
120 #define MAKE_68K_WRITE32(name, map) \
121 void name(u32 a, u32 d) \
125 v = map[a >> M68K_MEM_SHIFT]; \
127 if (map_flag_set(v)) { \
128 ((cpu68k_write_f *)vs)(a, d >> 16); \
129 ((cpu68k_write_f *)vs)(a + 2, d); \
132 u16 *m = (u16 *)(vs + a); \
138 #ifdef NEED_DMA_SOURCE // meh
140 static __inline void *m68k_dma_source(u32 a)
144 v = m68k_read16_map[a >> M68K_MEM_SHIFT];
145 if (map_flag_set(v)) {
146 if (a >= Pico.romsize) // Rom
151 base = (void *)(v << 1);
152 return base + (a & 0xfe0000);
159 uptr addr; // stores (membase >> 1) or ((handler >> 1) | (1<<31))