Diff for /np2/i386c/memory.c between versions 1.6 and 1.24

version 1.6, 2003/12/27 11:55:23 version 1.24, 2004/04/05 09:45:06
Line 5 Line 5
 #include        "cpucore.h"  #include        "cpucore.h"
 #include        "memory.h"  #include        "memory.h"
 #include        "egcmem.h"  #include        "egcmem.h"
   #include        "mem9821.h"
 #include        "pccore.h"  #include        "pccore.h"
 #include        "iocore.h"  #include        "iocore.h"
 #include        "vram.h"  #include        "vram.h"
Line 14 Line 15
         BYTE    mem[0x200000];          BYTE    mem[0x200000];
   
   
 #define USE_HIMEM  
   
 // ---- write byte  // ---- write byte
   
 static void MEMCALL i286_wt(UINT32 address, REG8 value) {  static void MEMCALL i286_wt(UINT32 address, REG8 value) {       // MAIN
   
         mem[address & CPU_ADRSMASK] = (BYTE)value;          mem[address & CPU_ADRSMASK] = (BYTE)value;
 }  }
   
 static void MEMCALL tram_wt(UINT32 address, REG8 value) {  static void MEMCALL tram_wt(UINT32 address, REG8 value) {       // VRAM
   
         CPU_REMCLOCK -= MEMWAIT_TRAM;          CPU_REMCLOCK -= MEMWAIT_TRAM;
         if (address < 0xa2000) {          if (address < 0xa2000) {
Line 55  static void MEMCALL tram_wt(UINT32 addre Line 54  static void MEMCALL tram_wt(UINT32 addre
         }          }
 }  }
   
 static void MEMCALL vram_w0(UINT32 address, REG8 value) {  static void MEMCALL vram_w0(UINT32 address, REG8 value) {       // VRAM
   
         CPU_REMCLOCK -= MEMWAIT_VRAM;          CPU_REMCLOCK -= MEMWAIT_VRAM;
         mem[address] = (BYTE)value;          mem[address] = (BYTE)value;
Line 63  static void MEMCALL vram_w0(UINT32 addre Line 62  static void MEMCALL vram_w0(UINT32 addre
         gdcs.grphdisp |= 1;          gdcs.grphdisp |= 1;
 }  }
   
 static void MEMCALL vram_w1(UINT32 address, REG8 value) {  static void MEMCALL vram_w1(UINT32 address, REG8 value) {       // VRAM
   
         CPU_REMCLOCK -= MEMWAIT_VRAM;          CPU_REMCLOCK -= MEMWAIT_VRAM;
         mem[address + VRAM_STEP] = (BYTE)value;          mem[address + VRAM_STEP] = (BYTE)value;
Line 71  static void MEMCALL vram_w1(UINT32 addre Line 70  static void MEMCALL vram_w1(UINT32 addre
         gdcs.grphdisp |= 2;          gdcs.grphdisp |= 2;
 }  }
   
 static void MEMCALL grcg_rmw0(UINT32 address, REG8 value) {  static void MEMCALL grcg_rmw0(UINT32 address, REG8 value) {     // VRAM
   
         REG8    mask;          REG8    mask;
         BYTE    *vram;          BYTE    *vram;
Line 100  static void MEMCALL grcg_rmw0(UINT32 add Line 99  static void MEMCALL grcg_rmw0(UINT32 add
         }          }
 }  }
   
 static void MEMCALL grcg_rmw1(UINT32 address, REG8 value) {  static void MEMCALL grcg_rmw1(UINT32 address, REG8 value) {     // VRAM
   
         REG8    mask;          REG8    mask;
         BYTE    *vram;          BYTE    *vram;
Line 129  static void MEMCALL grcg_rmw1(UINT32 add Line 128  static void MEMCALL grcg_rmw1(UINT32 add
         }          }
 }  }
   
 static void MEMCALL grcg_tdw0(UINT32 address, REG8 value) {  static void MEMCALL grcg_tdw0(UINT32 address, REG8 value) {     // VRAM
   
         BYTE    *vram;          BYTE    *vram;
   
Line 153  static void MEMCALL grcg_tdw0(UINT32 add Line 152  static void MEMCALL grcg_tdw0(UINT32 add
         (void)value;          (void)value;
 }  }
   
 static void MEMCALL grcg_tdw1(UINT32 address, REG8 value) {  static void MEMCALL grcg_tdw1(UINT32 address, REG8 value) {     // VRAM
   
         BYTE    *vram;          BYTE    *vram;
   
Line 177  static void MEMCALL grcg_tdw1(UINT32 add Line 176  static void MEMCALL grcg_tdw1(UINT32 add
         (void)value;          (void)value;
 }  }
   
 static void MEMCALL egc_wt(UINT32 address, REG8 value) {  static void MEMCALL egc_wt(UINT32 address, REG8 value) {        // VRAM
   
         CPU_REMCLOCK -= MEMWAIT_GRCG;          CPU_REMCLOCK -= MEMWAIT_GRCG;
         egc_write(address, value);          egc_write(address, value);
Line 185  static void MEMCALL egc_wt(UINT32 addres Line 184  static void MEMCALL egc_wt(UINT32 addres
   
 static void MEMCALL emmc_wt(UINT32 address, REG8 value) {  static void MEMCALL emmc_wt(UINT32 address, REG8 value) {
   
         extmem.pageptr[(address >> 14) & 3][LOW14(address)] = (BYTE)value;          CPU_EMSPTR[(address >> 14) & 3][LOW14(address)] = (BYTE)value;
   }
   
   static void MEMCALL i286_wd(UINT32 address, REG8 value) {       // D0000〜DFFFF
   
           if (CPU_RAM_D000 & (1 << ((address >> 12) & 15))) {
                   mem[address] = (BYTE)value;
           }
 }  }
   
 static void MEMCALL i286_wb(UINT32 address, REG8 value) {  static void MEMCALL i286_wb(UINT32 address, REG8 value) {       // F8000〜FFFFF
   
         mem[address + 0x1c8000 - 0xe8000] = (BYTE)value;          mem[address + 0x1c8000 - 0xe8000] = (BYTE)value;
 }  }
Line 290  static REG8 MEMCALL egc_rd(UINT32 addres Line 296  static REG8 MEMCALL egc_rd(UINT32 addres
   
 static REG8 MEMCALL emmc_rd(UINT32 address) {  static REG8 MEMCALL emmc_rd(UINT32 address) {
   
         return(extmem.pageptr[(address >> 14) & 3][LOW14(address)]);          return(CPU_EMSPTR[(address >> 14) & 3][LOW14(address)]);
 }  }
   
 static REG8 MEMCALL i286_rb(UINT32 address) {  static REG8 MEMCALL i286_rb(UINT32 address) {
Line 470  static void MEMCALL emmcw_wt(UINT32 addr Line 476  static void MEMCALL emmcw_wt(UINT32 addr
         BYTE    *ptr;          BYTE    *ptr;
   
         if ((address & 0x3fff) != 0x3fff) {          if ((address & 0x3fff) != 0x3fff) {
                 ptr = extmem.pageptr[(address >> 14) & 3] + LOW14(address);                  ptr = CPU_EMSPTR[(address >> 14) & 3] + LOW14(address);
                 STOREINTELWORD(ptr, value);                  STOREINTELWORD(ptr, value);
         }          }
         else {          else {
                 extmem.pageptr[(address >> 14) & 3][0x3fff] = (BYTE)value;                  CPU_EMSPTR[(address >> 14) & 3][0x3fff] = (BYTE)value;
                 extmem.pageptr[((address + 1) >> 14) & 3][0] = (BYTE)(value >> 8);                  CPU_EMSPTR[((address + 1) >> 14) & 3][0] = (BYTE)(value >> 8);
           }
   }
   
   static void MEMCALL i286w_wd(UINT32 address, REG16 value) {
   
           BYTE    *ptr;
           UINT16  bit;
   
           ptr = mem + address;
           bit = 1 << ((address >> 12) & 15);
           if ((address + 1) & 0xfff) {
                   if (CPU_RAM_D000 & bit) {
                           STOREINTELWORD(ptr, value);
                   }
           }
           else {
                   if (CPU_RAM_D000 & bit) {
                           ptr[0] = (UINT8)value;
                   }
                   if (CPU_RAM_D000 & (bit << 1)) {
                           ptr[1] = (UINT8)(value >> 8);
                   }
         }          }
 }  }
   
 static void MEMCALL i286w_wb(UINT32 address, REG16 value) {  static void MEMCALL i286w_wb(UINT32 address, REG16 value) {
   
         mem[address + 0x1c8000 - 0xe8000] = (BYTE)value;          BYTE    *ptr;
         mem[address + 0x1c8001 - 0xe8000] = (BYTE)(value >> 8);  
           ptr = mem + (address + 0x1c8000 - 0xe8000);
           STOREINTELWORD(ptr, value);
 }  }
   
 static void MEMCALL i286w_wn(UINT32 address, REG16 value) {  static void MEMCALL i286w_wn(UINT32 address, REG16 value) {
Line 617  const BYTE *ptr; Line 647  const BYTE *ptr;
         REG16   ret;          REG16   ret;
   
         if ((address & 0x3fff) != 0x3fff) {          if ((address & 0x3fff) != 0x3fff) {
                 ptr = extmem.pageptr[(address >> 14) & 3] + LOW14(address);                  ptr = CPU_EMSPTR[(address >> 14) & 3] + LOW14(address);
                 return(LOADINTELWORD(ptr));                  return(LOADINTELWORD(ptr));
         }          }
         else {          else {
                 ret = extmem.pageptr[(address >> 14) & 3][0x3fff];                  ret = CPU_EMSPTR[(address >> 14) & 3][0x3fff];
                 ret += extmem.pageptr[((address + 1) >> 14) & 3][0] << 8;                  ret += CPU_EMSPTR[((address + 1) >> 14) & 3][0] << 8;
                 return(ret);                  return(ret);
         }          }
 }  }
Line 651  typedef struct { Line 681  typedef struct {
 } MEMFN;  } MEMFN;
   
 typedef struct {  typedef struct {
         MEM8READ        brd8;          MEM8READ        brd8;           // E8000-F7FFF byte read
         MEM8READ        ird8;          MEM8READ        ird8;           // F8000-FFFFF byte read
         MEM8WRITE       ewr8;          MEM8WRITE       bwr8;           // E8000-FFFFF byte write
         MEM8WRITE       bwr8;          MEM16READ       brd16;          // E8000-F7FFF word read
         MEM16READ       brd16;          MEM16READ       ird16;          // F8000-FFFFF word read
         MEM16READ       ird16;          MEM16WRITE      bwr16;          // F8000-FFFFF word write
         MEM16WRITE      ewr16;  
         MEM16WRITE      bwr16;  
 } MMAPTBL;  } MMAPTBL;
   
 typedef struct {  typedef struct {
Line 676  static MEMFN memfn = { Line 704  static MEMFN memfn = {
                         i286_rd,        i286_rd,        i286_rd,        i286_rd,                // 80                          i286_rd,        i286_rd,        i286_rd,        i286_rd,                // 80
                         tram_rd,        vram_r0,        vram_r0,        vram_r0,                // a0                          tram_rd,        vram_r0,        vram_r0,        vram_r0,                // a0
                         emmc_rd,        emmc_rd,        i286_rd,        i286_rd,                // c0                          emmc_rd,        emmc_rd,        i286_rd,        i286_rd,                // c0
                         vram_r0,        i286_rd,        i286_rd,        i286_rb},               // f0                          vram_r0,        i286_rd,        i286_rd,        i286_rb},               // e0
   
                    {i286_wt,    i286_wt,        i286_wt,        i286_wt,                // 00                     {i286_wt,    i286_wt,        i286_wt,        i286_wt,                // 00
                         i286_wt,        i286_wt,        i286_wt,        i286_wt,                // 20                          i286_wt,        i286_wt,        i286_wt,        i286_wt,                // 20
Line 684  static MEMFN memfn = { Line 712  static MEMFN memfn = {
                         i286_wt,        i286_wt,        i286_wt,        i286_wt,                // 60                          i286_wt,        i286_wt,        i286_wt,        i286_wt,                // 60
                         i286_wt,        i286_wt,        i286_wt,        i286_wt,                // 80                          i286_wt,        i286_wt,        i286_wt,        i286_wt,                // 80
                         tram_wt,        vram_w0,        vram_w0,        vram_w0,                // a0                          tram_wt,        vram_w0,        vram_w0,        vram_w0,                // a0
                         emmc_wt,        emmc_wt,        i286_wn,        i286_wn,                // c0                          emmc_wt,        emmc_wt,        i286_wd,        i286_wd,                // c0
                         vram_w0,        i286_wn,        i286_wn,        i286_wn},               // e0                          vram_w0,        i286_wn,        i286_wn,        i286_wn},               // e0
   
                    {i286w_rd,   i286w_rd,       i286w_rd,       i286w_rd,               // 00                     {i286w_rd,   i286w_rd,       i286w_rd,       i286w_rd,               // 00
Line 702  static MEMFN memfn = { Line 730  static MEMFN memfn = {
                         i286w_wt,       i286w_wt,       i286w_wt,       i286w_wt,               // 60                          i286w_wt,       i286w_wt,       i286w_wt,       i286w_wt,               // 60
                         i286w_wt,       i286w_wt,       i286w_wt,       i286w_wt,               // 80                          i286w_wt,       i286w_wt,       i286w_wt,       i286w_wt,               // 80
                         tramw_wt,       vramw_w0,       vramw_w0,       vramw_w0,               // a0                          tramw_wt,       vramw_w0,       vramw_w0,       vramw_w0,               // a0
                         emmcw_wt,       emmcw_wt,       i286w_wn,       i286w_wn,               // c0                          emmcw_wt,       emmcw_wt,       i286w_wd,       i286w_wd,               // c0
                         vramw_w0,       i286w_wn,       i286w_wn,       i286w_wn}};             // e0                          vramw_w0,       i286w_wn,       i286w_wn,       i286w_wn}};             // e0
   
 static const MMAPTBL mmaptbl[2] = {  static const MMAPTBL mmaptbl[2] = {
                    {i286_rd,    i286_rb,        i286_wn,        i286_wn,                     {i286_rd,    i286_rb,        i286_wn,
                         i286w_rd,       i286w_rb,       i286w_wn,       i286w_wn},                          i286w_rd,       i286w_rb,       i286w_wn},
                    {i286_rb,    i286_rb,        i286_wt,        i286_wb,                     {i286_rb,    i286_rb,        i286_wb,
                         i286w_rb,       i286w_rb,       i286w_wt,       i286w_wb}};                          i286w_rb,       i286w_rb,       i286w_wb}};
   
 static const VACCTBL vacctbl[0x10] = {  static const VACCTBL vacctbl[0x10] = {
                         {vram_r0,       vram_w0,        vramw_r0,       vramw_w0},              // 00                          {vram_r0,       vram_w0,        vramw_r0,       vramw_w0},              // 00
Line 752  const MMAPTBL *mm; Line 780  const MMAPTBL *mm;
         memfn.rd8[0xe8000 >> 15] = mm->brd8;          memfn.rd8[0xe8000 >> 15] = mm->brd8;
         memfn.rd8[0xf0000 >> 15] = mm->brd8;          memfn.rd8[0xf0000 >> 15] = mm->brd8;
         memfn.rd8[0xf8000 >> 15] = mm->ird8;          memfn.rd8[0xf8000 >> 15] = mm->ird8;
   
         memfn.wr8[0xd0000 >> 15] = mm->ewr8;  
         memfn.wr8[0xd8000 >> 15] = mm->ewr8;  
         memfn.wr8[0xe8000 >> 15] = mm->bwr8;          memfn.wr8[0xe8000 >> 15] = mm->bwr8;
         memfn.wr8[0xf0000 >> 15] = mm->bwr8;          memfn.wr8[0xf0000 >> 15] = mm->bwr8;
         memfn.wr8[0xf8000 >> 15] = mm->bwr8;          memfn.wr8[0xf8000 >> 15] = mm->bwr8;
Line 762  const MMAPTBL *mm; Line 787  const MMAPTBL *mm;
         memfn.rd16[0xe8000 >> 15] = mm->brd16;          memfn.rd16[0xe8000 >> 15] = mm->brd16;
         memfn.rd16[0xf0000 >> 15] = mm->brd16;          memfn.rd16[0xf0000 >> 15] = mm->brd16;
         memfn.rd16[0xf8000 >> 15] = mm->ird16;          memfn.rd16[0xf8000 >> 15] = mm->ird16;
   
         memfn.wr16[0xd0000 >> 15] = mm->ewr16;  
         memfn.wr16[0xd8000 >> 15] = mm->ewr16;  
         memfn.wr16[0xe8000 >> 15] = mm->bwr16;          memfn.wr16[0xe8000 >> 15] = mm->bwr16;
         memfn.wr16[0xf0000 >> 15] = mm->bwr16;          memfn.wr16[0xf0000 >> 15] = mm->bwr16;
         memfn.wr16[0xf8000 >> 15] = mm->bwr16;          memfn.wr16[0xf8000 >> 15] = mm->bwr16;
Line 774  void MEMCALL i286_vram_dispatch(UINT fun Line 796  void MEMCALL i286_vram_dispatch(UINT fun
   
 const VACCTBL   *vacc;  const VACCTBL   *vacc;
   
         vacc = vacctbl + (func & 0x0f);  #if defined(SUPPORT_PC9821)
           if (!(func & 0x20)) {
         memfn.rd8[0xa8000 >> 15] = vacc->rd8;  #endif
         memfn.rd8[0xb0000 >> 15] = vacc->rd8;                  vacc = vacctbl + (func & 0x0f);
         memfn.rd8[0xb8000 >> 15] = vacc->rd8;                  memfn.rd8[0xa8000 >> 15] = vacc->rd8;
         memfn.rd8[0xe0000 >> 15] = vacc->rd8;                  memfn.rd8[0xb0000 >> 15] = vacc->rd8;
                   memfn.rd8[0xb8000 >> 15] = vacc->rd8;
         memfn.wr8[0xa8000 >> 15] = vacc->wr8;                  memfn.rd8[0xe0000 >> 15] = vacc->rd8;
         memfn.wr8[0xb0000 >> 15] = vacc->wr8;  
         memfn.wr8[0xb8000 >> 15] = vacc->wr8;                  memfn.wr8[0xa8000 >> 15] = vacc->wr8;
         memfn.wr8[0xe0000 >> 15] = vacc->wr8;                  memfn.wr8[0xb0000 >> 15] = vacc->wr8;
                   memfn.wr8[0xb8000 >> 15] = vacc->wr8;
         memfn.rd16[0xa8000 >> 15] = vacc->rd16;                  memfn.wr8[0xe0000 >> 15] = vacc->wr8;
         memfn.rd16[0xb0000 >> 15] = vacc->rd16;  
         memfn.rd16[0xb8000 >> 15] = vacc->rd16;                  memfn.rd16[0xa8000 >> 15] = vacc->rd16;
         memfn.rd16[0xe0000 >> 15] = vacc->rd16;                  memfn.rd16[0xb0000 >> 15] = vacc->rd16;
                   memfn.rd16[0xb8000 >> 15] = vacc->rd16;
         memfn.wr16[0xa8000 >> 15] = vacc->wr16;                  memfn.rd16[0xe0000 >> 15] = vacc->rd16;
         memfn.wr16[0xb0000 >> 15] = vacc->wr16;  
         memfn.wr16[0xb8000 >> 15] = vacc->wr16;                  memfn.wr16[0xa8000 >> 15] = vacc->wr16;
         memfn.wr16[0xe0000 >> 15] = vacc->wr16;                  memfn.wr16[0xb0000 >> 15] = vacc->wr16;
                   memfn.wr16[0xb8000 >> 15] = vacc->wr16;
         if (!(func & 0x10)) {                                                   // degital                  memfn.wr16[0xe0000 >> 15] = vacc->wr16;
                 memfn.wr8[0xe0000 >> 15] = i286_wn;  
                 memfn.wr16[0xe0000 >> 15] = i286w_wn;                  if (!(func & 0x10)) {                                                   // digital
                 memfn.rd8[0xe0000 >> 15] = i286_nonram_r;                          memfn.wr8[0xe0000 >> 15] = i286_wn;
                 memfn.rd16[0xe0000 >> 15] = i286_nonram_rw;                          memfn.wr16[0xe0000 >> 15] = i286w_wn;
                           memfn.rd8[0xe0000 >> 15] = i286_nonram_r;
                           memfn.rd16[0xe0000 >> 15] = i286_nonram_rw;
                   }
   #if defined(SUPPORT_PC9821)
         }          }
           else {
                   memfn.rd8[0xa8000 >> 15] = mem9821_b0r;
                   memfn.rd8[0xb0000 >> 15] = mem9821_b0r;
                   memfn.rd8[0xb8000 >> 15] = i286_nonram_r;
                   memfn.rd8[0xe0000 >> 15] = mem9821_b2r;
   
                   memfn.wr8[0xa8000 >> 15] = mem9821_b0w;
                   memfn.wr8[0xb0000 >> 15] = mem9821_b0w;
                   memfn.wr8[0xb8000 >> 15] = i286_wn;
                   memfn.wr8[0xe0000 >> 15] = mem9821_b2w;
   
                   memfn.rd16[0xa8000 >> 15] = mem9821_b0rw;
                   memfn.rd16[0xb0000 >> 15] = mem9821_b0rw;
                   memfn.rd16[0xb8000 >> 15] = i286_nonram_rw;
                   memfn.rd16[0xe0000 >> 15] = mem9821_b2rw;
   
                   memfn.wr16[0xa8000 >> 15] = mem9821_b0ww;
                   memfn.wr16[0xb0000 >> 15] = mem9821_b0ww;
                   memfn.wr16[0xb8000 >> 15] = i286w_wn;
                   memfn.wr16[0xe0000 >> 15] = mem9821_b2ww;
           }
   #endif
 }  }
   
   
 REG8 MEMCALL __i286_memoryread(UINT32 address) {  REG8 MEMCALL i286_memoryread(UINT32 addr) {
   
         if (address < I286_MEMREADMAX) {          UINT32  pos;
                 return(mem[address]);  
           if (addr < I286_MEMREADMAX) {
                   return(mem[addr]);
         }          }
 #if defined(USE_HIMEM)          else if (addr >= USE_HIMEM) {
         else if (address >= 0x10fff0) {                  pos = (addr & CPU_ADRSMASK) - 0x100000;
                 address -= 0x100000;                  if (pos < CPU_EXTMEMSIZE) {
                 if (address < CPU_EXTMEMSIZE) {                          return(CPU_EXTMEM[pos]);
                         return(CPU_EXTMEM[address]);                  }
                   else if ((addr >= 0x00fa0000) && (addr < 0x01000000)) {
                           return(memfn.rd8[(addr >> 15) & 0x1f](addr - 0x00f00000));
                   }
   #if defined(SUPPORT_PC9821)
                   else if ((addr >= 0x00f00000) && (addr < 0x00f80000)) {
                           return(mem9821_r(addr));
                 }                  }
                   else if ((addr >= 0xfff00000) && (addr < 0xfff80000)) {
                           return(mem9821_r(addr));
                   }
   #endif
                 else {                  else {
   //                      TRACEOUT(("out of mem (read8): %x", addr));
                         return(0xff);                          return(0xff);
                 }                  }
         }          }
 #endif  
         else {          else {
                 return(memfn.rd8[(address >> 15) & 0x1f](address));                  return(memfn.rd8[(addr >> 15) & 0x1f](addr));
         }          }
 }  }
   
 REG16 MEMCALL __i286_memoryread_w(UINT32 address) {  REG16 MEMCALL i286_memoryread_w(UINT32 addr) {
   
           UINT32  pos;
         REG16   ret;          REG16   ret;
   
         if (address < (I286_MEMREADMAX - 1)) {          if (addr < (I286_MEMREADMAX - 1)) {
                 return(LOADINTELWORD(mem + address));                  return(LOADINTELWORD(mem + addr));
         }  
 #if defined(USE_HIMEM)  
         else if (address >= (0x10fff0 - 1)) {  
                 address -= 0x100000;  
                 if (address == (0x00fff0 - 1)) {  
                         ret = mem[0x100000 + address];  
                 }  
                 else if (address < CPU_EXTMEMSIZE) {  
                         ret = CPU_EXTMEM[address];  
                 }  
                 else {  
                         ret = 0xff;  
                 }  
                 address++;  
                 if (address < CPU_EXTMEMSIZE) {  
                         ret += CPU_EXTMEM[address] << 8;  
                 }  
                 else {  
                         ret += 0xff00;  
                 }  
                 return(ret);  
         }          }
           else if ((addr + 1) & 0x7fff) {                         // non 32kb boundary
                   if (addr >= USE_HIMEM) {
                           pos = (addr & CPU_ADRSMASK) - 0x100000;
                           if (pos < CPU_EXTMEMSIZE) {
                                   return(LOADINTELWORD(CPU_EXTMEM + pos));
                           }
                           else if ((addr >= 0x00fa0000) && (addr < 0x01000000)) {
                                   return(memfn.rd16[(addr >> 15) & 0x1f](addr - 0x00f00000));
                           }
   #if defined(SUPPORT_PC9821)
                           else if ((addr >= 0x00f00000) && (addr < 0x00f80000)) {
                                   return(mem9821_rw(addr));
                           }
                           else if ((addr >= 0xfff00000) && (addr < 0xfff80000)) {
                                   return(mem9821_rw(addr));
                           }
 #endif  #endif
         else if ((address & 0x7fff) != 0x7fff) {                          else {
                 return(memfn.rd16[(address >> 15) & 0x1f](address));  //                              TRACEOUT(("out of mem (read16): %x", addr));
                                   return(0xffff);
                           }
                   }
                   return(memfn.rd16[(addr >> 15) & 0x1f](addr));
         }          }
         else {          else {
                 ret = memfn.rd8[(address >> 15) & 0x1f](address);                  ret = i286_memoryread(addr);
                 address++;                  ret += (REG16)(i286_memoryread(addr + 1) << 8);
                 ret += memfn.rd8[(address >> 15) & 0x1f](address) << 8;  
                 return(ret);                  return(ret);
         }          }
 }  }
   
 UINT32 MEMCALL __i286_memoryread_d(UINT32 address) {  UINT32 MEMCALL i286_memoryread_d(UINT32 addr) {
   
         UINT32 ret;  
   
         ret = __i286_memoryread_w(address);          UINT32  pos;
         ret |= (UINT32)__i286_memoryread_w(address + 2) << 16;          UINT32  ret;
   
         return ret;          if (addr < (I286_MEMREADMAX - 3)) {
 }                  return(LOADINTELDWORD(mem + addr));
   
 void MEMCALL __i286_memorywrite(UINT32 address, REG8 value) {  
   
         if (address < I286_MEMWRITEMAX) {  
                 mem[address] = (BYTE)value;  
         }          }
 #if defined(USE_HIMEM)          else if (addr >= USE_HIMEM) {
         else if (address >= 0x10fff0) {                  pos = (addr & CPU_ADRSMASK) - 0x100000;
                 address -= 0x100000;                  if ((pos + 3) < CPU_EXTMEMSIZE) {
                 if (address < CPU_EXTMEMSIZE) {                          return(LOADINTELDWORD(CPU_EXTMEM + pos));
                         CPU_EXTMEM[address] = (BYTE)value;  
                 }                  }
         }          }
 #endif          if (!(addr & 1)) {
                   ret = i286_memoryread_w(addr);
                   ret += (UINT32)i286_memoryread_w(addr + 2) << 16;
           }
         else {          else {
                 memfn.wr8[(address >> 15) & 0x1f](address, value);                  ret = i286_memoryread(addr);
                   ret += (UINT32)i286_memoryread_w(addr + 1) << 8;
                   ret += (UINT32)i286_memoryread(addr + 3) << 24;
         }          }
           return(ret);
 }  }
   
 void MEMCALL __i286_memorywrite_w(UINT32 address, REG16 value) {  void MEMCALL i286_memorywrite(UINT32 addr, REG8 value) {
   
         if (address < (I286_MEMWRITEMAX - 1)) {          UINT32  pos;
                 STOREINTELWORD(mem + address, value);  
           if (addr < I286_MEMWRITEMAX) {
                   mem[addr] = (BYTE)value;
         }          }
 #if defined(USE_HIMEM)          else if (addr >= USE_HIMEM) {
         else if (address >= (0x10fff0 - 1)) {                  pos = (addr & CPU_ADRSMASK) - 0x100000;
                 address -= 0x100000;                  if (pos < CPU_EXTMEMSIZE) {
                 if (address == (0x00fff0 - 1)) {                          CPU_EXTMEM[pos] = (BYTE)value;
                         mem[address] = (BYTE)value;  
                 }                  }
                 else if (address < CPU_EXTMEMSIZE) {                  else if ((addr >= 0x00fa0000) && (addr < 0x01000000)) {
                         CPU_EXTMEM[address] = (BYTE)value;                          memfn.wr8[(addr >> 15) & 0x1f](addr - 0x00f00000, value);
                 }                  }
                 address++;  #if defined(SUPPORT_PC9821)
                 if (address < CPU_EXTMEMSIZE) {                  else if ((addr >= 0x00f00000) && (addr < 0x00f80000)) {
                         CPU_EXTMEM[address] = (BYTE)(value >> 8);                          mem9821_w(addr, value);
                   }
                   else if ((addr >= 0xfff00000) && (addr < 0xfff80000)) {
                           mem9821_w(addr, value);
                   }
   #endif
                   else {
   //                      TRACEOUT(("out of mem (write8): %x", addr));
                 }                  }
         }          }
           else {
                   memfn.wr8[(addr >> 15) & 0x1f](addr, value);
           }
   }
   
   void MEMCALL i286_memorywrite_w(UINT32 addr, REG16 value) {
   
           UINT32  pos;
   
           if (addr < (I286_MEMWRITEMAX - 1)) {
                   STOREINTELWORD(mem + addr, value);
           }
           else if ((addr + 1) & 0x7fff) {                         // non 32kb boundary
                   if (addr >= USE_HIMEM) {
                           pos = (addr & CPU_ADRSMASK) - 0x100000;
                           if (pos < CPU_EXTMEMSIZE) {
                                   STOREINTELWORD(CPU_EXTMEM + pos, value);
                           }
                           else if ((addr >= 0x00fa0000) && (addr < 0x01000000)) {
                                   memfn.wr16[(addr >> 15) & 0x1f](addr - 0x00f00000, value);
                           }
   #if defined(SUPPORT_PC9821)
                           else if ((addr >= 0x00f00000) && (addr < 0x00f80000)) {
                                   mem9821_ww(addr, value);
                           }
                           else if ((addr >= 0xfff00000) && (addr < 0xfff80000)) {
                                   mem9821_ww(addr, value);
                           }
 #endif  #endif
         else if ((address & 0x7fff) != 0x7fff) {                          else {
                 memfn.wr16[(address >> 15) & 0x1f](address, value);  //                              TRACEOUT(("out of mem (write16): %x", addr));
                           }
                   }
                   else {
                           memfn.wr16[(addr >> 15) & 0x1f](addr, value);
                   }
         }          }
         else {          else {
                 memfn.wr8[(address >> 15) & 0x1f](address, (BYTE)value);                  i286_memorywrite(addr, (UINT8)value);
                 address++;                  i286_memorywrite(addr + 1, (UINT8)(value >> 8));
                 memfn.wr8[(address >> 15) & 0x1f](address, (BYTE)(value >> 8));  
         }          }
 }  }
   
 void MEMCALL __i286_memorywrite_d(UINT32 address, UINT32 value) {  void MEMCALL i286_memorywrite_d(UINT32 addr, UINT32 value) {
   
           UINT32  pos;
   
         __i286_memorywrite_w(address, value & 0xffff);          if (addr < (I286_MEMWRITEMAX - 3)) {
         __i286_memorywrite_w(address + 2, (WORD)(value >> 16));                  STOREINTELDWORD(mem + addr, value);
                   return;
           }
           else if (addr >= USE_HIMEM) {
                   pos = (addr & CPU_ADRSMASK) - 0x100000;
                   if ((pos + 3) < CPU_EXTMEMSIZE) {
                           STOREINTELDWORD(CPU_EXTMEM + pos, value);
                           return;
                   }
           }
           if (!(addr & 1)) {
                   i286_memorywrite_w(addr, (UINT16)value);
                   i286_memorywrite_w(addr + 2, (UINT16)(value >> 16));
           }
           else {
                   i286_memorywrite(addr, (UINT8)value);
                   i286_memorywrite_w(addr + 1, (UINT16)(value >> 8));
                   i286_memorywrite(addr + 3, (UINT8)(value >> 24));
           }
 }  }
   
 #if 0  #if 0
Line 984  void MEMCALL i286_memword_write(UINT seg Line 1101  void MEMCALL i286_memword_write(UINT seg
 }  }
 #endif  #endif
   
 void MEMCALL i286_memstr_read(UINT seg, UINT off, void *dat, UINT leng) {  void MEMCALL memp_read(UINT32 address, void *dat, UINT leng) {
   
         BYTE    *out;          BYTE *out = (BYTE *)dat;
         UINT32  adrs;          UINT pos;
         UINT    size;          UINT diff;
   
         out = (BYTE *)dat;          /* fast memory access */
         adrs = seg << 4;          if (address + leng < I286_MEMREADMAX) {
         off = LOW16(off);                  CopyMemory(dat, mem + address, leng);
         if ((I286_MEMREADMAX >= 0x10000) &&                  return;
                 (adrs < (I286_MEMREADMAX - 0x10000))) {          } else if (address >= USE_HIMEM) {
                 if (leng) {                  pos = (address & CPU_ADRSMASK) - 0x100000;
                         size = 0x10000 - off;                  if (pos + leng < CPU_EXTMEMSIZE) {
                         if (size >= leng) {                          CopyMemory(dat, CPU_EXTMEM + pos, leng);
                                 CopyMemory(out, mem + adrs + off, leng);                          return;
                                 return;  
                         }  
                         CopyMemory(out, mem + adrs + off, size);  
                         out += size;  
                         leng -= size;  
                 }  
                 while(leng >= 0x10000) {  
                         CopyMemory(out, mem + adrs, 0x10000);  
                         out += 0x10000;  
                         leng -= 0x10000;  
                 }                  }
                 if (leng) {                  if (pos < CPU_EXTMEMSIZE) {
                         CopyMemory(out, mem + adrs, leng);                          diff = CPU_EXTMEMSIZE - pos;
                           CopyMemory(out, CPU_EXTMEM + pos, diff);
                           out += diff;
                           leng -= diff;
                           address += diff;
                 }                  }
         }          }
         else {  
                 while(leng--) {          /* slow memory access */
                         *out++ = i286_memoryread(adrs + off);          while (leng-- > 0) {
                         off = LOW16(off + 1);                  *out++ = i286_memoryread(address++);
                 }  
         }          }
 }  }
   
 void MEMCALL i286_memstr_write(UINT seg, UINT off,  void MEMCALL memp_write(UINT32 address, const void *dat, UINT leng) {
                                                                                                 const void *dat, UINT leng) {  
   
         BYTE    *out;          const BYTE *out = (BYTE *)dat;
         UINT32  adrs;          UINT pos;
         UINT    size;          UINT diff;
   
         out = (BYTE *)dat;          /* fast memory access */
         adrs = seg << 4;          if (address + leng < I286_MEMREADMAX) {
         off = LOW16(off);                  CopyMemory(mem + address, dat, leng);
         if ((I286_MEMWRITEMAX >= 0x10000) &&                  return;
                 (adrs < (I286_MEMWRITEMAX - 0x10000))) {          } else if (address >= USE_HIMEM) {
                 if (leng) {                  pos = (address & CPU_ADRSMASK) - 0x100000;
                         size = 0x10000 - off;                  if (pos + leng < CPU_EXTMEMSIZE) {
                         if (size >= leng) {                          CopyMemory(CPU_EXTMEM + pos, dat, leng);
                                 CopyMemory(mem + adrs + off, out, leng);                          return;
                                 return;  
                         }  
                         CopyMemory(mem + adrs + off, out, size);  
                         out += size;  
                         leng -= size;  
                 }  
                 while(leng >= 0x10000) {  
                         CopyMemory(mem + adrs, out, 0x10000);  
                         out += 0x10000;  
                         leng -= 0x10000;  
                 }                  }
                 if (leng) {                  if (pos < CPU_EXTMEMSIZE) {
                         CopyMemory(mem + adrs, out, leng);                          diff = CPU_EXTMEMSIZE - pos;
                           CopyMemory(CPU_EXTMEM + pos, dat, diff);
                           out += diff;
                           leng -= diff;
                           address += diff;
                 }                  }
         }          }
   
           /* slow memory access */
           while (leng-- > 0) {
                   i286_memorywrite(address++, *out++);
           }
   }
   
   
   // ---- Logical Space (BIOS)
   
   static UINT32 physicaladdr(UINT32 addr, BOOL wr) {
   
           UINT32  a;
           UINT32  pde;
           UINT32  pte;
   
           a = CPU_STAT_PDE_BASE + ((addr >> 20) & 0xffc);
           pde = i286_memoryread_d(a);
           if (!(pde & CPU_PDE_PRESENT)) {
                   goto retdummy;
           }
           if (!(pde & CPU_PDE_ACCESS)) {
                   i286_memorywrite(a, (UINT8)(pde | CPU_PDE_ACCESS));
           }
           a = (pde & CPU_PDE_BASEADDR_MASK) + ((addr >> 10) & 0xffc);
           pte = cpu_memoryread_d(a);
           if (!(pte & CPU_PTE_PRESENT)) {
                   goto retdummy;
           }
           if (!(pte & CPU_PTE_ACCESS)) {
                   i286_memorywrite(a, (UINT8)(pte | CPU_PTE_ACCESS));
           }
           if ((wr) && (!(pte & CPU_PTE_DIRTY))) {
                   i286_memorywrite(a, (UINT8)(pte | CPU_PTE_DIRTY));
           }
           addr = (pte & CPU_PTE_BASEADDR_MASK) + (addr & 0x00000fff);
           return(addr);
   
   retdummy:
           return(0x01000000);             // てきとーにメモリが存在しない場所
   }
   
   
   REG8 MEMCALL meml_read8(UINT seg, UINT off) {
   
           UINT32  addr;
   
           addr = (seg << 4) + LOW16(off);
           if (CPU_STAT_PAGING) {
                   addr = physicaladdr(addr, FALSE);
           }
           return(i286_memoryread(addr));
   }
   
   REG16 MEMCALL meml_read16(UINT seg, UINT off) {
   
           UINT32  addr;
   
           addr = (seg << 4) + LOW16(off);
           if (!CPU_STAT_PAGING) {
                   return(i286_memoryread_w(addr));
           }
           else if ((addr + 1) & 0xfff) {
                   return(i286_memoryread_w(physicaladdr(addr, FALSE)));
           }
           return(meml_read8(seg, off) + (meml_read8(seg, off + 1) << 8));
   }
   
   void MEMCALL meml_write8(UINT seg, UINT off, REG8 dat) {
   
           UINT32  addr;
   
           addr = (seg << 4) + LOW16(off);
           if (CPU_STAT_PAGING) {
                   addr = physicaladdr(addr, TRUE);
           }
           i286_memorywrite(addr, dat);
   }
   
   void MEMCALL meml_write16(UINT seg, UINT off, REG16 dat) {
   
           UINT32  addr;
   
           addr = (seg << 4) + LOW16(off);
           if (!CPU_STAT_PAGING) {
                   i286_memorywrite_w(addr, dat);
           }
           else if ((addr + 1) & 0xfff) {
                   i286_memorywrite_w(physicaladdr(addr, TRUE), dat);
           }
         else {          else {
                 while(leng--) {                  meml_write8(seg, off, (REG8)dat);
                         i286_memorywrite(adrs + off, *out++);                  meml_write8(seg, off + 1, (REG8)(dat >> 8));
                         off = LOW16(off + 1);  
                 }  
         }          }
 }  }
   
 void MEMCALL i286_memx_read(UINT32 address, void *dat, UINT leng) {  void MEMCALL meml_readstr(UINT seg, UINT off, void *dat, UINT leng) {
   
         if ((address + leng) < I286_MEMREADMAX) {          UINT32  addr;
                 CopyMemory(dat, mem + address, leng);          UINT    rem;
           UINT    size;
   
           while(leng) {
                   off = LOW16(off);
                   addr = (seg << 4) + off;
                   rem = 0x10000 - off;
                   size = min(leng, rem);
                   if (CPU_STAT_PAGING) {
                           rem = 0x1000 - (addr & 0xfff);
                           size = min(size, rem);
                           addr = physicaladdr(addr, FALSE);
                   }
                   memp_read(addr, dat, size);
                   off += size;
                   dat = ((BYTE *)dat) + size;
                   leng -= size;
           }
   }
   
   void MEMCALL meml_writestr(UINT seg, UINT off, const void *dat, UINT leng) {
   
           UINT32  addr;
           UINT    rem;
           UINT    size;
   
           while(leng) {
                   off = LOW16(off);
                   addr = (seg << 4) + off;
                   rem = 0x10000 - off;
                   size = min(leng, rem);
                   if (CPU_STAT_PAGING) {
                           rem = 0x1000 - (addr & 0xfff);
                           size = min(size, rem);
                           addr = physicaladdr(addr, TRUE);
                   }
                   memp_write(addr, dat, size);
                   off += size;
                   dat = ((BYTE *)dat) + size;
                   leng -= size;
           }
   }
   
   void MEMCALL meml_read(UINT32 address, void *dat, UINT leng) {
   
           UINT    size;
   
           if (!CPU_STAT_PAGING) {
                   memp_read(address, dat, leng);
         }          }
         else {          else {
                 BYTE *out = (BYTE *)dat;                  while(leng) {
                 if (address < I286_MEMREADMAX) {                          size = 0x1000 - (address & 0xfff);
                         CopyMemory(out, mem + address, I286_MEMREADMAX - address);                          size = min(size, leng);
                         out += I286_MEMREADMAX - address;                          memp_read(physicaladdr(address, FALSE), dat, size);
                         leng -= I286_MEMREADMAX - address;                          address += size;
                         address = I286_MEMREADMAX;                          dat = ((BYTE *)dat) + size;
                 }                          leng -= size;
                 while(leng--) {  
                         *out++ = i286_memoryread(address++);  
                 }                  }
         }          }
 }  }
   
 void MEMCALL i286_memx_write(UINT32 address, const void *dat, UINT leng) {  void MEMCALL meml_write(UINT32 address, const void *dat, UINT leng) {
   
 const BYTE      *out;          UINT    size;
   
         if ((address + leng) < I286_MEMWRITEMAX) {          if (!CPU_STAT_PAGING) {
                 CopyMemory(mem + address, dat, leng);                  memp_write(address, dat, leng);
         }          }
         else {          else {
                 out = (BYTE *)dat;                  while(leng) {
                 if (address < I286_MEMWRITEMAX) {                          size = 0x1000 - (address & 0xfff);
                         CopyMemory(mem + address, out, I286_MEMWRITEMAX - address);                          size = min(size, leng);
                         out += I286_MEMWRITEMAX - address;                          memp_write(physicaladdr(address, TRUE), dat, size);
                         leng -= I286_MEMWRITEMAX - address;                          address += size;
                         address = I286_MEMWRITEMAX;                          dat = ((BYTE *)dat) + size;
                 }                          leng -= size;
                 while(leng--) {  
                         i286_memorywrite(address++, *out++);  
                 }                  }
         }          }
 }  }
   
 #endif  #endif
   

Removed from v.1.6  
changed lines
  Added in v.1.24


RetroPC.NET-CVS <cvs@retropc.net>