[picodrive.git] / platform / common / plat_sdl.c

/*
 * 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"

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 {
		if (SDL_MUSTLOCK(plat_sdl_screen))
			SDL_UnlockSurface(plat_sdl_screen);
		SDL_Flip(plat_sdl_screen);
		g_screen_ptr = plat_sdl_screen->pixels;
		PicoDrawSetOutBuf(g_screen_ptr, g_screen_width * 2);
	}
}

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);
	g_screen_ptr = shadow_fb;
}

void plat_video_menu_begin(void)
{
	if (plat_sdl_overlay != NULL || plat_sdl_gl_active) {
		g_menuscreen_ptr = shadow_fb;
	}
	else {
		if (SDL_MUSTLOCK(plat_sdl_screen))
			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 {
		if (SDL_MUSTLOCK(plat_sdl_screen))
			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 {
		if (SDL_MUSTLOCK(plat_sdl_screen))
			SDL_LockSurface(plat_sdl_screen);
		g_screen_ptr = plat_sdl_screen->pixels;
	}
	PicoDrawSetOutBuf(g_screen_ptr, g_screen_width * 2);
}

void plat_early_init(void)
{
}

static void plat_sdl_quit(void)
{
	// for now..
	exit(1);
}

void plat_init(void)
{
	int shadow_size;
	int ret;

	ret = plat_sdl_init();
	if (ret != 0)
		exit(1);

	plat_sdl_quit_cb = plat_sdl_quit;

	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();
}
Commit	Line	Data
636d5f25	1	/*
	2	* PicoDrive
	3	* (C) notaz, 2013
	4	*
	5	* This work is licensed under the terms of MAME license.
	6	* See COPYING file in the top-level directory.
	7	*/
	8
	9	#include <stdio.h>
	10
	11	#include "../libpicofe/input.h"
	12	#include "../libpicofe/plat_sdl.h"
	13	#include "../libpicofe/in_sdl.h"
	14	#include "../libpicofe/gl.h"
	15	#include "emu.h"
	16	#include "menu_pico.h"
	17	#include "input_pico.h"
	18	#include "version.h"
	19
636d5f25	20	static void *shadow_fb;
	21
	22	static const struct in_default_bind in_sdl_defbinds[] = {
	23	{ SDLK_UP, IN_BINDTYPE_PLAYER12, GBTN_UP },
	24	{ SDLK_DOWN, IN_BINDTYPE_PLAYER12, GBTN_DOWN },
	25	{ SDLK_LEFT, IN_BINDTYPE_PLAYER12, GBTN_LEFT },
	26	{ SDLK_RIGHT, IN_BINDTYPE_PLAYER12, GBTN_RIGHT },
	27	{ SDLK_z, IN_BINDTYPE_PLAYER12, GBTN_A },
	28	{ SDLK_x, IN_BINDTYPE_PLAYER12, GBTN_B },
	29	{ SDLK_c, IN_BINDTYPE_PLAYER12, GBTN_C },
	30	{ SDLK_a, IN_BINDTYPE_PLAYER12, GBTN_X },
	31	{ SDLK_s, IN_BINDTYPE_PLAYER12, GBTN_Y },
	32	{ SDLK_d, IN_BINDTYPE_PLAYER12, GBTN_Z },
	33	{ SDLK_RETURN, IN_BINDTYPE_PLAYER12, GBTN_START },
	34	{ SDLK_f, IN_BINDTYPE_PLAYER12, GBTN_MODE },
	35	{ SDLK_ESCAPE, IN_BINDTYPE_EMU, PEVB_MENU },
	36	{ SDLK_F1, IN_BINDTYPE_EMU, PEVB_STATE_SAVE },
	37	{ SDLK_F2, IN_BINDTYPE_EMU, PEVB_STATE_LOAD },
	38	{ SDLK_F3, IN_BINDTYPE_EMU, PEVB_SSLOT_PREV },
	39	{ SDLK_F4, IN_BINDTYPE_EMU, PEVB_SSLOT_NEXT },
	40	{ SDLK_F5, IN_BINDTYPE_EMU, PEVB_SWITCH_RND },
	41	{ SDLK_F6, IN_BINDTYPE_EMU, PEVB_PICO_PPREV },
	42	{ SDLK_F7, IN_BINDTYPE_EMU, PEVB_PICO_PNEXT },
	43	{ SDLK_F8, IN_BINDTYPE_EMU, PEVB_PICO_SWINP },
	44	{ SDLK_BACKSPACE, IN_BINDTYPE_EMU, PEVB_FF },
	45	{ 0, 0, 0 }
	46	};
	47
	48	/* YUV stuff */
	49	static int yuv_ry[32], yuv_gy[32], yuv_by[32];
	50	static unsigned char yuv_u[32 * 2], yuv_v[32 * 2];
	51
	52	void bgr_to_uyvy_init(void)
	53	{
	54	int i, v;
	55
	56	/* init yuv converter:
	57	y0 = (int)((0.299f * r0) + (0.587f * g0) + (0.114f * b0));
	58	y1 = (int)((0.299f * r1) + (0.587f * g1) + (0.114f * b1));
	59	u = (int)(8 * 0.565f * (b0 - y0)) + 128;
	60	v = (int)(8 * 0.713f * (r0 - y0)) + 128;
	61	*/
	62	for (i = 0; i < 32; i++) {
	63	yuv_ry[i] = (int)(0.299f * i * 65536.0f + 0.5f);
	64	yuv_gy[i] = (int)(0.587f * i * 65536.0f + 0.5f);
	65	yuv_by[i] = (int)(0.114f * i * 65536.0f + 0.5f);
	66	}
	67	for (i = -32; i < 32; i++) {
	68	v = (int)(8 * 0.565f * i) + 128;
	69	if (v < 0)
	70	v = 0;
	71	if (v > 255)
	72	v = 255;
	73	yuv_u[i + 32] = v;
	74	v = (int)(8 * 0.713f * i) + 128;
	75	if (v < 0)
	76	v = 0;
	77	if (v > 255)
	78	v = 255;
	79	yuv_v[i + 32] = v;
	80	}
	81	}
	82
	83	void rgb565_to_uyvy(void d, const void s, int pixels)
