[picodrive.git] / platform / linux / emu.c

/*\r
 * PicoDrive\r
 * (C) notaz, 2006-2010\r
 *\r
 * This work is licensed under the terms of MAME license.\r
 * See COPYING file in the top-level directory.\r
 */\r
\r
#include <stdio.h>\r
#include <unistd.h>\r
\r
#include "../libpicofe/menu.h"\r
#include "../libpicofe/plat.h"\r
#include "../common/emu.h"\r
#include "../common/arm_utils.h"\r
#include "../common/version.h"\r
\r
#include <pico/pico_int.h>\r
\r
\r
const char *renderer_names[] = { "16bit accurate", " 8bit accurate", " 8bit fast", NULL };\r
const char *renderer_names32x[] = { "accurate", "faster", "fastest", NULL };\r
enum renderer_types { RT_16BIT, RT_8BIT_ACC, RT_8BIT_FAST, RT_COUNT };\r
\r
\r
void pemu_prep_defconfig(void)\r
{\r
}\r
\r
void pemu_validate_config(void)\r
{\r
	extern int PicoOpt;\r
//	PicoOpt &= ~POPT_EXT_FM;\r
	PicoOpt &= ~POPT_EN_DRC;\r
}\r
\r
// FIXME: dupes from GP2X, need cleanup\r
static void (*osd_text)(int x, int y, const char *text);\r
\r
/*\r
static void osd_text8(int x, int y, const char *text)\r
{\r
	int len = strlen(text)*8;\r
	int *p, i, h, offs;\r
\r
	len = (len+3) >> 2;\r
	for (h = 0; h < 8; h++) {\r
		offs = (x + g_screen_width * (y+h)) & ~3;\r
		p = (int *) ((char *)g_screen_ptr + offs);\r
		for (i = len; i; i--, p++)\r
			*p = 0xe0e0e0e0;\r
	}\r
	emu_text_out8(x, y, text);\r
}\r
*/\r
\r
static void osd_text16(int x, int y, const char *text)\r
{\r
	int len = strlen(text)*8;\r
	int *p, i, h, offs;\r
\r
	len = (len+1) >> 1;\r
	for (h = 0; h < 8; h++) {\r
		offs = (x + g_screen_width * (y+h)) & ~1;\r
		p = (int *) ((short *)g_screen_ptr + offs);\r
		for (i = len; i; i--, p++)\r
			*p = (*p >> 2) & 0x39e7;\r
	}\r
	emu_text_out16(x, y, text);\r
}\r
\r
static void draw_cd_leds(void)\r
{\r
	int led_reg, pitch, scr_offs, led_offs;\r
	led_reg = Pico_mcd->s68k_regs[0];\r
\r
	pitch = 320;\r
	led_offs = 4;\r
	scr_offs = pitch * 2 + 4;\r
\r
	if (currentConfig.renderer != RT_16BIT) {\r
	#define p(x) px[(x) >> 2]\r
		// 8-bit modes\r
		unsigned int *px = (unsigned int *)((char *)g_screen_ptr + scr_offs);\r
		unsigned int col_g = (led_reg & 2) ? 0xc0c0c0c0 : 0xe0e0e0e0;\r
		unsigned int col_r = (led_reg & 1) ? 0xd0d0d0d0 : 0xe0e0e0e0;\r
		p(pitch*0) = p(pitch*1) = p(pitch*2) = col_g;\r
		p(pitch*0 + led_offs) = p(pitch*1 + led_offs) = p(pitch*2 + led_offs) = col_r;\r
	#undef p\r
	} else {\r
	#define p(x) px[(x)*2 >> 2] = px[((x)*2 >> 2) + 1]\r
		// 16-bit modes\r
		unsigned int *px = (unsigned int *)((short *)g_screen_ptr + scr_offs);\r
		unsigned int col_g = (led_reg & 2) ? 0x06000600 : 0;\r
		unsigned int col_r = (led_reg & 1) ? 0xc000c000 : 0;\r
		p(pitch*0) = p(pitch*1) = p(pitch*2) = col_g;\r
		p(pitch*0 + led_offs) = p(pitch*1 + led_offs) = p(pitch*2 + led_offs) = col_r;\r
	#undef p\r
	}\r
}\r
\r
void pemu_finalize_frame(const char *fps, const char *notice)\r
{\r
	if (currentConfig.renderer != RT_16BIT && !(PicoAHW & PAHW_32X)) {\r
		unsigned short *pd = (unsigned short *)g_screen_ptr + 8 * g_screen_width;\r
		unsigned char *ps = PicoDraw2FB + 328*8 + 8;\r
		unsigned short *pal = HighPal;\r
		int i, x;\r
		if (Pico.m.dirtyPal)\r
			PicoDrawUpdateHighPal();\r
		for (i = 0; i < 224; i++, ps += 8)\r
			for (x = 0; x < 320; x++)\r
				*pd++ = pal[*ps++];\r
	}\r
\r
	if (notice || (currentConfig.EmuOpt & EOPT_SHOW_FPS)) {\r
		if (notice)\r
			osd_text(4, g_screen_height - 8, notice);\r
		if (currentConfig.EmuOpt & EOPT_SHOW_FPS)\r
			osd_text(g_screen_width - 60, g_screen_height - 8, fps);\r
	}\r
	if ((PicoAHW & PAHW_MCD) && (currentConfig.EmuOpt & EOPT_EN_CD_LEDS))\r
		draw_cd_leds();\r
}\r
\r
static void apply_renderer(void)\r
{\r
	switch (currentConfig.renderer) {\r
	case RT_16BIT:\r
		PicoOpt &= ~POPT_ALT_RENDERER;\r
		PicoDrawSetOutFormat(PDF_RGB555, 0);\r
		PicoDrawSetOutBuf(g_screen_ptr, g_screen_width * 2);\r
		break;\r
	case RT_8BIT_ACC:\r
		PicoOpt &= ~POPT_ALT_RENDERER;\r
		PicoDrawSetOutFormat(PDF_8BIT, 0);\r
		PicoDrawSetOutBuf(PicoDraw2FB + 8, 328);\r
		break;\r
	case RT_8BIT_FAST:\r
		PicoOpt |=  POPT_ALT_RENDERER;\r
		PicoDrawSetOutFormat(PDF_NONE, 0);\r
		break;\r
	}\r
\r
	if (PicoAHW & PAHW_32X)\r
		PicoDrawSetOutBuf(g_screen_ptr, g_screen_width * 2);\r
}\r
\r
void plat_video_toggle_renderer(int change, int is_menu)\r
{\r
	currentConfig.renderer += change;\r
	if      (currentConfig.renderer >= RT_COUNT)\r
		currentConfig.renderer = 0;\r
	else if (currentConfig.renderer < 0)\r
		currentConfig.renderer = RT_COUNT - 1;\r
\r
	if (!is_menu)\r
		apply_renderer();\r
\r
	emu_status_msg(renderer_names[currentConfig.renderer]);\r
}\r
\r
void plat_status_msg_clear(void)\r
{\r
	unsigned short *d = (unsigned short *)g_screen_ptr + g_screen_width * g_screen_height;\r
	int l = g_screen_width * 8;\r
	memset32((int *)(d - l), 0, l * 2 / 4);\r
}\r
\r
void plat_status_msg_busy_next(const char *msg)\r
{\r
	plat_status_msg_clear();\r
	pemu_finalize_frame("", msg);\r
	plat_video_flip();\r
	emu_status_msg("");\r
	reset_timing = 1;\r
}\r
\r
void plat_status_msg_busy_first(const char *msg)\r
{\r
//	memset32(g_screen_ptr, 0, g_screen_width * g_screen_height * 2 / 4);\r
	plat_status_msg_busy_next(msg);\r
}\r
\r
void plat_update_volume(int has_changed, int is_up)\r
{\r
}\r
\r
void pemu_forced_frame(int no_scale, int do_emu)\r
{\r
	PicoDrawSetOutBuf(g_screen_ptr, g_screen_width * 2);\r
	PicoDrawSetCallbacks(NULL, NULL);\r
	Pico.m.dirtyPal = 1;\r
\r
	emu_cmn_forced_frame(no_scale, do_emu);\r
\r
	g_menubg_src_ptr = g_screen_ptr;\r
}\r
\r
void pemu_sound_start(void)\r
{\r
	emu_sound_start();\r
}\r
\r
void plat_debug_cat(char *str)\r
{\r
}\r
\r
void emu_video_mode_change(int start_line, int line_count, int is_32cols)\r
{\r
	// clear whole screen in all buffers\r
	memset32(g_screen_ptr, 0, g_screen_width * g_screen_height * 2 / 4);\r
}\r
\r
void pemu_loop_prep(void)\r
{\r
	apply_renderer();\r
	osd_text = osd_text16;\r
}\r
\r
void pemu_loop_end(void)\r
{\r
	/* do one more frame for menu bg */\r
	pemu_forced_frame(0, 1);\r
}\r
\r
void plat_wait_till_us(unsigned int us_to)\r
{\r
	unsigned int now;\r
\r
	now = plat_get_ticks_us();\r
\r
	while ((signed int)(us_to - now) > 512)\r
	{\r
		usleep(1024);\r
		now = plat_get_ticks_us();\r
	}\r
}\r
\r
Commit	Line	Data
cff531af	1	/*\r
	2	* PicoDrive\r
	3	* (C) notaz, 2006-2010\r
	4	*\r
	5	* This work is licensed under the terms of MAME license.\r
	6	* See COPYING file in the top-level directory.\r
	7	*/\r
