#include <stdlib.h>
#include <string.h>
#include <time.h>
-#include "irtg_structs.h"
#include "config_file/config_file.h"
+#include "gpio/ps_protocol.h"
+#include "platforms/amiga/rtg/irtg_structs.h"
#include "rtg.h"
#include "m68k.h"
+void rtg_p2c_ex(int16_t sx, int16_t sy, int16_t dx, int16_t dy, int16_t w, int16_t h, uint8_t minterm, struct BitMap *bm, uint8_t mask, uint16_t dst_pitch, uint16_t src_pitch);
+
uint8_t rtg_u8[4];
uint16_t rtg_x[8], rtg_y[8];
uint16_t rtg_user[8];
uint8_t realtime_graphics_debug = 0;
extern int cpu_emulation_running;
extern struct emulator_config *cfg;
-extern uint8_t rtg_on;
+extern uint8_t rtg_on, rtg_output_in_vblank;
//#define DEBUG_RTG
unsigned int rtg_read(uint32_t address, uint8_t mode) {
//printf("%s read from RTG: %.8X\n", op_type_names[mode], address);
- if (address == RTG_COMMAND) {
- return 0xFFCF;
- }
if (address >= PIGFX_REG_SIZE) {
if (rtg_mem && (address - PIGFX_REG_SIZE) < PIGFX_UPPER) {
switch (mode) {
}
}
}
+ switch (address) {
+ case RTG_COMMAND:
+ return 0xFFCF;
+ case RTG_WAITVSYNC:
+ // fallthrough
+ case RTG_INVBLANK:
+ return !rtg_on || rtg_output_in_vblank;
+ default:
+ break;
+ }
return 0;
}
gdebug("iBlitRectNoMaskComplete end\n");
break;
}
+ case RTGCMD_BLITTEMPLATE: {
+ // A0: BoardInfo *b, A1: RenderInfo *r, A2: Template *t
+ // D0: WORD x, D1: WORD y, D2: WORD w, D3: WORD h
+ // D4: UBYTE mask, D7: RGBFTYPE format
+ if (!r || !M68KR(M68K_REG_A2))
+ break;
+ gdebug("iBlitTemplate begin\n");
+
+ uint16_t t_pitch = 0, x_offset = 0;
+ uint32_t src_addr = M68KR(M68K_REG_A2);
+ uint32_t fgcol = 0, bgcol = 0;
+ uint8_t draw_mode = 0;
+
+ struct P96Template *t = (struct P96Template *)get_mapped_data_pointer_by_address(cfg, M68KR(M68K_REG_A2));
+ if (t) {
+ t_pitch = be16toh(t->BytesPerRow);
+ fgcol = be32toh(t->FgPen);
+ bgcol = be32toh(t->BgPen);
+ x_offset = t->XOffset;
+ draw_mode = t->DrawMode;
+ src_addr = be32toh(t->_p_Memory);
+ } else {
+ t_pitch = be16toh(ps_read_16(src_addr + (uint32_t)&t->BytesPerRow));
+ fgcol = be32toh(ps_read_32(src_addr + (uint32_t)&t->FgPen));
+ bgcol = be32toh(ps_read_32(src_addr + (uint32_t)&t->BgPen));
+ x_offset = ps_read_8(src_addr + (uint32_t)&t->XOffset);
+ draw_mode = ps_read_8(src_addr + (uint32_t)&t->DrawMode);
+ src_addr = be32toh(ps_read_32(src_addr + (uint32_t)&t->_p_Memory));
+ }
+
+ cmd_mask = (uint8_t)M68KR(M68K_REG_D4);
+ rtg_address[1] = be32toh(r->_p_Memory);
+ rtg_address_adj[1] = rtg_address[1] - (PIGFX_RTG_BASE + PIGFX_REG_SIZE);
+
+ rtg_blittemplate(M68KR(M68K_REG_D0), M68KR(M68K_REG_D1), M68KR(M68K_REG_D2), M68KR(M68K_REG_D3), src_addr, fgcol, bgcol, CMD_PITCH, t_pitch, RGBF_D7, x_offset, cmd_mask, draw_mode);
+ gdebug("iBlitTemplate end\n");
+ break;
+ }
+ case RTGCMD_BLITPATTERN: {
+ // A0: BoardInfo *b, A1: RenderInfo *r, A2: Pattern *p
+ // D0: WORD x, D1: WORD y, D2: WORD w, D3: WORD h
+ // D4: UBYTE mask, D7: RGBFTYPE format
+ if (!r || !M68KR(M68K_REG_A2))
+ break;
+ gdebug("iBlitPattern begin\n");
+
+ uint16_t x_offset = 0, y_offset = 0;
+ uint32_t src_addr = M68KR(M68K_REG_A2);
+ uint32_t fgcol = 0, bgcol = 0;
+ uint8_t draw_mode = 0, loop_rows = 0;
+
+ struct P96Pattern *p = (struct P96Pattern *)get_mapped_data_pointer_by_address(cfg, M68KR(M68K_REG_A2));
+ if (p) {
+ fgcol = be32toh(p->FgPen);
+ bgcol = be32toh(p->BgPen);
+ x_offset = be16toh(p->XOffset);
+ y_offset = be16toh(p->YOffset);
+ draw_mode = p->DrawMode;
+ loop_rows = 1 << p->Size;
+ src_addr = be32toh(p->_p_Memory);
+ } else {
+ fgcol = be32toh(ps_read_32(src_addr + (uint32_t)&p->FgPen));
+ bgcol = be32toh(ps_read_32(src_addr + (uint32_t)&p->BgPen));
+ x_offset = be16toh(ps_read_16(src_addr + (uint32_t)&p->XOffset));
+ y_offset = be16toh(ps_read_16(src_addr + (uint32_t)&p->YOffset));
+ draw_mode = ps_read_8(src_addr + (uint32_t)&p->DrawMode);
+ loop_rows = 1 << ps_read_8(src_addr + (uint32_t)&p->Size);
+ src_addr = be32toh(p->_p_Memory);
+ }
+
+ cmd_mask = (uint8_t)M68KR(M68K_REG_D4);
+ rtg_address[1] = be32toh(r->_p_Memory);
+ rtg_address_adj[1] = rtg_address[1] - (PIGFX_RTG_BASE + PIGFX_REG_SIZE);
+
+ rtg_blitpattern(M68KR(M68K_REG_D0), M68KR(M68K_REG_D1), M68KR(M68K_REG_D2), M68KR(M68K_REG_D3), src_addr, fgcol, bgcol, CMD_PITCH, RGBF_D7, x_offset, y_offset, cmd_mask, draw_mode, loop_rows);
+ gdebug("iBlitPattern end\n");
+ break;
+ }
+ case RTGCMD_P2C: {
+ // A0: BoardInfo, A1: BitMap *bm, A2: RenderInfo *r,
+ // D0: SHORT x, D1: SHORT y, D2: SHORT dx, D3: SHORT dy, D4: SHORT w, D5: SHORT h,
+ // D6: UBYTE minterm, D7: UBYTE mask
+ r = (struct P96RenderInfo *)get_mapped_data_pointer_by_address(cfg, M68KR(M68K_REG_A2));
+ struct BitMap *bm = (struct BitMap *)get_mapped_data_pointer_by_address(cfg, M68KR(M68K_REG_A1));
+ if (!r || !bm)
+ break;
+
+ gdebug("iP2C begin\n");
+
+ if (!bm) {
+ printf ("Help! BitMap not in mapped memory.\n");
+ break;
+ } else {
+ gdebug("Data is available in mapped memory.\n");
+ }
+
+ if (realtime_graphics_debug) {
+ printf("bm: %.8X r: %.8X\n", (uint32_t)bm, (uint32_t)r);
+ if (bm)
+ printf("bm pitch: %d\n", be16toh(bm->BytesPerRow));
+ if (r)
+ printf("r pitch: %d\n", be16toh(r->BytesPerRow));
+ }
+
+ uint16_t bmp_pitch = be16toh(bm->BytesPerRow);
+ uint16_t line_pitch = be16toh(r->BytesPerRow);
+ rtg_address_adj[0] = be32toh(r->_p_Memory) - (PIGFX_RTG_BASE + PIGFX_REG_SIZE);
+
+ uint8_t minterm = (uint8_t)M68KR(M68K_REG_D6);
+ cmd_mask = (uint8_t)M68KR(M68K_REG_D7);
+
+ rtg_p2c_ex(M68KR(M68K_REG_D0), M68KR(M68K_REG_D1), M68KR(M68K_REG_D2), M68KR(M68K_REG_D3), M68KR(M68K_REG_D4), M68KR(M68K_REG_D5), minterm, bm, cmd_mask, line_pitch, bmp_pitch);
+ gdebug("iP2C end\n");
+ break;
+ }
default:
printf("[!!!IRTG] Unnkonw/unhandled iRTG command %d.\n", cmd);
break;