84	{
85	unsigned int *dst = d;
86	const unsigned short *src = s;
87	const unsigned char *yu = yuv_u + 32;
88	const unsigned char *yv = yuv_v + 32;
89	int r0, g0, b0, r1, g1, b1;
90	int y0, y1, u, v;
91
92	for (; pixels > 0; src += 2, dst++, pixels -= 2)
93	{
94	r0 = (src[0] >> 11) & 0x1f;
95	g0 = (src[0] >> 6) & 0x1f;
96	b0 = src[0] & 0x1f;
97	r1 = (src[1] >> 11) & 0x1f;
98	g1 = (src[1] >> 6) & 0x1f;
99	b1 = src[1] & 0x1f;
100	y0 = (yuv_ry[r0] + yuv_gy[g0] + yuv_by[b0]) >> 16;
101	y1 = (yuv_ry[r1] + yuv_gy[g1] + yuv_by[b1]) >> 16;
102	u = yu[b0 - y0];
103	v = yv[r0 - y0];
104	// valid Y range seems to be 16..235
105	y0 = 16 + 219 * y0 / 31;
106	y1 = 16 + 219 * y1 / 31;
107
108	*dst = (y1 << 24) \| (v << 16) \| (y0 << 8) \| u;
109	}
110	}
111
112	void plat_video_flip(void)
113	{
114	if (plat_sdl_overlay != NULL) {
115	SDL_Rect dstrect =
116	{ 0, 0, plat_sdl_screen->w, plat_sdl_screen->h };
117
118	SDL_LockYUVOverlay(plat_sdl_overlay);
119	rgb565_to_uyvy(plat_sdl_overlay->pixels[0], shadow_fb,
120	g_screen_width * g_screen_height);
121	SDL_UnlockYUVOverlay(plat_sdl_overlay);
122	SDL_DisplayYUVOverlay(plat_sdl_overlay, &dstrect);
123	}
124	else if (plat_sdl_gl_active) {
125	gl_flip(shadow_fb, g_screen_width, g_screen_height);
126	}
127	else {
eb7ce29e PC	128	if (SDL_MUSTLOCK(plat_sdl_screen))
eb7ce29e PC	129	SDL_UnlockSurface(plat_sdl_screen);
636d5f25	130	SDL_Flip(plat_sdl_screen);
636d5f25	131	g_screen_ptr = plat_sdl_screen->pixels;
eb7ce29e	132	PicoDrawSetOutBuf(g_screen_ptr, g_screen_width * 2);
636d5f25	133	}
	134	}
	135
	136	void plat_video_wait_vsync(void)
	137	{
	138	}
	139
	140	void plat_video_menu_enter(int is_rom_loaded)
	141	{
	142	plat_sdl_change_video_mode(g_menuscreen_w, g_menuscreen_h, 0);
d438a8dd	143	g_screen_ptr = shadow_fb;
636d5f25	144	}
	145
	146	void plat_video_menu_begin(void)
	147	{
	148	if (plat_sdl_overlay != NULL \|\| plat_sdl_gl_active) {
	149	g_menuscreen_ptr = shadow_fb;
	150	}
	151	else {
eb7ce29e PC	152	if (SDL_MUSTLOCK(plat_sdl_screen))
eb7ce29e PC	153	SDL_LockSurface(plat_sdl_screen);
636d5f25	154	g_menuscreen_ptr = plat_sdl_screen->pixels;
	155	}
	156	}
	157
	158	void plat_video_menu_end(void)
	159	{
	160	if (plat_sdl_overlay != NULL) {
	161	SDL_Rect dstrect =
	162	{ 0, 0, plat_sdl_screen->w, plat_sdl_screen->h };
	163
	164	SDL_LockYUVOverlay(plat_sdl_overlay);
	165	rgb565_to_uyvy(plat_sdl_overlay->pixels[0], shadow_fb,
	166	g_menuscreen_w * g_menuscreen_h);
	167	SDL_UnlockYUVOverlay(plat_sdl_overlay);
	168
	169	SDL_DisplayYUVOverlay(plat_sdl_overlay, &dstrect);
	170	}
	171	else if (plat_sdl_gl_active) {
	172	gl_flip(g_menuscreen_ptr, g_menuscreen_w, g_menuscreen_h);
	173	}
	174	else {
eb7ce29e PC	175	if (SDL_MUSTLOCK(plat_sdl_screen))
eb7ce29e PC	176	SDL_UnlockSurface(plat_sdl_screen);
636d5f25	177	SDL_Flip(plat_sdl_screen);
	178	}
	179	g_menuscreen_ptr = NULL;
	180
	181	}
	182
	183	void plat_video_menu_leave(void)
	184	{
	185	}
	186
	187	void plat_video_loop_prepare(void)
	188	{
	189	plat_sdl_change_video_mode(g_screen_width, g_screen_height, 0);
	190
	191	if (plat_sdl_overlay != NULL \|\| plat_sdl_gl_active) {
	192	g_screen_ptr = shadow_fb;
	193	}
	194	else {
eb7ce29e PC	195	if (SDL_MUSTLOCK(plat_sdl_screen))
eb7ce29e PC	196	SDL_LockSurface(plat_sdl_screen);
636d5f25	197	g_screen_ptr = plat_sdl_screen->pixels;
636d5f25	198	}
eb7ce29e	199	PicoDrawSetOutBuf(g_screen_ptr, g_screen_width * 2);
636d5f25	200	}
	201
	202	void plat_early_init(void)
	203	{
	204	}
	205
