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