pico/memory.h

   1 // memory map related stuff
   2
   3 typedef unsigned char  u8;
   4 typedef unsigned short u16;
   5 typedef unsigned int   u32;
   6 typedef unsigned long  uptr; // unsigned pointer-sized int
   7
   8 #define M68K_MEM_SHIFT 16
   9 // minimum size we can map
  10 #define M68K_BANK_SIZE (1 << M68K_MEM_SHIFT)
  11 #define M68K_BANK_MASK (M68K_BANK_SIZE - 1)
  12
  13 extern uptr m68k_read8_map  [0x1000000 >> M68K_MEM_SHIFT];
  14 extern uptr m68k_read16_map [0x1000000 >> M68K_MEM_SHIFT];
  15 extern uptr m68k_write8_map [0x1000000 >> M68K_MEM_SHIFT];
  16 extern uptr m68k_write16_map[0x1000000 >> M68K_MEM_SHIFT];
  17
  18 extern uptr s68k_read8_map  [0x1000000 >> M68K_MEM_SHIFT];
  19 extern uptr s68k_read16_map [0x1000000 >> M68K_MEM_SHIFT];
  20 extern uptr s68k_write8_map [0x1000000 >> M68K_MEM_SHIFT];
  21 extern uptr s68k_write16_map[0x1000000 >> M68K_MEM_SHIFT];
  22
  23 void z80_map_set(uptr *map, int start_addr, int end_addr,
  24     const void *func_or_mh, int is_func);
  25 void cpu68k_map_set(uptr *map, int start_addr, int end_addr,
  26     const void *func_or_mh, int is_func);
  27 void cpu68k_map_all_ram(int start_addr, int end_addr, void *ptr, int is_sub);
  28 void m68k_map_unmap(int start_addr, int end_addr);
  29
  30 // top-level handlers that cores can use
  31 // (or alternatively build them into themselves)
  32 // XXX: unhandled: *16 and *32 might cross the bank boundaries
  33 typedef u32  (cpu68k_read_f)(u32 a);
  34 typedef void (cpu68k_write_f)(u32 a, u32 d);
  35
  36 #define MAKE_68K_READ8(name, map)               \
  37 u32 name(u32 a)                                 \
  38 {                                               \
  39   uptr v;                                       \
  40   a &= 0x00ffffff;                              \
  41   v = map[a >> M68K_MEM_SHIFT];                 \
  42   if (v & 0x80000000)                           \
  43     return ((cpu68k_read_f *)(v << 1))(a);      \
  44   else                                          \
  45     return *(u8 *)((v << 1) + (a ^ 1));         \
  46 }
  47
  48 #define MAKE_68K_READ16(name, map)              \
  49 u32 name(u32 a)                                 \
  50 {                                               \
  51   uptr v;                                       \
  52   a &= 0x00fffffe;                              \
  53   v = map[a >> M68K_MEM_SHIFT];                 \
  54   if (v & 0x80000000)                           \
  55     return ((cpu68k_read_f *)(v << 1))(a);      \
  56   else                                          \
  57     return *(u16 *)((v << 1) + a);              \
  58 }
  59
  60 #define MAKE_68K_READ32(name, map)              \
  61 u32 name(u32 a)                                 \
  62 {                                               \
  63   uptr v, vs;                                   \
  64   u32 d;                                        \
  65   a &= 0x00fffffe;                              \
  66   v = map[a >> M68K_MEM_SHIFT];                 \
  67   vs = v << 1;                                  \
  68   if (v & 0x80000000) {                         \
  69     d  = ((cpu68k_read_f *)vs)(a) << 16;        \
  70     d |= ((cpu68k_read_f *)vs)(a + 2);          \
  71   }                                             \
  72   else {                                        \
  73     u16 *m = (u16 *)(vs + a);                   \
  74     d = (m[0] << 16) | m[1];                    \
  75   }                                             \
  76   return d;                                     \
  77 }
  78
  79 #define MAKE_68K_WRITE8(name, map)              \
  80 void name(u32 a, u8 d)                          \
  81 {                                               \
  82   uptr v;                                       \
  83   a &= 0x00ffffff;                              \
  84   v = map[a >> M68K_MEM_SHIFT];                 \
  85   if (v & 0x80000000)                           \
  86     ((cpu68k_write_f *)(v << 1))(a, d);         \
  87   else                                          \
  88     *(u8 *)((v << 1) + (a ^ 1)) = d;            \
  89 }
  90
  91 #define MAKE_68K_WRITE16(name, map)             \
  92 void name(u32 a, u16 d)                         \
  93 {                                               \
  94   uptr v;                                       \
  95   a &= 0x00fffffe;                              \
  96   v = map[a >> M68K_MEM_SHIFT];                 \
  97   if (v & 0x80000000)                           \
  98     ((cpu68k_write_f *)(v << 1))(a, d);         \
  99   else                                          \
 100     *(u16 *)((v << 1) + a) = d;                 \
 101 }
 102
 103 #define MAKE_68K_WRITE32(name, map)             \
 104 void name(u32 a, u32 d)                         \
 105 {                                               \
 106   uptr v, vs;                                   \
 107   a &= 0x00fffffe;                              \
 108   v = map[a >> M68K_MEM_SHIFT];                 \
 109   vs = v << 1;                                  \
 110   if (v & 0x80000000) {                         \
 111     ((cpu68k_write_f *)vs)(a, d >> 16);         \
 112     ((cpu68k_write_f *)vs)(a + 2, d);           \
 113   }                                             \
 114   else {                                        \
 115     u16 *m = (u16 *)(vs + a);                   \
 116     m[0] = d >> 16;                             \
 117     m[1] = d;                                   \
 118   }                                             \
 119 }
 120