bec84f92	206	static void plat_sdl_quit(void)
	207	{
	208	// for now..
	209	exit(1);
	210	}
	211
636d5f25	212	void plat_init(void)
	213	{
	214	int shadow_size;
	215	int ret;
	216
	217	ret = plat_sdl_init();
	218	if (ret != 0)
	219	exit(1);
	220
bec84f92	221	plat_sdl_quit_cb = plat_sdl_quit;
bec84f92	222
fc11dd05	223	SDL_WM_SetCaption("PicoDrive " VERSION, NULL);
636d5f25	224
	225	g_menuscreen_w = plat_sdl_screen->w;
	226	g_menuscreen_h = plat_sdl_screen->h;
	227	g_menuscreen_ptr = NULL;
	228
	229	shadow_size = g_menuscreen_w * g_menuscreen_h * 2;
	230	if (shadow_size < 320 * 480 * 2)
	231	shadow_size = 320 * 480 * 2;
	232
	233	shadow_fb = malloc(shadow_size);
	234	g_menubg_ptr = malloc(shadow_size);
	235	if (shadow_fb == NULL \|\| g_menubg_ptr == NULL) {
	236	fprintf(stderr, "OOM\n");
	237	exit(1);
	238	}
	239
	240	g_screen_width = 320;
	241	g_screen_height = 240;
	242	g_screen_ptr = shadow_fb;
	243
	244	in_sdl_init(in_sdl_defbinds, plat_sdl_event_handler);
	245	in_probe();
	246
	247	bgr_to_uyvy_init();
	248	}
	249
	250	void plat_finish(void)
	251	{
	252	free(shadow_fb);
	253	shadow_fb = NULL;
	254	free(g_menubg_ptr);
	255	g_menubg_ptr = NULL;
	256	plat_sdl_finish();
	257	}