source/src/vm/hc40/memory.cpp

   1 /*
   2         EPSON HC-40 Emulator 'eHC-40'
   3
   4         Author : Takeda.Toshiya
   5         Date   : 2008.02.23 -
   6
   7         [ memory ]
   8 */
   9
  10 #include "memory.h"
  11
  12 namespace HC40 {
  13
  14 #define SET_BANK(s, e, w, r) { \
  15         int sb = (s) >> 13, eb = (e) >> 13; \
  16         for(int i = sb; i <= eb; i++) { \
  17                 if((w) == wdmy) { \
  18                         wbank[i] = wdmy; \
  19                 } else { \
  20                         wbank[i] = (w) + 0x2000 * (i - sb); \
  21                 } \
  22                 if((r) == rdmy) { \
  23                         rbank[i] = rdmy; \
  24                 } else { \
  25                         rbank[i] = (r) + 0x2000 * (i - sb); \
  26                 } \
  27         } \
  28 }
  29
  30 void MEMORY::initialize()
  31 {
  32         // initialize memory
  33         memset(ram, 0, sizeof(ram));
  34         memset(sys, 0xff, sizeof(sys));
  35         memset(basic, 0xff, sizeof(basic));
  36         memset(util, 0xff, sizeof(util));
  37         memset(rdmy, 0xff, sizeof(rdmy));
  38
  39         // load backuped ram / rom images
  40         FILEIO* fio = new FILEIO();
  41         if(fio->Fopen(create_local_path(_T("DRAM.BIN")), FILEIO_READ_BINARY)) {
  42                 fio->Fread(ram, sizeof(ram), 1);
  43                 fio->Fclose();
  44         }
  45         if(fio->Fopen(create_local_path(_T("SYS.ROM")), FILEIO_READ_BINARY)) {
  46                 fio->Fread(sys, sizeof(sys), 1);
  47                 fio->Fclose();
  48         }
  49         if(fio->Fopen(create_local_path(_T("BASIC.ROM")), FILEIO_READ_BINARY)) {
  50                 fio->Fread(basic, sizeof(basic), 1);
  51                 fio->Fclose();
  52         }
  53         if(fio->Fopen(create_local_path(_T("UTIL.ROM")), FILEIO_READ_BINARY)) {
  54                 fio->Fread(util, sizeof(util), 1);
  55                 fio->Fclose();
  56         }
  57         delete fio;
  58 }
  59
  60 void MEMORY::release()
  61 {
  62         // save battery backuped ram
  63         FILEIO* fio = new FILEIO();
  64         if(fio->Fopen(create_local_path(_T("DRAM.BIN")), FILEIO_WRITE_BINARY)) {
  65                 fio->Fwrite(ram, sizeof(ram), 1);
  66                 fio->Fclose();
  67         }
  68         delete fio;
  69 }
  70
  71 void MEMORY::reset()
  72 {
  73         set_bank(0);
  74 }
  75
  76 void MEMORY::write_data8(uint32_t addr, uint32_t data)
  77 {
  78         addr &= 0xffff;
  79         wbank[(addr >> 13) & 7][addr & 0x1fff] = data;
  80 }
  81
  82 uint32_t MEMORY::read_data8(uint32_t addr)
  83 {
  84         addr &= 0xffff;
  85         return rbank[(addr >> 13) & 7][addr & 0x1fff];
  86 }
  87
  88 void MEMORY::write_signal(int id, uint32_t data, uint32_t mask)
  89 {
  90         set_bank(data);
  91 }
  92
  93 void MEMORY::set_bank(uint32_t val)
  94 {
  95         SET_BANK(0x0000, 0xffff, ram, ram);
  96
  97         switch(val & 0xf0) {
  98         // bank 0
  99         case 0x00:
 100                 SET_BANK(0x0000, 0x7fff, wdmy, sys);
 101                 break;
 102         // bank 1
 103         case 0x40:
 104                 break;
 105         // bank 2
 106         case 0x80:
 107                 SET_BANK(0xc000, 0xdfff, wdmy, basic);
 108                 break;
 109         case 0x90:
 110                 SET_BANK(0xa000, 0xbfff, wdmy, basic + 0x2000);
 111                 SET_BANK(0xc000, 0xdfff, wdmy, basic);
 112                 break;
 113         case 0xa0:
 114                 SET_BANK(0x6000, 0x7fff, wdmy, basic + 0x6000);
 115                 SET_BANK(0x8000, 0xdfff, wdmy, basic);
 116                 break;
 117         // bank 3
 118         case 0xc0:
 119                 SET_BANK(0xc000, 0xdfff, wdmy, util);
 120                 break;
 121         case 0xd0:
 122                 SET_BANK(0xa000, 0xbfff, wdmy, util + 0x2000);
 123                 SET_BANK(0xc000, 0xdfff, wdmy, util);
 124                 break;
 125         case 0xe0:
 126                 SET_BANK(0x6000, 0x7fff, wdmy, util + 0x6000);
 127                 SET_BANK(0x8000, 0xdfff, wdmy, util);
 128                 break;
 129         }
 130         bank = val;
 131 }
 132
 133 #define STATE_VERSION   1
 134
 135 bool MEMORY::process_state(FILEIO* state_fio, bool loading)
 136 {
 137         if(!state_fio->StateCheckUint32(STATE_VERSION)) {
 138                 return false;
 139         }
 140         if(!state_fio->StateCheckInt32(this_device_id)) {
 141                 return false;
 142         }
 143         state_fio->StateBuffer(ram, sizeof(ram), 1);
 144         state_fio->StateUint8(bank);
 145
 146         // post process
 147         if(loading) {
 148                 set_bank(bank);
 149         }
 150         return true;
 151 }
 152
 153 }