1 // SPDX-License-Identifier: MIT
9 #include "config_file/config_file.h"
13 uint16_t rtg_x[8], rtg_y[8];
16 uint32_t rtg_address[8];
17 uint32_t rtg_address_adj[8];
20 static uint8_t display_enabled = 0xFF;
22 uint16_t rtg_display_width, rtg_display_height;
23 uint16_t rtg_display_format;
24 uint16_t rtg_pitch, rtg_total_rows;
25 uint16_t rtg_offset_x, rtg_offset_y;
27 uint8_t *rtg_mem; // FIXME
29 uint32_t framebuffer_addr = 0;
30 uint32_t framebuffer_addr_adj = 0;
32 static void handle_rtg_command(uint32_t cmd);
33 //static struct timespec f1, f2;
35 uint8_t realtime_graphics_debug = 0;
36 extern int cpu_emulation_running;
37 extern struct emulator_config *cfg;
38 extern uint8_t rtg_on;
41 static const char *op_type_names[OP_TYPE_NUM] = {
48 static const char *rtg_format_names[RTGFMT_NUM] = {
55 int init_rtg_data(struct emulator_config *cfg_) {
56 rtg_mem = calloc(1, 40 * SIZE_MEGA);
58 printf("Failed to allocate RTG video memory.\n");
62 m68k_add_ram_range(PIGFX_RTG_BASE + PIGFX_REG_SIZE, 32 * SIZE_MEGA - PIGFX_REG_SIZE, rtg_mem);
63 add_mapping(cfg_, MAPTYPE_RAM_NOALLOC, PIGFX_RTG_BASE + PIGFX_REG_SIZE, 40 * SIZE_MEGA - PIGFX_REG_SIZE, -1, (char *)rtg_mem, "rtg_mem", 0);
68 printf("[RTG] Shutting down RTG.\n");
79 unsigned int rtg_get_fb() {
80 return PIGFX_RTG_BASE + PIGFX_REG_SIZE + framebuffer_addr_adj;
83 unsigned int rtg_read(uint32_t address, uint8_t mode) {
84 //printf("%s read from RTG: %.8X\n", op_type_names[mode], address);
85 if (address == RTG_COMMAND) {
88 if (address >= PIGFX_REG_SIZE) {
89 if (rtg_mem && (address - PIGFX_REG_SIZE) < PIGFX_UPPER) {
92 return (rtg_mem[address - PIGFX_REG_SIZE]);
95 return be16toh(*(( uint16_t *) (&rtg_mem[address - PIGFX_REG_SIZE])));
97 case OP_TYPE_LONGWORD:
98 return be32toh(*(( uint32_t *) (&rtg_mem[address - PIGFX_REG_SIZE])));
109 struct timespec diff(struct timespec start, struct timespec end)
111 struct timespec temp;
112 if ((end.tv_nsec-start.tv_nsec)<0) {
113 temp.tv_sec = end.tv_sec-start.tv_sec-1;
114 temp.tv_nsec = 1000000000+end.tv_nsec-start.tv_nsec;
116 temp.tv_sec = end.tv_sec-start.tv_sec;
117 temp.tv_nsec = end.tv_nsec-start.tv_nsec;
122 #define CHKREG(a, b) case a: b = value; break;
124 void rtg_write(uint32_t address, uint32_t value, uint8_t mode) {
125 //printf("%s write to RTG: %.8X (%.8X)\n", op_type_names[mode], address, value);
126 if (address >= PIGFX_REG_SIZE) {
127 /*if ((address - PIGFX_REG_SIZE) < framebuffer_addr) {// || (address - PIGFX_REG_SIZE) > framebuffer_addr + ((rtg_display_width << rtg_display_format) * rtg_display_height)) {
128 printf("Write to RTG memory outside frame buffer %.8X (%.8X).\n", (address - PIGFX_REG_SIZE), framebuffer_addr);
130 if (rtg_mem && (address - PIGFX_REG_SIZE) < PIGFX_UPPER) {
133 rtg_mem[address - PIGFX_REG_SIZE] = value;
136 *(( uint16_t *) (&rtg_mem[address - PIGFX_REG_SIZE])) = htobe16(value);
138 case OP_TYPE_LONGWORD:
139 *(( uint32_t *) (&rtg_mem[address - PIGFX_REG_SIZE])) = htobe32(value);
150 CHKREG(RTG_U81, rtg_u8[0]);
151 CHKREG(RTG_U82, rtg_u8[1]);
152 CHKREG(RTG_U83, rtg_u8[2]);
153 CHKREG(RTG_U84, rtg_u8[3]);
158 CHKREG(RTG_X1, rtg_x[0]);
159 CHKREG(RTG_X2, rtg_x[1]);
160 CHKREG(RTG_X3, rtg_x[2]);
161 CHKREG(RTG_X4, rtg_x[3]);
162 CHKREG(RTG_X5, rtg_x[4]);
163 CHKREG(RTG_Y1, rtg_y[0]);
164 CHKREG(RTG_Y2, rtg_y[1]);
165 CHKREG(RTG_Y3, rtg_y[2]);
166 CHKREG(RTG_Y4, rtg_y[3]);
167 CHKREG(RTG_Y5, rtg_y[4]);
168 CHKREG(RTG_U1, rtg_user[0]);
169 CHKREG(RTG_U2, rtg_user[1]);
170 CHKREG(RTG_FORMAT, rtg_format);
172 handle_rtg_command(value);
176 case OP_TYPE_LONGWORD:
179 rtg_address[0] = value;
180 rtg_address_adj[0] = value - (PIGFX_RTG_BASE + PIGFX_REG_SIZE);
183 rtg_address[1] = value;
184 rtg_address_adj[1] = value - (PIGFX_RTG_BASE + PIGFX_REG_SIZE);
186 CHKREG(RTG_ADDR3, rtg_address[2]);
187 CHKREG(RTG_ADDR4, rtg_address[3]);
188 CHKREG(RTG_RGB1, rtg_rgb[0]);
189 CHKREG(RTG_RGB2, rtg_rgb[1]);
198 #define gdebug(a) if (realtime_graphics_debug) { printf(a); m68k_end_timeslice(); cpu_emulation_running = 0; }
200 static void handle_rtg_command(uint32_t cmd) {
201 //printf("Handling RTG command %d (%.8X)\n", cmd, cmd);
204 rtg_display_format = rtg_format;
205 rtg_display_width = rtg_x[0];
206 rtg_display_height = rtg_y[0];
208 //rtg_pitch = rtg_display_width << rtg_format;
209 framebuffer_addr_adj = framebuffer_addr + (rtg_offset_x << rtg_display_format) + (rtg_offset_y * rtg_pitch);
210 rtg_total_rows = rtg_y[1];
213 //rtg_pitch = rtg_display_width << rtg_format;
214 framebuffer_addr_adj = framebuffer_addr + (rtg_offset_x << rtg_display_format) + (rtg_offset_y * rtg_pitch);
215 rtg_total_rows = rtg_y[1];
217 //printf("Set RTG mode:\n");
218 //printf("%dx%d pixels\n", rtg_display_width, rtg_display_height);
219 //printf("Pixel format: %s\n", rtg_format_names[rtg_display_format]);
222 //printf("Command: SetPan.\n");
223 rtg_offset_x = rtg_x[1];
224 rtg_offset_y = rtg_y[1];
225 rtg_pitch = (rtg_x[0] << rtg_display_format);
226 framebuffer_addr = rtg_address[0] - (PIGFX_RTG_BASE + PIGFX_REG_SIZE);
227 framebuffer_addr_adj = framebuffer_addr + (rtg_offset_x << rtg_display_format) + (rtg_offset_y * rtg_pitch);
228 //printf("Set panning to $%.8X (%.8X)\n", framebuffer_addr, rtg_address[0]);
229 //printf("(Panned: $%.8X)\n", framebuffer_addr_adj);
230 //printf("Offset X/Y: %d/%d\n", rtg_offset_x, rtg_offset_y);
231 //printf("Pitch: %d (%d bytes)\n", rtg_x[0], rtg_pitch);
233 case RTGCMD_SETCLUT: {
234 //printf("Command: SetCLUT.\n");
235 //printf("Set palette entry %d to %d, %d, %d\n", rtg_u8[0], rtg_u8[1], rtg_u8[2], rtg_u8[3]);
236 //printf("Set palette entry %d to 32-bit palette color: %.8X\n", rtg_u8[0], rtg_rgb[0]);
237 rtg_set_clut_entry(rtg_u8[0], rtg_rgb[0]);
240 case RTGCMD_SETDISPLAY:
241 //printf("RTG SetDisplay %s\n", (rtg_u8[1]) ? "enabled" : "disabled");
243 //printf("Command: SetDisplay.\n");
246 case RTGCMD_SETSWITCH:
247 //printf("RTG SetSwitch %s\n", ((rtg_x[0]) & 0x01) ? "enabled" : "disabled");
248 //printf("LAL: %.4X\n", rtg_x[0]);
249 if (display_enabled != ((rtg_x[0]) & 0x01)) {
250 display_enabled = ((rtg_x[0]) & 0x01);
251 if (display_enabled) {
255 rtg_shutdown_display();
258 case RTGCMD_FILLRECT:
259 if (rtg_u8[0] == 0xFF || rtg_format != RTGFMT_8BIT) {
260 rtg_fillrect_solid(rtg_x[0], rtg_y[0], rtg_x[1], rtg_y[1], rtg_rgb[0], rtg_x[2], rtg_format);
261 gdebug("FillRect Solid\n");
264 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]);
265 gdebug("FillRect Masked\n");
268 case RTGCMD_INVERTRECT:
269 rtg_invertrect(rtg_x[0], rtg_y[0], rtg_x[1], rtg_y[1], rtg_x[2], rtg_format, rtg_u8[0]);
270 gdebug("InvertRect\n");
272 case RTGCMD_BLITRECT:
273 if (rtg_u8[0] == 0xFF || rtg_format != RTGFMT_8BIT) {
274 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);
275 gdebug("BlitRect Solid\n");
278 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]);
279 gdebug("BlitRect Masked\n");
282 case RTGCMD_BLITRECT_NOMASK_COMPLETE:
283 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]);
284 gdebug("BlitRectNoMaskComplete\n");
286 case RTGCMD_BLITPATTERN:
287 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]);
288 gdebug("BlitPattern\n");
290 case RTGCMD_BLITTEMPLATE:
291 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]);
292 gdebug("BlitTemplate\n");
294 case RTGCMD_DRAWLINE:
295 if (rtg_u8[0] == 0xFF && rtg_y[2] == 0xFFFF)
296 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);
298 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]);
299 gdebug("DrawLine\n");
302 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]]);
303 gdebug("Planar2Chunky\n");
306 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]]);
307 gdebug("Planar2Direct\n");
309 case RTGCMD_SETSPRITE:
310 rtg_enable_mouse_cursor();
311 gdebug("SetSprite\n");
313 case RTGCMD_SETSPRITECOLOR:
314 rtg_set_cursor_clut_entry(rtg_u8[0], rtg_u8[1], rtg_u8[2], rtg_u8[3]);
315 gdebug("SetSpriteColor\n");
317 case RTGCMD_SETSPRITEPOS:
318 rtg_set_mouse_cursor_pos((int16_t)rtg_x[0], (int16_t)rtg_y[0]);
319 gdebug("SetSpritePos\n");
321 case RTGCMD_SETSPRITEIMAGE:
322 rtg_set_mouse_cursor_image(&rtg_mem[rtg_address_adj[1]], rtg_u8[0], rtg_u8[1]);
323 gdebug("SetSpriteImage\n");
326 printf ("[RTG] DebugMe!\n");
329 printf("[!!!RTG] Unknown/unhandled RTG command %d ($%.4X)\n", cmd, cmd);