memory.h 6.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165
  1. // memory map related stuff
  2. #include "pico_port.h"
  3. #define M68K_MEM_SHIFT 16
  4. // minimum size we can map
  5. #define M68K_BANK_SIZE (1 << M68K_MEM_SHIFT)
  6. #define M68K_BANK_MASK (M68K_BANK_SIZE - 1)
  7. extern uptr m68k_read8_map [0x1000000 >> M68K_MEM_SHIFT];
  8. extern uptr m68k_read16_map [0x1000000 >> M68K_MEM_SHIFT];
  9. extern uptr m68k_write8_map [0x1000000 >> M68K_MEM_SHIFT];
  10. extern uptr m68k_write16_map[0x1000000 >> M68K_MEM_SHIFT];
  11. extern uptr s68k_read8_map [0x1000000 >> M68K_MEM_SHIFT];
  12. extern uptr s68k_read16_map [0x1000000 >> M68K_MEM_SHIFT];
  13. extern uptr s68k_write8_map [0x1000000 >> M68K_MEM_SHIFT];
  14. extern uptr s68k_write16_map[0x1000000 >> M68K_MEM_SHIFT];
  15. // top-level handlers that cores can use
  16. // (or alternatively build them into themselves)
  17. // XXX: unhandled: *16 and *32 might cross the bank boundaries
  18. typedef u32 (cpu68k_read_f)(u32 a);
  19. typedef void (cpu68k_write_f)(u32 a, u32 d);
  20. extern u32 m68k_read8(u32 a);
  21. extern u32 m68k_read16(u32 a);
  22. extern u32 m68k_read32(u32 a);
  23. extern void m68k_write8(u32 a, u8 d);
  24. extern void m68k_write16(u32 a, u16 d);
  25. extern void m68k_write32(u32 a, u32 d);
  26. extern u32 s68k_read8(u32 a);
  27. extern u32 s68k_read16(u32 a);
  28. extern u32 s68k_read32(u32 a);
  29. extern void s68k_write8(u32 a, u8 d);
  30. extern void s68k_write16(u32 a, u16 d);
  31. extern void s68k_write32(u32 a, u32 d);
  32. // z80
  33. #define Z80_MEM_SHIFT 10 // must be <=10 to allow 1KB pages for SMS Sega mapper
  34. extern uptr z80_read_map [0x10000 >> Z80_MEM_SHIFT];
  35. extern uptr z80_write_map[0x10000 >> Z80_MEM_SHIFT];
  36. typedef unsigned char (z80_read_f)(unsigned short a);
  37. typedef void (z80_write_f)(unsigned int a, unsigned char data);
  38. void z80_map_set(uptr *map, u16 start_addr, u16 end_addr,
  39. const void *func_or_mh, int is_func);
  40. void cpu68k_map_set(uptr *map, u32 start_addr, u32 end_addr,
  41. const void *func_or_mh, int is_func);
  42. void cpu68k_map_all_ram(u32 start_addr, u32 end_addr, void *ptr, int is_sub);
  43. void m68k_map_unmap(u32 start_addr, u32 end_addr);
  44. #define MAP_FLAG ((uptr)1 << (sizeof(uptr) * 8 - 1))
  45. #define map_flag_set(x) ((x) & MAP_FLAG)
  46. #define MAKE_68K_READ8(name, map) \
  47. u32 name(u32 a) \
  48. { \
  49. uptr v; \
  50. a &= 0x00ffffff; \
  51. v = map[a >> M68K_MEM_SHIFT]; \
  52. if (map_flag_set(v)) \
  53. return ((cpu68k_read_f *)(v << 1))(a); \
  54. else \
  55. return *(u8 *)((v << 1) + MEM_BE2(a)); \
  56. }
  57. #define MAKE_68K_READ16(name, map) \
  58. u32 name(u32 a) \
  59. { \
  60. uptr v; \
  61. a &= 0x00fffffe; \
  62. v = map[a >> M68K_MEM_SHIFT]; \
  63. if (map_flag_set(v)) \
  64. return ((cpu68k_read_f *)(v << 1))(a); \
  65. else \
  66. return *(u16 *)((v << 1) + a); \
  67. }
  68. #define MAKE_68K_READ32(name, map) \
  69. u32 name(u32 a) \
  70. { \
  71. uptr v, vs; \
  72. u32 d; \
  73. a &= 0x00fffffe; \
  74. v = map[a >> M68K_MEM_SHIFT]; \
  75. vs = v << 1; \
  76. if (map_flag_set(v)) { \
  77. d = ((cpu68k_read_f *)vs)(a) << 16; \
  78. d |= ((cpu68k_read_f *)vs)(a + 2); \
  79. } \
  80. else { \
  81. u16 *m = (u16 *)(vs + a); \
  82. d = (m[0] << 16) | m[1]; \
  83. } \
  84. return d; \
  85. }
  86. #define MAKE_68K_WRITE8(name, map) \
  87. void name(u32 a, u8 d) \
  88. { \
  89. uptr v; \
  90. a &= 0x00ffffff; \
  91. v = map[a >> M68K_MEM_SHIFT]; \
  92. if (map_flag_set(v)) \
  93. ((cpu68k_write_f *)(v << 1))(a, d); \
  94. else \
  95. *(u8 *)((v << 1) + MEM_BE2(a)) = d; \
  96. }
  97. #define MAKE_68K_WRITE16(name, map) \
  98. void name(u32 a, u16 d) \
  99. { \
  100. uptr v; \
  101. a &= 0x00fffffe; \
  102. v = map[a >> M68K_MEM_SHIFT]; \
  103. if (map_flag_set(v)) \
  104. ((cpu68k_write_f *)(v << 1))(a, d); \
  105. else \
  106. *(u16 *)((v << 1) + a) = d; \
  107. }
  108. #define MAKE_68K_WRITE32(name, map) \
  109. void name(u32 a, u32 d) \
  110. { \
  111. uptr v, vs; \
  112. a &= 0x00fffffe; \
  113. v = map[a >> M68K_MEM_SHIFT]; \
  114. vs = v << 1; \
  115. if (map_flag_set(v)) { \
  116. ((cpu68k_write_f *)vs)(a, d >> 16); \
  117. ((cpu68k_write_f *)vs)(a + 2, d); \
  118. } \
  119. else { \
  120. u16 *m = (u16 *)(vs + a); \
  121. m[0] = d >> 16; \
  122. m[1] = d; \
  123. } \
  124. }
  125. #ifdef NEED_DMA_SOURCE // meh
  126. static __inline void *m68k_dma_source(u32 a)
  127. {
  128. u8 *base;
  129. uptr v;
  130. v = m68k_read16_map[a >> M68K_MEM_SHIFT];
  131. if (map_flag_set(v)) {
  132. if (a >= Pico.romsize) // Rom
  133. return NULL;
  134. base = Pico.rom;
  135. }
  136. else
  137. base = (void *)(v << 1);
  138. return base + (a & 0xfe0000);
  139. }
  140. #endif
  141. // 32x
  142. typedef struct {
  143. uptr addr; // stores (membase >> 1) or ((handler >> 1) | (1<<31))
  144. u32 mask;
  145. } sh2_memmap;