flycast/core/hw/aica/aica_if.cpp

338 lines
6.2 KiB
C++

/*
aica interface
Handles RTC, Display mode reg && arm reset reg !
arm7 is handled on a separate arm plugin now
*/
#include "types.h"
#include "aica_if.h"
#include "hw/sh4/sh4_mem.h"
#include "hw/holly/sb.h"
#include "types.h"
#include "hw/holly/holly_intc.h"
#include <time.h>
VArray2 aica_ram;
u32 VREG;//video reg =P
u32 ARMRST;//arm reset reg
u32 rtc_EN=0;
u32 GetRTC_now()
{
time_t rawtime=0;
tm timeinfo;
timeinfo.tm_year=1998-1900;
timeinfo.tm_mon=11-1;
timeinfo.tm_mday=27;
timeinfo.tm_hour=0;
timeinfo.tm_min=0;
timeinfo.tm_sec=0;
rawtime=mktime( &timeinfo );
rawtime=time (0)-rawtime;//get delta of time since the known dc date
time_t temp=time(0);
timeinfo=*localtime(&temp);
if (timeinfo.tm_isdst)
rawtime+=24*3600;//add an hour if dst (maybe rtc has a reg for that ? *watch* and add it if yes :)
u32 RTC=0x5bfc8900 + (u32)rawtime;// add delta to known dc time
return RTC;
}
u32 ReadMem_aica_rtc(u32 addr,u32 sz)
{
//settings.dreamcast.RTC=GetRTC_now();
switch( addr & 0xFF )
{
case 0:
return settings.dreamcast.RTC>>16;
case 4:
return settings.dreamcast.RTC &0xFFFF;
case 8:
return 0;
}
printf("ReadMem_aica_rtc : invalid address\n");
return 0;
}
void WriteMem_aica_rtc(u32 addr,u32 data,u32 sz)
{
switch( addr & 0xFF )
{
case 0:
if (rtc_EN)
{
settings.dreamcast.RTC&=0xFFFF;
settings.dreamcast.RTC|=(data&0xFFFF)<<16;
rtc_EN=0;
SaveSettings();
}
return;
case 4:
if (rtc_EN)
{
settings.dreamcast.RTC&=0xFFFF0000;
settings.dreamcast.RTC|= data&0xFFFF;
//TODO: Clean the internal timer ?
}
return;
case 8:
rtc_EN=data&1;
return;
}
return;
}
u32 ReadMem_aica_reg(u32 addr,u32 sz)
{
addr&=0x7FFF;
if (sz==1)
{
if (addr==0x2C01)
{
return VREG;
}
else if (addr==0x2C00)
{
return ARMRST;
}
else
{
return libAICA_ReadReg(addr, sz);
}
}
else
{
if (addr==0x2C00)
{
return (VREG<<8) | ARMRST;
}
else
{
return libAICA_ReadReg(addr, sz);
}
}
}
void ArmSetRST()
{
ARMRST&=1;
libARM_SetResetState(ARMRST);
}
void WriteMem_aica_reg(u32 addr,u32 data,u32 sz)
{
addr&=0x7FFF;
if (sz==1)
{
if (addr==0x2C01)
{
VREG=data;
printf("VREG = %02X\n",VREG);
}
else if (addr==0x2C00)
{
ARMRST=data;
printf("ARMRST = %02X\n",ARMRST);
ArmSetRST();
}
else
{
libAICA_WriteReg(addr,data,sz);
}
}
else
{
if (addr==0x2C00)
{
VREG=(data>>8)&0xFF;
ARMRST=data&0xFF;
printf("VREG = %02X ARMRST %02X\n",VREG,ARMRST);
ArmSetRST();
}
else
{
libAICA_WriteReg(addr,data,sz);
}
}
}
//Init/res/term
void aica_Init()
{
//mmnnn ? gotta fill it w/ something
}
void aica_Reset(bool Manual)
{
if (!Manual)
{
aica_ram.Zero();
}
}
void aica_Term()
{
}
s32 aica_pending_dma = 0;
void aica_periodical(u32 cycl)
{
if (aica_pending_dma > 0)
{
verify(SB_ADST==1);
cycl = (aica_pending_dma <= 0) ? 0 : cycl;
aica_pending_dma-=cycl;
if (aica_pending_dma <= 0)
{
//log("%u %d\n",cycl,(s32)aica_pending_dma);
asic_RaiseInterrupt(holly_SPU_DMA);
aica_pending_dma = 0;
SB_ADST=0;
}
}
}
void Write_SB_ADST(u32 addr, u32 data)
{
//0x005F7800 SB_ADSTAG RW AICA:G2-DMA G2 start address
//0x005F7804 SB_ADSTAR RW AICA:G2-DMA system memory start address
//0x005F7808 SB_ADLEN RW AICA:G2-DMA length
//0x005F780C SB_ADDIR RW AICA:G2-DMA direction
//0x005F7810 SB_ADTSEL RW AICA:G2-DMA trigger select
//0x005F7814 SB_ADEN RW AICA:G2-DMA enable
//0x005F7818 SB_ADST RW AICA:G2-DMA start
//0x005F781C SB_ADSUSP RW AICA:G2-DMA suspend
if (data&1)
{
if (SB_ADEN&1)
{
u32 src=SB_ADSTAR;
u32 dst=SB_ADSTAG;
u32 len=SB_ADLEN & 0x7FFFFFFF;
u32 total_bytes=0;
if ((SB_ADDIR&1)==1)
{
//swap direction
u32 tmp=src;
src=dst;
dst=tmp;
printf("**AICA DMA : SB_ADDIR==1: Not sure this works, please report if broken/missing sound or crash\n**");
}
WriteMemBlock_nommu_dma(dst,src,len);
/*
for (u32 i=0;i<len;i+=4)
{
u32 data=ReadMem32_nommu(src+i);
WriteMem32_nommu(dst+i,data);
}
*/
if (SB_ADLEN & 0x80000000)
SB_ADEN=1;//
else
SB_ADEN=0;//
SB_ADSTAR+=len;
SB_ADSTAG+=len;
total_bytes+=len;
SB_ADST = settings.aica.DelayInterrupt ? 1 : 0x00000000;//dma done
SB_ADLEN = 0x00000000;
aica_pending_dma = ((total_bytes * 200000000) / 65536) + 1;
if (!settings.aica.DelayInterrupt)
asic_RaiseInterruptWait(holly_SPU_DMA);
}
}
}
void Write_SB_E1ST(u32 addr, u32 data)
{
//0x005F7800 SB_ADSTAG RW AICA:G2-DMA G2 start address
//0x005F7804 SB_ADSTAR RW AICA:G2-DMA system memory start address
//0x005F7808 SB_ADLEN RW AICA:G2-DMA length
//0x005F780C SB_ADDIR RW AICA:G2-DMA direction
//0x005F7810 SB_ADTSEL RW AICA:G2-DMA trigger select
//0x005F7814 SB_ADEN RW AICA:G2-DMA enable
//0x005F7818 SB_ADST RW AICA:G2-DMA start
//0x005F781C SB_ADSUSP RW AICA:G2-DMA suspend
if (data&1)
{
if (SB_E1EN&1)
{
u32 src=SB_E1STAR;
u32 dst=SB_E1STAG;
u32 len=SB_E1LEN & 0x7FFFFFFF;
if (SB_E1DIR==1)
{
u32 t=src;
src=dst;
dst=t;
printf("G2-EXT1 DMA : SB_E1DIR==1 DMA Read to 0x%X from 0x%X %d bytes\n",dst,src,len);
}
else
printf("G2-EXT1 DMA : SB_E1DIR==0:DMA Write to 0x%X from 0x%X %d bytes\n",dst,src,len);
WriteMemBlock_nommu_dma(dst,src,len);
/*
for (u32 i=0;i<len;i+=4)
{
u32 data=ReadMem32_nommu(src+i);
WriteMem32_nommu(dst+i,data);
}*/
if (SB_E1LEN & 0x80000000)
SB_E1EN=1;//
else
SB_E1EN=0;//
SB_E1STAR+=len;
SB_E1STAG+=len;
SB_E1ST = 0x00000000;//dma done
SB_E1LEN = 0x00000000;
asic_RaiseInterruptWait(holly_EXT_DMA1);
}
}
}
void aica_sb_Init()
{
//NRM
//6
sb_rio_register(SB_ADST_addr,RIO_WF,0,&Write_SB_ADST);
//sb_regs[((SB_ADST_addr-SB_BASE)>>2)].flags=REG_32BIT_READWRITE | REG_READ_DATA;
//sb_regs[((SB_ADST_addr-SB_BASE)>>2)].writeFunction=Write_SB_ADST;
//I really need to implement G2 dma (and rest dmas actually) properly
//THIS IS NOT AICA, its G2-EXT (BBA)
sb_rio_register(SB_E1ST_addr,RIO_WF,0,&Write_SB_E1ST);
//sb_regs[((SB_E1ST_addr-SB_BASE)>>2)].flags=REG_32BIT_READWRITE | REG_READ_DATA;
//sb_regs[((SB_E1ST_addr-SB_BASE)>>2)].writeFunction=Write_SB_E1ST;
}
void aica_sb_Reset(bool Manual)
{
}
void aica_sb_Term()
{
}