3476 lines
153 KiB
C
3476 lines
153 KiB
C
/*
|
|
* 86Box A hypervisor and IBM PC system emulator that specializes in
|
|
* running old operating systems and software designed for IBM
|
|
* PC systems and compatibles from 1981 through fairly recent
|
|
* system designs based on the PCI bus.
|
|
*
|
|
* This file is part of the 86Box distribution.
|
|
*
|
|
* Emulation of the 8514/A card from IBM for the MCA bus and
|
|
* generic ISA bus clones without vendor extensions.
|
|
*
|
|
*
|
|
*
|
|
* Authors: TheCollector1995.
|
|
*
|
|
* Copyright 2022 TheCollector1995.
|
|
*/
|
|
#include <stdarg.h>
|
|
#include <stdint.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <stdlib.h>
|
|
#include <wchar.h>
|
|
#define HAVE_STDARG_H
|
|
#include <86box/86box.h>
|
|
#include <86box/device.h>
|
|
#include <86box/io.h>
|
|
#include <86box/machine.h>
|
|
#include <86box/mem.h>
|
|
#include <86box/timer.h>
|
|
#include <86box/mca.h>
|
|
#include <86box/rom.h>
|
|
#include <86box/plat.h>
|
|
#include <86box/thread.h>
|
|
#include <86box/video.h>
|
|
#include <86box/vid_svga.h>
|
|
#include <86box/vid_svga_render.h>
|
|
#include "cpu.h"
|
|
|
|
static void ibm8514_accel_out_fifo(ibm8514_t *dev, uint16_t port, uint32_t val, int len);
|
|
static void ibm8514_accel_outb(uint16_t port, uint8_t val, void *p);
|
|
static void ibm8514_accel_outw(uint16_t port, uint16_t val, void *p);
|
|
static uint8_t ibm8514_accel_inb(uint16_t port, void *p);
|
|
static uint16_t ibm8514_accel_inw(uint16_t port, void *p);
|
|
|
|
static void ibm8514_short_stroke_start(int count, int cpu_input, uint32_t mix_dat, uint32_t cpu_dat, ibm8514_t *dev, uint8_t ssv, int len);
|
|
static void ibm8514_accel_start(int count, int cpu_input, uint32_t mix_dat, uint32_t cpu_dat, ibm8514_t *dev, int len);
|
|
|
|
#define READ_PIXTRANS_WORD(cx, n) \
|
|
if (cmd <= 1 || (cmd == 5)) { \
|
|
temp = dev->vram[((dev->accel.cy * dev->h_disp) + (cx) + (n)) & dev->vram_mask]; \
|
|
temp |= (dev->vram[((dev->accel.cy * dev->h_disp) + (cx) + (n + 1)) & dev->vram_mask] << 8); \
|
|
} else { \
|
|
temp = dev->vram[(dev->accel.dest + (cx) + (n)) & dev->vram_mask]; \
|
|
temp |= (dev->vram[(dev->accel.dest + (cx) + (n + 1)) & dev->vram_mask] << 8); \
|
|
}
|
|
|
|
#define READ(addr, dat) \
|
|
dat = dev->vram[(addr) & (dev->vram_mask)];
|
|
|
|
#define MIX(mixmode, dest_dat, src_dat) { \
|
|
switch ((mixmode) ? (dev->accel.frgd_mix & 0x1f) : (dev->accel.bkgd_mix & 0x1f)) { \
|
|
case 0x00: dest_dat = ~dest_dat; break; \
|
|
case 0x01: dest_dat = 0; break; \
|
|
case 0x02: dest_dat = ~0; break; \
|
|
case 0x03: dest_dat = dest_dat; break; \
|
|
case 0x04: dest_dat = ~src_dat; break; \
|
|
case 0x05: dest_dat = src_dat ^ dest_dat; break; \
|
|
case 0x06: dest_dat = ~(src_dat ^ dest_dat); break; \
|
|
case 0x07: dest_dat = src_dat; break; \
|
|
case 0x08: dest_dat = ~(src_dat & dest_dat); break; \
|
|
case 0x09: dest_dat = ~src_dat | dest_dat; break; \
|
|
case 0x0a: dest_dat = src_dat | ~dest_dat; break; \
|
|
case 0x0b: dest_dat = src_dat | dest_dat; break; \
|
|
case 0x0c: dest_dat = src_dat & dest_dat; break; \
|
|
case 0x0d: dest_dat = src_dat & ~dest_dat; break; \
|
|
case 0x0e: dest_dat = ~src_dat & dest_dat; break; \
|
|
case 0x0f: dest_dat = ~(src_dat | dest_dat); break; \
|
|
case 0x10: dest_dat = MIN(src_dat, dest_dat); break; \
|
|
case 0x11: dest_dat = dest_dat - src_dat; break; \
|
|
case 0x12: dest_dat = src_dat - dest_dat; break; \
|
|
case 0x13: dest_dat = src_dat + dest_dat; break; \
|
|
case 0x14: dest_dat = MAX(src_dat, dest_dat); break; \
|
|
case 0x15: dest_dat = (dest_dat - src_dat) / 2; break; \
|
|
case 0x16: dest_dat = (src_dat - dest_dat) / 2; break; \
|
|
case 0x17: dest_dat = (dest_dat + src_dat) / 2; break; \
|
|
case 0x18: dest_dat = MAX(0, (dest_dat - src_dat)); break; \
|
|
case 0x19: dest_dat = MAX(0, (dest_dat - src_dat)); break; \
|
|
case 0x1a: dest_dat = MAX(0, (src_dat - dest_dat)); break; \
|
|
case 0x1b: dest_dat = MIN(0xff, (dest_dat + src_dat)); break; \
|
|
case 0x1c: dest_dat = MAX(0, (dest_dat - src_dat)) / 2; break; \
|
|
case 0x1d: dest_dat = MAX(0, (dest_dat - src_dat)) / 2; break; \
|
|
case 0x1e: dest_dat = MAX(0, (src_dat - dest_dat)) / 2; break; \
|
|
case 0x1f: dest_dat = (0xff < (src_dat + dest_dat)) ? 0xff : ((src_dat + dest_dat) / 2); break; \
|
|
} \
|
|
}
|
|
|
|
#define WRITE(addr, dat) \
|
|
dev->vram[((addr)) & (dev->vram_mask)] = dat; \
|
|
dev->changedvram[(((addr)) & (dev->vram_mask)) >> 12] = changeframecount;
|
|
|
|
|
|
static int
|
|
ibm8514_cpu_src(ibm8514_t *dev)
|
|
{
|
|
if (!(dev->accel.cmd & 0x100))
|
|
return 0;
|
|
|
|
if (dev->accel.cmd & 1)
|
|
return 1;
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
ibm8514_cpu_dest(ibm8514_t *dev)
|
|
{
|
|
if (!(dev->accel.cmd & 0x100))
|
|
return 0;
|
|
|
|
if (dev->accel.cmd & 1)
|
|
return 0;
|
|
|
|
return 1;
|
|
}
|
|
|
|
|
|
static void
|
|
ibm8514_accel_out_pixtrans(ibm8514_t *dev, uint16_t port, uint16_t val, int len)
|
|
{
|
|
uint8_t nibble = 0;
|
|
uint32_t pixelxfer = 0, monoxfer = 0xffffffff;
|
|
int pixcnt = 0;
|
|
int pixcntl = (dev->accel.multifunc[0x0a] >> 6) & 3;
|
|
int frgd_mix = (dev->accel.frgd_mix >> 5) & 3;
|
|
int bkgd_mix = (dev->accel.bkgd_mix >> 5) & 3;
|
|
int cmd = dev->accel.cmd >> 13;
|
|
int and3 = dev->accel.cur_x & 3;
|
|
|
|
if (dev->accel.cmd & 0x100) {
|
|
if (len != 1) {
|
|
/*Bus size*/
|
|
if (dev->accel.cmd & 0x200) /*16-bit*/
|
|
pixcnt = 16;
|
|
else /*8-bit*/
|
|
pixcnt = 8;
|
|
|
|
/*Pixel transfer data mode, can't be the same as Foreground/Background CPU data*/
|
|
if (pixcntl == 2) {
|
|
if ((frgd_mix == 2) || (bkgd_mix == 2)) {
|
|
pixelxfer = val;
|
|
} else {
|
|
if (dev->accel.cmd & 2) {
|
|
if (pixcnt == 16) {
|
|
if ((cmd >= 2) && (dev->accel.cmd & 0x1000))
|
|
val = (val >> 8) | (val << 8);
|
|
}
|
|
if (and3 == 3) {
|
|
if (dev->accel.cmd & 0x1000)
|
|
goto regular_nibble;
|
|
if (val & 0x02)
|
|
nibble |= 0x10;
|
|
if (val & 0x04)
|
|
nibble |= 0x08;
|
|
if (val & 0x08)
|
|
nibble |= 0x04;
|
|
if (val & 0x10)
|
|
nibble |= 0x02;
|
|
if (val & 0x200)
|
|
nibble |= 0x01;
|
|
if (val & 0x400)
|
|
nibble |= 0x80;
|
|
if (val & 0x800)
|
|
nibble |= 0x40;
|
|
if (val & 0x1000)
|
|
nibble |= 0x20;
|
|
} else if (and3 == 2) {
|
|
if (dev->accel.cmd & 0x1000)
|
|
goto regular_nibble;
|
|
if (val & 0x02)
|
|
nibble |= 0x20;
|
|
if (val & 0x04)
|
|
nibble |= 0x10;
|
|
if (val & 0x08)
|
|
nibble |= 0x08;
|
|
if (val & 0x10)
|
|
nibble |= 0x04;
|
|
if (val & 0x200)
|
|
nibble |= 0x02;
|
|
if (val & 0x400)
|
|
nibble |= 0x01;
|
|
if (val & 0x800)
|
|
nibble |= 0x80;
|
|
if (val & 0x1000)
|
|
nibble |= 0x40;
|
|
} else if (and3 == 1) {
|
|
if (dev->accel.cmd & 0x1000)
|
|
goto regular_nibble;
|
|
if (val & 0x02)
|
|
nibble |= 0x40;
|
|
if (val & 0x04)
|
|
nibble |= 0x20;
|
|
if (val & 0x08)
|
|
nibble |= 0x10;
|
|
if (val & 0x10)
|
|
nibble |= 0x08;
|
|
if (val & 0x200)
|
|
nibble |= 0x04;
|
|
if (val & 0x400)
|
|
nibble |= 0x02;
|
|
if (val & 0x800)
|
|
nibble |= 0x01;
|
|
if (val & 0x1000)
|
|
nibble |= 0x80;
|
|
} else {
|
|
regular_nibble:
|
|
if (val & 0x02)
|
|
nibble |= 0x80;
|
|
if (val & 0x04)
|
|
nibble |= 0x40;
|
|
if (val & 0x08)
|
|
nibble |= 0x20;
|
|
if (val & 0x10)
|
|
nibble |= 0x10;
|
|
if (val & 0x200)
|
|
nibble |= 0x08;
|
|
if (val & 0x400)
|
|
nibble |= 0x04;
|
|
if (val & 0x800)
|
|
nibble |= 0x02;
|
|
if (val & 0x1000)
|
|
nibble |= 0x01;
|
|
}
|
|
|
|
if ((and3 == 0) || (dev->accel.cmd & 0x1000) || ((dev->accel.cmd & 8) && ibm8514_cpu_src(dev))) {
|
|
if ((dev->accel.cmd & 8) && ibm8514_cpu_src(dev)) {
|
|
monoxfer = val;
|
|
} else
|
|
monoxfer = nibble;
|
|
ibm8514_accel_start(pixcnt, 1, monoxfer, pixelxfer, dev, len);
|
|
if (dev->accel.nibbleset != NULL) {
|
|
free(dev->accel.nibbleset);
|
|
dev->accel.nibbleset = NULL;
|
|
}
|
|
if (dev->accel.writemono != NULL) {
|
|
free(dev->accel.writemono);
|
|
dev->accel.writemono = NULL;
|
|
}
|
|
return;
|
|
}
|
|
|
|
dev->accel.writemono[dev->accel.x_count] = nibble;
|
|
if (val & 0x1c00) {
|
|
if (and3 == 1) {
|
|
if (val & 0x1000)
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0x80;
|
|
else
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0;
|
|
} else if (and3 == 2) {
|
|
if (val & 0x1000) {
|
|
if (val & 0x800)
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0xc0;
|
|
else
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0x40;
|
|
} else if (val & 0x800) {
|
|
if (val & 0x1000)
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0xc0;
|
|
else
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0x80;
|
|
} else
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0;
|
|
} else if (and3 == 3) {
|
|
if (val & 0x1000) {
|
|
if (val & 0x800) {
|
|
if (val & 0x400)
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0xe0;
|
|
else
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0x60;
|
|
} else if (val & 0x400) {
|
|
if (val & 0x800)
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0xe0;
|
|
else
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0xa0;
|
|
} else
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0x20;
|
|
} else if (val & 0x800) {
|
|
if (val & 0x400) {
|
|
if (val & 0x1000)
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0xe0;
|
|
else
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0xc0;
|
|
} else if (val & 0x1000) {
|
|
if (val & 0x400)
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0xe0;
|
|
else
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0x60;
|
|
} else
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0x40;
|
|
} else if (val & 0x400) {
|
|
if (val & 0x800) {
|
|
if (val & 0x1000)
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0xe0;
|
|
else
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0xc0;
|
|
} else if (val & 0x1000) {
|
|
if (val & 0x800)
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0xe0;
|
|
else
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0xa0;
|
|
} else
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0x80;
|
|
} else
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0;
|
|
}
|
|
} else
|
|
dev->accel.nibbleset[dev->accel.x_count] = 0;
|
|
|
|
dev->accel.x_count++;
|
|
if (dev->accel.x_count == dev->accel.sys_cnt) {
|
|
for (int i = 0; i < dev->accel.x_count; i++) {
|
|
dev->accel.writemono[i] &= ~dev->accel.nibbleset[i];
|
|
dev->accel.writemono[i] |= dev->accel.nibbleset[i + 1];
|
|
ibm8514_accel_start(pixcnt, 1, dev->accel.writemono[i], pixelxfer, dev, len);
|
|
}
|
|
|
|
dev->accel.x_count = 0;
|
|
if (dev->accel.nibbleset != NULL) {
|
|
free(dev->accel.nibbleset);
|
|
dev->accel.nibbleset = NULL;
|
|
}
|
|
if (dev->accel.writemono != NULL) {
|
|
free(dev->accel.writemono);
|
|
dev->accel.writemono = NULL;
|
|
}
|
|
}
|
|
return;
|
|
}
|
|
monoxfer = val;
|
|
}
|
|
} else {
|
|
pixelxfer = val;
|
|
}
|
|
ibm8514_accel_start(pixcnt, 1, monoxfer, pixelxfer, dev, len);
|
|
}
|
|
}
|
|
}
|
|
|
|
static void
|
|
ibm8514_accel_out_fifo(ibm8514_t *dev, uint16_t port, uint32_t val, int len)
|
|
{
|
|
switch (port) {
|
|
case 0x82e8:
|
|
case 0xc2e8:
|
|
if (len == 1) {
|
|
dev->accel.cur_y = (dev->accel.cur_y & 0x700) | val;
|
|
} else {
|
|
dev->accel.cur_y = val & 0x7ff;
|
|
}
|
|
break;
|
|
case 0x82e9:
|
|
case 0xc2e9:
|
|
if (len == 1) {
|
|
dev->accel.cur_y = (dev->accel.cur_y & 0xff) | ((val & 0x07) << 8);
|
|
}
|
|
break;
|
|
|
|
case 0x86e8:
|
|
case 0xc6e8:
|
|
if (len == 1) {
|
|
dev->accel.cur_x = (dev->accel.cur_x & 0x700) | val;
|
|
} else {
|
|
dev->accel.cur_x = val & 0x7ff;
|
|
}
|
|
break;
|
|
case 0x86e9:
|
|
case 0xc6e9:
|
|
if (len == 1) {
|
|
dev->accel.cur_x = (dev->accel.cur_x & 0xff) | ((val & 0x07) << 8);
|
|
}
|
|
break;
|
|
|
|
case 0x8ae8:
|
|
case 0xcae8:
|
|
if (len == 1)
|
|
dev->accel.desty_axstp = (dev->accel.desty_axstp & 0x3f00) | val;
|
|
else {
|
|
dev->accel.desty_axstp = val & 0x3fff;
|
|
if (val & 0x2000)
|
|
dev->accel.desty_axstp |= ~0x1fff;
|
|
}
|
|
break;
|
|
case 0x8ae9:
|
|
case 0xcae9:
|
|
if (len == 1) {
|
|
dev->accel.desty_axstp = (dev->accel.desty_axstp & 0xff) | ((val & 0x3f) << 8);
|
|
if (val & 0x20)
|
|
dev->accel.desty_axstp |= ~0x1fff;
|
|
}
|
|
break;
|
|
|
|
case 0x8ee8:
|
|
case 0xcee8:
|
|
if (len == 1)
|
|
dev->accel.destx_distp = (dev->accel.destx_distp & 0x3f00) | val;
|
|
else {
|
|
dev->accel.destx_distp = val & 0x3fff;
|
|
if (val & 0x2000)
|
|
dev->accel.destx_distp |= ~0x1fff;
|
|
}
|
|
break;
|
|
case 0x8ee9:
|
|
case 0xcee9:
|
|
if (len == 1) {
|
|
dev->accel.destx_distp = (dev->accel.destx_distp & 0xff) | ((val & 0x3f) << 8);
|
|
if (val & 0x20)
|
|
dev->accel.destx_distp |= ~0x1fff;
|
|
}
|
|
break;
|
|
|
|
case 0x92e8:
|
|
if (len != 1)
|
|
dev->test = val;
|
|
case 0xd2e8:
|
|
if (len == 1)
|
|
dev->accel.err_term = (dev->accel.err_term & 0x3f00) | val;
|
|
else {
|
|
dev->accel.err_term = val & 0x3fff;
|
|
if (val & 0x2000)
|
|
dev->accel.err_term |= ~0x1fff;
|
|
}
|
|
break;
|
|
case 0x92e9:
|
|
case 0xd2e9:
|
|
if (len == 1) {
|
|
dev->accel.err_term = (dev->accel.err_term & 0xff) | ((val & 0x3f) << 8);
|
|
if (val & 0x20)
|
|
dev->accel.err_term |= ~0x1fff;
|
|
}
|
|
break;
|
|
|
|
case 0x96e8:
|
|
case 0xd6e8:
|
|
if (len == 1)
|
|
dev->accel.maj_axis_pcnt = (dev->accel.maj_axis_pcnt & 0x700) | val;
|
|
else {
|
|
dev->accel.maj_axis_pcnt = val & 0x7ff;
|
|
}
|
|
break;
|
|
case 0x96e9:
|
|
case 0xd6e9:
|
|
if (len == 1) {
|
|
dev->accel.maj_axis_pcnt = (dev->accel.maj_axis_pcnt & 0xff) | ((val & 0x07) << 8);
|
|
}
|
|
break;
|
|
|
|
case 0x9ae8:
|
|
case 0xdae8:
|
|
dev->accel.ssv_state = 0;
|
|
if (len == 1)
|
|
dev->accel.cmd = (dev->accel.cmd & 0xff00) | val;
|
|
else {
|
|
dev->data_available = 0;
|
|
dev->data_available2 = 0;
|
|
dev->accel.cmd = val;
|
|
if (dev->accel.cmd & 0x100)
|
|
dev->accel.cmd_back = 0;
|
|
ibm8514_accel_start(-1, 0, -1, 0, dev, len);
|
|
}
|
|
break;
|
|
case 0x9ae9:
|
|
case 0xdae9:
|
|
if (len == 1) {
|
|
dev->data_available = 0;
|
|
dev->data_available2 = 0;
|
|
dev->accel.cmd = (dev->accel.cmd & 0xff) | (val << 8);
|
|
if (port == 0xdae9) {
|
|
if (dev->accel.cmd & 0x100)
|
|
dev->accel.cmd_back = 0;
|
|
}
|
|
ibm8514_accel_start(-1, 0, -1, 0, dev, len);
|
|
}
|
|
break;
|
|
|
|
case 0x9ee8:
|
|
case 0xdee8:
|
|
dev->accel.ssv_state = 1;
|
|
if (len == 1)
|
|
dev->accel.short_stroke = (dev->accel.short_stroke & 0xff00) | val;
|
|
else {
|
|
dev->accel.short_stroke = val;
|
|
dev->accel.cx = dev->accel.cur_x;
|
|
dev->accel.cy = dev->accel.cur_y;
|
|
if (dev->accel.cur_x & 0x400)
|
|
dev->accel.cx |= ~0x3ff;
|
|
if (dev->accel.cur_y & 0x400)
|
|
dev->accel.cy |= ~0x3ff;
|
|
if (dev->accel.cmd & 0x1000) {
|
|
ibm8514_short_stroke_start(-1, 0, -1, 0, dev, dev->accel.short_stroke & 0xff, len);
|
|
ibm8514_short_stroke_start(-1, 0, -1, 0, dev, dev->accel.short_stroke >> 8, len);
|
|
} else {
|
|
ibm8514_short_stroke_start(-1, 0, -1, 0, dev, dev->accel.short_stroke >> 8, len);
|
|
ibm8514_short_stroke_start(-1, 0, -1, 0, dev, dev->accel.short_stroke & 0xff, len);
|
|
}
|
|
}
|
|
break;
|
|
case 0x9ee9:
|
|
case 0xdee9:
|
|
if (len == 1) {
|
|
dev->accel.short_stroke = (dev->accel.short_stroke & 0xff) | (val << 8);
|
|
dev->accel.cx = dev->accel.cur_x;
|
|
dev->accel.cy = dev->accel.cur_y;
|
|
if (dev->accel.cur_x & 0x400)
|
|
dev->accel.cx |= ~0x3ff;
|
|
if (dev->accel.cur_y & 0x400)
|
|
dev->accel.cy |= ~0x3ff;
|
|
|
|
if (dev->accel.cmd & 0x1000) {
|
|
ibm8514_short_stroke_start(-1, 0, -1, 0, dev, dev->accel.short_stroke & 0xff, len);
|
|
ibm8514_short_stroke_start(-1, 0, -1, 0, dev, dev->accel.short_stroke >> 8, len);
|
|
} else {
|
|
ibm8514_short_stroke_start(-1, 0, -1, 0, dev, dev->accel.short_stroke >> 8, len);
|
|
ibm8514_short_stroke_start(-1, 0, -1, 0, dev, dev->accel.short_stroke & 0xff, len);
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 0xa2e8:
|
|
case 0xe2e8:
|
|
if (port == 0xe2e8) {
|
|
if (dev->accel.cmd_back) {
|
|
if (len == 1)
|
|
dev->accel.bkgd_color = (dev->accel.bkgd_color & 0x00ff) | val;
|
|
else
|
|
dev->accel.bkgd_color = val;
|
|
} else {
|
|
if (ibm8514_cpu_dest(dev))
|
|
break;
|
|
ibm8514_accel_out_pixtrans(dev, port, val, len);
|
|
}
|
|
} else {
|
|
if (len == 1)
|
|
dev->accel.bkgd_color = (dev->accel.bkgd_color & 0x00ff) | val;
|
|
else
|
|
dev->accel.bkgd_color = val;
|
|
}
|
|
break;
|
|
case 0xa2e9:
|
|
case 0xe2e9:
|
|
if (len == 1)
|
|
dev->accel.bkgd_color = (dev->accel.bkgd_color & 0xff00) | (val << 8);
|
|
break;
|
|
|
|
case 0xa6e8:
|
|
case 0xe6e8:
|
|
if (port == 0xe6e8) {
|
|
if (dev->accel.cmd_back) {
|
|
if (len == 1)
|
|
dev->accel.frgd_color = (dev->accel.frgd_color & 0x00ff) | val;
|
|
else
|
|
dev->accel.frgd_color = val;
|
|
} else {
|
|
if (ibm8514_cpu_dest(dev))
|
|
break;
|
|
ibm8514_accel_out_pixtrans(dev, port, val, len);
|
|
}
|
|
} else {
|
|
if (len == 1)
|
|
dev->accel.frgd_color = (dev->accel.frgd_color & 0x00ff) | val;
|
|
else
|
|
dev->accel.frgd_color = val;
|
|
}
|
|
break;
|
|
case 0xa6e9:
|
|
case 0xe6e9:
|
|
if (len == 1)
|
|
dev->accel.frgd_color = (dev->accel.frgd_color & 0xff00) | (val << 8);
|
|
break;
|
|
|
|
case 0xaae8:
|
|
case 0xeae8:
|
|
if (len == 1)
|
|
dev->accel.wrt_mask = (dev->accel.wrt_mask & 0x00ff) | val;
|
|
else
|
|
dev->accel.wrt_mask = val;
|
|
break;
|
|
case 0xaae9:
|
|
case 0xeae9:
|
|
if (len == 1)
|
|
dev->accel.wrt_mask = (dev->accel.wrt_mask & 0xff00) | (val << 8);
|
|
break;
|
|
|
|
case 0xaee8:
|
|
case 0xeee8:
|
|
if (len == 1)
|
|
dev->accel.rd_mask = (dev->accel.rd_mask & 0x00ff) | val;
|
|
else
|
|
dev->accel.rd_mask = val;
|
|
break;
|
|
case 0xaee9:
|
|
case 0xeee9:
|
|
if (len == 1)
|
|
dev->accel.rd_mask = (dev->accel.rd_mask & 0xff00) | (val << 8);
|
|
break;
|
|
|
|
case 0xb2e8:
|
|
case 0xf2e8:
|
|
if (len == 1)
|
|
dev->accel.color_cmp = (dev->accel.color_cmp & 0x00ff) | val;
|
|
else
|
|
dev->accel.color_cmp = val;
|
|
break;
|
|
case 0xb2e9:
|
|
case 0xf2e9:
|
|
if (len == 1)
|
|
dev->accel.color_cmp = (dev->accel.color_cmp & 0xff00) | (val << 8);
|
|
break;
|
|
|
|
case 0xb6e8:
|
|
case 0xf6e8:
|
|
dev->accel.bkgd_mix = val & 0xff;
|
|
break;
|
|
|
|
case 0xbae8:
|
|
case 0xfae8:
|
|
dev->accel.frgd_mix = val & 0xff;
|
|
break;
|
|
|
|
case 0xbee8:
|
|
case 0xfee8:
|
|
if (len == 1)
|
|
dev->accel.multifunc_cntl = (dev->accel.multifunc_cntl & 0xff00) | val;
|
|
else {
|
|
dev->accel.multifunc_cntl = val;
|
|
dev->accel.multifunc[dev->accel.multifunc_cntl >> 12] = dev->accel.multifunc_cntl & 0xfff;
|
|
if ((dev->accel.multifunc_cntl >> 12) == 1) {
|
|
dev->accel.clip_top = val & 0x3ff;
|
|
}
|
|
if ((dev->accel.multifunc_cntl >> 12) == 2) {
|
|
dev->accel.clip_left = val & 0x3ff;
|
|
}
|
|
if (port == 0xfee8)
|
|
dev->accel.cmd_back = 1;
|
|
else
|
|
dev->accel.cmd_back = 0;
|
|
}
|
|
break;
|
|
case 0xbee9:
|
|
case 0xfee9:
|
|
if (len == 1) {
|
|
dev->accel.multifunc_cntl = (dev->accel.multifunc_cntl & 0xff) | (val << 8);
|
|
dev->accel.multifunc[dev->accel.multifunc_cntl >> 12] = dev->accel.multifunc_cntl & 0xfff;
|
|
if (port == 0xfee9)
|
|
dev->accel.cmd_back = 1;
|
|
else
|
|
dev->accel.cmd_back = 0;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
|
|
static void
|
|
ibm8514_ramdac_out(uint16_t port, uint8_t val, void *p)
|
|
{
|
|
svga_t *svga = (svga_t *)p;
|
|
|
|
switch (port) {
|
|
case 0x2ea:
|
|
svga_out(0x3c6, val, svga);
|
|
break;
|
|
case 0x2eb:
|
|
svga_out(0x3c7, val, svga);
|
|
break;
|
|
case 0x2ec:
|
|
svga_out(0x3c8, val, svga);
|
|
break;
|
|
case 0x2ed:
|
|
svga_out(0x3c9, val, svga);
|
|
break;
|
|
}
|
|
}
|
|
|
|
static uint8_t
|
|
ibm8514_ramdac_in(uint16_t port, void *p)
|
|
{
|
|
svga_t *svga = (svga_t *)p;
|
|
uint8_t ret = 0xff;
|
|
|
|
switch (port) {
|
|
case 0x2ea:
|
|
ret = svga_in(0x3c6, svga);
|
|
break;
|
|
case 0x2eb:
|
|
ret = svga_in(0x3c7, svga);
|
|
break;
|
|
case 0x2ec:
|
|
ret = svga_in(0x3c8, svga);
|
|
break;
|
|
case 0x2ed:
|
|
ret = svga_in(0x3c9, svga);
|
|
break;
|
|
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
static void
|
|
ibm8514_io_set(svga_t *svga)
|
|
{
|
|
io_sethandler(0x2e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x2ea, 0x0004, ibm8514_ramdac_in, NULL, NULL, ibm8514_ramdac_out, NULL, NULL, svga);
|
|
io_sethandler(0x6e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xae8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xee8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x12e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x16e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x1ae8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x1ee8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x22e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x26e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x2ee8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x42e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x4ae8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x52e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x56e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x5ae8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x5ee8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x82e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x86e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x8ae8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x8ee8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x92e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x96e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x9ae8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0x9ee8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xa2e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xa6e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xaae8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xaee8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xb2e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xb6e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xbae8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xbee8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xe2e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
|
|
io_sethandler(0xc2e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xc6e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xcae8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xcee8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xd2e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xd6e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xdae8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xdee8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xe6e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xeae8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xeee8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xf2e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xf6e8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xfae8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
io_sethandler(0xfee8, 0x0002, ibm8514_accel_inb, ibm8514_accel_inw, NULL, ibm8514_accel_outb, ibm8514_accel_outw, NULL, svga);
|
|
}
|
|
|
|
static void
|
|
ibm8514_accel_out(uint16_t port, uint32_t val, svga_t *svga, int len)
|
|
{
|
|
ibm8514_t *dev = &svga->dev8514;
|
|
|
|
if (port & 0x8000) {
|
|
ibm8514_accel_out_fifo(dev, port, val, len);
|
|
} else {
|
|
switch (port) {
|
|
case 0x2e8:
|
|
if (len == 1)
|
|
dev->htotal = (dev->htotal & 0xff00) | val;
|
|
else {
|
|
dev->htotal = val;
|
|
svga_recalctimings(svga);
|
|
}
|
|
break;
|
|
case 0x2e9:
|
|
if (len != 1) {
|
|
dev->htotal = (dev->htotal & 0xff) | (val << 8);
|
|
//pclog("IBM 8514/A: H_TOTAL write 02E8 = %d\n", dev->htotal + 1);
|
|
svga_recalctimings(svga);
|
|
}
|
|
break;
|
|
|
|
case 0x6e8:
|
|
dev->hdisp = val;
|
|
//pclog("IBM 8514/A: H_DISP write 06E8 = %d\n", dev->hdisp + 1);
|
|
svga_recalctimings(svga);
|
|
break;
|
|
|
|
case 0xae8:
|
|
//pclog("IBM 8514/A: H_SYNC_STRT write 0AE8 = %d\n", val + 1);
|
|
svga_recalctimings(svga);
|
|
break;
|
|
|
|
case 0xee8:
|
|
//pclog("IBM 8514/A: H_SYNC_WID write 0EE8 = %d\n", val + 1);
|
|
svga_recalctimings(svga);
|
|
break;
|
|
|
|
case 0x12e8:
|
|
if (len == 1)
|
|
dev->vtotal = (dev->vtotal & 0x1f00) | val;
|
|
else {
|
|
dev->vtotal = val & 0x1fff;
|
|
svga_recalctimings(svga);
|
|
}
|
|
break;
|
|
case 0x12e9:
|
|
if (len == 1) {
|
|
dev->vtotal = (dev->vtotal & 0xff) | ((val & 0x1f) << 8);
|
|
//pclog("IBM 8514/A: V_TOTAL write 12E8 = %d\n", dev->vtotal);
|
|
svga_recalctimings(svga);
|
|
}
|
|
break;
|
|
|
|
case 0x16e8:
|
|
if (len == 1)
|
|
dev->vdisp = (dev->vdisp & 0x1f00) | val;
|
|
else {
|
|
dev->vdisp = val & 0x1fff;
|
|
svga_recalctimings(svga);
|
|
}
|
|
break;
|
|
case 0x16e9:
|
|
if (len == 1) {
|
|
dev->vdisp = (dev->vdisp & 0xff) | ((val & 0x1f) << 8);
|
|
//pclog("IBM 8514/A: V_DISP write 16E8 = %d\n", dev->vdisp);
|
|
svga_recalctimings(svga);
|
|
}
|
|
break;
|
|
|
|
case 0x1ae8:
|
|
if (len == 1)
|
|
dev->vsyncstart = (dev->vsyncstart & 0x1f00) | val;
|
|
else {
|
|
dev->vsyncstart = val & 0x1fff;
|
|
svga_recalctimings(svga);
|
|
}
|
|
break;
|
|
case 0x1ae9:
|
|
if (len == 1) {
|
|
dev->vsyncstart = (dev->vsyncstart & 0xff) | ((val & 0x1f) << 8);
|
|
//pclog("IBM 8514/A: V_SYNC_STRT write 1AE8 = %d\n", dev->vsyncstart);
|
|
svga_recalctimings(svga);
|
|
}
|
|
break;
|
|
|
|
case 0x1ee8:
|
|
dev->vsyncwidth = val;
|
|
//pclog("IBM 8514/A: V_SYNC_WID write 1EE8 = %02x\n", val);
|
|
svga_recalctimings(svga);
|
|
break;
|
|
|
|
case 0x22e8:
|
|
dev->disp_cntl = val & 0x7e;
|
|
dev->interlace = !!(val & 0x10);
|
|
//pclog("IBM 8514/A: DISP_CNTL write 22E8 = %02x, SCANMODULOS = %d\n", dev->disp_cntl, dev->scanmodulos);
|
|
svga_recalctimings(svga);
|
|
break;
|
|
|
|
case 0x42e8:
|
|
if (len == 1) {
|
|
dev->subsys_stat &= ~val;
|
|
} else {
|
|
dev->subsys_stat &= ~(val & 0xff);
|
|
dev->subsys_cntl = (val >> 8);
|
|
}
|
|
break;
|
|
case 0x42e9:
|
|
if (len == 1) {
|
|
dev->subsys_cntl = val;
|
|
}
|
|
break;
|
|
|
|
case 0x4ae8:
|
|
dev->accel.advfunc_cntl = val & 7;
|
|
vga_on = ((dev->accel.advfunc_cntl & 1) == 0) ? 1 : 0;
|
|
ibm8514_on = !vga_on;
|
|
//pclog("IBM 8514/A: VGA ON = %i, val = %02x\n", vga_on, val);
|
|
svga_recalctimings(svga);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
static void
|
|
ibm8514_accel_outb(uint16_t port, uint8_t val, void *p)
|
|
{
|
|
svga_t *svga = (svga_t *)p;
|
|
ibm8514_accel_out(port, val, svga, 1);
|
|
}
|
|
|
|
static void
|
|
ibm8514_accel_outw(uint16_t port, uint16_t val, void *p)
|
|
{
|
|
svga_t *svga = (svga_t *)p;
|
|
ibm8514_accel_out(port, val, svga, 2);
|
|
}
|
|
|
|
static uint32_t
|
|
ibm8514_accel_in(uint16_t port, svga_t *svga, int len)
|
|
{
|
|
ibm8514_t *dev = &svga->dev8514;
|
|
uint32_t temp = 0;
|
|
int cmd;
|
|
|
|
switch (port) {
|
|
case 0x6e8:
|
|
temp = dev->hdisp;
|
|
break;
|
|
|
|
case 0x22e8:
|
|
temp = dev->disp_cntl;
|
|
break;
|
|
|
|
case 0x26e8:
|
|
if (len == 1)
|
|
temp = dev->htotal & 0xff;
|
|
else
|
|
temp = dev->htotal;
|
|
break;
|
|
case 0x26e9:
|
|
if (len == 1)
|
|
temp = dev->htotal >> 8;
|
|
break;
|
|
|
|
case 0x2ee8:
|
|
temp = dev->subsys_cntl;
|
|
break;
|
|
|
|
case 0x42e8:
|
|
if (len != 1) {
|
|
temp = dev->subsys_stat | 0xa0 | 0x8000;
|
|
} else
|
|
temp = dev->subsys_stat | 0xa0;
|
|
break;
|
|
|
|
case 0x42e9:
|
|
if (len == 1)
|
|
temp |= 0x80;
|
|
break;
|
|
|
|
case 0x92e8:
|
|
if (len != 1) {
|
|
temp = dev->test;
|
|
}
|
|
break;
|
|
|
|
case 0x9ae8:
|
|
case 0xdae8:
|
|
temp = 0;
|
|
if (len != 1) {
|
|
if (dev->force_busy)
|
|
temp |= 0x200; /*Hardware busy*/
|
|
dev->force_busy = 0;
|
|
if (dev->data_available) {
|
|
temp |= 0x100; /*Read Data available*/
|
|
dev->data_available = 0;
|
|
}
|
|
}
|
|
break;
|
|
case 0x9ae9:
|
|
case 0xdae9:
|
|
temp = 0;
|
|
if (len == 1) {
|
|
if (dev->force_busy2)
|
|
temp |= 2; /*Hardware busy*/
|
|
dev->force_busy2 = 0;
|
|
if (dev->data_available2) {
|
|
temp |= 1; /*Read Data available*/
|
|
dev->data_available2 = 0;
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 0xe2e8:
|
|
case 0xe6e8:
|
|
if (ibm8514_cpu_dest(dev)) {
|
|
if (len == 1) {
|
|
;//READ_PIXTRANS_BYTE_IO(0)
|
|
} else {
|
|
cmd = (dev->accel.cmd >> 13);
|
|
READ_PIXTRANS_WORD(dev->accel.cx, 0)
|
|
if (dev->accel.input && !dev->accel.odd_in && !dev->accel.sx) {
|
|
temp &= ~0xff00;
|
|
temp |= (dev->vram[(dev->accel.newdest_in + dev->accel.cur_x) & dev->vram_mask] << 8);
|
|
}
|
|
}
|
|
ibm8514_accel_out_pixtrans(dev, port, temp, len);
|
|
}
|
|
break;
|
|
case 0xe2e9:
|
|
case 0xe6e9:
|
|
if (ibm8514_cpu_dest(dev)) {
|
|
if (len == 1) {
|
|
;//READ_PIXTRANS_BYTE_IO(1)
|
|
ibm8514_accel_out_pixtrans(dev, port, temp, len);
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
return temp;
|
|
}
|
|
|
|
|
|
static uint8_t
|
|
ibm8514_accel_inb(uint16_t port, void *p)
|
|
{
|
|
svga_t *svga = (svga_t *)p;
|
|
return ibm8514_accel_in(port, svga, 1);
|
|
}
|
|
|
|
static uint16_t
|
|
ibm8514_accel_inw(uint16_t port, void *p)
|
|
{
|
|
svga_t *svga = (svga_t *)p;
|
|
return ibm8514_accel_in(port, svga, 2);
|
|
}
|
|
|
|
|
|
static void
|
|
ibm8514_short_stroke_start(int count, int cpu_input, uint32_t mix_dat, uint32_t cpu_dat, ibm8514_t *dev, uint8_t ssv, int len)
|
|
{
|
|
if (!cpu_input) {
|
|
dev->accel.ssv_len = ssv & 0x0f;
|
|
dev->accel.ssv_dir = ssv & 0xe0;
|
|
dev->accel.ssv_draw = ssv & 0x10;
|
|
|
|
if (ibm8514_cpu_src(dev)) {
|
|
return; /*Wait for data from CPU*/
|
|
}
|
|
}
|
|
|
|
ibm8514_accel_start(count, cpu_input, mix_dat, cpu_dat, dev, len);
|
|
}
|
|
|
|
static void
|
|
ibm8514_accel_start(int count, int cpu_input, uint32_t mix_dat, uint32_t cpu_dat, ibm8514_t *dev, int len)
|
|
{
|
|
uint8_t src_dat = 0, dest_dat, old_dest_dat;
|
|
int frgd_mix, bkgd_mix;
|
|
uint16_t clip_b = dev->accel.multifunc[3] & 0x7ff;
|
|
uint16_t clip_r = dev->accel.multifunc[4] & 0x7ff;
|
|
int pixcntl = (dev->accel.multifunc[0x0a] >> 6) & 3;
|
|
uint8_t mix_mask = 0x80;
|
|
uint8_t compare = dev->accel.color_cmp & 0xff;
|
|
int compare_mode = dev->accel.multifunc[0x0a] & 0x38;
|
|
int cmd = dev->accel.cmd >> 13;
|
|
uint8_t wrt_mask = dev->accel.wrt_mask & 0xff;
|
|
uint8_t rd_mask = ((dev->accel.rd_mask & 0x01) << 7) | ((dev->accel.rd_mask & 0xfe) >> 1);
|
|
uint8_t rd_mask_polygon = dev->accel.rd_mask & 0xff;
|
|
uint8_t frgd_color = dev->accel.frgd_color;
|
|
uint8_t bkgd_color = dev->accel.bkgd_color;
|
|
uint32_t old_mix_dat;
|
|
int and3 = dev->accel.cur_x & 3;
|
|
uint8_t poly_src = 0;
|
|
|
|
if (dev->accel.cmd & 0x100) {
|
|
dev->force_busy = 1;
|
|
dev->force_busy2 = 1;
|
|
}
|
|
|
|
frgd_mix = (dev->accel.frgd_mix >> 5) & 3;
|
|
bkgd_mix = (dev->accel.bkgd_mix >> 5) & 3;
|
|
|
|
if (cpu_input) {
|
|
if ((dev->accel.cmd & 2) || (pixcntl == 2)) {
|
|
if ((frgd_mix == 2) || (bkgd_mix == 2)) {
|
|
count >>= 3;
|
|
} else if (pixcntl == 2) {
|
|
if (dev->accel.cmd & 2) {
|
|
count >>= 1;
|
|
} else
|
|
count >>= 3;
|
|
}
|
|
} else {
|
|
count >>= 3;
|
|
}
|
|
}
|
|
|
|
if (pixcntl == 1) {
|
|
mix_dat = 0;
|
|
if (and3 == 3) {
|
|
if (dev->accel.multifunc[8] & 0x02)
|
|
mix_dat |= 0x10;
|
|
if (dev->accel.multifunc[8] & 0x04)
|
|
mix_dat |= 0x08;
|
|
if (dev->accel.multifunc[8] & 0x08)
|
|
mix_dat |= 0x04;
|
|
if (dev->accel.multifunc[8] & 0x10)
|
|
mix_dat |= 0x02;
|
|
if (dev->accel.multifunc[9] & 0x02)
|
|
mix_dat |= 0x01;
|
|
if (dev->accel.multifunc[9] & 0x04)
|
|
mix_dat |= 0x80;
|
|
if (dev->accel.multifunc[9] & 0x08)
|
|
mix_dat |= 0x40;
|
|
if (dev->accel.multifunc[9] & 0x10)
|
|
mix_dat |= 0x20;
|
|
}
|
|
if (and3 == 2) {
|
|
if (dev->accel.multifunc[8] & 0x02)
|
|
mix_dat |= 0x20;
|
|
if (dev->accel.multifunc[8] & 0x04)
|
|
mix_dat |= 0x10;
|
|
if (dev->accel.multifunc[8] & 0x08)
|
|
mix_dat |= 0x08;
|
|
if (dev->accel.multifunc[8] & 0x10)
|
|
mix_dat |= 0x04;
|
|
if (dev->accel.multifunc[9] & 0x02)
|
|
mix_dat |= 0x02;
|
|
if (dev->accel.multifunc[9] & 0x04)
|
|
mix_dat |= 0x01;
|
|
if (dev->accel.multifunc[9] & 0x08)
|
|
mix_dat |= 0x80;
|
|
if (dev->accel.multifunc[9] & 0x10)
|
|
mix_dat |= 0x40;
|
|
}
|
|
if (and3 == 1) {
|
|
if (dev->accel.multifunc[8] & 0x02)
|
|
mix_dat |= 0x40;
|
|
if (dev->accel.multifunc[8] & 0x04)
|
|
mix_dat |= 0x20;
|
|
if (dev->accel.multifunc[8] & 0x08)
|
|
mix_dat |= 0x10;
|
|
if (dev->accel.multifunc[8] & 0x10)
|
|
mix_dat |= 0x08;
|
|
if (dev->accel.multifunc[9] & 0x02)
|
|
mix_dat |= 0x04;
|
|
if (dev->accel.multifunc[9] & 0x04)
|
|
mix_dat |= 0x02;
|
|
if (dev->accel.multifunc[9] & 0x08)
|
|
mix_dat |= 0x01;
|
|
if (dev->accel.multifunc[9] & 0x10)
|
|
mix_dat |= 0x80;
|
|
}
|
|
if (and3 == 0) {
|
|
if (dev->accel.multifunc[8] & 0x02)
|
|
mix_dat |= 0x80;
|
|
if (dev->accel.multifunc[8] & 0x04)
|
|
mix_dat |= 0x40;
|
|
if (dev->accel.multifunc[8] & 0x08)
|
|
mix_dat |= 0x20;
|
|
if (dev->accel.multifunc[8] & 0x10)
|
|
mix_dat |= 0x10;
|
|
if (dev->accel.multifunc[9] & 0x02)
|
|
mix_dat |= 0x08;
|
|
if (dev->accel.multifunc[9] & 0x04)
|
|
mix_dat |= 0x04;
|
|
if (dev->accel.multifunc[9] & 0x08)
|
|
mix_dat |= 0x02;
|
|
if (dev->accel.multifunc[9] & 0x10)
|
|
mix_dat |= 0x01;
|
|
}
|
|
}
|
|
|
|
old_mix_dat = mix_dat;
|
|
|
|
/*Bit 4 of the Command register is the draw yes bit, which enables writing to memory/reading from memory when enabled.
|
|
When this bit is disabled, no writing to memory/reading from memory is allowed. (This bit is almost meaningless on
|
|
the NOP command)*/
|
|
switch (cmd) {
|
|
case 0: /*NOP (Short Stroke Vectors)*/
|
|
if (dev->accel.ssv_state == 0)
|
|
break;
|
|
|
|
if (dev->accel.cmd & 8) {
|
|
while (count-- && dev->accel.ssv_len >= 0) {
|
|
if (dev->accel.cx >= dev->accel.clip_left && dev->accel.cx <= clip_r &&
|
|
dev->accel.cy >= dev->accel.clip_top && dev->accel.cy <= clip_b) {
|
|
switch ((mix_dat & mix_mask) ? frgd_mix : bkgd_mix) {
|
|
case 0: src_dat = bkgd_color; break;
|
|
case 1: src_dat = frgd_color; break;
|
|
case 2: src_dat = cpu_dat & 0xff; break;
|
|
case 3: src_dat = 0; break;
|
|
}
|
|
READ((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
|
|
if ((compare_mode == 0) ||
|
|
((compare_mode == 0x10) && (dest_dat >= compare)) ||
|
|
((compare_mode == 0x18) && (dest_dat < compare)) ||
|
|
((compare_mode == 0x20) && (dest_dat != compare)) ||
|
|
((compare_mode == 0x28) && (dest_dat == compare)) ||
|
|
((compare_mode == 0x30) && (dest_dat <= compare)) ||
|
|
((compare_mode == 0x38) && (dest_dat > compare))) {
|
|
MIX(mix_dat & mix_mask, dest_dat, src_dat);
|
|
|
|
if (dev->accel.ssv_draw) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
}
|
|
|
|
mix_dat <<= 1;
|
|
mix_dat |= 1;
|
|
cpu_dat >>= 8;
|
|
|
|
if (!dev->accel.ssv_len)
|
|
break;
|
|
|
|
switch (dev->accel.ssv_dir & 0xe0) {
|
|
case 0x00: dev->accel.cx++; break;
|
|
case 0x20: dev->accel.cx++; dev->accel.cy--; break;
|
|
case 0x40: dev->accel.cy--; break;
|
|
case 0x60: dev->accel.cx--; dev->accel.cy--; break;
|
|
case 0x80: dev->accel.cx--; break;
|
|
case 0xa0: dev->accel.cx--; dev->accel.cy++; break;
|
|
case 0xc0: dev->accel.cy++; break;
|
|
case 0xe0: dev->accel.cx++; dev->accel.cy++; break;
|
|
}
|
|
|
|
dev->accel.ssv_len--;
|
|
}
|
|
|
|
dev->accel.cur_x = dev->accel.cx;
|
|
dev->accel.cur_y = dev->accel.cy;
|
|
}
|
|
break;
|
|
|
|
case 1: /*Draw line*/
|
|
if (!cpu_input) {
|
|
dev->accel.xx_count = 0;
|
|
dev->accel.cx = dev->accel.cur_x;
|
|
dev->accel.cy = dev->accel.cur_y;
|
|
|
|
if (dev->accel.cur_x & 0x400) {
|
|
dev->accel.cx |= ~0x3ff;
|
|
}
|
|
if (dev->accel.cur_y & 0x400) {
|
|
dev->accel.cy |= ~0x3ff;
|
|
}
|
|
|
|
dev->accel.sy = dev->accel.maj_axis_pcnt;
|
|
|
|
if (ibm8514_cpu_src(dev)) {
|
|
if (dev->accel.cmd & 2) {
|
|
if (dev->accel.cmd & 8) {
|
|
if (and3 == 1) {
|
|
dev->accel.sy += 4;
|
|
if (dev->accel.cmd & 0x20)
|
|
dev->accel.cx += 4;
|
|
else
|
|
dev->accel.cx -= 4;
|
|
} else if (and3 == 2) {
|
|
dev->accel.sy += 5;
|
|
if (dev->accel.cmd & 0x20)
|
|
dev->accel.cx += 5;
|
|
else
|
|
dev->accel.cx -= 5;
|
|
} else if (and3 == 3) {
|
|
dev->accel.sy += 6;
|
|
if (dev->accel.cmd & 0x20)
|
|
dev->accel.cx += 6;
|
|
else
|
|
dev->accel.cx -= 6;
|
|
} else {
|
|
dev->accel.sy += 3;
|
|
if (dev->accel.cmd & 0x20)
|
|
dev->accel.cx += 3;
|
|
else
|
|
dev->accel.cx -= 3;
|
|
}
|
|
}
|
|
}
|
|
dev->data_available = 0;
|
|
dev->data_available2 = 0;
|
|
return; /*Wait for data from CPU*/
|
|
} else if (ibm8514_cpu_dest(dev)) {
|
|
dev->data_available = 1;
|
|
dev->data_available2 = 1;
|
|
return;
|
|
}
|
|
}
|
|
|
|
if (dev->accel.cmd & 8) { /*Vector Line*/
|
|
if (ibm8514_cpu_dest(dev) && cpu_input && (dev->accel.cmd & 2))
|
|
count >>= 1;
|
|
dev->accel.xx_count++;
|
|
while (count-- && (dev->accel.sy >= 0)) {
|
|
if ((dev->accel.cx >= dev->accel.clip_left && dev->accel.cx <= clip_r &&
|
|
dev->accel.cy >= dev->accel.clip_top && dev->accel.cy <= clip_b)) {
|
|
if (ibm8514_cpu_dest(dev) && (pixcntl == 0)) {
|
|
mix_dat = mix_mask; /* Mix data = forced to foreground register. */
|
|
} else if (ibm8514_cpu_dest(dev) && (pixcntl == 3)) {
|
|
/* Mix data = current video memory value. */
|
|
READ((dev->accel.cy * dev->h_disp) + dev->accel.cx, mix_dat);
|
|
mix_dat = ((mix_dat & rd_mask) == rd_mask);
|
|
mix_dat = mix_dat ? mix_mask : 0;
|
|
}
|
|
|
|
if (ibm8514_cpu_dest(dev)) {
|
|
READ((dev->accel.cy * dev->h_disp) + dev->accel.cx, src_dat);
|
|
if (pixcntl == 3)
|
|
src_dat = ((src_dat & rd_mask) == rd_mask);
|
|
} else switch ((mix_dat & mix_mask) ? frgd_mix : bkgd_mix) {
|
|
case 0: src_dat = bkgd_color; break;
|
|
case 1: src_dat = frgd_color; break;
|
|
case 2: src_dat = cpu_dat & 0xff; break;
|
|
case 3: src_dat = 0; break;
|
|
}
|
|
|
|
READ((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
|
|
if ((compare_mode == 0) ||
|
|
((compare_mode == 0x10) && (dest_dat >= compare)) ||
|
|
((compare_mode == 0x18) && (dest_dat < compare)) ||
|
|
((compare_mode == 0x20) && (dest_dat != compare)) ||
|
|
((compare_mode == 0x28) && (dest_dat == compare)) ||
|
|
((compare_mode == 0x30) && (dest_dat <= compare)) ||
|
|
((compare_mode == 0x38) && (dest_dat > compare))) {
|
|
old_dest_dat = dest_dat;
|
|
MIX(mix_dat & mix_mask, dest_dat, src_dat);
|
|
dest_dat = (dest_dat & wrt_mask) | (old_dest_dat & ~wrt_mask);
|
|
if ((dev->accel.cmd & 2) && ibm8514_cpu_src(dev)) {
|
|
if (and3 == 1) {
|
|
if (dev->accel.xx_count >= 2) {
|
|
if ((dev->accel.cmd & 4) && dev->accel.sy) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
} else if (!(dev->accel.cmd & 4)) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
} else if (and3 == 2) {
|
|
if (dev->accel.xx_count == 2) {
|
|
if (count <= 2) {
|
|
if ((dev->accel.cmd & 4) && dev->accel.sy) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
} else if (!(dev->accel.cmd & 4)) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
} else if (dev->accel.xx_count >= 3) {
|
|
if ((dev->accel.cmd & 4) && dev->accel.sy) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
} else if (!(dev->accel.cmd & 4)) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
} else if (and3 == 3) {
|
|
if (dev->accel.xx_count == 2) {
|
|
if (count <= 1) {
|
|
if ((dev->accel.cmd & 4) && dev->accel.sy) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
} else if (!(dev->accel.cmd & 4)) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
} else if (dev->accel.xx_count >= 3) {
|
|
if ((dev->accel.cmd & 4) && dev->accel.sy) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
} else if (!(dev->accel.cmd & 4)) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
} else {
|
|
if (dev->accel.xx_count == 1) {
|
|
if (!count) {
|
|
if ((dev->accel.cmd & 4) && dev->accel.sy) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
} else if (!(dev->accel.cmd & 4)) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
} else if (dev->accel.xx_count >= 2) {
|
|
if ((dev->accel.cmd & 4) && dev->accel.sy) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
} else if (!(dev->accel.cmd & 4)) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
}
|
|
} else {
|
|
if (ibm8514_cpu_src(dev) || !cpu_input) {
|
|
if ((dev->accel.cmd & 4) && dev->accel.sy) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
} else if (!(dev->accel.cmd & 4)) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
mix_dat <<= 1;
|
|
mix_dat |= 1;
|
|
cpu_dat >>= 8;
|
|
|
|
if (dev->accel.sy == 0) {
|
|
break;
|
|
}
|
|
|
|
switch (dev->accel.cmd & 0xe0) {
|
|
case 0x00: dev->accel.cx++; break;
|
|
case 0x20: dev->accel.cx++; dev->accel.cy--; break;
|
|
case 0x40: dev->accel.cy--; break;
|
|
case 0x60: dev->accel.cx--; dev->accel.cy--; break;
|
|
case 0x80: dev->accel.cx--; break;
|
|
case 0xa0: dev->accel.cx--; dev->accel.cy++; break;
|
|
case 0xc0: dev->accel.cy++; break;
|
|
case 0xe0: dev->accel.cx++; dev->accel.cy++; break;
|
|
}
|
|
|
|
dev->accel.sy--;
|
|
}
|
|
dev->accel.cur_x = dev->accel.cx;
|
|
dev->accel.cur_y = dev->accel.cy;
|
|
} else { /*Bresenham*/
|
|
if (pixcntl == 1) {
|
|
dev->accel.temp_cnt = 8;
|
|
while (count-- && (dev->accel.sy >= 0)) {
|
|
if (dev->accel.temp_cnt == 0) {
|
|
dev->accel.temp_cnt = 8;
|
|
mix_dat = old_mix_dat;
|
|
}
|
|
if ((dev->accel.cx >= dev->accel.clip_left && dev->accel.cx <= clip_r &&
|
|
dev->accel.cy >= dev->accel.clip_top && dev->accel.cy <= clip_b)) {
|
|
if (ibm8514_cpu_dest(dev)) {
|
|
READ((dev->accel.cy * dev->h_disp) + dev->accel.cx, src_dat);
|
|
} else switch ((mix_dat & 1) ? frgd_mix : bkgd_mix) {
|
|
case 0: src_dat = bkgd_color; break;
|
|
case 1: src_dat = frgd_color; break;
|
|
case 2: src_dat = cpu_dat & 0xff; break;
|
|
case 3: src_dat = 0; break;
|
|
}
|
|
|
|
READ((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
|
|
if ((compare_mode == 0) ||
|
|
((compare_mode == 0x10) && (dest_dat >= compare)) ||
|
|
((compare_mode == 0x18) && (dest_dat < compare)) ||
|
|
((compare_mode == 0x20) && (dest_dat != compare)) ||
|
|
((compare_mode == 0x28) && (dest_dat == compare)) ||
|
|
((compare_mode == 0x30) && (dest_dat <= compare)) ||
|
|
((compare_mode == 0x38) && (dest_dat > compare))) {
|
|
old_dest_dat = dest_dat;
|
|
MIX(mix_dat & 1, dest_dat, src_dat);
|
|
dest_dat = (dest_dat & wrt_mask) | (old_dest_dat & ~wrt_mask);
|
|
if ((dev->accel.cmd & 4) && dev->accel.sy) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
} else if (!(dev->accel.cmd & 4)) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
}
|
|
|
|
dev->accel.temp_cnt--;
|
|
mix_dat >>= 1;
|
|
cpu_dat >>= 8;
|
|
|
|
if (dev->accel.sy == 0) {
|
|
break;
|
|
}
|
|
|
|
if (dev->accel.err_term >= dev->accel.maj_axis_pcnt) {
|
|
dev->accel.err_term += dev->accel.destx_distp;
|
|
/*Step minor axis*/
|
|
switch (dev->accel.cmd & 0xe0) {
|
|
case 0x00: dev->accel.cy--; break;
|
|
case 0x20: dev->accel.cy--; break;
|
|
case 0x40: dev->accel.cx--; break;
|
|
case 0x60: dev->accel.cx++; break;
|
|
case 0x80: dev->accel.cy++; break;
|
|
case 0xa0: dev->accel.cy++; break;
|
|
case 0xc0: dev->accel.cx--; break;
|
|
case 0xe0: dev->accel.cx++; break;
|
|
}
|
|
} else
|
|
dev->accel.err_term += dev->accel.desty_axstp;
|
|
|
|
/*Step major axis*/
|
|
switch (dev->accel.cmd & 0xe0) {
|
|
case 0x00: dev->accel.cx--; break;
|
|
case 0x20: dev->accel.cx++; break;
|
|
case 0x40: dev->accel.cy--; break;
|
|
case 0x60: dev->accel.cy--; break;
|
|
case 0x80: dev->accel.cx--; break;
|
|
case 0xa0: dev->accel.cx++; break;
|
|
case 0xc0: dev->accel.cy++; break;
|
|
case 0xe0: dev->accel.cy++; break;
|
|
}
|
|
|
|
dev->accel.sy--;
|
|
}
|
|
} else {
|
|
while (count-- && (dev->accel.sy >= 0)) {
|
|
if (((dev->accel.cx) >= dev->accel.clip_left && (dev->accel.cx) <= clip_r &&
|
|
(dev->accel.cy) >= dev->accel.clip_top && (dev->accel.cy) <= clip_b)) {
|
|
if (ibm8514_cpu_dest(dev) && (pixcntl == 0)) {
|
|
mix_dat = mix_mask; /* Mix data = forced to foreground register. */
|
|
} else if (ibm8514_cpu_dest(dev) && (pixcntl == 3)) {
|
|
/* Mix data = current video memory value. */
|
|
READ((dev->accel.cy * dev->h_disp) + dev->accel.cx, mix_dat);
|
|
mix_dat = ((mix_dat & rd_mask) == rd_mask);
|
|
mix_dat = mix_dat ? mix_mask : 0;
|
|
}
|
|
|
|
if (ibm8514_cpu_dest(dev)) {
|
|
READ((dev->accel.cy * dev->h_disp) + dev->accel.cx, src_dat);
|
|
if (pixcntl == 3)
|
|
src_dat = ((src_dat & rd_mask) == rd_mask);
|
|
} else switch ((mix_dat & mix_mask) ? frgd_mix : bkgd_mix) {
|
|
case 0: src_dat = bkgd_color; break;
|
|
case 1: src_dat = frgd_color; break;
|
|
case 2: src_dat = cpu_dat & 0xff; break;
|
|
case 3: src_dat = 0; break;
|
|
}
|
|
|
|
READ((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
|
|
if ((compare_mode == 0) ||
|
|
((compare_mode == 0x10) && (dest_dat >= compare)) ||
|
|
((compare_mode == 0x18) && (dest_dat < compare)) ||
|
|
((compare_mode == 0x20) && (dest_dat != compare)) ||
|
|
((compare_mode == 0x28) && (dest_dat == compare)) ||
|
|
((compare_mode == 0x30) && (dest_dat <= compare)) ||
|
|
((compare_mode == 0x38) && (dest_dat > compare))) {
|
|
old_dest_dat = dest_dat;
|
|
MIX(mix_dat & mix_mask, dest_dat, src_dat);
|
|
dest_dat = (dest_dat & wrt_mask) | (old_dest_dat & ~wrt_mask);
|
|
if ((dev->accel.cmd & 4) && dev->accel.sy) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
} else if (!(dev->accel.cmd & 4)) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
}
|
|
|
|
mix_dat <<= 1;
|
|
mix_dat |= 1;
|
|
cpu_dat >>= 8;
|
|
|
|
if (dev->accel.sy == 0) {
|
|
break;
|
|
}
|
|
|
|
if (dev->accel.err_term >= dev->accel.maj_axis_pcnt) {
|
|
dev->accel.err_term += dev->accel.destx_distp;
|
|
/*Step minor axis*/
|
|
switch (dev->accel.cmd & 0xe0) {
|
|
case 0x00: dev->accel.cy--; break;
|
|
case 0x20: dev->accel.cy--; break;
|
|
case 0x40: dev->accel.cx--; break;
|
|
case 0x60: dev->accel.cx++; break;
|
|
case 0x80: dev->accel.cy++; break;
|
|
case 0xa0: dev->accel.cy++; break;
|
|
case 0xc0: dev->accel.cx--; break;
|
|
case 0xe0: dev->accel.cx++; break;
|
|
}
|
|
} else
|
|
dev->accel.err_term += dev->accel.desty_axstp;
|
|
|
|
/*Step major axis*/
|
|
switch (dev->accel.cmd & 0xe0) {
|
|
case 0x00: dev->accel.cx--; break;
|
|
case 0x20: dev->accel.cx++; break;
|
|
case 0x40: dev->accel.cy--; break;
|
|
case 0x60: dev->accel.cy--; break;
|
|
case 0x80: dev->accel.cx--; break;
|
|
case 0xa0: dev->accel.cx++; break;
|
|
case 0xc0: dev->accel.cy++; break;
|
|
case 0xe0: dev->accel.cy++; break;
|
|
}
|
|
|
|
dev->accel.sy--;
|
|
}
|
|
}
|
|
dev->accel.cur_x = dev->accel.cx;
|
|
dev->accel.cur_y = dev->accel.cy;
|
|
}
|
|
break;
|
|
|
|
case 2: /*Rectangle fill (X direction)*/
|
|
case 3: /*Rectangle fill (Y direction)*/
|
|
case 4: /*Rectangle fill (Y direction using nibbles)*/
|
|
if (!cpu_input) {
|
|
dev->accel.x_count = 0;
|
|
dev->accel.xx_count = 0;
|
|
dev->accel.odd_out = 0;
|
|
dev->accel.odd_in = 0;
|
|
dev->accel.input = 0;
|
|
dev->accel.output = 0;
|
|
dev->accel.newdest_out = 0;
|
|
dev->accel.newdest_in = 0;
|
|
|
|
dev->accel.sx = dev->accel.maj_axis_pcnt & 0x7ff;
|
|
dev->accel.sy = dev->accel.multifunc[0] & 0x7ff;
|
|
|
|
dev->accel.cx = dev->accel.cur_x & 0x3ff;
|
|
if (dev->accel.cur_x & 0x400)
|
|
dev->accel.cx |= ~0x3ff;
|
|
dev->accel.cy = dev->accel.cur_y & 0x3ff;
|
|
if (dev->accel.cur_y & 0x400)
|
|
dev->accel.cy |= ~0x3ff;
|
|
|
|
dev->accel.dest = dev->accel.cy * dev->h_disp;
|
|
dev->accel.fill_state = 0;
|
|
|
|
if (cmd == 4)
|
|
dev->accel.cmd |= 2;
|
|
else if (cmd == 3)
|
|
dev->accel.cmd &= ~2;
|
|
|
|
if (ibm8514_cpu_src(dev)) {
|
|
if (dev->accel.cmd & 2) {
|
|
if (!(dev->accel.cmd & 0x1000)) {
|
|
if (!(dev->accel.cmd & 8)) {
|
|
dev->accel.sx += and3;
|
|
dev->accel.nibbleset = (uint8_t *)calloc(1, (dev->accel.sx >> 3) + 1);
|
|
dev->accel.writemono = (uint8_t *)calloc(1, (dev->accel.sx >> 3) + 1);
|
|
dev->accel.sys_cnt = (dev->accel.sx >> 3) + 1;
|
|
} else {
|
|
if (and3 == 1) {
|
|
dev->accel.sx += 4;
|
|
if (dev->accel.cmd & 0x20)
|
|
dev->accel.cx += 4;
|
|
else
|
|
dev->accel.cx -= 4;
|
|
} else if (and3 == 2) {
|
|
dev->accel.sx += 5;
|
|
if (dev->accel.cmd & 0x20)
|
|
dev->accel.cx += 5;
|
|
else
|
|
dev->accel.cx -= 5;
|
|
} else if (and3 == 3) {
|
|
dev->accel.sx += 6;
|
|
if (dev->accel.cmd & 0x20)
|
|
dev->accel.cx += 6;
|
|
else
|
|
dev->accel.cx -= 6;
|
|
} else {
|
|
dev->accel.sx += 3;
|
|
if (dev->accel.cmd & 0x20)
|
|
dev->accel.cx += 3;
|
|
else
|
|
dev->accel.cx -= 3;
|
|
}
|
|
}
|
|
}
|
|
} else {
|
|
if (!(dev->accel.cmd & 0x40) && (frgd_mix == 2) && (bkgd_mix == 2) && (pixcntl == 0) && (cmd == 2)) {
|
|
if (!(dev->accel.sx & 1)) {
|
|
dev->accel.output = 1;
|
|
dev->accel.newdest_out = (dev->accel.cy + 1) * dev->h_disp;
|
|
}
|
|
}
|
|
}
|
|
dev->data_available = 0;
|
|
dev->data_available2 = 0;
|
|
return; /*Wait for data from CPU*/
|
|
} else if (ibm8514_cpu_dest(dev)) {
|
|
if (!(dev->accel.cmd & 2) && (frgd_mix == 2) && (pixcntl == 0) && (cmd == 2)) {
|
|
if (!(dev->accel.sx & 1)) {
|
|
dev->accel.input = 1;
|
|
dev->accel.newdest_in = (dev->accel.cy + 1) * dev->h_disp;
|
|
}
|
|
} else if (dev->accel.cmd & 2) {
|
|
if (dev->accel.cmd & 8) {
|
|
dev->accel.sx += and3;
|
|
dev->accel.nibbleset = (uint8_t *)calloc(1, (dev->accel.sx >> 3) + 1);
|
|
dev->accel.writemono = (uint8_t *)calloc(1, (dev->accel.sx >> 3) + 1);
|
|
dev->accel.sys_cnt = (dev->accel.sx >> 3) + 1;
|
|
}
|
|
}
|
|
dev->data_available = 1;
|
|
dev->data_available2 = 1;
|
|
return; /*Wait for data from CPU*/
|
|
}
|
|
}
|
|
|
|
if (dev->accel.cmd & 2) {
|
|
if (cpu_input) {
|
|
rect_fill_pix:
|
|
if ((dev->accel.cmd & 8) && ibm8514_cpu_src(dev)) {
|
|
dev->accel.xx_count++;
|
|
while (count-- && (dev->accel.sy >= 0)) {
|
|
if ((dev->accel.cx >= dev->accel.clip_left && dev->accel.cx <= clip_r &&
|
|
dev->accel.cy >= dev->accel.clip_top && dev->accel.cy <= clip_b)) {
|
|
switch ((mix_dat & mix_mask) ? frgd_mix : bkgd_mix) {
|
|
case 0: src_dat = bkgd_color; break;
|
|
case 1: src_dat = frgd_color; break;
|
|
case 2: src_dat = cpu_dat & 0xff; break;
|
|
case 3: src_dat = 0; break;
|
|
}
|
|
|
|
READ(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
|
|
if ((compare_mode == 0) ||
|
|
((compare_mode == 0x10) && (dest_dat >= compare)) ||
|
|
((compare_mode == 0x18) && (dest_dat < compare)) ||
|
|
((compare_mode == 0x20) && (dest_dat != compare)) ||
|
|
((compare_mode == 0x28) && (dest_dat == compare)) ||
|
|
((compare_mode == 0x30) && (dest_dat <= compare)) ||
|
|
((compare_mode == 0x38) && (dest_dat > compare))) {
|
|
old_dest_dat = dest_dat;
|
|
MIX(mix_dat & mix_mask, dest_dat, src_dat);
|
|
dest_dat = (dest_dat & wrt_mask) | (old_dest_dat & ~wrt_mask);
|
|
if (and3 == 1) {
|
|
if (dev->accel.xx_count >= 2) {
|
|
if ((dev->accel.cmd & 4) && dev->accel.sx) {
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
} else if (!(dev->accel.cmd & 4)) {
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
} else if (and3 == 2) {
|
|
if (dev->accel.xx_count == 2) {
|
|
if (count <= 2) {
|
|
if ((dev->accel.cmd & 4) && dev->accel.sx) {
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
} else if (!(dev->accel.cmd & 4)) {
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
} else if (dev->accel.xx_count >= 3) {
|
|
if ((dev->accel.cmd & 4) && dev->accel.sx) {
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
} else if (!(dev->accel.cmd & 4)) {
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
} else if (and3 == 3) {
|
|
if (dev->accel.xx_count == 2) {
|
|
if (count <= 1) {
|
|
if ((dev->accel.cmd & 4) && dev->accel.sx) {
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
} else if (!(dev->accel.cmd & 4)) {
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
} else if (dev->accel.xx_count >= 3) {
|
|
if ((dev->accel.cmd & 4) && dev->accel.sx) {
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
} else if (!(dev->accel.cmd & 4)) {
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
} else {
|
|
if (dev->accel.xx_count == 1) {
|
|
if (!count) {
|
|
if ((dev->accel.cmd & 4) && dev->accel.sx) {
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
} else if (!(dev->accel.cmd & 4)) {
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
} else if (dev->accel.xx_count >= 2) {
|
|
if ((dev->accel.cmd & 4) && dev->accel.sx) {
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
} else if (!(dev->accel.cmd & 4)) {
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
mix_dat <<= 1;
|
|
mix_dat |= 1;
|
|
cpu_dat >>= 8;
|
|
|
|
switch (dev->accel.cmd & 0xe0) {
|
|
case 0x00: dev->accel.cx++; break;
|
|
case 0x20: dev->accel.cx++; break;
|
|
case 0x60: dev->accel.cx--; break;
|
|
case 0x80: dev->accel.cx--; break;
|
|
case 0xa0: dev->accel.cx--; break;
|
|
case 0xe0: dev->accel.cx++; break;
|
|
}
|
|
|
|
dev->accel.sx--;
|
|
if (dev->accel.sx < 0) {
|
|
dev->accel.sx = dev->accel.maj_axis_pcnt & 0x7ff;
|
|
if (and3 == 1) {
|
|
dev->accel.sx += 4;
|
|
} else if (and3 == 2) {
|
|
dev->accel.sx += 5;
|
|
} else if (and3 == 3) {
|
|
dev->accel.sx += 6;
|
|
} else {
|
|
dev->accel.sx += 3;
|
|
}
|
|
|
|
if (dev->accel.cmd & 0x20)
|
|
dev->accel.cx -= (dev->accel.sx + 1);
|
|
else
|
|
dev->accel.cx += (dev->accel.sx + 1);
|
|
|
|
switch (dev->accel.cmd & 0xe0) {
|
|
case 0x20: dev->accel.cy--; break;
|
|
case 0x40: dev->accel.cy--; break;
|
|
case 0x60: dev->accel.cy--; break;
|
|
case 0xa0: dev->accel.cy++; break;
|
|
case 0xc0: dev->accel.cy++; break;
|
|
case 0xe0: dev->accel.cy++; break;
|
|
}
|
|
|
|
dev->accel.dest = dev->accel.cy * dev->h_disp;
|
|
dev->accel.sy--;
|
|
return;
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
if (count < 8) {
|
|
while (count-- && (dev->accel.sy >= 0)) {
|
|
if ((dev->accel.cx >= dev->accel.clip_left && dev->accel.cx <= clip_r &&
|
|
dev->accel.cy >= dev->accel.clip_top && dev->accel.cy <= clip_b)) {
|
|
if (ibm8514_cpu_dest(dev) && (pixcntl == 0)) {
|
|
mix_dat = mix_mask; /* Mix data = forced to foreground register. */
|
|
} else if (ibm8514_cpu_dest(dev) && (pixcntl == 3)) {
|
|
/* Mix data = current video memory value. */
|
|
READ(dev->accel.dest + dev->accel.cx, mix_dat);
|
|
mix_dat = ((mix_dat & rd_mask) == rd_mask);
|
|
mix_dat = mix_dat ? mix_mask : 0;
|
|
}
|
|
|
|
if (ibm8514_cpu_dest(dev)) {
|
|
READ(dev->accel.dest + dev->accel.cx, src_dat);
|
|
if (pixcntl == 3)
|
|
src_dat = ((src_dat & rd_mask) == rd_mask);
|
|
} else switch ((mix_dat & mix_mask) ? frgd_mix : bkgd_mix) {
|
|
case 0: src_dat = bkgd_color; break;
|
|
case 1: src_dat = frgd_color; break;
|
|
case 2: src_dat = cpu_dat & 0xff; break;
|
|
case 3: src_dat = 0; break;
|
|
}
|
|
|
|
READ(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
|
|
if ((compare_mode == 0) ||
|
|
((compare_mode == 0x10) && (dest_dat >= compare)) ||
|
|
((compare_mode == 0x18) && (dest_dat < compare)) ||
|
|
((compare_mode == 0x20) && (dest_dat != compare)) ||
|
|
((compare_mode == 0x28) && (dest_dat == compare)) ||
|
|
((compare_mode == 0x30) && (dest_dat <= compare)) ||
|
|
((compare_mode == 0x38) && (dest_dat > compare))) {
|
|
old_dest_dat = dest_dat;
|
|
MIX(mix_dat & mix_mask, dest_dat, src_dat);
|
|
dest_dat = (dest_dat & wrt_mask) | (old_dest_dat & ~wrt_mask);
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
|
|
mix_dat <<= 1;
|
|
mix_dat |= 1;
|
|
cpu_dat >>= 8;
|
|
|
|
if (dev->accel.cmd & 0x20)
|
|
dev->accel.cx++;
|
|
else
|
|
dev->accel.cx--;
|
|
|
|
dev->accel.sx--;
|
|
if (dev->accel.sx < 0) {
|
|
dev->accel.sx = dev->accel.maj_axis_pcnt & 0x7ff;
|
|
|
|
if (dev->accel.cmd & 2) {
|
|
dev->accel.sx += (dev->accel.cur_x & 3);
|
|
}
|
|
|
|
if (dev->accel.cmd & 0x20) {
|
|
dev->accel.cx -= (dev->accel.sx) + 1;
|
|
} else
|
|
dev->accel.cx += (dev->accel.sx) + 1;
|
|
|
|
if (dev->accel.cmd & 0x80)
|
|
dev->accel.cy++;
|
|
else
|
|
dev->accel.cy--;
|
|
|
|
dev->accel.dest = dev->accel.cy * dev->h_disp;
|
|
dev->accel.sy--;
|
|
return;
|
|
}
|
|
}
|
|
} else {
|
|
while (count-- && (dev->accel.sy >= 0)) {
|
|
if ((dev->accel.cx >= dev->accel.clip_left && dev->accel.cx <= clip_r &&
|
|
dev->accel.cy >= dev->accel.clip_top && dev->accel.cy <= clip_b)) {
|
|
if (ibm8514_cpu_dest(dev) && (pixcntl == 0)) {
|
|
mix_dat = 1; /* Mix data = forced to foreground register. */
|
|
} else if (ibm8514_cpu_dest(dev) && (pixcntl == 3)) {
|
|
/* Mix data = current video memory value. */
|
|
READ(dev->accel.dest + dev->accel.cx, mix_dat);
|
|
mix_dat = ((mix_dat & rd_mask) == rd_mask);
|
|
mix_dat = mix_dat ? 1 : 0;
|
|
}
|
|
|
|
if (ibm8514_cpu_dest(dev)) {
|
|
READ(dev->accel.dest + dev->accel.cx, src_dat);
|
|
if (pixcntl == 3)
|
|
src_dat = ((src_dat & rd_mask) == rd_mask);
|
|
} else {
|
|
switch ((mix_dat & 1) ? frgd_mix : bkgd_mix) {
|
|
case 0: src_dat = bkgd_color; break;
|
|
case 1: src_dat = frgd_color; break;
|
|
case 2: src_dat = cpu_dat & 0xff; break;
|
|
case 3: src_dat = 0; break;
|
|
}
|
|
}
|
|
|
|
READ(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
|
|
if ((compare_mode == 0) ||
|
|
((compare_mode == 0x10) && (dest_dat >= compare)) ||
|
|
((compare_mode == 0x18) && (dest_dat < compare)) ||
|
|
((compare_mode == 0x20) && (dest_dat != compare)) ||
|
|
((compare_mode == 0x28) && (dest_dat == compare)) ||
|
|
((compare_mode == 0x30) && (dest_dat <= compare)) ||
|
|
((compare_mode == 0x38) && (dest_dat > compare))) {
|
|
old_dest_dat = dest_dat;
|
|
MIX(mix_dat & 1, dest_dat, src_dat);
|
|
dest_dat = (dest_dat & wrt_mask) | (old_dest_dat & ~wrt_mask);
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
mix_dat >>= 1;
|
|
cpu_dat >>= 8;
|
|
|
|
if (dev->accel.cmd & 0x20)
|
|
dev->accel.cx++;
|
|
else
|
|
dev->accel.cx--;
|
|
|
|
dev->accel.sx--;
|
|
if (dev->accel.sx < 0) {
|
|
dev->accel.sx = dev->accel.maj_axis_pcnt & 0x7ff;
|
|
|
|
if (dev->accel.cmd & 2) {
|
|
if (!(dev->accel.cmd & 0x1000))
|
|
dev->accel.sx += (dev->accel.cur_x & 3);
|
|
}
|
|
|
|
if (dev->accel.cmd & 0x20) {
|
|
dev->accel.cx -= (dev->accel.sx) + 1;
|
|
} else
|
|
dev->accel.cx += (dev->accel.sx) + 1;
|
|
|
|
if (dev->accel.cmd & 2) {
|
|
if (dev->accel.cmd & 0x1000) {
|
|
dev->accel.cx = dev->accel.cur_x & 0x3ff;
|
|
if (dev->accel.cur_x & 0x400)
|
|
dev->accel.cx |= ~0x3ff;
|
|
}
|
|
}
|
|
|
|
if (dev->accel.cmd & 0x80)
|
|
dev->accel.cy++;
|
|
else
|
|
dev->accel.cy--;
|
|
|
|
dev->accel.dest = dev->accel.cy * dev->h_disp;
|
|
dev->accel.sy--;
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
} else {
|
|
goto rect_fill;
|
|
}
|
|
} else {
|
|
if (cpu_input) {
|
|
if (pixcntl == 2) {
|
|
goto rect_fill_pix;
|
|
} else {
|
|
if (dev->accel.input && !dev->accel.output) {
|
|
while (count-- && (dev->accel.sy >= 0)) {
|
|
if ((dev->accel.cx >= dev->accel.clip_left && dev->accel.cx <= clip_r &&
|
|
dev->accel.cy >= dev->accel.clip_top && dev->accel.cy <= clip_b)) {
|
|
mix_dat = mix_mask; /* Mix data = forced to foreground register. */
|
|
if (!dev->accel.odd_in && !dev->accel.sx) {
|
|
READ(dev->accel.newdest_in + dev->accel.cur_x, src_dat);
|
|
READ(dev->accel.newdest_in + dev->accel.cur_x, dest_dat);
|
|
} else {
|
|
READ(dev->accel.dest + dev->accel.cx, src_dat);
|
|
READ(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
}
|
|
if ((compare_mode == 0) ||
|
|
((compare_mode == 0x10) && (dest_dat >= compare)) ||
|
|
((compare_mode == 0x18) && (dest_dat < compare)) ||
|
|
((compare_mode == 0x20) && (dest_dat != compare)) ||
|
|
((compare_mode == 0x28) && (dest_dat == compare)) ||
|
|
((compare_mode == 0x30) && (dest_dat <= compare)) ||
|
|
((compare_mode == 0x38) && (dest_dat > compare))) {
|
|
old_dest_dat = dest_dat;
|
|
MIX(mix_dat & mix_mask, dest_dat, src_dat);
|
|
dest_dat = (dest_dat & wrt_mask) | (old_dest_dat & ~wrt_mask);
|
|
if (!dev->accel.odd_in && !dev->accel.sx) {
|
|
WRITE(dev->accel.newdest_in + dev->accel.cur_x, dest_dat);
|
|
} else {
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
}
|
|
mix_dat <<= 1;
|
|
mix_dat |= 1;
|
|
|
|
if (dev->accel.cmd & 0x20)
|
|
dev->accel.cx++;
|
|
else
|
|
dev->accel.cx--;
|
|
|
|
dev->accel.sx--;
|
|
if (dev->accel.odd_in) {
|
|
if (dev->accel.sx < 0) {
|
|
dev->accel.sx = dev->accel.maj_axis_pcnt & 0x7ff;
|
|
dev->accel.odd_in = 0;
|
|
dev->accel.cx = dev->accel.cur_x;
|
|
if (dev->accel.cmd & 0x80)
|
|
dev->accel.cy++;
|
|
else
|
|
dev->accel.cy--;
|
|
dev->accel.dest = dev->accel.cy * dev->h_disp;
|
|
dev->accel.newdest_in = (dev->accel.cy + 1) * dev->h_disp;
|
|
dev->accel.sy--;
|
|
return;
|
|
}
|
|
} else {
|
|
if (dev->accel.sx < 0) {
|
|
dev->accel.sx = dev->accel.maj_axis_pcnt & 0x7ff;
|
|
dev->accel.sx--;
|
|
dev->accel.cx = dev->accel.cur_x;
|
|
dev->accel.odd_in = 1;
|
|
if (dev->accel.cmd & 0x20)
|
|
dev->accel.cx++;
|
|
else
|
|
dev->accel.cx--;
|
|
if (dev->accel.cmd & 0x80)
|
|
dev->accel.cy++;
|
|
else
|
|
dev->accel.cy--;
|
|
dev->accel.dest = dev->accel.cy * dev->h_disp;
|
|
dev->accel.newdest_in = (dev->accel.cy + 1) * dev->h_disp;
|
|
dev->accel.sy--;
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
} else if (dev->accel.output && !dev->accel.input) {
|
|
while (count-- && (dev->accel.sy >= 0)) {
|
|
if ((dev->accel.cx >= dev->accel.clip_left && dev->accel.cx <= clip_r &&
|
|
dev->accel.cy >= dev->accel.clip_top && dev->accel.cy <= clip_b)) {
|
|
src_dat = cpu_dat;
|
|
if (!dev->accel.odd_out && !dev->accel.sx) {
|
|
READ(dev->accel.newdest_out + dev->accel.cur_x, dest_dat);
|
|
} else {
|
|
READ(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
}
|
|
|
|
if ((compare_mode == 0) ||
|
|
((compare_mode == 0x10) && (dest_dat >= compare)) ||
|
|
((compare_mode == 0x18) && (dest_dat < compare)) ||
|
|
((compare_mode == 0x20) && (dest_dat != compare)) ||
|
|
((compare_mode == 0x28) && (dest_dat == compare)) ||
|
|
((compare_mode == 0x30) && (dest_dat <= compare)) ||
|
|
((compare_mode == 0x38) && (dest_dat > compare))) {
|
|
old_dest_dat = dest_dat;
|
|
MIX(mix_dat & mix_mask, dest_dat, src_dat);
|
|
dest_dat = (dest_dat & wrt_mask) | (old_dest_dat & ~wrt_mask);
|
|
if (!dev->accel.odd_out && !dev->accel.sx) {
|
|
WRITE(dev->accel.newdest_out + dev->accel.cur_x, dest_dat);
|
|
} else {
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
}
|
|
mix_dat <<= 1;
|
|
mix_dat |= 1;
|
|
cpu_dat >>= 8;
|
|
|
|
if (dev->accel.cmd & 0x20)
|
|
dev->accel.cx++;
|
|
else
|
|
dev->accel.cx--;
|
|
|
|
dev->accel.sx--;
|
|
if (dev->accel.odd_out) {
|
|
if (dev->accel.sx < 0) {
|
|
dev->accel.sx = dev->accel.maj_axis_pcnt & 0x7ff;
|
|
dev->accel.odd_out = 0;
|
|
dev->accel.cx = dev->accel.cur_x;
|
|
if (dev->accel.cmd & 0x80)
|
|
dev->accel.cy++;
|
|
else
|
|
dev->accel.cy--;
|
|
|
|
dev->accel.dest = dev->accel.cy * dev->h_disp;
|
|
dev->accel.newdest_out = (dev->accel.cy + 1) * dev->h_disp;
|
|
dev->accel.sy--;
|
|
return;
|
|
}
|
|
} else {
|
|
if (dev->accel.sx < 0) {
|
|
dev->accel.sx = dev->accel.maj_axis_pcnt & 0x7ff;
|
|
dev->accel.odd_out = 1;
|
|
dev->accel.sx--;
|
|
dev->accel.cx = dev->accel.cur_x;
|
|
if (dev->accel.cmd & 0x20)
|
|
dev->accel.cx++;
|
|
else
|
|
dev->accel.cx--;
|
|
if (dev->accel.cmd & 0x80)
|
|
dev->accel.cy++;
|
|
else
|
|
dev->accel.cy--;
|
|
|
|
dev->accel.dest = dev->accel.cy * dev->h_disp;
|
|
dev->accel.newdest_out = (dev->accel.cy + 1) * dev->h_disp;
|
|
dev->accel.sy--;
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
} else {
|
|
while (count-- && (dev->accel.sy >= 0)) {
|
|
if ((dev->accel.cx >= dev->accel.clip_left && dev->accel.cx <= clip_r &&
|
|
dev->accel.cy >= dev->accel.clip_top && dev->accel.cy <= clip_b)) {
|
|
if (ibm8514_cpu_dest(dev) && (pixcntl == 0)) {
|
|
mix_dat = mix_mask; /* Mix data = forced to foreground register. */
|
|
} else if (ibm8514_cpu_dest(dev) && (pixcntl == 3)) {
|
|
/* Mix data = current video memory value. */
|
|
READ(dev->accel.dest + dev->accel.cx, mix_dat);
|
|
mix_dat = ((mix_dat & rd_mask) == rd_mask);
|
|
mix_dat = mix_dat ? mix_mask : 0;
|
|
}
|
|
|
|
if (ibm8514_cpu_dest(dev)) {
|
|
READ(dev->accel.dest + dev->accel.cx, src_dat);
|
|
if (pixcntl == 3) {
|
|
src_dat = ((src_dat & rd_mask) == rd_mask);
|
|
}
|
|
} else switch ((mix_dat & mix_mask) ? frgd_mix : bkgd_mix) {
|
|
case 0: src_dat = bkgd_color; break;
|
|
case 1: src_dat = frgd_color; break;
|
|
case 2: src_dat = cpu_dat & 0xff; break;
|
|
case 3: src_dat = 0; break;
|
|
}
|
|
|
|
READ(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
|
|
if ((compare_mode == 0) ||
|
|
((compare_mode == 0x10) && (dest_dat >= compare)) ||
|
|
((compare_mode == 0x18) && (dest_dat < compare)) ||
|
|
((compare_mode == 0x20) && (dest_dat != compare)) ||
|
|
((compare_mode == 0x28) && (dest_dat == compare)) ||
|
|
((compare_mode == 0x30) && (dest_dat <= compare)) ||
|
|
((compare_mode == 0x38) && (dest_dat > compare))) {
|
|
old_dest_dat = dest_dat;
|
|
if (ibm8514_cpu_dest(dev)) {
|
|
if (pixcntl == 3) {
|
|
MIX(mix_dat & mix_mask, dest_dat, src_dat);
|
|
}
|
|
} else {
|
|
MIX(mix_dat & mix_mask, dest_dat, src_dat);
|
|
}
|
|
dest_dat = (dest_dat & wrt_mask) | (old_dest_dat & ~wrt_mask);
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
|
|
mix_dat <<= 1;
|
|
mix_dat |= 1;
|
|
cpu_dat >>= 8;
|
|
|
|
if (dev->accel.cmd & 0x20)
|
|
dev->accel.cx++;
|
|
else
|
|
dev->accel.cx--;
|
|
|
|
dev->accel.sx--;
|
|
if (dev->accel.sx < 0) {
|
|
dev->accel.sx = dev->accel.maj_axis_pcnt & 0x7ff;
|
|
|
|
if (dev->accel.cmd & 0x20) {
|
|
dev->accel.cx -= (dev->accel.sx) + 1;
|
|
} else
|
|
dev->accel.cx += (dev->accel.sx) + 1;
|
|
|
|
if (dev->accel.cmd & 0x80)
|
|
dev->accel.cy++;
|
|
else
|
|
dev->accel.cy--;
|
|
|
|
dev->accel.dest = dev->accel.cy * dev->h_disp;
|
|
dev->accel.sy--;
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
} else {
|
|
rect_fill:
|
|
if (pixcntl == 1) {
|
|
if (dev->accel.cmd & 0x40) {
|
|
count = dev->accel.maj_axis_pcnt + 1;
|
|
dev->accel.temp_cnt = 8;
|
|
while (count-- && dev->accel.sy >= 0) {
|
|
if (dev->accel.temp_cnt == 0) {
|
|
mix_dat >>= 8;
|
|
dev->accel.temp_cnt = 8;
|
|
}
|
|
if ((dev->accel.cx >= dev->accel.clip_left && dev->accel.cx <= clip_r &&
|
|
dev->accel.cy >= dev->accel.clip_top && dev->accel.cy <= clip_b)) {
|
|
switch ((mix_dat & mix_mask) ? frgd_mix : bkgd_mix) {
|
|
case 0: src_dat = bkgd_color; break;
|
|
case 1: src_dat = frgd_color; break;
|
|
case 2: src_dat = 0; break;
|
|
case 3: src_dat = 0; break;
|
|
}
|
|
|
|
READ(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
|
|
if ((compare_mode == 0) ||
|
|
((compare_mode == 0x10) && (dest_dat >= compare)) ||
|
|
((compare_mode == 0x18) && (dest_dat < compare)) ||
|
|
((compare_mode == 0x20) && (dest_dat != compare)) ||
|
|
((compare_mode == 0x28) && (dest_dat == compare)) ||
|
|
((compare_mode == 0x30) && (dest_dat <= compare)) ||
|
|
((compare_mode == 0x38) && (dest_dat > compare))) {
|
|
old_dest_dat = dest_dat;
|
|
MIX(mix_dat & mix_mask, dest_dat, src_dat);
|
|
dest_dat = (dest_dat & wrt_mask) | (old_dest_dat & ~wrt_mask);
|
|
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
|
|
if (dev->accel.temp_cnt > 0) {
|
|
dev->accel.temp_cnt--;
|
|
mix_dat <<= 1;
|
|
mix_dat |= 1;
|
|
}
|
|
|
|
if (dev->accel.cmd & 0x20)
|
|
dev->accel.cx++;
|
|
else
|
|
dev->accel.cx--;
|
|
|
|
dev->accel.sx--;
|
|
if (dev->accel.sx < 0) {
|
|
dev->accel.sx = dev->accel.maj_axis_pcnt & 0x7ff;
|
|
|
|
if (dev->accel.cmd & 0x20) {
|
|
dev->accel.cx -= (dev->accel.sx) + 1;
|
|
} else
|
|
dev->accel.cx += (dev->accel.sx) + 1;
|
|
|
|
if (dev->accel.cmd & 0x80)
|
|
dev->accel.cy++;
|
|
else
|
|
dev->accel.cy--;
|
|
|
|
dev->accel.dest = dev->accel.cy * dev->h_disp;
|
|
dev->accel.sy--;
|
|
|
|
dev->accel.cur_x = dev->accel.cx;
|
|
dev->accel.cur_y = dev->accel.cy;
|
|
return;
|
|
}
|
|
}
|
|
} else {
|
|
dev->accel.temp_cnt = 8;
|
|
while (count-- && dev->accel.sy >= 0) {
|
|
if (dev->accel.temp_cnt == 0) {
|
|
dev->accel.temp_cnt = 8;
|
|
mix_dat = old_mix_dat;
|
|
}
|
|
if ((dev->accel.cx >= dev->accel.clip_left && dev->accel.cx <= clip_r &&
|
|
dev->accel.cy >= dev->accel.clip_top && dev->accel.cy <= clip_b)) {
|
|
switch ((mix_dat & 1) ? frgd_mix : bkgd_mix) {
|
|
case 0: src_dat = bkgd_color; break;
|
|
case 1: src_dat = frgd_color; break;
|
|
case 2: src_dat = 0; break;
|
|
case 3: src_dat = 0; break;
|
|
}
|
|
|
|
READ(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
|
|
if ((compare_mode == 0) ||
|
|
((compare_mode == 0x10) && (dest_dat >= compare)) ||
|
|
((compare_mode == 0x18) && (dest_dat < compare)) ||
|
|
((compare_mode == 0x20) && (dest_dat != compare)) ||
|
|
((compare_mode == 0x28) && (dest_dat == compare)) ||
|
|
((compare_mode == 0x30) && (dest_dat <= compare)) ||
|
|
((compare_mode == 0x38) && (dest_dat > compare))) {
|
|
old_dest_dat = dest_dat;
|
|
MIX(mix_dat & 1, dest_dat, src_dat);
|
|
dest_dat = (dest_dat & wrt_mask) | (old_dest_dat & ~wrt_mask);
|
|
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
|
|
dev->accel.temp_cnt--;
|
|
mix_dat >>= 1;
|
|
|
|
if (dev->accel.cmd & 0x20)
|
|
dev->accel.cx++;
|
|
else
|
|
dev->accel.cx--;
|
|
|
|
dev->accel.sx--;
|
|
if (dev->accel.sx < 0) {
|
|
dev->accel.sx = dev->accel.maj_axis_pcnt & 0x7ff;
|
|
|
|
if (dev->accel.cmd & 0x20) {
|
|
dev->accel.cx -= (dev->accel.sx) + 1;
|
|
} else
|
|
dev->accel.cx += (dev->accel.sx) + 1;
|
|
|
|
if (dev->accel.cmd & 0x80)
|
|
dev->accel.cy++;
|
|
else
|
|
dev->accel.cy--;
|
|
|
|
dev->accel.dest = dev->accel.cy * dev->h_disp;
|
|
dev->accel.sy--;
|
|
|
|
if (dev->accel.sy < 0) {
|
|
dev->accel.cur_x = dev->accel.cx;
|
|
dev->accel.cur_y = dev->accel.cy;
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
} else {
|
|
if (dev->accel.multifunc[0x0a] & 6) {
|
|
while (count-- && dev->accel.sy >= 0) {
|
|
if ((dev->accel.cx >= dev->accel.clip_left && dev->accel.cx <= clip_r &&
|
|
dev->accel.cy >= dev->accel.clip_top && dev->accel.cy <= clip_b)) {
|
|
switch ((mix_dat & mix_mask) ? frgd_mix : bkgd_mix) {
|
|
case 0: src_dat = bkgd_color; break;
|
|
case 1: src_dat = frgd_color; break;
|
|
case 2: src_dat = 0; break;
|
|
case 3: src_dat = 0; break;
|
|
}
|
|
|
|
READ(dev->accel.dest + dev->accel.cx, poly_src);
|
|
if (dev->accel.multifunc[0x0a] & 2) {
|
|
poly_src = ((poly_src & wrt_mask) == wrt_mask);
|
|
} else {
|
|
poly_src = ((poly_src & rd_mask_polygon) == rd_mask_polygon);
|
|
}
|
|
|
|
if (poly_src) {
|
|
dev->accel.fill_state = !dev->accel.fill_state;
|
|
}
|
|
|
|
if (dev->accel.fill_state) {
|
|
READ(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
|
|
if ((compare_mode == 0) ||
|
|
((compare_mode == 0x10) && (dest_dat >= compare)) ||
|
|
((compare_mode == 0x18) && (dest_dat < compare)) ||
|
|
((compare_mode == 0x20) && (dest_dat != compare)) ||
|
|
((compare_mode == 0x28) && (dest_dat == compare)) ||
|
|
((compare_mode == 0x30) && (dest_dat <= compare)) ||
|
|
((compare_mode == 0x38) && (dest_dat > compare))) {
|
|
old_dest_dat = dest_dat;
|
|
MIX(mix_dat & mix_mask, dest_dat, src_dat);
|
|
dest_dat = (dest_dat & wrt_mask) | (old_dest_dat & ~wrt_mask);
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
}
|
|
|
|
mix_dat <<= 1;
|
|
mix_dat |= 1;
|
|
|
|
if (dev->accel.cmd & 0x20) {
|
|
dev->accel.cx++;
|
|
} else {
|
|
dev->accel.cx--;
|
|
}
|
|
|
|
dev->accel.sx--;
|
|
if (dev->accel.sx < 0) {
|
|
dev->accel.sx = dev->accel.maj_axis_pcnt & 0x7ff;
|
|
dev->accel.fill_state = 0;
|
|
|
|
if (dev->accel.cmd & 0x20) {
|
|
dev->accel.cx -= (dev->accel.sx) + 1;
|
|
} else {
|
|
dev->accel.cx += (dev->accel.sx) + 1;
|
|
}
|
|
|
|
if (dev->accel.cmd & 0x80)
|
|
dev->accel.cy++;
|
|
else
|
|
dev->accel.cy--;
|
|
|
|
dev->accel.dest = dev->accel.cy * dev->h_disp;
|
|
dev->accel.sy--;
|
|
|
|
if (dev->accel.sy < 0) {
|
|
dev->accel.cur_x = dev->accel.cx;
|
|
dev->accel.cur_y = dev->accel.cy;
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
} else {
|
|
while (count-- && dev->accel.sy >= 0) {
|
|
if ((dev->accel.cx >= dev->accel.clip_left && dev->accel.cx <= clip_r &&
|
|
dev->accel.cy >= dev->accel.clip_top && dev->accel.cy <= clip_b)) {
|
|
switch ((mix_dat & mix_mask) ? frgd_mix : bkgd_mix) {
|
|
case 0: src_dat = bkgd_color; break;
|
|
case 1: src_dat = frgd_color; break;
|
|
case 2: src_dat = 0; break;
|
|
case 3: src_dat = 0; break;
|
|
}
|
|
|
|
READ(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
|
|
if ((compare_mode == 0) ||
|
|
((compare_mode == 0x10) && (dest_dat >= compare)) ||
|
|
((compare_mode == 0x18) && (dest_dat < compare)) ||
|
|
((compare_mode == 0x20) && (dest_dat != compare)) ||
|
|
((compare_mode == 0x28) && (dest_dat == compare)) ||
|
|
((compare_mode == 0x30) && (dest_dat <= compare)) ||
|
|
((compare_mode == 0x38) && (dest_dat > compare))) {
|
|
old_dest_dat = dest_dat;
|
|
MIX(mix_dat & mix_mask, dest_dat, src_dat);
|
|
dest_dat = (dest_dat & wrt_mask) | (old_dest_dat & ~wrt_mask);
|
|
WRITE(dev->accel.dest + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
|
|
mix_dat <<= 1;
|
|
mix_dat |= 1;
|
|
|
|
if (dev->accel.cmd & 0x20)
|
|
dev->accel.cx++;
|
|
else
|
|
dev->accel.cx--;
|
|
|
|
dev->accel.sx--;
|
|
if (dev->accel.sx < 0) {
|
|
dev->accel.sx = dev->accel.maj_axis_pcnt & 0x7ff;
|
|
|
|
if (dev->accel.cmd & 0x20) {
|
|
dev->accel.cx -= (dev->accel.sx) + 1;
|
|
} else
|
|
dev->accel.cx += (dev->accel.sx) + 1;
|
|
|
|
if (dev->accel.cmd & 0x80)
|
|
dev->accel.cy++;
|
|
else
|
|
dev->accel.cy--;
|
|
|
|
dev->accel.dest = dev->accel.cy * dev->h_disp;
|
|
dev->accel.sy--;
|
|
|
|
if (dev->accel.sy < 0) {
|
|
dev->accel.cur_x = dev->accel.cx;
|
|
dev->accel.cur_y = dev->accel.cy;
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 5: /*Draw Polygon Boundary Line*/
|
|
if (!cpu_input) {
|
|
dev->accel.cx = dev->accel.cur_x;
|
|
dev->accel.cy = dev->accel.cur_y;
|
|
dev->accel.oldcy = dev->accel.cy;
|
|
|
|
dev->accel.xdir = (dev->accel.cmd & 0x20) ? 1 : -1;
|
|
dev->accel.ydir = (dev->accel.cmd & 0x80) ? 1 : -1;
|
|
|
|
dev->accel.sy = 0;
|
|
|
|
if (ibm8514_cpu_src(dev)) {
|
|
dev->data_available = 0;
|
|
dev->data_available2 = 0;
|
|
return; /*Wait for data from CPU*/
|
|
} else if (ibm8514_cpu_dest(dev)) {
|
|
dev->data_available = 1;
|
|
dev->data_available2 = 1;
|
|
return;
|
|
}
|
|
}
|
|
|
|
while (count-- && (dev->accel.sy >= 0)) {
|
|
if (((dev->accel.cx) >= dev->accel.clip_left && (dev->accel.cx <= clip_r) &&
|
|
(dev->accel.cy) >= dev->accel.clip_top && (dev->accel.cy) <= clip_b)) {
|
|
switch ((mix_dat & mix_mask) ? frgd_mix : bkgd_mix) {
|
|
case 0: src_dat = bkgd_color; break;
|
|
case 1: src_dat = frgd_color; break;
|
|
case 2: src_dat = cpu_dat & 0xff; break;
|
|
case 3: src_dat = 0; break;
|
|
}
|
|
|
|
READ((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
|
|
if ((compare_mode == 0) ||
|
|
((compare_mode == 0x10) && (dest_dat >= compare)) ||
|
|
((compare_mode == 0x18) && (dest_dat < compare)) ||
|
|
((compare_mode == 0x20) && (dest_dat != compare)) ||
|
|
((compare_mode == 0x28) && (dest_dat == compare)) ||
|
|
((compare_mode == 0x30) && (dest_dat <= compare)) ||
|
|
((compare_mode == 0x38) && (dest_dat > compare))) {
|
|
old_dest_dat = dest_dat;
|
|
MIX(mix_dat & mix_mask, dest_dat, src_dat);
|
|
dest_dat = (dest_dat & wrt_mask) | (old_dest_dat & ~wrt_mask);
|
|
if ((dev->accel.cmd & 4) && (dev->accel.sy < dev->accel.maj_axis_pcnt)) {
|
|
if (!dev->accel.sy) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
} else if ((dev->accel.cmd & 0x40) && dev->accel.sy && (dev->accel.cy == dev->accel.oldcy + 1)) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
} else if (!(dev->accel.cmd & 0x40) && dev->accel.sy && (dev->accel.err_term >= 0) && (dev->accel.cy == (dev->accel.oldcy + 1))) {
|
|
WRITE((dev->accel.cy * dev->h_disp) + dev->accel.cx, dest_dat);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
mix_dat <<= 1;
|
|
mix_dat |= 1;
|
|
cpu_dat >>= 8;
|
|
|
|
if (dev->accel.sy == dev->accel.maj_axis_pcnt) {
|
|
return;
|
|
}
|
|
|
|
if (dev->accel.cmd & 0x40) {
|
|
dev->accel.oldcy = dev->accel.cy;
|
|
dev->accel.cy += dev->accel.ydir;
|
|
if (dev->accel.err_term >= 0) {
|
|
dev->accel.err_term += dev->accel.destx_distp;
|
|
dev->accel.cx += dev->accel.xdir;
|
|
} else {
|
|
dev->accel.err_term += dev->accel.desty_axstp;
|
|
}
|
|
} else {
|
|
dev->accel.cx += dev->accel.xdir;
|
|
if (dev->accel.err_term >= 0) {
|
|
dev->accel.err_term += dev->accel.destx_distp;
|
|
dev->accel.oldcy = dev->accel.cy;
|
|
dev->accel.cy += dev->accel.ydir;
|
|
} else {
|
|
dev->accel.err_term += dev->accel.desty_axstp;
|
|
}
|
|
}
|
|
|
|
dev->accel.sy++;
|
|
}
|
|
break;
|
|
|
|
case 6: /*BitBlt*/
|
|
if (!cpu_input) /*!cpu_input is trigger to start operation*/
|
|
{
|
|
dev->accel.x_count = 0;
|
|
dev->accel.output = 0;
|
|
|
|
dev->accel.sx = dev->accel.maj_axis_pcnt & 0x7ff;
|
|
dev->accel.sy = dev->accel.multifunc[0] & 0x7ff;
|
|
|
|
dev->accel.dx = dev->accel.destx_distp & 0x3ff;
|
|
dev->accel.dy = dev->accel.desty_axstp & 0x3ff;
|
|
|
|
if (dev->accel.destx_distp & 0x400)
|
|
dev->accel.dx |= ~0x3ff;
|
|
if (dev->accel.desty_axstp & 0x400)
|
|
dev->accel.dy |= ~0x3ff;
|
|
|
|
dev->accel.cx = dev->accel.cur_x & 0x3ff;
|
|
dev->accel.cy = dev->accel.cur_y & 0x3ff;
|
|
|
|
if (dev->accel.cur_x & 0x400)
|
|
dev->accel.cx |= ~0x3ff;
|
|
if (dev->accel.cur_y & 0x400)
|
|
dev->accel.cy |= ~0x3ff;
|
|
|
|
dev->accel.src = dev->accel.cy * dev->h_disp;
|
|
dev->accel.dest = dev->accel.dy * dev->h_disp;
|
|
|
|
if (ibm8514_cpu_src(dev)) {
|
|
if (dev->accel.cmd & 2) {
|
|
if (!(dev->accel.cmd & 0x1000)) {
|
|
dev->accel.sx += (dev->accel.cur_x & 3);
|
|
dev->accel.nibbleset = (uint8_t *)calloc(1, (dev->accel.sx >> 3) + 1);
|
|
dev->accel.writemono = (uint8_t *)calloc(1, (dev->accel.sx >> 3) + 1);
|
|
dev->accel.sys_cnt = (dev->accel.sx >> 3) + 1;
|
|
}
|
|
}
|
|
dev->data_available = 0;
|
|
dev->data_available2 = 0;
|
|
return; /*Wait for data from CPU*/
|
|
} else if (ibm8514_cpu_dest(dev)) {
|
|
dev->data_available = 1;
|
|
dev->data_available2 = 1;
|
|
return; /*Wait for data from CPU*/
|
|
}
|
|
}
|
|
|
|
if (dev->accel.cmd & 2) {
|
|
if (cpu_input) {
|
|
bitblt_pix:
|
|
if (count < 8) {
|
|
while (count-- && (dev->accel.sy >= 0)) {
|
|
if ((dev->accel.dx >= dev->accel.clip_left && dev->accel.dx <= clip_r &&
|
|
dev->accel.dy >= dev->accel.clip_top && dev->accel.dy <= clip_b)) {
|
|
if (pixcntl == 3) {
|
|
if (!(dev->accel.cmd & 0x10) && ((frgd_mix != 3) || (bkgd_mix != 3))) {
|
|
READ(dev->accel.src + dev->accel.cx, mix_dat);
|
|
mix_dat = ((mix_dat & rd_mask) == rd_mask);
|
|
mix_dat = mix_dat ? mix_mask : 0;
|
|
} else if (dev->accel.cmd & 0x10) {
|
|
READ(dev->accel.src + dev->accel.cx, mix_dat);
|
|
mix_dat = ((mix_dat & rd_mask) == rd_mask);
|
|
mix_dat = mix_dat ? mix_mask : 0;
|
|
}
|
|
}
|
|
switch ((mix_dat & mix_mask) ? frgd_mix : bkgd_mix) {
|
|
case 0: src_dat = bkgd_color; break;
|
|
case 1: src_dat = frgd_color; break;
|
|
case 2: src_dat = cpu_dat & 0xff; break;
|
|
case 3: READ(dev->accel.src + dev->accel.cx, src_dat);
|
|
if (pixcntl == 3) {
|
|
if (dev->accel.cmd & 0x10) {
|
|
src_dat = ((src_dat & rd_mask) == rd_mask);
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
|
|
READ(dev->accel.dest + dev->accel.dx, dest_dat);
|
|
|
|
if ((compare_mode == 0) ||
|
|
((compare_mode == 0x10) && (dest_dat >= compare)) ||
|
|
((compare_mode == 0x18) && (dest_dat < compare)) ||
|
|
((compare_mode == 0x20) && (dest_dat != compare)) ||
|
|
((compare_mode == 0x28) && (dest_dat == compare)) ||
|
|
((compare_mode == 0x30) && (dest_dat <= compare)) ||
|
|
((compare_mode == 0x38) && (dest_dat > compare))) {
|
|
old_dest_dat = dest_dat;
|
|
MIX(mix_dat & mix_mask, dest_dat, src_dat);
|
|
dest_dat = (dest_dat & wrt_mask) | (old_dest_dat & ~wrt_mask);
|
|
WRITE(dev->accel.dest + dev->accel.dx, dest_dat);
|
|
}
|
|
}
|
|
|
|
mix_dat <<= 1;
|
|
mix_dat |= 1;
|
|
cpu_dat >>= 8;
|
|
|
|
if (dev->accel.cmd & 0x20)
|
|
dev->accel.cx++;
|
|
else
|
|
dev->accel.cx--;
|
|
|
|
dev->accel.sx--;
|
|
if (dev->accel.sx < 0) {
|
|
dev->accel.sx = dev->accel.maj_axis_pcnt & 0x7ff;
|
|
|
|
if (dev->accel.cmd & 2) {
|
|
dev->accel.sx += (dev->accel.cur_x & 3);
|
|
}
|
|
|
|
if (dev->accel.cmd & 0x20) {
|
|
dev->accel.cx -= (dev->accel.sx) + 1;
|
|
} else
|
|
dev->accel.cx += (dev->accel.sx) + 1;
|
|
|
|
if (dev->accel.cmd & 0x80)
|
|
dev->accel.cy++;
|
|
else
|
|
dev->accel.cy--;
|
|
|
|
dev->accel.dest = dev->accel.cy * dev->h_disp;
|
|
dev->accel.sy--;
|
|
return;
|
|
}
|
|
}
|
|
} else {
|
|
while (count-- && (dev->accel.sy >= 0)) {
|
|
if ((dev->accel.dx >= dev->accel.clip_left && dev->accel.dx <= clip_r &&
|
|
dev->accel.dy >= dev->accel.clip_top && dev->accel.dy <= clip_b)) {
|
|
if (pixcntl == 3) {
|
|
if (!(dev->accel.cmd & 0x10) && ((frgd_mix != 3) || (bkgd_mix != 3))) {
|
|
READ(dev->accel.src + dev->accel.cx, mix_dat);
|
|
mix_dat = ((mix_dat & rd_mask) == rd_mask);
|
|
mix_dat = mix_dat ? 1 : 0;
|
|
} else if (dev->accel.cmd & 0x10) {
|
|
READ(dev->accel.src + dev->accel.cx, mix_dat);
|
|
mix_dat = ((mix_dat & rd_mask) == rd_mask);
|
|
mix_dat = mix_dat ? 1 : 0;
|
|
}
|
|
}
|
|
switch ((mix_dat & 1) ? frgd_mix : bkgd_mix) {
|
|
case 0: src_dat = bkgd_color; break;
|
|
case 1: src_dat = frgd_color; break;
|
|
case 2: src_dat = cpu_dat & 0xff; break;
|
|
case 3: READ(dev->accel.src + dev->accel.cx, src_dat);
|
|
if (pixcntl == 3) {
|
|
if (dev->accel.cmd & 0x10) {
|
|
src_dat = ((src_dat & rd_mask) == rd_mask);
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
|
|
READ(dev->accel.dest + dev->accel.dx, dest_dat);
|
|
|
|
if ((compare_mode == 0) ||
|
|
((compare_mode == 0x10) && (dest_dat >= compare)) ||
|
|
((compare_mode == 0x18) && (dest_dat < compare)) ||
|
|
((compare_mode == 0x20) && (dest_dat != compare)) ||
|
|
((compare_mode == 0x28) && (dest_dat == compare)) ||
|
|
((compare_mode == 0x30) && (dest_dat <= compare)) ||
|
|
((compare_mode == 0x38) && (dest_dat > compare))) {
|
|
old_dest_dat = dest_dat;
|
|
MIX(mix_dat & 1, dest_dat, src_dat);
|
|
dest_dat = (dest_dat & wrt_mask) | (old_dest_dat & ~wrt_mask);
|
|
WRITE(dev->accel.dest + dev->accel.dx, dest_dat);
|
|
}
|
|
}
|
|
mix_dat >>= 1;
|
|
cpu_dat >>= 8;
|
|
|
|
if (dev->accel.cmd & 0x20) {
|
|
dev->accel.dx++;
|
|
dev->accel.cx++;
|
|
} else {
|
|
dev->accel.dx--;
|
|
dev->accel.cx--;
|
|
}
|
|
|
|
dev->accel.sx--;
|
|
if (dev->accel.sx < 0) {
|
|
dev->accel.sx = dev->accel.maj_axis_pcnt & 0x7ff;
|
|
|
|
if (dev->accel.cmd & 2) {
|
|
if (!(dev->accel.cmd & 0x1000))
|
|
dev->accel.sx += (dev->accel.cur_x & 3);
|
|
}
|
|
|
|
if (dev->accel.cmd & 0x20) {
|
|
dev->accel.dx -= (dev->accel.sx) + 1;
|
|
dev->accel.cx -= (dev->accel.sx) + 1;
|
|
} else {
|
|
dev->accel.dx += (dev->accel.sx) + 1;
|
|
dev->accel.cx += (dev->accel.sx) + 1;
|
|
}
|
|
|
|
if (dev->accel.cmd & 2) {
|
|
if (dev->accel.cmd & 0x1000) {
|
|
dev->accel.cx = dev->accel.cur_x & 0x3ff;
|
|
if (dev->accel.cur_x & 0x400)
|
|
dev->accel.cx |= ~0x3ff;
|
|
dev->accel.dx = dev->accel.destx_distp & 0x3ff;
|
|
if (dev->accel.destx_distp & 0x400)
|
|
dev->accel.dx |= ~0x3ff;
|
|
}
|
|
}
|
|
|
|
if (dev->accel.cmd & 0x80) {
|
|
dev->accel.dy++;
|
|
dev->accel.cy++;
|
|
} else {
|
|
dev->accel.dy--;
|
|
dev->accel.cy--;
|
|
}
|
|
|
|
dev->accel.dest = dev->accel.dy * dev->h_disp;
|
|
dev->accel.src = dev->accel.cy * dev->h_disp;
|
|
dev->accel.sy--;
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
} else {
|
|
goto bitblt;
|
|
}
|
|
} else {
|
|
if (cpu_input) {
|
|
if (pixcntl == 2) {
|
|
goto bitblt_pix;
|
|
} else {
|
|
while (count-- && (dev->accel.sy >= 0)) {
|
|
if ((dev->accel.dx >= dev->accel.clip_left && dev->accel.dx <= clip_r &&
|
|
dev->accel.dy >= dev->accel.clip_top && dev->accel.dy <= clip_b)) {
|
|
if (pixcntl == 3) {
|
|
if (!(dev->accel.cmd & 0x10) && ((frgd_mix != 3) || (bkgd_mix != 3))) {
|
|
READ(dev->accel.src + dev->accel.cx, mix_dat);
|
|
mix_dat = ((mix_dat & rd_mask) == rd_mask);
|
|
mix_dat = mix_dat ? mix_mask : 0;
|
|
} else if (dev->accel.cmd & 0x10) {
|
|
READ(dev->accel.src + dev->accel.cx, mix_dat);
|
|
mix_dat = ((mix_dat & rd_mask) == rd_mask);
|
|
mix_dat = mix_dat ? mix_mask : 0;
|
|
}
|
|
}
|
|
switch ((mix_dat & mix_mask) ? frgd_mix : bkgd_mix) {
|
|
case 0: src_dat = bkgd_color; break;
|
|
case 1: src_dat = frgd_color; break;
|
|
case 2: src_dat = cpu_dat & 0xff; break;
|
|
case 3: READ(dev->accel.src + dev->accel.cx, src_dat);
|
|
if (pixcntl == 3) {
|
|
if (dev->accel.cmd & 0x10) {
|
|
src_dat = ((src_dat & rd_mask) == rd_mask);
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
|
|
READ(dev->accel.dest + dev->accel.dx, dest_dat);
|
|
|
|
if ((compare_mode == 0) ||
|
|
((compare_mode == 0x10) && (dest_dat >= compare)) ||
|
|
((compare_mode == 0x18) && (dest_dat < compare)) ||
|
|
((compare_mode == 0x20) && (dest_dat != compare)) ||
|
|
((compare_mode == 0x28) && (dest_dat == compare)) ||
|
|
((compare_mode == 0x30) && (dest_dat <= compare)) ||
|
|
((compare_mode == 0x38) && (dest_dat > compare))) {
|
|
old_dest_dat = dest_dat;
|
|
MIX(mix_dat & mix_mask, dest_dat, src_dat);
|
|
dest_dat = (dest_dat & wrt_mask) | (old_dest_dat & ~wrt_mask);
|
|
WRITE(dev->accel.dest + dev->accel.dx, dest_dat);
|
|
}
|
|
}
|
|
mix_dat <<= 1;
|
|
mix_dat |= 1;
|
|
cpu_dat >>= 8;
|
|
|
|
if (dev->accel.cmd & 0x20) {
|
|
dev->accel.dx++;
|
|
dev->accel.cx++;
|
|
} else {
|
|
dev->accel.dx--;
|
|
dev->accel.cx--;
|
|
}
|
|
|
|
dev->accel.sx--;
|
|
if (dev->accel.sx < 0) {
|
|
dev->accel.sx = dev->accel.maj_axis_pcnt & 0x7ff;
|
|
|
|
if (dev->accel.cmd & 0x20) {
|
|
dev->accel.dx -= (dev->accel.sx) + 1;
|
|
dev->accel.cx -= (dev->accel.sx) + 1;
|
|
} else {
|
|
dev->accel.dx += (dev->accel.sx) + 1;
|
|
dev->accel.cx += (dev->accel.sx) + 1;
|
|
}
|
|
|
|
if (dev->accel.cmd & 0x80) {
|
|
dev->accel.dy++;
|
|
dev->accel.cy++;
|
|
} else {
|
|
dev->accel.dy--;
|
|
dev->accel.cy--;
|
|
}
|
|
|
|
dev->accel.dest = dev->accel.dy * dev->h_disp;
|
|
dev->accel.src = dev->accel.cy * dev->h_disp;
|
|
dev->accel.sy--;
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
} else {
|
|
bitblt:
|
|
if (pixcntl == 1) {
|
|
if (dev->accel.cmd & 0x40) {
|
|
count = dev->accel.maj_axis_pcnt + 1;
|
|
dev->accel.temp_cnt = 8;
|
|
while (count-- && dev->accel.sy >= 0) {
|
|
if (dev->accel.temp_cnt == 0) {
|
|
mix_dat >>= 8;
|
|
dev->accel.temp_cnt = 8;
|
|
}
|
|
if ((dev->accel.dx >= dev->accel.clip_left && dev->accel.dx <= clip_r &&
|
|
dev->accel.dy >= dev->accel.clip_top && dev->accel.dy <= clip_b)) {
|
|
switch ((mix_dat & mix_mask) ? frgd_mix : bkgd_mix) {
|
|
case 0: src_dat = bkgd_color; break;
|
|
case 1: src_dat = frgd_color; break;
|
|
case 2: src_dat = 0; break;
|
|
case 3: READ(dev->accel.src + dev->accel.cx, src_dat);
|
|
break;
|
|
}
|
|
|
|
READ(dev->accel.dest + dev->accel.dx, dest_dat);
|
|
|
|
if ((compare_mode == 0) ||
|
|
((compare_mode == 0x10) && (dest_dat >= compare)) ||
|
|
((compare_mode == 0x18) && (dest_dat < compare)) ||
|
|
((compare_mode == 0x20) && (dest_dat != compare)) ||
|
|
((compare_mode == 0x28) && (dest_dat == compare)) ||
|
|
((compare_mode == 0x30) && (dest_dat <= compare)) ||
|
|
((compare_mode == 0x38) && (dest_dat > compare))) {
|
|
old_dest_dat = dest_dat;
|
|
MIX(mix_dat & mix_mask, dest_dat, src_dat);
|
|
dest_dat = (dest_dat & wrt_mask) | (old_dest_dat & ~wrt_mask);
|
|
|
|
WRITE(dev->accel.dest + dev->accel.dx, dest_dat);
|
|
}
|
|
}
|
|
|
|
if (dev->accel.temp_cnt > 0) {
|
|
dev->accel.temp_cnt--;
|
|
mix_dat <<= 1;
|
|
mix_dat |= 1;
|
|
}
|
|
|
|
if (dev->accel.cmd & 0x20) {
|
|
dev->accel.dx++;
|
|
dev->accel.cx++;
|
|
} else {
|
|
dev->accel.dx--;
|
|
dev->accel.cx--;
|
|
}
|
|
|
|
dev->accel.sx--;
|
|
if (dev->accel.sx < 0) {
|
|
dev->accel.sx = dev->accel.maj_axis_pcnt & 0x7ff;
|
|
|
|
if (dev->accel.cmd & 0x20) {
|
|
dev->accel.dx -= (dev->accel.sx) + 1;
|
|
dev->accel.cx -= (dev->accel.sx) + 1;
|
|
} else {
|
|
dev->accel.dx += (dev->accel.sx) + 1;
|
|
dev->accel.cx += (dev->accel.sx) + 1;
|
|
}
|
|
|
|
if (dev->accel.cmd & 0x80) {
|
|
dev->accel.dy++;
|
|
dev->accel.cy++;
|
|
} else {
|
|
dev->accel.dy--;
|
|
dev->accel.cy--;
|
|
}
|
|
|
|
dev->accel.dest = dev->accel.dy * dev->h_disp;
|
|
dev->accel.src = dev->accel.cy * dev->h_disp;
|
|
dev->accel.sy--;
|
|
return;
|
|
}
|
|
}
|
|
} else {
|
|
dev->accel.temp_cnt = 8;
|
|
while (count-- && dev->accel.sy >= 0) {
|
|
if (dev->accel.temp_cnt == 0) {
|
|
dev->accel.temp_cnt = 8;
|
|
mix_dat = old_mix_dat;
|
|
}
|
|
if ((dev->accel.dx >= dev->accel.clip_left && dev->accel.dx <= clip_r &&
|
|
dev->accel.dy >= dev->accel.clip_top && dev->accel.dy <= clip_b)) {
|
|
switch ((mix_dat & 1) ? frgd_mix : bkgd_mix) {
|
|
case 0: src_dat = bkgd_color; break;
|
|
case 1: src_dat = frgd_color; break;
|
|
case 2: src_dat = 0; break;
|
|
case 3: READ(dev->accel.src + dev->accel.cx, src_dat);
|
|
break;
|
|
}
|
|
|
|
READ(dev->accel.dest + dev->accel.dx, dest_dat);
|
|
|
|
if ((compare_mode == 0) ||
|
|
((compare_mode == 0x10) && (dest_dat >= compare)) ||
|
|
((compare_mode == 0x18) && (dest_dat < compare)) ||
|
|
((compare_mode == 0x20) && (dest_dat != compare)) ||
|
|
((compare_mode == 0x28) && (dest_dat == compare)) ||
|
|
((compare_mode == 0x30) && (dest_dat <= compare)) ||
|
|
((compare_mode == 0x38) && (dest_dat > compare))) {
|
|
old_dest_dat = dest_dat;
|
|
MIX(mix_dat & 1, dest_dat, src_dat);
|
|
dest_dat = (dest_dat & wrt_mask) | (old_dest_dat & ~wrt_mask);
|
|
|
|
WRITE(dev->accel.dest + dev->accel.dx, dest_dat);
|
|
}
|
|
}
|
|
dev->accel.temp_cnt--;
|
|
mix_dat >>= 1;
|
|
|
|
if (dev->accel.cmd & 0x20) {
|
|
dev->accel.dx++;
|
|
dev->accel.cx++;
|
|
} else {
|
|
dev->accel.dx--;
|
|
dev->accel.cx--;
|
|
}
|
|
|
|
dev->accel.sx--;
|
|
if (dev->accel.sx < 0) {
|
|
dev->accel.sx = dev->accel.maj_axis_pcnt & 0x7ff;
|
|
|
|
if (dev->accel.cmd & 0x20) {
|
|
dev->accel.dx -= (dev->accel.sx) + 1;
|
|
dev->accel.cx -= (dev->accel.sx) + 1;
|
|
} else {
|
|
dev->accel.dx += (dev->accel.sx) + 1;
|
|
dev->accel.cx += (dev->accel.sx) + 1;
|
|
}
|
|
|
|
if (dev->accel.cmd & 0x80) {
|
|
dev->accel.dy++;
|
|
dev->accel.cy++;
|
|
} else {
|
|
dev->accel.dy--;
|
|
dev->accel.cy--;
|
|
}
|
|
|
|
dev->accel.dest = dev->accel.dy * dev->h_disp;
|
|
dev->accel.src = dev->accel.cy * dev->h_disp;
|
|
dev->accel.sy--;
|
|
|
|
if (dev->accel.sy < 0) {
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
} else {
|
|
while (count-- && dev->accel.sy >= 0) {
|
|
if ((dev->accel.dx >= dev->accel.clip_left && dev->accel.dx <= clip_r &&
|
|
dev->accel.dy >= dev->accel.clip_top && dev->accel.dy <= clip_b)) {
|
|
if (pixcntl == 3) {
|
|
if (!(dev->accel.cmd & 0x10) && ((frgd_mix != 3) || (bkgd_mix != 3))) {
|
|
READ(dev->accel.src + dev->accel.cx, mix_dat);
|
|
mix_dat = ((mix_dat & rd_mask) == rd_mask);
|
|
mix_dat = mix_dat ? mix_mask : 0;
|
|
} else if (dev->accel.cmd & 0x10) {
|
|
READ(dev->accel.src + dev->accel.cx, mix_dat);
|
|
mix_dat = ((mix_dat & rd_mask) == rd_mask);
|
|
mix_dat = mix_dat ? mix_mask : 0;
|
|
}
|
|
}
|
|
switch ((mix_dat & mix_mask) ? frgd_mix : bkgd_mix) {
|
|
case 0: src_dat = bkgd_color; break;
|
|
case 1: src_dat = frgd_color; break;
|
|
case 2: src_dat = 0; break;
|
|
case 3: READ(dev->accel.src + dev->accel.cx, src_dat);
|
|
if (pixcntl == 3) {
|
|
if (dev->accel.cmd & 0x10) {
|
|
src_dat = ((src_dat & rd_mask) == rd_mask);
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
|
|
READ(dev->accel.dest + dev->accel.dx, dest_dat);
|
|
|
|
if ((compare_mode == 0) ||
|
|
((compare_mode == 0x10) && (dest_dat >= compare)) ||
|
|
((compare_mode == 0x18) && (dest_dat < compare)) ||
|
|
((compare_mode == 0x20) && (dest_dat != compare)) ||
|
|
((compare_mode == 0x28) && (dest_dat == compare)) ||
|
|
((compare_mode == 0x30) && (dest_dat <= compare)) ||
|
|
((compare_mode == 0x38) && (dest_dat > compare))) {
|
|
old_dest_dat = dest_dat;
|
|
MIX(mix_dat & mix_mask, dest_dat, src_dat);
|
|
dest_dat = (dest_dat & wrt_mask) | (old_dest_dat & ~wrt_mask);
|
|
|
|
WRITE(dev->accel.dest + dev->accel.dx, dest_dat);
|
|
}
|
|
}
|
|
mix_dat <<= 1;
|
|
mix_dat |= 1;
|
|
|
|
if (dev->accel.cmd & 0x20) {
|
|
dev->accel.dx++;
|
|
dev->accel.cx++;
|
|
} else {
|
|
dev->accel.dx--;
|
|
dev->accel.cx--;
|
|
}
|
|
|
|
dev->accel.sx--;
|
|
if (dev->accel.sx < 0) {
|
|
dev->accel.sx = dev->accel.maj_axis_pcnt & 0x7ff;
|
|
|
|
if (dev->accel.cmd & 0x20) {
|
|
dev->accel.dx -= (dev->accel.sx) + 1;
|
|
dev->accel.cx -= (dev->accel.sx) + 1;
|
|
} else {
|
|
dev->accel.dx += (dev->accel.sx) + 1;
|
|
dev->accel.cx += (dev->accel.sx) + 1;
|
|
}
|
|
|
|
if (dev->accel.cmd & 0x80) {
|
|
dev->accel.dy++;
|
|
dev->accel.cy++;
|
|
} else {
|
|
dev->accel.dy--;
|
|
dev->accel.cy--;
|
|
}
|
|
|
|
dev->accel.dest = dev->accel.dy * dev->h_disp;
|
|
dev->accel.src = dev->accel.cy * dev->h_disp;
|
|
dev->accel.sy--;
|
|
|
|
if (dev->accel.sy < 0) {
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
|
|
static void
|
|
ibm8514_render_8bpp(svga_t *svga)
|
|
{
|
|
ibm8514_t *dev = &svga->dev8514;
|
|
int x;
|
|
uint32_t *p;
|
|
uint32_t dat;
|
|
|
|
if ((dev->displine + svga->y_add) < 0) {
|
|
return;
|
|
}
|
|
|
|
if (dev->changedvram[dev->ma >> 12] || dev->changedvram[(dev->ma >> 12) + 1] || svga->fullchange) {
|
|
p = &buffer32->line[dev->displine + svga->y_add][svga->x_add];
|
|
|
|
if (dev->firstline_draw == 2000)
|
|
dev->firstline_draw = dev->displine;
|
|
dev->lastline_draw = dev->displine;
|
|
|
|
for (x = 0; x <= dev->h_disp; x += 8) {
|
|
dat = *(uint32_t *)(&dev->vram[dev->ma & dev->vram_mask]);
|
|
p[0] = dev->map8[dat & 0xff];
|
|
p[1] = dev->map8[(dat >> 8) & 0xff];
|
|
p[2] = dev->map8[(dat >> 16) & 0xff];
|
|
p[3] = dev->map8[(dat >> 24) & 0xff];
|
|
|
|
dat = *(uint32_t *)(&dev->vram[(dev->ma + 4) & dev->vram_mask]);
|
|
p[4] = dev->map8[dat & 0xff];
|
|
p[5] = dev->map8[(dat >> 8) & 0xff];
|
|
p[6] = dev->map8[(dat >> 16) & 0xff];
|
|
p[7] = dev->map8[(dat >> 24) & 0xff];
|
|
|
|
dev->ma += 8;
|
|
p += 8;
|
|
}
|
|
dev->ma &= dev->vram_mask;
|
|
}
|
|
}
|
|
|
|
static void
|
|
ibm8514_render_overscan_left(ibm8514_t *dev, svga_t *svga)
|
|
{
|
|
int i;
|
|
|
|
if ((dev->displine + svga->y_add) < 0)
|
|
return;
|
|
|
|
if (svga->scrblank || (dev->h_disp == 0))
|
|
return;
|
|
|
|
for (i = 0; i < svga->x_add; i++)
|
|
buffer32->line[dev->displine + svga->y_add][i] = svga->overscan_color;
|
|
}
|
|
|
|
|
|
static void
|
|
ibm8514_render_overscan_right(ibm8514_t *dev, svga_t *svga)
|
|
{
|
|
int i, right;
|
|
|
|
if ((dev->displine + svga->y_add) < 0)
|
|
return;
|
|
|
|
if (svga->scrblank || (dev->h_disp == 0))
|
|
return;
|
|
|
|
right = (overscan_x >> 1);
|
|
for (i = 0; i < right; i++)
|
|
buffer32->line[dev->displine + svga->y_add][svga->x_add + dev->h_disp + i] = svga->overscan_color;
|
|
}
|
|
|
|
void
|
|
ibm8514_poll(ibm8514_t *dev, svga_t *svga)
|
|
{
|
|
uint32_t x;
|
|
int wx, wy;
|
|
|
|
if (!dev->linepos) {
|
|
timer_advance_u64(&svga->timer, svga->dispofftime);
|
|
dev->linepos = 1;
|
|
|
|
if (dev->dispon) {
|
|
dev->hdisp_on = 1;
|
|
|
|
dev->ma &= dev->vram_mask;
|
|
|
|
if (dev->firstline == 2000) {
|
|
dev->firstline = dev->displine;
|
|
video_wait_for_buffer();
|
|
}
|
|
|
|
ibm8514_render_8bpp(svga);
|
|
|
|
svga->x_add = (overscan_x >> 1);
|
|
ibm8514_render_overscan_left(dev, svga);
|
|
ibm8514_render_overscan_right(dev, svga);
|
|
svga->x_add = (overscan_x >> 1);
|
|
|
|
if (dev->lastline < dev->displine)
|
|
dev->lastline = dev->displine;
|
|
}
|
|
|
|
dev->displine++;
|
|
if (dev->interlace)
|
|
dev->displine++;
|
|
if (dev->displine > 1500)
|
|
dev->displine = 0;
|
|
} else {
|
|
timer_advance_u64(&svga->timer, svga->dispontime);
|
|
dev->hdisp_on = 0;
|
|
|
|
dev->linepos = 0;
|
|
if (dev->dispon) {
|
|
if (dev->sc == dev->rowcount) {
|
|
dev->linecountff = 0;
|
|
dev->sc = 0;
|
|
|
|
dev->maback += (dev->rowoffset << 3);
|
|
if (dev->interlace)
|
|
dev->maback += (dev->rowoffset << 3);
|
|
dev->maback &= dev->vram_mask;
|
|
dev->ma = dev->maback;
|
|
} else {
|
|
dev->linecountff = 0;
|
|
dev->sc++;
|
|
dev->sc &= 31;
|
|
dev->ma = dev->maback;
|
|
}
|
|
}
|
|
|
|
dev->vc++;
|
|
dev->vc &= 2047;
|
|
|
|
if (dev->vc == dev->dispend) {
|
|
dev->dispon = 0;
|
|
|
|
for (x = 0; x < ((dev->vram_mask + 1) >> 12); x++) {
|
|
if (dev->changedvram[x])
|
|
dev->changedvram[x]--;
|
|
}
|
|
|
|
if (svga->fullchange)
|
|
svga->fullchange--;
|
|
}
|
|
if (dev->vc == dev->v_syncstart) {
|
|
dev->dispon = 0;
|
|
x = dev->h_disp;
|
|
|
|
if (dev->interlace && !dev->oddeven)
|
|
dev->lastline++;
|
|
if (dev->interlace && dev->oddeven)
|
|
dev->firstline--;
|
|
|
|
wx = x;
|
|
|
|
wy = dev->lastline - dev->firstline;
|
|
svga_doblit(wx, wy, svga);
|
|
|
|
dev->firstline = 2000;
|
|
dev->lastline = 0;
|
|
|
|
dev->firstline_draw = 2000;
|
|
dev->lastline_draw = 0;
|
|
|
|
dev->oddeven ^= 1;
|
|
|
|
changeframecount = dev->interlace ? 3 : 2;
|
|
|
|
if (dev->interlace && dev->oddeven)
|
|
dev->ma = dev->maback = 0 + (dev->rowoffset << 1);
|
|
else
|
|
dev->ma = dev->maback = 0;
|
|
|
|
dev->ma = (dev->ma << 2);
|
|
dev->maback = (dev->maback << 2);
|
|
}
|
|
if (dev->vc == dev->v_total) {
|
|
dev->vc = 0;
|
|
dev->sc = 0;
|
|
dev->dispon = 1;
|
|
dev->displine = (dev->interlace && dev->oddeven) ? 1 : 0;
|
|
|
|
svga->x_add = (overscan_x >> 1);
|
|
|
|
dev->linecountff = 0;
|
|
}
|
|
}
|
|
}
|
|
|
|
void
|
|
ibm8514_recalctimings(svga_t *svga)
|
|
{
|
|
ibm8514_t *dev = &svga->dev8514;
|
|
|
|
dev->h_disp_time = dev->h_disp = (dev->hdisp + 1) << 3;
|
|
dev->rowoffset = (dev->hdisp + 1);
|
|
dev->h_total = (dev->htotal + 1);
|
|
dev->v_total = (dev->vtotal + 1);
|
|
dev->v_syncstart = (dev->vsyncstart + 1);
|
|
dev->rowcount = !!(dev->disp_cntl & 0x08);
|
|
|
|
if (dev->accel.advfunc_cntl & 4) {
|
|
if (dev->hdisp == 0) {
|
|
dev->rowoffset = 128;
|
|
dev->h_disp = 1024;
|
|
}
|
|
|
|
if (dev->vtotal == 0)
|
|
dev->v_total = 1632;
|
|
|
|
if (dev->vsyncstart == 0)
|
|
dev->v_syncstart = 1536;
|
|
|
|
if (dev->interlace) {
|
|
dev->dispend = 384; /*Interlaced*/
|
|
dev->v_total >>= 2;
|
|
dev->v_syncstart >>= 2;
|
|
} else {
|
|
dev->dispend = 768;
|
|
dev->v_total >>= 1;
|
|
dev->v_syncstart >>= 1;
|
|
}
|
|
//pclog("1024x768 clock mode, hdisp = %d, htotal = %d, vtotal = %d, vsyncstart = %d, interlace = %02x\n", dev->h_disp, dev->h_total, dev->v_total, dev->v_syncstart, dev->interlace);
|
|
svga->clock = (cpuclock * (double)(1ull << 32)) / 44900000.0;
|
|
} else {
|
|
//pclog("640x480 clock mode\n");
|
|
dev->dispend = 480;
|
|
dev->v_total >>= 1;
|
|
dev->v_syncstart >>= 1;
|
|
svga->clock = (cpuclock * (double)(1ull << 32)) / 25175000.0;
|
|
}
|
|
//pclog("8514 enabled, hdisp=%d, vtotal=%d, htotal=%d, dispend=%d, rowoffset=%d, split=%d, vsyncstart=%d, split=%08x\n", dev->hdisp, dev->vtotal, dev->htotal, dev->dispend, dev->rowoffset, dev->split, dev->vsyncstart, dev->split);
|
|
}
|
|
|
|
static uint8_t
|
|
ibm8514_mca_read(int port, void *priv)
|
|
{
|
|
svga_t *svga = (svga_t *)priv;
|
|
ibm8514_t *dev = &svga->dev8514;
|
|
|
|
return(dev->pos_regs[port & 7]);
|
|
}
|
|
|
|
|
|
static void
|
|
ibm8514_mca_write(int port, uint8_t val, void *priv)
|
|
{
|
|
svga_t *svga = (svga_t *)priv;
|
|
ibm8514_t *dev = &svga->dev8514;
|
|
|
|
/* MCA does not write registers below 0x0100. */
|
|
if (port < 0x0102) return;
|
|
|
|
/* Save the MCA register value. */
|
|
dev->pos_regs[port & 7] = val;
|
|
}
|
|
|
|
|
|
static uint8_t
|
|
ibm8514_mca_feedb(void *priv)
|
|
{
|
|
svga_t *svga = (svga_t *)priv;
|
|
ibm8514_t *dev = &svga->dev8514;
|
|
|
|
return dev->pos_regs[2] & 1;
|
|
}
|
|
|
|
|
|
static void
|
|
*ibm8514_init(const device_t *info)
|
|
{
|
|
svga_t *svga = svga_get_pri();
|
|
ibm8514_t *dev = &svga->dev8514;
|
|
|
|
dev->vram_size = 1024 << 10;
|
|
dev->vram = calloc(dev->vram_size, 1);
|
|
dev->changedvram = calloc(dev->vram_size >> 12, 1);
|
|
dev->vram_mask = dev->vram_size - 1;
|
|
dev->map8 = svga->pallook;
|
|
|
|
dev->type = info->flags;
|
|
|
|
ibm8514_io_set(svga);
|
|
|
|
if (info->flags & DEVICE_MCA) {
|
|
dev->pos_regs[0] = 0x7f;
|
|
dev->pos_regs[1] = 0xef;
|
|
mca_add(ibm8514_mca_read, ibm8514_mca_write, ibm8514_mca_feedb, NULL, svga);
|
|
}
|
|
|
|
return svga;
|
|
}
|
|
|
|
static void
|
|
ibm8514_close(void *p)
|
|
{
|
|
svga_t *svga = (svga_t *)p;
|
|
ibm8514_t *dev = &svga->dev8514;
|
|
|
|
if (dev) {
|
|
free(dev->vram);
|
|
free(dev->changedvram);
|
|
}
|
|
}
|
|
|
|
static void
|
|
ibm8514_speed_changed(void *p)
|
|
{
|
|
svga_t *svga = (svga_t *)p;
|
|
|
|
svga_recalctimings(svga);
|
|
}
|
|
|
|
static void
|
|
ibm8514_force_redraw(void *p)
|
|
{
|
|
svga_t *svga = (svga_t *)p;
|
|
|
|
svga->fullchange = changeframecount;
|
|
}
|
|
|
|
// clang-format off
|
|
const device_t gen8514_isa_device = {
|
|
.name = "Generic 8514/A clone (ISA)",
|
|
.internal_name = "8514_isa",
|
|
.flags = DEVICE_AT | DEVICE_ISA,
|
|
.local = 0,
|
|
.init = ibm8514_init,
|
|
.close = ibm8514_close,
|
|
.reset = NULL,
|
|
{ .available = NULL },
|
|
.speed_changed = ibm8514_speed_changed,
|
|
.force_redraw = ibm8514_force_redraw,
|
|
.config = NULL
|
|
};
|
|
|
|
const device_t ibm8514_mca_device = {
|
|
.name = "IBM 8514/A (MCA)",
|
|
.internal_name = "8514_mca",
|
|
.flags = DEVICE_MCA,
|
|
.local = 0,
|
|
.init = ibm8514_init,
|
|
.close = ibm8514_close,
|
|
.reset = NULL,
|
|
{ .available = NULL },
|
|
.speed_changed = ibm8514_speed_changed,
|
|
.force_redraw = ibm8514_force_redraw,
|
|
.config = NULL
|
|
};
|
|
|
|
|
|
void
|
|
ibm8514_device_add(void)
|
|
{
|
|
if (!ibm8514_enabled)
|
|
return;
|
|
|
|
if (machine_has_bus(machine, MACHINE_BUS_MCA))
|
|
device_add(&ibm8514_mca_device);
|
|
else
|
|
device_add(&gen8514_isa_device);
|
|
}
|