697746df	8	\r
	9	#include <stdio.h>\r
	10	#include <unistd.h>\r
	11	\r
e743be20	12	#include "../libpicofe/menu.h"\r
e743be20	13	#include "../libpicofe/plat.h"\r
697746df	14	#include "../common/emu.h"\r
697746df	15	#include "../common/arm_utils.h"\r
90f0dedf	16	#include "../common/version.h"\r
697746df	17	\r
	18	#include <pico/pico_int.h>\r
	19	\r
	20	\r
fcdefcf6	21	const char *renderer_names[] = { "16bit accurate", " 8bit accurate", " 8bit fast", NULL };\r
fcdefcf6	22	const char *renderer_names32x[] = { "accurate", "faster", "fastest", NULL };\r
5a681086	23	enum renderer_types { RT_16BIT, RT_8BIT_ACC, RT_8BIT_FAST, RT_COUNT };\r
697746df	24	\r
697746df	25	\r
	26	void pemu_prep_defconfig(void)\r
	27	{\r
697746df	28	}\r
	29	\r
	30	void pemu_validate_config(void)\r
	31	{\r
	32	extern int PicoOpt;\r
	33	// PicoOpt &= ~POPT_EXT_FM;\r
92dfd9af	34	PicoOpt &= ~POPT_EN_DRC;\r
697746df	35	}\r
	36	\r
	37	// FIXME: dupes from GP2X, need cleanup\r
	38	static void (osd_text)(int x, int y, const char text);\r
	39	\r
