214 lines
7.8 KiB
C
214 lines
7.8 KiB
C
#include <stdio.h>
|
|
#include <windows.h>
|
|
#include "ibm.h"
|
|
#include "io.h"
|
|
#include "nvr.h"
|
|
#include "pic.h"
|
|
#include "timer.h"
|
|
|
|
int oldromset;
|
|
int nvrmask=63;
|
|
uint8_t nvrram[128];
|
|
int nvraddr;
|
|
|
|
SYSTEMTIME systemtime;
|
|
|
|
int nvr_dosave = 0;
|
|
|
|
void getnvrtime()
|
|
{
|
|
int c,d;
|
|
uint8_t baknvr[10];
|
|
// memset(nvrram,0,10);
|
|
// return;
|
|
memcpy(baknvr,nvrram,10);
|
|
GetLocalTime(&systemtime);
|
|
d=systemtime.wSecond%10;
|
|
c=systemtime.wSecond/10;
|
|
nvrram[0]=d|(c<<4);
|
|
d=systemtime.wMinute%10;
|
|
c=systemtime.wMinute/10;
|
|
nvrram[2]=d|(c<<4);
|
|
d=systemtime.wHour%10;
|
|
c=systemtime.wHour/10;
|
|
nvrram[4]=d|(c<<4);
|
|
d=systemtime.wDayOfWeek%10;
|
|
c=systemtime.wDayOfWeek/10;
|
|
nvrram[6]=d|(c<<4);
|
|
d=systemtime.wDay%10;
|
|
c=systemtime.wDay/10;
|
|
nvrram[7]=d|(c<<4);
|
|
d=systemtime.wMonth%10;
|
|
c=systemtime.wMonth/10;
|
|
nvrram[8]=d|(c<<4);
|
|
d=systemtime.wYear%10;
|
|
c=(systemtime.wYear/10)%10;
|
|
nvrram[9]=d|(c<<4);
|
|
if (baknvr[0]!=nvrram[0] ||
|
|
baknvr[2]!=nvrram[2] ||
|
|
baknvr[4]!=nvrram[4] ||
|
|
baknvr[6]!=nvrram[6] ||
|
|
baknvr[7]!=nvrram[7] ||
|
|
baknvr[8]!=nvrram[8] ||
|
|
baknvr[9]!=nvrram[9]) nvrram[0xA]|=0x80;
|
|
}
|
|
|
|
void nvr_recalc()
|
|
{
|
|
int c;
|
|
int newrtctime;
|
|
c=1<<((nvrram[0xA]&0xF)-1);
|
|
newrtctime=(int)(RTCCONST * c * (1 << TIMER_SHIFT));
|
|
if (rtctime>newrtctime) rtctime=newrtctime;
|
|
}
|
|
|
|
void nvr_rtc()
|
|
{
|
|
int c;
|
|
if (!(nvrram[0xA]&0xF))
|
|
{
|
|
rtctime=0x7fffffff;
|
|
return;
|
|
}
|
|
c=1<<((nvrram[0xA]&0xF)-1);
|
|
rtctime += (int)(RTCCONST * c * (1 << TIMER_SHIFT));
|
|
// pclog("RTCtime now %f\n",rtctime);
|
|
nvrram[0xC]=0x40;
|
|
if (nvrram[0xB]&0x40)
|
|
{
|
|
nvrram[0xC]|=0x80;
|
|
if (AMSTRAD) picint(2);
|
|
else picint(0x100);
|
|
// pclog("RTC int\n");
|
|
}
|
|
}
|
|
|
|
void writenvr(uint16_t addr, uint8_t val, void *priv)
|
|
{
|
|
int c;
|
|
// printf("Write NVR %03X %02X %02X %04X:%04X %i\n",addr,nvraddr,val,cs>>4,pc,ins);
|
|
if (addr&1)
|
|
{
|
|
// if (nvraddr == 0x33) pclog("NVRWRITE33 %02X %04X:%04X %i\n",val,CS,pc,ins);
|
|
if (nvraddr >= 0xe && nvrram[nvraddr] != val)
|
|
nvr_dosave = 1;
|
|
if (nvraddr!=0xC && nvraddr!=0xD) nvrram[nvraddr]=val;
|
|
|
|
if (nvraddr==0xA)
|
|
{
|
|
// pclog("NVR rate %i\n",val&0xF);
|
|
if (val&0xF)
|
|
{
|
|
c=1<<((val&0xF)-1);
|
|
rtctime += (int)(RTCCONST * c * (1 << TIMER_SHIFT));
|
|
}
|
|
else
|
|
rtctime = 0x7fffffff;
|
|
}
|
|
}
|
|
else nvraddr=val&nvrmask;
|
|
}
|
|
|
|
uint8_t readnvr(uint16_t addr, void *priv)
|
|
{
|
|
uint8_t temp;
|
|
// printf("Read NVR %03X %02X %02X %04X:%04X\n",addr,nvraddr,nvrram[nvraddr],cs>>4,pc);
|
|
if (addr&1)
|
|
{
|
|
if (nvraddr<=0xA) getnvrtime();
|
|
if (nvraddr==0xD) nvrram[0xD]|=0x80;
|
|
if (nvraddr==0xA)
|
|
{
|
|
temp=nvrram[0xA];
|
|
nvrram[0xA]&=~0x80;
|
|
return temp;
|
|
}
|
|
if (nvraddr==0xC)
|
|
{
|
|
if (AMSTRAD) picintc(2);
|
|
else picintc(0x100);
|
|
temp=nvrram[0xC];
|
|
nvrram[0xC]=0;
|
|
return temp;
|
|
}
|
|
// if (AMIBIOS && nvraddr==0x36) return 0;
|
|
// if (nvraddr==0xA) nvrram[0xA]^=0x80;
|
|
return nvrram[nvraddr];
|
|
}
|
|
return nvraddr;
|
|
}
|
|
|
|
void loadnvr()
|
|
{
|
|
FILE *f;
|
|
int c;
|
|
nvrmask=63;
|
|
oldromset=romset;
|
|
switch (romset)
|
|
{
|
|
case ROM_PC1512: f = romfopen("pc1512.nvr", "rb"); break;
|
|
case ROM_PC1640: f = romfopen("pc1640.nvr", "rb"); break;
|
|
case ROM_PC200: f = romfopen("pc200.nvr", "rb"); break;
|
|
case ROM_PC2086: f = romfopen("pc2086.nvr", "rb"); break;
|
|
case ROM_PC3086: f = romfopen("pc3086.nvr", "rb"); break;
|
|
case ROM_IBMAT: f = romfopen("at.nvr" , "rb"); break;
|
|
case ROM_CMDPC30: f = romfopen("cmdpc30.nvr", "rb"); nvrmask = 127; break;
|
|
case ROM_AMI286: f = romfopen("ami286.nvr", "rb"); nvrmask = 127; break;
|
|
case ROM_DELL200: f = romfopen("dell200.nvr", "rb"); nvrmask = 127; break;
|
|
case ROM_IBMAT386: f = romfopen("at386.nvr" , "rb"); nvrmask = 127; break;
|
|
case ROM_ACER386: f = romfopen("acer386.nvr", "rb"); nvrmask = 127; break;
|
|
case ROM_MEGAPC: f = romfopen("megapc.nvr", "rb"); nvrmask = 127; break;
|
|
case ROM_AMI386: f = romfopen("ami386.nvr", "rb"); nvrmask = 127; break;
|
|
case ROM_AMI486: f = romfopen("ami486.nvr", "rb"); nvrmask = 127; break;
|
|
case ROM_WIN486: f = romfopen("win486.nvr", "rb"); nvrmask = 127; break;
|
|
case ROM_PCI486: f = romfopen("hot-433.nvr", "rb"); nvrmask = 127; break;
|
|
case ROM_SIS496: f = romfopen("sis496.nvr", "rb"); nvrmask = 127; break;
|
|
case ROM_430VX: f = romfopen("430vx.nvr", "rb"); nvrmask = 127; break;
|
|
default: return;
|
|
}
|
|
if (!f)
|
|
{
|
|
memset(nvrram,0xFF,128);
|
|
return;
|
|
}
|
|
fread(nvrram,128,1,f);
|
|
fclose(f);
|
|
nvrram[0xA]=6;
|
|
nvrram[0xB]=0;
|
|
c=1<<((6&0xF)-1);
|
|
rtctime += (int)(RTCCONST * c * (1 << TIMER_SHIFT));
|
|
}
|
|
void savenvr()
|
|
{
|
|
FILE *f;
|
|
switch (oldromset)
|
|
{
|
|
case ROM_PC1512: f = romfopen("pc1512.nvr" , "wb"); break;
|
|
case ROM_PC1640: f = romfopen("pc1640.nvr" , "wb"); break;
|
|
case ROM_PC200: f = romfopen("pc200.nvr" , "wb"); break;
|
|
case ROM_PC2086: f = romfopen("pc2086.nvr" , "wb"); break;
|
|
case ROM_PC3086: f = romfopen("pc3086.nvr" , "wb"); break;
|
|
case ROM_IBMAT: f = romfopen("at.nvr" , "wb"); break;
|
|
case ROM_CMDPC30: f = romfopen("cmdpc30.nvr", "wb"); break;
|
|
case ROM_AMI286: f = romfopen("ami286.nvr" , "wb"); break;
|
|
case ROM_DELL200: f = romfopen("dell200.nvr", "wb"); break;
|
|
case ROM_IBMAT386: f = romfopen("at386.nvr" , "wb"); break;
|
|
case ROM_ACER386: f = romfopen("acer386.nvr", "wb"); break;
|
|
case ROM_MEGAPC: f = romfopen("megapc.nvr" , "wb"); break;
|
|
case ROM_AMI386: f = romfopen("ami386.nvr" , "wb"); break;
|
|
case ROM_AMI486: f = romfopen("ami486.nvr" , "wb"); break;
|
|
case ROM_WIN486: f = romfopen("win486.nvr" , "wb"); break;
|
|
case ROM_PCI486: f = romfopen("hot-433.nvr", "wb"); break;
|
|
case ROM_SIS496: f = romfopen("sis496.nvr" , "wb"); break;
|
|
case ROM_430VX: f = romfopen("430vx.nvr" , "wb"); break;
|
|
default: return;
|
|
}
|
|
fwrite(nvrram,128,1,f);
|
|
fclose(f);
|
|
}
|
|
|
|
void nvr_init()
|
|
{
|
|
io_sethandler(0x0070, 0x0002, readnvr, NULL, NULL, writenvr, NULL, NULL, NULL);
|
|
timer_add(nvr_rtc, &rtctime, TIMER_ALWAYS_ENABLED, NULL);
|
|
}
|