+/*
+ * PicoDrive
+ * (C) notaz, 2013
+ *
+ * This work is licensed under the terms of MAME license.
+ * See COPYING file in the top-level directory.
+ */
+
+#include <stdio.h>
+
+#include "../libpicofe/input.h"
+#include "../libpicofe/plat_sdl.h"
+#include "../libpicofe/in_sdl.h"
+#include "../libpicofe/gl.h"
+#include "emu.h"
+#include "menu_pico.h"
+#include "input_pico.h"
+#include "version.h"
+
+// FIXME: these 2 shouldn't be here
+static unsigned char PicoDraw2FB_[(8+320) * (8+240+8)];
+unsigned char *PicoDraw2FB = PicoDraw2FB_;
+
+static void *shadow_fb;
+
+static const struct in_default_bind in_sdl_defbinds[] = {
+ { SDLK_UP, IN_BINDTYPE_PLAYER12, GBTN_UP },
+ { SDLK_DOWN, IN_BINDTYPE_PLAYER12, GBTN_DOWN },
+ { SDLK_LEFT, IN_BINDTYPE_PLAYER12, GBTN_LEFT },
+ { SDLK_RIGHT, IN_BINDTYPE_PLAYER12, GBTN_RIGHT },
+ { SDLK_z, IN_BINDTYPE_PLAYER12, GBTN_A },
+ { SDLK_x, IN_BINDTYPE_PLAYER12, GBTN_B },
+ { SDLK_c, IN_BINDTYPE_PLAYER12, GBTN_C },
+ { SDLK_a, IN_BINDTYPE_PLAYER12, GBTN_X },
+ { SDLK_s, IN_BINDTYPE_PLAYER12, GBTN_Y },
+ { SDLK_d, IN_BINDTYPE_PLAYER12, GBTN_Z },
+ { SDLK_RETURN, IN_BINDTYPE_PLAYER12, GBTN_START },
+ { SDLK_f, IN_BINDTYPE_PLAYER12, GBTN_MODE },
+ { SDLK_ESCAPE, IN_BINDTYPE_EMU, PEVB_MENU },
+ { SDLK_F1, IN_BINDTYPE_EMU, PEVB_STATE_SAVE },
+ { SDLK_F2, IN_BINDTYPE_EMU, PEVB_STATE_LOAD },
+ { SDLK_F3, IN_BINDTYPE_EMU, PEVB_SSLOT_PREV },
+ { SDLK_F4, IN_BINDTYPE_EMU, PEVB_SSLOT_NEXT },
+ { SDLK_F5, IN_BINDTYPE_EMU, PEVB_SWITCH_RND },
+ { SDLK_F6, IN_BINDTYPE_EMU, PEVB_PICO_PPREV },
+ { SDLK_F7, IN_BINDTYPE_EMU, PEVB_PICO_PNEXT },
+ { SDLK_F8, IN_BINDTYPE_EMU, PEVB_PICO_SWINP },
+ { SDLK_BACKSPACE, IN_BINDTYPE_EMU, PEVB_FF },
+ { 0, 0, 0 }
+};
+
+/* YUV stuff */
+static int yuv_ry[32], yuv_gy[32], yuv_by[32];
+static unsigned char yuv_u[32 * 2], yuv_v[32 * 2];
+
+void bgr_to_uyvy_init(void)
+{
+ int i, v;
+
+ /* init yuv converter:
+ y0 = (int)((0.299f * r0) + (0.587f * g0) + (0.114f * b0));
+ y1 = (int)((0.299f * r1) + (0.587f * g1) + (0.114f * b1));
+ u = (int)(8 * 0.565f * (b0 - y0)) + 128;
+ v = (int)(8 * 0.713f * (r0 - y0)) + 128;
+ */
+ for (i = 0; i < 32; i++) {
+ yuv_ry[i] = (int)(0.299f * i * 65536.0f + 0.5f);
+ yuv_gy[i] = (int)(0.587f * i * 65536.0f + 0.5f);
+ yuv_by[i] = (int)(0.114f * i * 65536.0f + 0.5f);
+ }
+ for (i = -32; i < 32; i++) {
+ v = (int)(8 * 0.565f * i) + 128;
+ if (v < 0)
+ v = 0;
+ if (v > 255)
+ v = 255;
+ yuv_u[i + 32] = v;
+ v = (int)(8 * 0.713f * i) + 128;
+ if (v < 0)
+ v = 0;
+ if (v > 255)
+ v = 255;
+ yuv_v[i + 32] = v;
+ }
+}
+
+void rgb565_to_uyvy(void *d, const void *s, int pixels)
+{
+ unsigned int *dst = d;
+ const unsigned short *src = s;
+ const unsigned char *yu = yuv_u + 32;
+ const unsigned char *yv = yuv_v + 32;
+ int r0, g0, b0, r1, g1, b1;
+ int y0, y1, u, v;
+
+ for (; pixels > 0; src += 2, dst++, pixels -= 2)
+ {
+ r0 = (src[0] >> 11) & 0x1f;
+ g0 = (src[0] >> 6) & 0x1f;
+ b0 = src[0] & 0x1f;
+ r1 = (src[1] >> 11) & 0x1f;
+ g1 = (src[1] >> 6) & 0x1f;
+ b1 = src[1] & 0x1f;
+ y0 = (yuv_ry[r0] + yuv_gy[g0] + yuv_by[b0]) >> 16;
+ y1 = (yuv_ry[r1] + yuv_gy[g1] + yuv_by[b1]) >> 16;
+ u = yu[b0 - y0];
+ v = yv[r0 - y0];
+ // valid Y range seems to be 16..235
+ y0 = 16 + 219 * y0 / 31;
+ y1 = 16 + 219 * y1 / 31;
+
+ *dst = (y1 << 24) | (v << 16) | (y0 << 8) | u;
+ }
+}
+
+void plat_video_flip(void)
+{
+ if (plat_sdl_overlay != NULL) {
+ SDL_Rect dstrect =
+ { 0, 0, plat_sdl_screen->w, plat_sdl_screen->h };
+
+ SDL_LockYUVOverlay(plat_sdl_overlay);
+ rgb565_to_uyvy(plat_sdl_overlay->pixels[0], shadow_fb,
+ g_screen_width * g_screen_height);
+ SDL_UnlockYUVOverlay(plat_sdl_overlay);
+ SDL_DisplayYUVOverlay(plat_sdl_overlay, &dstrect);
+ }
+ else if (plat_sdl_gl_active) {
+ gl_flip(shadow_fb, g_screen_width, g_screen_height);
+ }
+ else {
+ // XXX: no locking, but should be fine with SDL_SWSURFACE?
+ SDL_Flip(plat_sdl_screen);
+ g_screen_ptr = plat_sdl_screen->pixels;
+ }
+}
+
+void plat_video_wait_vsync(void)
+{
+}
+
+void plat_video_menu_enter(int is_rom_loaded)
+{
+ plat_sdl_change_video_mode(g_menuscreen_w, g_menuscreen_h, 0);
+}
+
+void plat_video_menu_begin(void)
+{
+ if (plat_sdl_overlay != NULL || plat_sdl_gl_active) {
+ g_menuscreen_ptr = shadow_fb;
+ }
+ else {
+ SDL_LockSurface(plat_sdl_screen);
+ g_menuscreen_ptr = plat_sdl_screen->pixels;
+ }
+}
+
+void plat_video_menu_end(void)
+{
+ if (plat_sdl_overlay != NULL) {
+ SDL_Rect dstrect =
+ { 0, 0, plat_sdl_screen->w, plat_sdl_screen->h };
+
+ SDL_LockYUVOverlay(plat_sdl_overlay);
+ rgb565_to_uyvy(plat_sdl_overlay->pixels[0], shadow_fb,
+ g_menuscreen_w * g_menuscreen_h);
+ SDL_UnlockYUVOverlay(plat_sdl_overlay);
+
+ SDL_DisplayYUVOverlay(plat_sdl_overlay, &dstrect);
+ }
+ else if (plat_sdl_gl_active) {
+ gl_flip(g_menuscreen_ptr, g_menuscreen_w, g_menuscreen_h);
+ }
+ else {
+ SDL_UnlockSurface(plat_sdl_screen);
+ SDL_Flip(plat_sdl_screen);
+ }
+ g_menuscreen_ptr = NULL;
+
+}
+
+void plat_video_menu_leave(void)
+{
+}
+
+void plat_video_loop_prepare(void)
+{
+ plat_sdl_change_video_mode(g_screen_width, g_screen_height, 0);
+
+ if (plat_sdl_overlay != NULL || plat_sdl_gl_active) {
+ g_screen_ptr = shadow_fb;
+ }
+ else {
+ SDL_LockSurface(plat_sdl_screen);
+ g_screen_ptr = plat_sdl_screen->pixels;
+ }
+}
+
+void plat_early_init(void)
+{
+}
+
+void plat_init(void)
+{
+ int shadow_size;
+ int ret;
+
+ ret = plat_sdl_init();
+ if (ret != 0)
+ exit(1);
+
+ SDL_WM_SetCaption("PicoDrive" VERSION, NULL);
+
+ g_menuscreen_w = plat_sdl_screen->w;
+ g_menuscreen_h = plat_sdl_screen->h;
+ g_menuscreen_ptr = NULL;
+
+ shadow_size = g_menuscreen_w * g_menuscreen_h * 2;
+ if (shadow_size < 320 * 480 * 2)
+ shadow_size = 320 * 480 * 2;
+
+ shadow_fb = malloc(shadow_size);
+ g_menubg_ptr = malloc(shadow_size);
+ if (shadow_fb == NULL || g_menubg_ptr == NULL) {
+ fprintf(stderr, "OOM\n");
+ exit(1);
+ }
+
+ g_screen_width = 320;
+ g_screen_height = 240;
+ g_screen_ptr = shadow_fb;
+
+ in_sdl_init(in_sdl_defbinds, plat_sdl_event_handler);
+ in_probe();
+
+ bgr_to_uyvy_init();
+}
+
+void plat_finish(void)
+{
+ free(shadow_fb);
+ shadow_fb = NULL;
+ free(g_menubg_ptr);
+ g_menubg_ptr = NULL;
+ plat_sdl_finish();
+}