d08e7326	40	/*\r
697746df	41	static void osd_text8(int x, int y, const char *text)\r
	42	{\r
	43	int len = strlen(text)*8;\r
	44	int *p, i, h, offs;\r
	45	\r
	46	len = (len+3) >> 2;\r
	47	for (h = 0; h < 8; h++) {\r
	48	offs = (x + g_screen_width * (y+h)) & ~3;\r
	49	p = (int ) ((char )g_screen_ptr + offs);\r
	50	for (i = len; i; i--, p++)\r
	51	*p = 0xe0e0e0e0;\r
	52	}\r
	53	emu_text_out8(x, y, text);\r
	54	}\r
d08e7326	55	*/\r
697746df	56	\r
	57	static void osd_text16(int x, int y, const char *text)\r
	58	{\r
	59	int len = strlen(text)*8;\r
	60	int *p, i, h, offs;\r
	61	\r
	62	len = (len+1) >> 1;\r
	63	for (h = 0; h < 8; h++) {\r
	64	offs = (x + g_screen_width * (y+h)) & ~1;\r
	65	p = (int ) ((short )g_screen_ptr + offs);\r
	66	for (i = len; i; i--, p++)\r
	67	p = (p >> 2) & 0x39e7;\r
	68	}\r
	69	emu_text_out16(x, y, text);\r
	70	}\r
	71	\r
	72	static void draw_cd_leds(void)\r
	73	{\r
	74	int led_reg, pitch, scr_offs, led_offs;\r
	75	led_reg = Pico_mcd->s68k_regs[0];\r
	76	\r
	77	pitch = 320;\r
	78	led_offs = 4;\r
	79	scr_offs = pitch * 2 + 4;\r
	80	\r
5a681086	81	if (currentConfig.renderer != RT_16BIT) {\r
697746df	82	#define p(x) px[(x) >> 2]\r
	83	// 8-bit modes\r
	84	unsigned int px = (unsigned int )((char *)g_screen_ptr + scr_offs);\r
	85	unsigned int col_g = (led_reg & 2) ? 0xc0c0c0c0 : 0xe0e0e0e0;\r
	86	unsigned int col_r = (led_reg & 1) ? 0xd0d0d0d0 : 0xe0e0e0e0;\r
	87	p(pitch0) = p(pitch1) = p(pitch*2) = col_g;\r
	88	p(pitch0 + led_offs) = p(pitch1 + led_offs) = p(pitch*2 + led_offs) = col_r;\r
	89	#undef p\r
	90	} else {\r
	91	#define p(x) px[(x)2 >> 2] = px[((x)2 >> 2) + 1]\r
	92	// 16-bit modes\r
	93	unsigned int px = (unsigned int )((short *)g_screen_ptr + scr_offs);\r
	94	unsigned int col_g = (led_reg & 2) ? 0x06000600 : 0;\r
	95	unsigned int col_r = (led_reg & 1) ? 0xc000c000 : 0;\r
	96	p(pitch0) = p(pitch1) = p(pitch*2) = col_g;\r
	97	p(pitch0 + led_offs) = p(pitch1 + led_offs) = p(pitch*2 + led_offs) = col_r;\r
	98	#undef p\r
	99	}\r
	100	}\r
	101	\r
