pico/memory.h

   1 // memory map related stuff
   2
   3 #include "pico_port.h"
   4
   5 typedef unsigned char  u8;
   6 typedef unsigned short u16;
   7 typedef unsigned int   u32;
   8 typedef uintptr_t      uptr; // unsigned pointer-sized int
   9
  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)
  14
  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];
  19
  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];
  24
  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
  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
  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
  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);
  49
  50 #define MAP_FLAG ((uptr)1 << (sizeof(uptr) * 8 - 1))
  51 #define map_flag_set(x) ((x) & MAP_FLAG)
  52
  53 #define MAKE_68K_READ8(name, map)               \
  54 u32 name(u32 a)                                 \
  55 {                                               \
  56   uptr v;                                       \
  57   a &= 0x00ffffff;                              \
  58   v = map[a >> M68K_MEM_SHIFT];                 \
  59   if (map_flag_set(v))                          \
  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 {                                               \
  68   uptr v;                                       \
  69   a &= 0x00fffffe;                              \
  70   v = map[a >> M68K_MEM_SHIFT];                 \
  71   if (map_flag_set(v))                          \
  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 {                                               \
  80   uptr v, vs;                                   \
  81   u32 d;                                        \
  82   a &= 0x00fffffe;                              \
  83   v = map[a >> M68K_MEM_SHIFT];                 \
  84   vs = v << 1;                                  \
  85   if (map_flag_set(v)) {                        \
  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 {                                               \
  99   uptr v;                                       \
 100   a &= 0x00ffffff;                              \
 101   v = map[a >> M68K_MEM_SHIFT];                 \
 102   if (map_flag_set(v))                          \
 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 {                                               \
 111   uptr v;                                       \
 112   a &= 0x00fffffe;                              \
 113   v = map[a >> M68K_MEM_SHIFT];                 \
 114   if (map_flag_set(v))                          \
 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 {                                               \
 123   uptr v, vs;                                   \
 124   a &= 0x00fffffe;                              \
 125   v = map[a >> M68K_MEM_SHIFT];                 \
 126   vs = v << 1;                                  \
 127   if (map_flag_set(v)) {                        \
 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
 138 #ifdef NEED_DMA_SOURCE // meh
 139
 140 static __inline void *m68k_dma_source(u32 a)
 141 {
 142   u8 *base;
 143   uptr v;
 144   v = m68k_read16_map[a >> M68K_MEM_SHIFT];
 145   if (map_flag_set(v)) {
 146     if (a >= Pico.romsize) // Rom
 147       return NULL;
 148     base = Pico.rom;
 149   }
 150   else
 151     base = (void *)(v << 1);
 152   return base + (a & 0xfe0000);
 153 }
 154
 155 #endif
 156
 157 // 32x
 158 typedef struct {
 159   uptr addr; // stores (membase >> 1) or ((handler >> 1) | (1<<31))
 160   u32 mask;
 161 } sh2_memmap;