+// SPDX-License-Identifier: MIT
+
#include <stdint.h>
#include <endian.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
+#include "config_file/config_file.h"
#include "rtg.h"
-#include "../../../config_file/config_file.h"
-
-static uint16_t palette[256];
-static uint8_t rtg_u8[4];
-static uint16_t rtg_x[3], rtg_y[3];
-static uint16_t rtg_format;
-static uint32_t rtg_address[2];
-static uint32_t rtg_rgb[2];
+uint8_t rtg_u8[4];
+uint16_t rtg_x[8], rtg_y[8];
+uint16_t rtg_user[8];
+uint16_t rtg_format;
+uint32_t rtg_address[8];
+uint32_t rtg_address_adj[8];
+uint32_t rtg_rgb[8];
-static uint8_t display_enabled;
+static uint8_t display_enabled = 0xFF;
uint16_t rtg_display_width, rtg_display_height;
uint16_t rtg_display_format;
uint8_t *rtg_mem; // FIXME
-uint32_t framebuffer_addr;
+uint32_t framebuffer_addr = 0;
+uint32_t framebuffer_addr_adj = 0;
static void handle_rtg_command(uint32_t cmd);
-static struct timespec f1, f2;
+//static struct timespec f1, f2;
+
+uint8_t realtime_graphics_debug = 0;
+extern int cpu_emulation_running;
+extern struct emulator_config *cfg;
+extern uint8_t rtg_on;
+/*
static const char *op_type_names[OP_TYPE_NUM] = {
"BYTE",
"WORD",
"32BPP RGB (RGBA)",
"15BPP RGB (555)",
};
-
-int init_rtg_data() {
- rtg_mem = calloc(1, 32 * SIZE_MEGA);
+*/
+int init_rtg_data(struct emulator_config *cfg_) {
+ rtg_mem = calloc(1, 40 * SIZE_MEGA);
if (!rtg_mem) {
printf("Failed to allocate RTG video memory.\n");
return 0;
}
+ m68k_add_ram_range(PIGFX_RTG_BASE + PIGFX_REG_SIZE, PIGFX_RTG_SIZE - PIGFX_REG_SIZE, rtg_mem);
+ add_mapping(cfg_, MAPTYPE_RAM_NOALLOC, PIGFX_RTG_BASE + PIGFX_REG_SIZE, PIGFX_RTG_SIZE - PIGFX_REG_SIZE, -1, (char *)rtg_mem, "rtg_mem");
return 1;
}
-extern uint8_t busy, rtg_on;
-void rtg_update_screen();
+void shutdown_rtg() {
+ printf("[RTG] Shutting down RTG.\n");
+ if (rtg_on) {
+ rtg_on = 0;
+ }
+ if (rtg_mem) {
+
+ free(rtg_mem);
+ rtg_mem = NULL;
+ }
+}
+
+//void rtg_update_screen();
+
+unsigned int rtg_get_fb() {
+ return PIGFX_RTG_BASE + PIGFX_REG_SIZE + framebuffer_addr_adj;
+}
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) {
+ if (rtg_mem && (address - PIGFX_REG_SIZE) < PIGFX_UPPER) {
switch (mode) {
case OP_TYPE_BYTE:
return (rtg_mem[address - PIGFX_REG_SIZE]);
break;
case OP_TYPE_WORD:
- return *(( uint16_t *) (&rtg_mem[address - PIGFX_REG_SIZE]));
+ return be16toh(*(( uint16_t *) (&rtg_mem[address - PIGFX_REG_SIZE])));
break;
case OP_TYPE_LONGWORD:
- return *(( uint32_t *) (&rtg_mem[address - PIGFX_REG_SIZE]));
+ return be32toh(*(( uint32_t *) (&rtg_mem[address - PIGFX_REG_SIZE])));
break;
default:
return 0;
return temp;
}
+#define CHKREG(a, b) case a: b = value; break;
+
void rtg_write(uint32_t address, uint32_t value, uint8_t mode) {
//printf("%s write to RTG: %.8X (%.8X)\n", op_type_names[mode], address, value);
if (address >= PIGFX_REG_SIZE) {
- if (rtg_mem) {
+ /*if ((address - PIGFX_REG_SIZE) < framebuffer_addr) {// || (address - PIGFX_REG_SIZE) > framebuffer_addr + ((rtg_display_width << rtg_display_format) * rtg_display_height)) {
+ printf("Write to RTG memory outside frame buffer %.8X (%.8X).\n", (address - PIGFX_REG_SIZE), framebuffer_addr);
+ }*/
+ if (rtg_mem && (address - PIGFX_REG_SIZE) < PIGFX_UPPER) {
switch (mode) {
case OP_TYPE_BYTE:
rtg_mem[address - PIGFX_REG_SIZE] = value;
break;
case OP_TYPE_WORD:
- *(( uint16_t *) (&rtg_mem[address - PIGFX_REG_SIZE])) = value;
+ *(( uint16_t *) (&rtg_mem[address - PIGFX_REG_SIZE])) = htobe16(value);
break;
case OP_TYPE_LONGWORD:
- *(( uint32_t *) (&rtg_mem[address - PIGFX_REG_SIZE])) = value;
+ *(( uint32_t *) (&rtg_mem[address - PIGFX_REG_SIZE])) = htobe32(value);
break;
default:
return;
switch (mode) {
case OP_TYPE_BYTE:
switch (address) {
- case RTG_U81:
- case RTG_U82:
- case RTG_U83:
- case RTG_U84:
- rtg_u8[address - RTG_U81] = value;
+ CHKREG(RTG_U81, rtg_u8[0]);
+ CHKREG(RTG_U82, rtg_u8[1]);
+ CHKREG(RTG_U83, rtg_u8[2]);
+ CHKREG(RTG_U84, rtg_u8[3]);
}
break;
case OP_TYPE_WORD:
switch (address) {
- case RTG_X1:
- rtg_x[0] = value;
- break;
- case RTG_X2:
- rtg_x[1] = value;
- break;
- case RTG_X3:
- rtg_x[2] = value;
- break;
- case RTG_Y1:
- rtg_y[0] = value;
- break;
- case RTG_Y2:
- rtg_y[1] = value;
- break;
- case RTG_Y3:
- rtg_y[2] = value;
- break;
- case RTG_FORMAT:
- rtg_format = value;
- break;
+ CHKREG(RTG_X1, rtg_x[0]);
+ CHKREG(RTG_X2, rtg_x[1]);
+ CHKREG(RTG_X3, rtg_x[2]);
+ CHKREG(RTG_X4, rtg_x[3]);
+ CHKREG(RTG_X5, rtg_x[4]);
+ CHKREG(RTG_Y1, rtg_y[0]);
+ CHKREG(RTG_Y2, rtg_y[1]);
+ CHKREG(RTG_Y3, rtg_y[2]);
+ CHKREG(RTG_Y4, rtg_y[3]);
+ CHKREG(RTG_Y5, rtg_y[4]);
+ CHKREG(RTG_U1, rtg_user[0]);
+ CHKREG(RTG_U2, rtg_user[1]);
+ CHKREG(RTG_FORMAT, rtg_format);
case RTG_COMMAND:
handle_rtg_command(value);
break;
switch (address) {
case RTG_ADDR1:
rtg_address[0] = value;
+ rtg_address_adj[0] = value - (PIGFX_RTG_BASE + PIGFX_REG_SIZE);
break;
case RTG_ADDR2:
rtg_address[1] = value;
+ rtg_address_adj[1] = value - (PIGFX_RTG_BASE + PIGFX_REG_SIZE);
break;
- case RTG_RGB1:
- rtg_rgb[0] = value;
- break;
- case RTG_RGB2:
- rtg_rgb[1] = value;
- break;
+ CHKREG(RTG_ADDR3, rtg_address[2]);
+ CHKREG(RTG_ADDR4, rtg_address[3]);
+ CHKREG(RTG_RGB1, rtg_rgb[0]);
+ CHKREG(RTG_RGB2, rtg_rgb[1]);
}
break;
}
}
- if (rtg_on) {
- clock_gettime(CLOCK_PROCESS_CPUTIME_ID, &f2);
- if (diff(f1,f2).tv_nsec / 1000000.0 > 100.00) {
- rtg_update_screen();
- f1 = f2;
- }
- }
-
return;
}
+#define gdebug(a) if (realtime_graphics_debug) { printf(a); m68k_end_timeslice(); cpu_emulation_running = 0; }
+
static void handle_rtg_command(uint32_t cmd) {
- //printf("Handling RTG command %d (%.8X)\n", cmd, cmd);
+ //printf("Handling RTG command %d (%.8X)\n", cmd, cmd);
switch (cmd) {
case RTGCMD_SETGC:
rtg_display_format = rtg_format;
rtg_display_width = rtg_x[0];
rtg_display_height = rtg_y[0];
if (rtg_u8[0]) {
- rtg_pitch = rtg_x[1];
+ //rtg_pitch = rtg_display_width << rtg_format;
+ framebuffer_addr_adj = framebuffer_addr + (rtg_offset_x << rtg_display_format) + (rtg_offset_y * rtg_pitch);
rtg_total_rows = rtg_y[1];
}
else {
- rtg_pitch = rtg_x[1];
+ //rtg_pitch = rtg_display_width << rtg_format;
+ framebuffer_addr_adj = framebuffer_addr + (rtg_offset_x << rtg_display_format) + (rtg_offset_y * rtg_pitch);
rtg_total_rows = rtg_y[1];
}
//printf("Set RTG mode:\n");
break;
case RTGCMD_SETPAN:
//printf("Command: SetPan.\n");
- framebuffer_addr = rtg_address[0] - (PIGFX_RTG_BASE + PIGFX_REG_SIZE);
rtg_offset_x = rtg_x[1];
rtg_offset_y = rtg_y[1];
rtg_pitch = (rtg_x[0] << rtg_display_format);
- //printf("Set panning to $%.8X\n", framebuffer_addr);
+ framebuffer_addr = rtg_address[0] - (PIGFX_RTG_BASE + PIGFX_REG_SIZE);
+ framebuffer_addr_adj = framebuffer_addr + (rtg_offset_x << rtg_display_format) + (rtg_offset_y * rtg_pitch);
+ //printf("Set panning to $%.8X (%.8X)\n", framebuffer_addr, rtg_address[0]);
+ //printf("(Panned: $%.8X)\n", framebuffer_addr_adj);
//printf("Offset X/Y: %d/%d\n", rtg_offset_x, rtg_offset_y);
//printf("Pitch: %d (%d bytes)\n", rtg_x[0], rtg_pitch);
break;
case RTGCMD_SETCLUT: {
//printf("Command: SetCLUT.\n");
//printf("Set palette entry %d to %d, %d, %d\n", rtg_u8[0], rtg_u8[1], rtg_u8[2], rtg_u8[3]);
- /*int r = (int)((float)rtg_u8[1] / 255.0f * 31.0f);
- int g = (int)((float)rtg_u8[2] / 255.0f * 63.0f);
- int b = (int)((float)rtg_u8[3] / 255.0f * 31.0f);
- palette[rtg_u8[0]] = ((r & 0x1F) << 11) | ((g & 0x3F) << 6) | (b & 0x1F);*/
- rtg_set_clut_entry(rtg_u8[0], rtg_u8[1], rtg_u8[2], rtg_u8[3]);
+ //printf("Set palette entry %d to 32-bit palette color: %.8X\n", rtg_u8[0], rtg_rgb[0]);
+ rtg_set_clut_entry(rtg_u8[0], rtg_rgb[0]);
break;
}
case RTGCMD_SETDISPLAY:
+ //printf("RTG SetDisplay %s\n", (rtg_u8[1]) ? "enabled" : "disabled");
// I remeber wrongs.
//printf("Command: SetDisplay.\n");
break;
case RTGCMD_ENABLE:
case RTGCMD_SETSWITCH:
- if (display_enabled != rtg_u8[1]) {
- //printf("RTG Display %s\n", (rtg_u8[1]) ? "enabled" : "disabled");
- display_enabled = rtg_u8[1];
+ //printf("RTG SetSwitch %s\n", ((rtg_x[0]) & 0x01) ? "enabled" : "disabled");
+ //printf("LAL: %.4X\n", rtg_x[0]);
+ if (display_enabled != ((rtg_x[0]) & 0x01)) {
+ display_enabled = ((rtg_x[0]) & 0x01);
if (display_enabled) {
rtg_init_display();
- clock_gettime(CLOCK_PROCESS_CPUTIME_ID, &f1);
}
else
rtg_shutdown_display();
}
break;
case RTGCMD_FILLRECT:
- rtg_fillrect(rtg_x[0], rtg_y[0], rtg_x[1], rtg_y[1], rtg_rgb[0], rtg_x[2], rtg_format, 0xFF);
+ if (rtg_u8[0] == 0xFF || rtg_format != RTGFMT_8BIT) {
+ rtg_fillrect_solid(rtg_x[0], rtg_y[0], rtg_x[1], rtg_y[1], rtg_rgb[0], rtg_x[2], rtg_format);
+ gdebug("FillRect Solid\n");
+ }
+ else {
+ rtg_fillrect(rtg_x[0], rtg_y[0], rtg_x[1], rtg_y[1], rtg_rgb[0], rtg_x[2], rtg_format, rtg_u8[0]);
+ gdebug("FillRect Masked\n");
+ }
break;
- }
-}
-
-void rtg_fillrect(uint16_t x, uint16_t y, uint16_t w, uint16_t h, uint32_t color, uint16_t pitch, uint16_t format, uint8_t mask) {
- if (mask) {}
- switch(format) {
- case RTGFMT_8BIT:
+ case RTGCMD_INVERTRECT:
+ rtg_invertrect(rtg_x[0], rtg_y[0], rtg_x[1], rtg_y[1], rtg_x[2], rtg_format, rtg_u8[0]);
+ gdebug("InvertRect\n");
break;
- case RTGFMT_RBG565: {
- uint16_t *ptr = (uint16_t *)&rtg_mem[framebuffer_addr + (x << format) + (y * pitch)];
- for (int xs = 0; xs < w; xs++) {
- ptr[xs] = (color >> 16);
+ case RTGCMD_BLITRECT:
+ if (rtg_u8[0] == 0xFF || rtg_format != RTGFMT_8BIT) {
+ rtg_blitrect_solid(rtg_x[0], rtg_y[0], rtg_x[1], rtg_y[1], rtg_x[2], rtg_y[2], rtg_x[3], rtg_format);
+ gdebug("BlitRect Solid\n");
}
- for (int ys = 1; ys < h; ys++) {
- ptr += (rtg_pitch >> format);
- memcpy(ptr, (void *)(size_t)(ptr - (rtg_pitch >> format)), rtg_pitch);
+ else {
+ rtg_blitrect(rtg_x[0], rtg_y[0], rtg_x[1], rtg_y[1], rtg_x[2], rtg_y[2], rtg_x[3], rtg_format, rtg_u8[0]);
+ gdebug("BlitRect Masked\n");
}
break;
- }
- case RTGFMT_RGB32:
+ case RTGCMD_BLITRECT_NOMASK_COMPLETE:
+ rtg_blitrect_nomask_complete(rtg_x[0], rtg_y[0], rtg_x[1], rtg_y[1], rtg_x[2], rtg_y[2], rtg_x[3], rtg_x[4], rtg_address[0], rtg_address[1], rtg_format, rtg_u8[0]);
+ gdebug("BlitRectNoMaskComplete\n");
+ break;
+ case RTGCMD_BLITPATTERN:
+ rtg_blitpattern(rtg_x[0], rtg_y[0], rtg_x[1], rtg_y[1], rtg_address[0], rtg_rgb[0], rtg_rgb[1], rtg_x[3], rtg_format, rtg_x[2], rtg_y[2], rtg_u8[0], rtg_u8[1], rtg_u8[2]);
+ gdebug("BlitPattern\n");
+ return;
+ case RTGCMD_BLITTEMPLATE:
+ rtg_blittemplate(rtg_x[0], rtg_y[0], rtg_x[1], rtg_y[1], rtg_address[0], rtg_rgb[0], rtg_rgb[1], rtg_x[3], rtg_x[4], rtg_format, rtg_x[2], rtg_u8[0], rtg_u8[1]);
+ gdebug("BlitTemplate\n");
+ break;
+ case RTGCMD_DRAWLINE:
+ if (rtg_u8[0] == 0xFF && rtg_y[2] == 0xFFFF)
+ rtg_drawline_solid(rtg_x[0], rtg_y[0], rtg_x[1], rtg_y[1], rtg_x[2], rtg_rgb[0], rtg_x[3], rtg_format);
+ else
+ rtg_drawline(rtg_x[0], rtg_y[0], rtg_x[1], rtg_y[1], rtg_x[2], rtg_y[2], rtg_x[4], rtg_rgb[0], rtg_rgb[1], rtg_x[3], rtg_format, rtg_u8[0], rtg_u8[1]);
+ gdebug("DrawLine\n");
+ break;
+ case RTGCMD_P2C:
+ rtg_p2c(rtg_x[0], rtg_y[0], rtg_x[1], rtg_y[1], rtg_x[2], rtg_y[2], rtg_u8[1], rtg_u8[2], rtg_u8[0], (rtg_user[0] >> 0x8), rtg_x[4], (uint8_t *)&rtg_mem[rtg_address_adj[1]]);
+ gdebug("Planar2Chunky\n");
+ break;
+ case RTGCMD_P2D:
+ rtg_p2d(rtg_x[0], rtg_y[0], rtg_x[1], rtg_y[1], rtg_x[2], rtg_y[2], rtg_u8[1], rtg_u8[2], rtg_u8[0], (rtg_user[0] >> 0x8), rtg_x[4], (uint8_t *)&rtg_mem[rtg_address_adj[1]]);
+ gdebug("Planar2Direct\n");
break;
}
}
projects / pistorm / blobdiff