d08e7326	102	void pemu_finalize_frame(const char fps, const char notice)\r
697746df	103	{\r
5a681086	104	if (currentConfig.renderer != RT_16BIT && !(PicoAHW & PAHW_32X)) {\r
	105	unsigned short pd = (unsigned short )g_screen_ptr + 8 * g_screen_width;\r
	106	unsigned char ps = PicoDraw2FB + 3288 + 8;\r
	107	unsigned short *pal = HighPal;\r
	108	int i, x;\r
	109	if (Pico.m.dirtyPal)\r
	110	PicoDrawUpdateHighPal();\r
	111	for (i = 0; i < 224; i++, ps += 8)\r
	112	for (x = 0; x < 320; x++)\r
	113	pd++ = pal[ps++];\r
	114	}\r
	115	\r
697746df	116	if (notice \|\| (currentConfig.EmuOpt & EOPT_SHOW_FPS)) {\r
	117	if (notice)\r
	118	osd_text(4, g_screen_height - 8, notice);\r
	119	if (currentConfig.EmuOpt & EOPT_SHOW_FPS)\r
d08e7326	120	osd_text(g_screen_width - 60, g_screen_height - 8, fps);\r
697746df	121	}\r
	122	if ((PicoAHW & PAHW_MCD) && (currentConfig.EmuOpt & EOPT_EN_CD_LEDS))\r
	123	draw_cd_leds();\r
697746df	124	}\r
697746df	125	\r
5a681086	126	static void apply_renderer(void)\r
5a681086	127	{\r
5a681086	128	switch (currentConfig.renderer) {\r
	129	case RT_16BIT:\r
	130	PicoOpt &= ~POPT_ALT_RENDERER;\r
	131	PicoDrawSetOutFormat(PDF_RGB555, 0);\r
	132	PicoDrawSetOutBuf(g_screen_ptr, g_screen_width * 2);\r
	133	break;\r
	134	case RT_8BIT_ACC:\r
	135	PicoOpt &= ~POPT_ALT_RENDERER;\r
	136	PicoDrawSetOutFormat(PDF_8BIT, 0);\r
	137	PicoDrawSetOutBuf(PicoDraw2FB + 8, 328);\r
	138	break;\r
	139	case RT_8BIT_FAST:\r
	140	PicoOpt \|= POPT_ALT_RENDERER;\r
	141	PicoDrawSetOutFormat(PDF_NONE, 0);\r
	142	break;\r
	143	}\r
	144	\r
41946d70	145	if (PicoAHW & PAHW_32X)\r
5a681086	146	PicoDrawSetOutBuf(g_screen_ptr, g_screen_width * 2);\r
5a681086	147	}\r
	148	\r
	149	void plat_video_toggle_renderer(int change, int is_menu)\r
