git.sesse.net Git - pistorm/blob - platforms/amiga/rtg/rtg-output.c

   1 #include "emulator.h"
   2 #include "rtg.h"
   3
   4 #include <pthread.h>
   5 #include <SDL2/SDL.h>
   6 #include <stdint.h>
   7 #include <stdio.h>
   8 #include <stdlib.h>
   9 #include <string.h>
  10 #include <unistd.h>
  11
  12 #define RTG_INIT_ERR(a) { printf(a); *data->running = 0; }
  13
  14 uint8_t busy = 0, rtg_on = 0, rtg_initialized = 0;
  15 extern uint8_t *rtg_mem;
  16 extern uint32_t framebuffer_addr;
  17 extern uint32_t framebuffer_addr_adj;
  18
  19 extern uint16_t rtg_display_width, rtg_display_height;
  20 extern uint16_t rtg_display_format;
  21 extern uint16_t rtg_pitch, rtg_total_rows;
  22 extern uint16_t rtg_offset_x, rtg_offset_y;
  23
  24 static pthread_t thread_id;
  25
  26 struct rtg_shared_data {
  27     uint16_t *width, *height;
  28     uint16_t *format, *pitch;
  29     uint16_t *offset_x, *offset_y;
  30     uint8_t *memory;
  31     uint32_t *addr;
  32     uint8_t *running;
  33 };
  34
  35 SDL_Window *win = NULL;
  36 SDL_Renderer *renderer = NULL;
  37 SDL_Texture *img = NULL;
  38
  39 struct rtg_shared_data rtg_share_data;
  40 static uint32_t palette[256];
  41
  42 void rtg_update_screen() {}
  43
  44 uint32_t rtg_to_sdl2[RTGFMT_NUM] = {
  45     SDL_PIXELFORMAT_ARGB8888,
  46     SDL_PIXELFORMAT_RGB565,
  47     SDL_PIXELFORMAT_ARGB8888,
  48     SDL_PIXELFORMAT_RGB555,
  49 };
  50
  51 void *rtgThread(void *args) {
  52
  53     printf("RTG thread running\n");
  54     fflush(stdout);
  55
  56     int reinit = 0;
  57     rtg_on = 1;
  58
  59     uint32_t *indexed_buf = NULL;
  60
  61     rtg_share_data.format = &rtg_display_format;
  62     rtg_share_data.width = &rtg_display_width;
  63     rtg_share_data.height = &rtg_display_height;
  64     rtg_share_data.pitch = &rtg_pitch;
  65     rtg_share_data.offset_x = &rtg_offset_x;
  66     rtg_share_data.offset_y = &rtg_offset_y;
  67     rtg_share_data.memory = rtg_mem;
  68     rtg_share_data.running = &rtg_on;
  69     rtg_share_data.addr = &framebuffer_addr_adj;
  70     struct rtg_shared_data *data = &rtg_share_data;
  71
  72     uint16_t width = rtg_display_width;
  73     uint16_t height = rtg_display_height;
  74     uint16_t format = rtg_display_format;
  75     uint16_t pitch = rtg_pitch;
  76
  77     printf("Initializing SDL2...\n");
  78     if (SDL_Init(0) < 0) {
  79         printf("Failed to initialize SDL2.\n");
  80     }
  81
  82     printf("Initializing SDL2 Video...\n");
  83     if (SDL_Init(SDL_INIT_VIDEO) < 0) {
  84         printf("Failed to initialize SDL2 Video..\n");
  85     }
  86
  87 reinit_sdl:;
  88     if (reinit) {
  89         printf("Reinitializing SDL2...\n");
  90         width = rtg_display_width;
  91         height = rtg_display_height;
  92         format = rtg_display_format;
  93         pitch = rtg_pitch;
  94         if (indexed_buf) {
  95             free(indexed_buf);
  96             indexed_buf = NULL;
  97         }
  98         reinit = 0;
  99     }
 100
 101     printf("Creating %dx%d SDL2 window...\n", width, height);
 102     win = SDL_CreateWindow("Pistorm RTG", 0, 0, width, height, 0);
 103     SDL_ShowCursor(SDL_DISABLE);
 104     if (!win) {
 105         RTG_INIT_ERR("Failed create SDL2 window.\n");
 106     }
 107     else {
 108         printf("Created %dx%d window.\n", width, height);
 109     }
 110
 111     printf("Creating SDL2 renderer...\n");
 112     renderer = SDL_CreateRenderer(win, -1, SDL_RENDERER_ACCELERATED);
 113     if (!renderer) {
 114         RTG_INIT_ERR("Failed create SDL2 renderer.\n");
 115     }
 116     else {
 117         printf("Created SDL2 renderer.\n");
 118     }
 119
 120     printf("Creating SDL2 texture...\n");
 121     img = SDL_CreateTexture(renderer, rtg_to_sdl2[format], SDL_TEXTUREACCESS_TARGET, width, height);
 122     if (!img) {
 123         RTG_INIT_ERR("Failed create SDL2 texture.\n");
 124     }
 125     else {
 126         printf("Created %dx%d texture.\n", width, height);
 127     }
 128
 129     switch (format) {
 130         case RTGFMT_8BIT:
 131             indexed_buf = calloc(1, width * height * 4);
 132             break;
 133         case RTGFMT_RBG565:
 134             indexed_buf = calloc(1, width * height * 2);
 135             break;
 136         default:
 137             break;
 138     }
 139
 140     uint64_t frame_start = 0, frame_end = 0;
 141     float elapsed = 0.0f;
 142
 143     while (1) {
 144         if (renderer && win && img) {
 145             frame_start = SDL_GetPerformanceCounter();
 146             SDL_RenderClear(renderer);
 147             if (*data->running) {
 148                 switch (format) {
 149                     case RTGFMT_RGB32:
 150                         SDL_UpdateTexture(img, NULL, &data->memory[*data->addr], pitch);
 151                         break;
 152                     case RTGFMT_RBG565:
 153                         SDL_UpdateTexture(img, NULL, (uint8_t *)indexed_buf, width * 2);
 154                         break;
 155                     case RTGFMT_8BIT:
 156                         SDL_UpdateTexture(img, NULL, (uint8_t *)indexed_buf, width * 4);
 157                         break;
 158                 }
 159                 SDL_RenderCopy(renderer, img, NULL, NULL);
 160             }
 161             SDL_RenderPresent(renderer);
 162             //usleep(16667); //ghetto 60hz
 163             if (height != *data->height || width != *data->width || format != *data->format) {
 164                 printf("Reinitializing due to something change.\n");
 165                 reinit = 1;
 166                 goto shutdown_sdl;
 167             }
 168             switch (format) {
 169                 case RTGFMT_8BIT:
 170                     for (int y = 0; y < height; y++) {
 171                         for (int x = 0; x < width; x++) {
 172                             indexed_buf[x + (y * width)] = palette[data->memory[*data->addr + x + (y * pitch)]];
 173                         }
 174                     }
 175                     break;
 176                 case RTGFMT_RBG565:
 177                     for (int y = 0; y < height; y++) {
 178                         for (int x = 0; x < width; x++) {
 179                             ((uint16_t *)indexed_buf)[x + (y * width)] = be16toh(((uint16_t *)data->memory)[(*data->addr / 2) + x + (y * (pitch / 2))]);
 180                         }
 181                     }
 182                     break;
 183             }
 184             frame_end = SDL_GetPerformanceCounter();
 185             elapsed = (frame_end - frame_start) / (float)SDL_GetPerformanceFrequency() * 1000.0f;
 186             pitch = rtg_pitch;
 187             SDL_Delay(floor(16.66666f - elapsed));
 188         }
 189         else
 190             break;
 191     }
 192
 193     rtg_initialized = 0;
 194     printf("RTG thread shut down.\n");
 195
 196 shutdown_sdl:;
 197     if (img) SDL_DestroyTexture(img);
 198     if (renderer) SDL_DestroyRenderer(renderer);
 199     if (win) SDL_DestroyWindow(win);
 200
 201     win = NULL;
 202     img = NULL;
 203     renderer = NULL;
 204
 205     if (reinit)
 206         goto reinit_sdl;
 207
 208     if (indexed_buf)
 209         free(indexed_buf);
 210
 211     SDL_QuitSubSystem(SDL_INIT_VIDEO);
 212     SDL_Quit();
 213
 214     return args;
 215 }
 216
 217 void rtg_set_clut_entry(uint8_t index, uint32_t xrgb) {
 218     palette[index] = xrgb;
 219 }
 220
 221 void rtg_init_display() {
 222     int err;
 223     rtg_on = 1;
 224
 225     if (!rtg_initialized) {
 226         err = pthread_create(&thread_id, NULL, &rtgThread, (void *)&rtg_share_data);
 227         if (err != 0) {
 228             rtg_on = 0;
 229             printf("can't create RTG thread :[%s]", strerror(err));
 230         }
 231         else {
 232             rtg_initialized = 1;
 233             pthread_setname_np(thread_id, "pistorm: rtg");
 234             printf("RTG Thread created successfully\n");
 235         }
 236     }
 237     printf("RTG display enabled.\n");
 238 }
 239
 240 void rtg_shutdown_display() {
 241     printf("RTG display disabled.\n");
 242     rtg_on = 0;
 243 }