af37bca8 |
1 | // memory map related stuff |
2 | |
48c9e01b |
3 | #include "pico_port.h" |
4 | |
af37bca8 |
5 | typedef unsigned char u8; |
6 | typedef unsigned short u16; |
7 | typedef unsigned int u32; |
48c9e01b |
8 | typedef uintptr_t uptr; // unsigned pointer-sized int |
af37bca8 |
9 | |
10 | #define M68K_MEM_SHIFT 16 |
45f2f245 |
11 | // minimum size we can map |
12 | #define M68K_BANK_SIZE (1 << M68K_MEM_SHIFT) |
13 | #define M68K_BANK_MASK (M68K_BANK_SIZE - 1) |
af37bca8 |
14 | |
bcf65fd6 |
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]; |
af37bca8 |
19 | |
bcf65fd6 |
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]; |
af37bca8 |
24 | |
b8a1c09a |
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); |
30 | |
77e58d93 |
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); |
35 | |
b8a1c09a |
36 | // z80 |
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); |
42 | |
bcf65fd6 |
43 | void z80_map_set(uptr *map, int start_addr, int end_addr, |
0ace9b9a |
44 | const void *func_or_mh, int is_func); |
bcf65fd6 |
45 | void cpu68k_map_set(uptr *map, int start_addr, int end_addr, |
0ace9b9a |
46 | const void *func_or_mh, int is_func); |
af37bca8 |
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); |
49 | |
add51c49 |
50 | #define MAP_FLAG ((uptr)1 << (sizeof(uptr) * 8 - 1)) |
51 | #define map_flag_set(x) ((x) & MAP_FLAG) |
af37bca8 |
52 | |
53 | #define MAKE_68K_READ8(name, map) \ |
54 | u32 name(u32 a) \ |
55 | { \ |
bcf65fd6 |
56 | uptr v; \ |
af37bca8 |
57 | a &= 0x00ffffff; \ |
58 | v = map[a >> M68K_MEM_SHIFT]; \ |
b8a1c09a |
59 | if (map_flag_set(v)) \ |
af37bca8 |
60 | return ((cpu68k_read_f *)(v << 1))(a); \ |
61 | else \ |
62 | return *(u8 *)((v << 1) + (a ^ 1)); \ |
63 | } |
64 | |
65 | #define MAKE_68K_READ16(name, map) \ |
66 | u32 name(u32 a) \ |
67 | { \ |
bcf65fd6 |
68 | uptr v; \ |
af37bca8 |
69 | a &= 0x00fffffe; \ |
70 | v = map[a >> M68K_MEM_SHIFT]; \ |
b8a1c09a |
71 | if (map_flag_set(v)) \ |
af37bca8 |
72 | return ((cpu68k_read_f *)(v << 1))(a); \ |
73 | else \ |
74 | return *(u16 *)((v << 1) + a); \ |
75 | } |
76 | |
77 | #define MAKE_68K_READ32(name, map) \ |
78 | u32 name(u32 a) \ |
79 | { \ |
bcf65fd6 |
80 | uptr v, vs; \ |
af37bca8 |
81 | u32 d; \ |
82 | a &= 0x00fffffe; \ |
83 | v = map[a >> M68K_MEM_SHIFT]; \ |
84 | vs = v << 1; \ |
b8a1c09a |
85 | if (map_flag_set(v)) { \ |
af37bca8 |
86 | d = ((cpu68k_read_f *)vs)(a) << 16; \ |
87 | d |= ((cpu68k_read_f *)vs)(a + 2); \ |
88 | } \ |
89 | else { \ |
90 | u16 *m = (u16 *)(vs + a); \ |
91 | d = (m[0] << 16) | m[1]; \ |
92 | } \ |
93 | return d; \ |
94 | } |
95 | |
96 | #define MAKE_68K_WRITE8(name, map) \ |
97 | void name(u32 a, u8 d) \ |
98 | { \ |
bcf65fd6 |
99 | uptr v; \ |
af37bca8 |
100 | a &= 0x00ffffff; \ |
101 | v = map[a >> M68K_MEM_SHIFT]; \ |
b8a1c09a |
102 | if (map_flag_set(v)) \ |
af37bca8 |
103 | ((cpu68k_write_f *)(v << 1))(a, d); \ |
104 | else \ |
105 | *(u8 *)((v << 1) + (a ^ 1)) = d; \ |
106 | } |
107 | |
108 | #define MAKE_68K_WRITE16(name, map) \ |
109 | void name(u32 a, u16 d) \ |
110 | { \ |
bcf65fd6 |
111 | uptr v; \ |
af37bca8 |
112 | a &= 0x00fffffe; \ |
113 | v = map[a >> M68K_MEM_SHIFT]; \ |
b8a1c09a |
114 | if (map_flag_set(v)) \ |
af37bca8 |
115 | ((cpu68k_write_f *)(v << 1))(a, d); \ |
116 | else \ |
117 | *(u16 *)((v << 1) + a) = d; \ |
118 | } |
119 | |
120 | #define MAKE_68K_WRITE32(name, map) \ |
121 | void name(u32 a, u32 d) \ |
122 | { \ |
bcf65fd6 |
123 | uptr v, vs; \ |
af37bca8 |
124 | a &= 0x00fffffe; \ |
125 | v = map[a >> M68K_MEM_SHIFT]; \ |
126 | vs = v << 1; \ |
b8a1c09a |
127 | if (map_flag_set(v)) { \ |
af37bca8 |
128 | ((cpu68k_write_f *)vs)(a, d >> 16); \ |
129 | ((cpu68k_write_f *)vs)(a + 2, d); \ |
130 | } \ |
131 | else { \ |
132 | u16 *m = (u16 *)(vs + a); \ |
133 | m[0] = d >> 16; \ |
134 | m[1] = d; \ |
135 | } \ |
136 | } |
137 | |
0c7d1ba3 |
138 | #ifdef NEED_DMA_SOURCE // meh |
139 | |
7feeb880 |
140 | static __inline void *m68k_dma_source(u32 a) |
141 | { |
0c7d1ba3 |
142 | u8 *base; |
7feeb880 |
143 | uptr v; |
7feeb880 |
144 | v = m68k_read16_map[a >> M68K_MEM_SHIFT]; |
0c7d1ba3 |
145 | if (map_flag_set(v)) { |
146 | if (a >= Pico.romsize) // Rom |
147 | return NULL; |
148 | base = Pico.rom; |
149 | } |
7feeb880 |
150 | else |
0c7d1ba3 |
151 | base = (void *)(v << 1); |
152 | return base + (a & 0xfe0000); |
7feeb880 |
153 | } |
154 | |
0c7d1ba3 |
155 | #endif |
156 | |
00faec9c |
157 | // 32x |
158 | typedef struct { |
159 | uptr addr; // stores (membase >> 1) or ((handler >> 1) | (1<<31)) |
160 | u32 mask; |
161 | } sh2_memmap; |