Re-organisation of video emulation.
This commit is contained in:
TomW
parent
b9062a1d0c
commit
58085bcc87
86 changed files with 8087 additions and 7229 deletions
371
src/vid_mda.c
371
src/vid_mda.c
|
|
@ -1,259 +1,316 @@
|
|||
/*MDA emulation*/
|
||||
#include <stdlib.h>
|
||||
#include "ibm.h"
|
||||
#include "device.h"
|
||||
#include "io.h"
|
||||
#include "mem.h"
|
||||
#include "timer.h"
|
||||
#include "video.h"
|
||||
#include "vid_mda.h"
|
||||
|
||||
void mda_recalctimings();
|
||||
|
||||
static uint8_t mda_ctrl,mda_stat;
|
||||
uint8_t crtcm[32],crtcmreg;
|
||||
|
||||
void mda_out(uint16_t addr, uint8_t val, void *priv)
|
||||
typedef struct mda_t
|
||||
{
|
||||
uint8_t crtc[32];
|
||||
int crtcreg;
|
||||
|
||||
uint8_t ctrl, stat;
|
||||
|
||||
int dispontime, dispofftime;
|
||||
int vidtime;
|
||||
|
||||
int firstline, lastline;
|
||||
|
||||
int linepos, displine;
|
||||
int vc, sc;
|
||||
uint16_t ma, maback;
|
||||
int con, coff, cursoron;
|
||||
int dispon, blink;
|
||||
int vsynctime, vadj;
|
||||
|
||||
uint8_t *vram;
|
||||
} mda_t;
|
||||
|
||||
static int mdacols[256][2][2];
|
||||
|
||||
void mda_recalctimings(mda_t *mda);
|
||||
|
||||
void mda_out(uint16_t addr, uint8_t val, void *p)
|
||||
{
|
||||
mda_t *mda = (mda_t *)p;
|
||||
switch (addr)
|
||||
{
|
||||
case 0x3B0: case 0x3B2: case 0x3B4: case 0x3B6:
|
||||
crtcmreg = val & 31;
|
||||
case 0x3b0: case 0x3b2: case 0x3b4: case 0x3b6:
|
||||
mda->crtcreg = val & 31;
|
||||
return;
|
||||
case 0x3B1: case 0x3B3: case 0x3B5: case 0x3B7:
|
||||
crtcm[crtcmreg] = val;
|
||||
if (crtcm[10]==6 && crtcm[11]==7) /*Fix for Generic Turbo XT BIOS, which sets up cursor registers wrong*/
|
||||
case 0x3b1: case 0x3b3: case 0x3b5: case 0x3b7:
|
||||
mda->crtc[mda->crtcreg] = val;
|
||||
if (mda->crtc[10] == 6 && mda->crtc[11] == 7) /*Fix for Generic Turbo XT BIOS, which sets up cursor registers wrong*/
|
||||
{
|
||||
crtcm[10]=0xB;
|
||||
crtcm[11]=0xC;
|
||||
mda->crtc[10] = 0xb;
|
||||
mda->crtc[11] = 0xc;
|
||||
}
|
||||
mda_recalctimings();
|
||||
mda_recalctimings(mda);
|
||||
return;
|
||||
case 0x3B8:
|
||||
mda_ctrl = val;
|
||||
case 0x3b8:
|
||||
mda->ctrl = val;
|
||||
return;
|
||||
}
|
||||
}
|
||||
|
||||
uint8_t mda_in(uint16_t addr, void *priv)
|
||||
uint8_t mda_in(uint16_t addr, void *p)
|
||||
{
|
||||
mda_t *mda = (mda_t *)p;
|
||||
switch (addr)
|
||||
{
|
||||
case 0x3B0: case 0x3B2: case 0x3B4: case 0x3B6:
|
||||
return crtcmreg;
|
||||
case 0x3B1: case 0x3B3: case 0x3B5: case 0x3B7:
|
||||
return crtcm[crtcmreg];
|
||||
case 0x3BA:
|
||||
return mda_stat | 0xF0;
|
||||
case 0x3b0: case 0x3b2: case 0x3b4: case 0x3b6:
|
||||
return mda->crtcreg;
|
||||
case 0x3b1: case 0x3b3: case 0x3b5: case 0x3b7:
|
||||
return mda->crtc[mda->crtcreg];
|
||||
case 0x3ba:
|
||||
return mda->stat | 0xF0;
|
||||
}
|
||||
return 0xff;
|
||||
}
|
||||
|
||||
void mda_write(uint32_t addr, uint8_t val, void *priv)
|
||||
void mda_write(uint32_t addr, uint8_t val, void *p)
|
||||
{
|
||||
vram[addr&0xFFF]=val;
|
||||
mda_t *mda = (mda_t *)p;
|
||||
mda->vram[addr & 0xfff] = val;
|
||||
}
|
||||
|
||||
uint8_t mda_read(uint32_t addr, void *priv)
|
||||
uint8_t mda_read(uint32_t addr, void *p)
|
||||
{
|
||||
return vram[addr&0xFFF];
|
||||
mda_t *mda = (mda_t *)p;
|
||||
return mda->vram[addr & 0xfff];
|
||||
}
|
||||
|
||||
void mda_recalctimings()
|
||||
void mda_recalctimings(mda_t *mda)
|
||||
{
|
||||
double _dispontime, _dispofftime;
|
||||
disptime=crtc[0]+1;
|
||||
_dispontime=crtc[1];
|
||||
_dispofftime=disptime-_dispontime;
|
||||
_dispontime*=MDACONST;
|
||||
_dispofftime*=MDACONST;
|
||||
dispontime = (int)(_dispontime * (1 << TIMER_SHIFT));
|
||||
dispofftime = (int)(_dispofftime * (1 << TIMER_SHIFT));
|
||||
double _dispontime, _dispofftime, disptime;
|
||||
disptime = mda->crtc[0] + 1;
|
||||
_dispontime = mda->crtc[1];
|
||||
_dispofftime = disptime - _dispontime;
|
||||
_dispontime *= MDACONST;
|
||||
_dispofftime *= MDACONST;
|
||||
mda->dispontime = (int)(_dispontime * (1 << TIMER_SHIFT));
|
||||
mda->dispofftime = (int)(_dispofftime * (1 << TIMER_SHIFT));
|
||||
}
|
||||
|
||||
int mdacols[256][2][2];
|
||||
|
||||
static int linepos,displine;
|
||||
static int vc,sc;
|
||||
static uint16_t ma,maback;
|
||||
static int con,coff,cursoron;
|
||||
static int cgadispon,cgablink;
|
||||
static int vsynctime,vadj;
|
||||
|
||||
void mda_poll()
|
||||
void mda_poll(void *p)
|
||||
{
|
||||
uint16_t ca=(crtcm[15]|(crtcm[14]<<8))&0x3FFF;
|
||||
mda_t *mda = (mda_t *)p;
|
||||
uint16_t ca = (mda->crtc[15] | (mda->crtc[14] << 8)) & 0x3fff;
|
||||
int drawcursor;
|
||||
int x,c;
|
||||
int x, c;
|
||||
int oldvc;
|
||||
uint8_t chr,attr;
|
||||
uint8_t chr, attr;
|
||||
int cols[4];
|
||||
int oldsc;
|
||||
int blink;
|
||||
if (!linepos)
|
||||
if (!mda->linepos)
|
||||
{
|
||||
vidtime+=dispofftime;
|
||||
mda_stat|=1;
|
||||
linepos=1;
|
||||
oldsc=sc;
|
||||
if ((crtcm[8]&3)==3) sc=(sc<<1)&7;
|
||||
if (cgadispon)
|
||||
mda->vidtime += mda->dispofftime;
|
||||
mda->stat |= 1;
|
||||
mda->linepos = 1;
|
||||
oldsc = mda->sc;
|
||||
if ((mda->crtc[8] & 3) == 3)
|
||||
mda->sc = (mda->sc << 1) & 7;
|
||||
if (mda->dispon)
|
||||
{
|
||||
if (displine<firstline)
|
||||
if (mda->displine < mda->firstline)
|
||||
{
|
||||
firstline=displine;
|
||||
mda->firstline = mda->displine;
|
||||
}
|
||||
lastline=displine;
|
||||
cols[0]=0;
|
||||
cols[1]=7;
|
||||
for (x=0;x<crtcm[1];x++)
|
||||
mda->lastline = mda->displine;
|
||||
cols[0] = 0;
|
||||
cols[1] = 7;
|
||||
for (x = 0; x < mda->crtc[1]; x++)
|
||||
{
|
||||
chr=vram[(ma<<1)&0x3FFF];
|
||||
attr=vram[((ma<<1)+1)&0x3FFF];
|
||||
drawcursor=((ma==ca) && con && cursoron);
|
||||
blink=((cgablink&16) && (mda_ctrl&0x20) && (attr&0x80) && !drawcursor);
|
||||
if (sc==12 && ((attr&7)==1))
|
||||
chr = mda->vram[(mda->ma << 1) & 0x3fff];
|
||||
attr = mda->vram[((mda->ma << 1) + 1) & 0x3fff];
|
||||
drawcursor = ((mda->ma == ca) && mda->con && mda->cursoron);
|
||||
blink = ((mda->blink & 16) && (mda->ctrl & 0x20) && (attr & 0x80) && !drawcursor);
|
||||
if (mda->sc == 12 && ((attr & 7) == 1))
|
||||
{
|
||||
for (c=0;c<9;c++)
|
||||
buffer->line[displine][(x*9)+c]=mdacols[attr][blink][1];
|
||||
for (c = 0; c < 9; c++)
|
||||
buffer->line[mda->displine][(x * 9) + c] = mdacols[attr][blink][1];
|
||||
}
|
||||
else
|
||||
{
|
||||
for (c=0;c<8;c++)
|
||||
buffer->line[displine][(x*9)+c]=mdacols[attr][blink][(fontdatm[chr][sc]&(1<<(c^7)))?1:0];
|
||||
if ((chr&~0x1F)==0xC0) buffer->line[displine][(x*9)+8]=mdacols[attr][blink][fontdatm[chr][sc]&1];
|
||||
else buffer->line[displine][(x*9)+8]=mdacols[attr][blink][0];
|
||||
for (c = 0; c < 8; c++)
|
||||
buffer->line[mda->displine][(x * 9) + c] = mdacols[attr][blink][(fontdatm[chr][mda->sc] & (1 << (c ^ 7))) ? 1 : 0];
|
||||
if ((chr & ~0x1f) == 0xc0) buffer->line[mda->displine][(x * 9) + 8] = mdacols[attr][blink][fontdatm[chr][mda->sc] & 1];
|
||||
else buffer->line[mda->displine][(x * 9) + 8] = mdacols[attr][blink][0];
|
||||
}
|
||||
ma++;
|
||||
mda->ma++;
|
||||
if (drawcursor)
|
||||
{
|
||||
for (c=0;c<9;c++)
|
||||
buffer->line[displine][(x*9)+c]^=mdacols[attr][0][1];
|
||||
for (c = 0; c < 9; c++)
|
||||
buffer->line[mda->displine][(x * 9) + c] ^= mdacols[attr][0][1];
|
||||
}
|
||||
}
|
||||
}
|
||||
sc=oldsc;
|
||||
if (vc==crtcm[7] && !sc)
|
||||
mda->sc = oldsc;
|
||||
if (mda->vc == mda->crtc[7] && !mda->sc)
|
||||
{
|
||||
mda_stat|=8;
|
||||
mda->stat |= 8;
|
||||
// printf("VSYNC on %i %i\n",vc,sc);
|
||||
}
|
||||
displine++;
|
||||
if (displine>=500) displine=0;
|
||||
mda->displine++;
|
||||
if (mda->displine >= 500)
|
||||
mda->displine=0;
|
||||
}
|
||||
else
|
||||
{
|
||||
vidtime+=dispontime;
|
||||
if (cgadispon) mda_stat&=~1;
|
||||
linepos=0;
|
||||
if (vsynctime)
|
||||
mda->vidtime += mda->dispontime;
|
||||
if (mda->dispon) mda->stat&=~1;
|
||||
mda->linepos=0;
|
||||
if (mda->vsynctime)
|
||||
{
|
||||
vsynctime--;
|
||||
if (!vsynctime)
|
||||
mda->vsynctime--;
|
||||
if (!mda->vsynctime)
|
||||
{
|
||||
mda_stat&=~8;
|
||||
mda->stat&=~8;
|
||||
// printf("VSYNC off %i %i\n",vc,sc);
|
||||
}
|
||||
}
|
||||
if (sc==(crtcm[11]&31) || ((crtcm[8]&3)==3 && sc==((crtcm[11]&31)>>1))) { con=0; coff=1; }
|
||||
if (vadj)
|
||||
if (mda->sc == (mda->crtc[11] & 31) || ((mda->crtc[8] & 3) == 3 && mda->sc == ((mda->crtc[11] & 31) >> 1)))
|
||||
{
|
||||
mda->con = 0;
|
||||
mda->coff = 1;
|
||||
}
|
||||
if (mda->vadj)
|
||||
{
|
||||
sc++;
|
||||
sc&=31;
|
||||
ma=maback;
|
||||
vadj--;
|
||||
if (!vadj)
|
||||
mda->sc++;
|
||||
mda->sc &= 31;
|
||||
mda->ma = mda->maback;
|
||||
mda->vadj--;
|
||||
if (!mda->vadj)
|
||||
{
|
||||
cgadispon=1;
|
||||
ma=maback=(crtcm[13]|(crtcm[12]<<8))&0x3FFF;
|
||||
sc=0;
|
||||
mda->dispon = 1;
|
||||
mda->ma = mda->maback = (mda->crtc[13] | (mda->crtc[12] << 8)) & 0x3fff;
|
||||
mda->sc = 0;
|
||||
}
|
||||
}
|
||||
else if (sc==crtcm[9] || ((crtcm[8]&3)==3 && sc==(crtcm[9]>>1)))
|
||||
else if (mda->sc == mda->crtc[9] || ((mda->crtc[8] & 3) == 3 && mda->sc == (mda->crtc[9] >> 1)))
|
||||
{
|
||||
maback=ma;
|
||||
sc=0;
|
||||
oldvc=vc;
|
||||
vc++;
|
||||
vc&=127;
|
||||
if (vc==crtcm[6]) cgadispon=0;
|
||||
if (oldvc==crtcm[4])
|
||||
mda->maback = mda->ma;
|
||||
mda->sc = 0;
|
||||
oldvc = mda->vc;
|
||||
mda->vc++;
|
||||
mda->vc &= 127;
|
||||
if (mda->vc == mda->crtc[6])
|
||||
mda->dispon=0;
|
||||
if (oldvc == mda->crtc[4])
|
||||
{
|
||||
// printf("Display over at %i\n",displine);
|
||||
vc=0;
|
||||
vadj=crtcm[5];
|
||||
if (!vadj) cgadispon=1;
|
||||
if (!vadj) ma=maback=(crtcm[13]|(crtcm[12]<<8))&0x3FFF;
|
||||
if ((crtcm[10]&0x60)==0x20) cursoron=0;
|
||||
else cursoron=cgablink&16;
|
||||
mda->vc = 0;
|
||||
mda->vadj = mda->crtc[5];
|
||||
if (!mda->vadj) mda->dispon = 1;
|
||||
if (!mda->vadj) mda->ma = mda->maback = (mda->crtc[13] | (mda->crtc[12] << 8)) & 0x3fff;
|
||||
if ((mda->crtc[10] & 0x60) == 0x20) mda->cursoron = 0;
|
||||
else mda->cursoron = mda->blink & 16;
|
||||
}
|
||||
if (vc==crtcm[7])
|
||||
if (mda->vc == mda->crtc[7])
|
||||
{
|
||||
cgadispon=0;
|
||||
displine=0;
|
||||
vsynctime=16;//(crtcm[3]>>4)+1;
|
||||
if (crtcm[7])
|
||||
mda->dispon = 0;
|
||||
mda->displine = 0;
|
||||
mda->vsynctime = 16;
|
||||
if (mda->crtc[7])
|
||||
{
|
||||
// printf("Lastline %i Firstline %i %i\n",lastline,firstline,lastline-firstline);
|
||||
x=crtcm[1]*9;
|
||||
lastline++;
|
||||
if (x!=xsize || (lastline-firstline)!=ysize)
|
||||
x = mda->crtc[1] * 9;
|
||||
mda->lastline++;
|
||||
if (x != xsize || (mda->lastline - mda->firstline) != ysize)
|
||||
{
|
||||
xsize=x;
|
||||
ysize=lastline-firstline;
|
||||
xsize = x;
|
||||
ysize = mda->lastline - mda->firstline;
|
||||
// printf("Resize to %i,%i - R1 %i\n",xsize,ysize,crtcm[1]);
|
||||
if (xsize<64) xsize=656;
|
||||
if (ysize<32) ysize=200;
|
||||
updatewindowsize(xsize,ysize);
|
||||
if (xsize < 64) xsize = 656;
|
||||
if (ysize < 32) ysize = 200;
|
||||
updatewindowsize(xsize, ysize);
|
||||
}
|
||||
startblit();
|
||||
video_blit_memtoscreen_8(0, firstline, xsize, lastline - firstline);
|
||||
video_blit_memtoscreen_8(0, mda->firstline, xsize, mda->lastline - mda->firstline);
|
||||
endblit();
|
||||
frames++;
|
||||
video_res_x = crtcm[1];
|
||||
video_res_y = crtcm[6];
|
||||
video_res_x = mda->crtc[1];
|
||||
video_res_y = mda->crtc[6];
|
||||
video_bpp = 0;
|
||||
}
|
||||
firstline=1000;
|
||||
lastline=0;
|
||||
cgablink++;
|
||||
mda->firstline = 1000;
|
||||
mda->lastline = 0;
|
||||
mda->blink++;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
sc++;
|
||||
sc&=31;
|
||||
ma=maback;
|
||||
mda->sc++;
|
||||
mda->sc &= 31;
|
||||
mda->ma = mda->maback;
|
||||
}
|
||||
if ((sc==(crtcm[10]&31) || ((crtcm[8]&3)==3 && sc==((crtcm[10]&31)>>1))))
|
||||
if ((mda->sc == (mda->crtc[10] & 31) || ((mda->crtc[8] & 3) == 3 && mda->sc == ((mda->crtc[10] & 31) >> 1))))
|
||||
{
|
||||
con=1;
|
||||
mda->con = 1;
|
||||
// printf("Cursor on - %02X %02X %02X\n",crtcm[8],crtcm[10],crtcm[11]);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
int mda_init()
|
||||
void *mda_init()
|
||||
{
|
||||
mem_sethandler(0xb0000, 0x08000, mda_read, NULL, NULL, mda_write, NULL, NULL, NULL);
|
||||
return 0;
|
||||
int c;
|
||||
mda_t *mda = malloc(sizeof(mda_t));
|
||||
memset(mda, 0, sizeof(mda_t));
|
||||
|
||||
mda->vram = malloc(0x1000);
|
||||
|
||||
timer_add(mda_poll, &mda->vidtime, TIMER_ALWAYS_ENABLED, mda);
|
||||
mem_sethandler(0xb0000, 0x08000, mda_read, NULL, NULL, mda_write, NULL, NULL, mda);
|
||||
io_sethandler(0x03b0, 0x0010, mda_in, NULL, NULL, mda_out, NULL, NULL, mda);
|
||||
|
||||
for (c = 0; c < 256; c++)
|
||||
{
|
||||
mdacols[c][0][0] = mdacols[c][1][0] = mdacols[c][1][1] = 16;
|
||||
if (c & 8) mdacols[c][0][1] = 15 + 16;
|
||||
else mdacols[c][0][1] = 7 + 16;
|
||||
}
|
||||
mdacols[0x70][0][1] = 16;
|
||||
mdacols[0x70][0][0] = mdacols[0x70][1][0] = mdacols[0x70][1][1] = 16 + 15;
|
||||
mdacols[0xF0][0][1] = 16;
|
||||
mdacols[0xF0][0][0] = mdacols[0xF0][1][0] = mdacols[0xF0][1][1] = 16 + 15;
|
||||
mdacols[0x78][0][1] = 16 + 7;
|
||||
mdacols[0x78][0][0] = mdacols[0x78][1][0] = mdacols[0x78][1][1] = 16 + 15;
|
||||
mdacols[0xF8][0][1] = 16 + 7;
|
||||
mdacols[0xF8][0][0] = mdacols[0xF8][1][0] = mdacols[0xF8][1][1] = 16 + 15;
|
||||
mdacols[0x00][0][1] = mdacols[0x00][1][1] = 16;
|
||||
mdacols[0x08][0][1] = mdacols[0x08][1][1] = 16;
|
||||
mdacols[0x80][0][1] = mdacols[0x80][1][1] = 16;
|
||||
mdacols[0x88][0][1] = mdacols[0x88][1][1] = 16;
|
||||
|
||||
return mda;
|
||||
}
|
||||
|
||||
GFXCARD vid_mda =
|
||||
void mda_close(void *p)
|
||||
{
|
||||
mda_t *mda = (mda_t *)p;
|
||||
|
||||
free(mda->vram);
|
||||
free(mda);
|
||||
}
|
||||
|
||||
void mda_speed_changed(void *p)
|
||||
{
|
||||
mda_t *mda = (mda_t *)p;
|
||||
|
||||
mda_recalctimings(mda);
|
||||
}
|
||||
|
||||
device_t mda_device =
|
||||
{
|
||||
"MDA",
|
||||
mda_init,
|
||||
/*IO at 3Cx/3Dx*/
|
||||
video_out_null,
|
||||
video_in_null,
|
||||
/*IO at 3Ax/3Bx*/
|
||||
mda_out,
|
||||
mda_in,
|
||||
|
||||
mda_poll,
|
||||
mda_recalctimings,
|
||||
|
||||
video_write_null,
|
||||
mda_write,
|
||||
video_write_null,
|
||||
|
||||
video_read_null,
|
||||
mda_read,
|
||||
video_read_null
|
||||
mda_close,
|
||||
mda_speed_changed,
|
||||
NULL
|
||||
};
|
||||
|
|
|
|||
Loading…
Reference in a new issue