697746df	150	{\r
5a681086	151	currentConfig.renderer += change;\r
	152	if (currentConfig.renderer >= RT_COUNT)\r
	153	currentConfig.renderer = 0;\r
	154	else if (currentConfig.renderer < 0)\r
	155	currentConfig.renderer = RT_COUNT - 1;\r
	156	\r
	157	if (!is_menu)\r
	158	apply_renderer();\r
	159	\r
	160	emu_status_msg(renderer_names[currentConfig.renderer]);\r
697746df	161	}\r
697746df	162	\r
697746df	163	void plat_status_msg_clear(void)\r
	164	{\r
	165	unsigned short d = (unsigned short )g_screen_ptr + g_screen_width * g_screen_height;\r
	166	int l = g_screen_width * 8;\r
	167	memset32((int )(d - l), 0, l 2 / 4);\r
	168	}\r
	169	\r
	170	void plat_status_msg_busy_next(const char *msg)\r
	171	{\r
	172	plat_status_msg_clear();\r
d08e7326	173	pemu_finalize_frame("", msg);\r
d08e7326	174	plat_video_flip();\r
697746df	175	emu_status_msg("");\r
	176	reset_timing = 1;\r
	177	}\r
	178	\r
	179	void plat_status_msg_busy_first(const char *msg)\r
	180	{\r
	181	// memset32(g_screen_ptr, 0, g_screen_width * g_screen_height * 2 / 4);\r
	182	plat_status_msg_busy_next(msg);\r
	183	}\r
	184	\r
	185	void plat_update_volume(int has_changed, int is_up)\r
	186	{\r
	187	}\r
	188	\r
45285368	189	void pemu_forced_frame(int no_scale, int do_emu)\r
697746df	190	{\r
e51e5983	191	PicoDrawSetOutBuf(g_screen_ptr, g_screen_width * 2);\r
a4edca53	192	PicoDrawSetCallbacks(NULL, NULL);\r
697746df	193	Pico.m.dirtyPal = 1;\r
a4edca53	194	\r
a4edca53	195	emu_cmn_forced_frame(no_scale, do_emu);\r
697746df	196	\r
45285368	197	g_menubg_src_ptr = g_screen_ptr;\r
697746df	198	}\r
697746df	199	\r
697746df	200	void pemu_sound_start(void)\r
697746df	201	{\r
df92fbd1	202	emu_sound_start();\r
697746df	203	}\r
	204	\r
	205	void plat_debug_cat(char *str)\r
	206	{\r
	207	}\r
	208	\r
	209	void emu_video_mode_change(int start_line, int line_count, int is_32cols)\r
	210	{\r
697746df	211	// clear whole screen in all buffers\r
	212	memset32(g_screen_ptr, 0, g_screen_width * g_screen_height * 2 / 4);\r
	213	}\r
	214	\r
	215	void pemu_loop_prep(void)\r
	216	{\r
5a681086	217	apply_renderer();\r
697746df	218	osd_text = osd_text16;\r
697746df	219	}\r
	220	\r
	221	void pemu_loop_end(void)\r
	222	{\r
697746df	223	/* do one more frame for menu bg */\r
45285368	224	pemu_forced_frame(0, 1);\r
697746df	225	}\r
	226	\r
	227	void plat_wait_till_us(unsigned int us_to)\r
	228	{\r
	229	unsigned int now;\r
	230	\r
	231	now = plat_get_ticks_us();\r
	232	\r
	233	while ((signed int)(us_to - now) > 512)\r
	234	{\r
	235	usleep(1024);\r
	236	now = plat_get_ticks_us();\r
	237	}\r
	238	}\r
	239	\r