[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 "../libpicofe/linux/sndout_oss.h"\r
#include "../common/emu.h"\r
#include "../common/arm_utils.h"\r
#include "version.h"\r
\r
#include <pico/pico_int.h>\r
\r
\r
static short __attribute__((aligned(4))) sndBuffer[2*44100/50];\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_SVP_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
		int only_32x = 0;\r
		if (currentConfig.renderer == RT_16BIT)\r
			only_32x = 1;\r
		else\r
			PicoDrawSetOutFormat(PDF_NONE, 0);\r
		PicoDraw32xSetFrameMode(1, only_32x);\r
		PicoDrawSetOutBuf(g_screen_ptr, g_screen_width * 2);\r
	}\r
	//PicoDraw32xSetFrameMode(0, 0);\r
	//PicoDrawSetOutFormat(PDF_RGB555, 1);\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
	PicoDraw32xSetFrameMode(0, 0);\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
static void oss_write_nonblocking(int len)\r
{\r
	// sndout_oss_can_write() is not reliable, only use with no_frmlimit\r
	if ((currentConfig.EmuOpt & EOPT_NO_FRMLIMIT) && !sndout_oss_can_write(len))\r
		return;\r
\r
	sndout_oss_write_nb(PsndOut, len);\r
}\r
\r
void pemu_sound_start(void)\r
{\r
	PsndOut = NULL;\r
\r
	if (currentConfig.EmuOpt & EOPT_EN_SOUND)\r
	{\r
		int is_stereo = (PicoOpt & POPT_EN_STEREO) ? 1 : 0;\r
\r
		PsndRerate(Pico.m.frame_count ? 1 : 0);\r
\r
		printf("starting audio: %i len: %i stereo: %i, pal: %i\n",\r
			PsndRate, PsndLen, is_stereo, Pico.m.pal);\r
		sndout_oss_start(PsndRate, is_stereo, 1);\r
		sndout_oss_setvol(currentConfig.volume, currentConfig.volume);\r
		PicoWriteSound = oss_write_nonblocking;\r
		plat_update_volume(0, 0);\r
		memset(sndBuffer, 0, sizeof(sndBuffer));\r
		PsndOut = sndBuffer;\r
	}\r
}\r
\r
void pemu_sound_stop(void)\r
{\r
}\r
\r
void pemu_sound_wait(void)\r
{\r
	// don't need to do anything, writes will block by themselves\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
	pemu_sound_start();\r
}\r
\r
void pemu_loop_end(void)\r
{\r
	pemu_sound_stop();\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
	13	#include "../libpicofe/plat.h"\r
	14	#include "../libpicofe/linux/sndout_oss.h"\r
697746df	15	#include "../common/emu.h"\r
697746df	16	#include "../common/arm_utils.h"\r
697746df	17	#include "version.h"\r
	18	\r
	19	#include <pico/pico_int.h>\r
	20	\r
	21	\r
	22	static short __attribute__((aligned(4))) sndBuffer[2*44100/50];\r
fcdefcf6	23	const char *renderer_names[] = { "16bit accurate", " 8bit accurate", " 8bit fast", NULL };\r
fcdefcf6	24	const char *renderer_names32x[] = { "accurate", "faster", "fastest", NULL };\r
5a681086	25	enum renderer_types { RT_16BIT, RT_8BIT_ACC, RT_8BIT_FAST, RT_COUNT };\r
697746df	26	\r
697746df	27	\r
	28	void pemu_prep_defconfig(void)\r
	29	{\r
697746df	30	}\r
	31	\r
	32	void pemu_validate_config(void)\r
	33	{\r
	34	extern int PicoOpt;\r
	35	// PicoOpt &= ~POPT_EXT_FM;\r
	36	PicoOpt &= ~POPT_EN_SVP_DRC;\r
	37	}\r
	38	\r
	39	// FIXME: dupes from GP2X, need cleanup\r
	40	static void (osd_text)(int x, int y, const char text);\r
	41	\r
d08e7326	42	/*\r
697746df	43	static void osd_text8(int x, int y, const char *text)\r
	44	{\r
	45	int len = strlen(text)*8;\r
	46	int *p, i, h, offs;\r
	47	\r
	48	len = (len+3) >> 2;\r
	49	for (h = 0; h < 8; h++) {\r
	50	offs = (x + g_screen_width * (y+h)) & ~3;\r
	51	p = (int ) ((char )g_screen_ptr + offs);\r
	52	for (i = len; i; i--, p++)\r
	53	*p = 0xe0e0e0e0;\r
	54	}\r
	55	emu_text_out8(x, y, text);\r
	56	}\r
d08e7326	57	*/\r
697746df	58	\r
	59	static void osd_text16(int x, int y, const char *text)\r
	60	{\r
	61	int len = strlen(text)*8;\r
	62	int *p, i, h, offs;\r
	63	\r
	64	len = (len+1) >> 1;\r
	65	for (h = 0; h < 8; h++) {\r
	66	offs = (x + g_screen_width * (y+h)) & ~1;\r
	67	p = (int ) ((short )g_screen_ptr + offs);\r
	68	for (i = len; i; i--, p++)\r
	69	p = (p >> 2) & 0x39e7;\r
	70	}\r
	71	emu_text_out16(x, y, text);\r
	72	}\r
	73	\r
	74	static void draw_cd_leds(void)\r
	75	{\r
	76	int led_reg, pitch, scr_offs, led_offs;\r
	77	led_reg = Pico_mcd->s68k_regs[0];\r
	78	\r
	79	pitch = 320;\r
	80	led_offs = 4;\r
	81	scr_offs = pitch * 2 + 4;\r
	82	\r
5a681086	83	if (currentConfig.renderer != RT_16BIT) {\r
697746df	84	#define p(x) px[(x) >> 2]\r
	85	// 8-bit modes\r
	86	unsigned int px = (unsigned int )((char *)g_screen_ptr + scr_offs);\r
	87	unsigned int col_g = (led_reg & 2) ? 0xc0c0c0c0 : 0xe0e0e0e0;\r
	88	unsigned int col_r = (led_reg & 1) ? 0xd0d0d0d0 : 0xe0e0e0e0;\r
	89	p(pitch0) = p(pitch1) = p(pitch*2) = col_g;\r
	90	p(pitch0 + led_offs) = p(pitch1 + led_offs) = p(pitch*2 + led_offs) = col_r;\r
	91	#undef p\r
	92	} else {\r
	93	#define p(x) px[(x)2 >> 2] = px[((x)2 >> 2) + 1]\r
	94	// 16-bit modes\r
	95	unsigned int px = (unsigned int )((short *)g_screen_ptr + scr_offs);\r
	96	unsigned int col_g = (led_reg & 2) ? 0x06000600 : 0;\r
	97	unsigned int col_r = (led_reg & 1) ? 0xc000c000 : 0;\r
	98	p(pitch0) = p(pitch1) = p(pitch*2) = col_g;\r
	99	p(pitch0 + led_offs) = p(pitch1 + led_offs) = p(pitch*2 + led_offs) = col_r;\r
	100	#undef p\r
	101	}\r
	102	}\r
	103	\r
d08e7326	104	void pemu_finalize_frame(const char fps, const char notice)\r
697746df	105	{\r
5a681086	106	if (currentConfig.renderer != RT_16BIT && !(PicoAHW & PAHW_32X)) {\r
	107	unsigned short pd = (unsigned short )g_screen_ptr + 8 * g_screen_width;\r
	108	unsigned char ps = PicoDraw2FB + 3288 + 8;\r
	109	unsigned short *pal = HighPal;\r
	110	int i, x;\r
	111	if (Pico.m.dirtyPal)\r
	112	PicoDrawUpdateHighPal();\r
	113	for (i = 0; i < 224; i++, ps += 8)\r
	114	for (x = 0; x < 320; x++)\r
	115	pd++ = pal[ps++];\r
	116	}\r
	117	\r
697746df	118	if (notice \|\| (currentConfig.EmuOpt & EOPT_SHOW_FPS)) {\r
	119	if (notice)\r
	120	osd_text(4, g_screen_height - 8, notice);\r
	121	if (currentConfig.EmuOpt & EOPT_SHOW_FPS)\r
d08e7326	122	osd_text(g_screen_width - 60, g_screen_height - 8, fps);\r
697746df	123	}\r
	124	if ((PicoAHW & PAHW_MCD) && (currentConfig.EmuOpt & EOPT_EN_CD_LEDS))\r
	125	draw_cd_leds();\r
697746df	126	}\r
697746df	127	\r
5a681086	128	static void apply_renderer(void)\r
5a681086	129	{\r
5a681086	130	switch (currentConfig.renderer) {\r
	131	case RT_16BIT:\r
	132	PicoOpt &= ~POPT_ALT_RENDERER;\r
	133	PicoDrawSetOutFormat(PDF_RGB555, 0);\r
	134	PicoDrawSetOutBuf(g_screen_ptr, g_screen_width * 2);\r
	135	break;\r
	136	case RT_8BIT_ACC:\r
	137	PicoOpt &= ~POPT_ALT_RENDERER;\r
	138	PicoDrawSetOutFormat(PDF_8BIT, 0);\r
	139	PicoDrawSetOutBuf(PicoDraw2FB + 8, 328);\r
	140	break;\r
	141	case RT_8BIT_FAST:\r
	142	PicoOpt \|= POPT_ALT_RENDERER;\r
	143	PicoDrawSetOutFormat(PDF_NONE, 0);\r
	144	break;\r
	145	}\r
	146	\r
	147	if (PicoAHW & PAHW_32X) {\r
	148	int only_32x = 0;\r
	149	if (currentConfig.renderer == RT_16BIT)\r
	150	only_32x = 1;\r
	151	else\r
	152	PicoDrawSetOutFormat(PDF_NONE, 0);\r
	153	PicoDraw32xSetFrameMode(1, only_32x);\r
	154	PicoDrawSetOutBuf(g_screen_ptr, g_screen_width * 2);\r
	155	}\r
e51e5983	156	//PicoDraw32xSetFrameMode(0, 0);\r
e51e5983	157	//PicoDrawSetOutFormat(PDF_RGB555, 1);\r
5a681086	158	}\r
	159	\r
	160	void plat_video_toggle_renderer(int change, int is_menu)\r
697746df	161	{\r
5a681086	162	currentConfig.renderer += change;\r
	163	if (currentConfig.renderer >= RT_COUNT)\r
	164	currentConfig.renderer = 0;\r
	165	else if (currentConfig.renderer < 0)\r
	166	currentConfig.renderer = RT_COUNT - 1;\r
	167	\r
	168	if (!is_menu)\r
	169	apply_renderer();\r
	170	\r
	171	emu_status_msg(renderer_names[currentConfig.renderer]);\r
697746df	172	}\r
697746df	173	\r
697746df	174	void plat_status_msg_clear(void)\r
	175	{\r
	176	unsigned short d = (unsigned short )g_screen_ptr + g_screen_width * g_screen_height;\r
	177	int l = g_screen_width * 8;\r
	178	memset32((int )(d - l), 0, l 2 / 4);\r
	179	}\r
	180	\r
	181	void plat_status_msg_busy_next(const char *msg)\r
	182	{\r
	183	plat_status_msg_clear();\r
d08e7326	184	pemu_finalize_frame("", msg);\r
d08e7326	185	plat_video_flip();\r
697746df	186	emu_status_msg("");\r
	187	reset_timing = 1;\r
	188	}\r
	189	\r
	190	void plat_status_msg_busy_first(const char *msg)\r
	191	{\r
	192	// memset32(g_screen_ptr, 0, g_screen_width * g_screen_height * 2 / 4);\r
	193	plat_status_msg_busy_next(msg);\r
	194	}\r
	195	\r
	196	void plat_update_volume(int has_changed, int is_up)\r
	197	{\r
	198	}\r
	199	\r
45285368	200	void pemu_forced_frame(int no_scale, int do_emu)\r
697746df	201	{\r
e51e5983	202	PicoDrawSetOutBuf(g_screen_ptr, g_screen_width * 2);\r
e51e5983	203	PicoDraw32xSetFrameMode(0, 0);\r
a4edca53	204	PicoDrawSetCallbacks(NULL, NULL);\r
697746df	205	Pico.m.dirtyPal = 1;\r
a4edca53	206	\r
a4edca53	207	emu_cmn_forced_frame(no_scale, do_emu);\r
697746df	208	\r
45285368	209	g_menubg_src_ptr = g_screen_ptr;\r
697746df	210	}\r
697746df	211	\r
a4edca53	212	static void oss_write_nonblocking(int len)\r
697746df	213	{\r
a4edca53	214	// sndout_oss_can_write() is not reliable, only use with no_frmlimit\r
697746df	215	if ((currentConfig.EmuOpt & EOPT_NO_FRMLIMIT) && !sndout_oss_can_write(len))\r
	216	return;\r
	217	\r
a4edca53	218	sndout_oss_write_nb(PsndOut, len);\r
697746df	219	}\r
	220	\r
	221	void pemu_sound_start(void)\r
	222	{\r
697746df	223	PsndOut = NULL;\r
	224	\r
	225	if (currentConfig.EmuOpt & EOPT_EN_SOUND)\r
	226	{\r
d08e7326	227	int is_stereo = (PicoOpt & POPT_EN_STEREO) ? 1 : 0;\r
	228	\r
	229	PsndRerate(Pico.m.frame_count ? 1 : 0);\r
	230	\r
9f6a4e90	231	printf("starting audio: %i len: %i stereo: %i, pal: %i\n",\r
	232	PsndRate, PsndLen, is_stereo, Pico.m.pal);\r
	233	sndout_oss_start(PsndRate, is_stereo, 1);\r
697746df	234	sndout_oss_setvol(currentConfig.volume, currentConfig.volume);\r
a4edca53	235	PicoWriteSound = oss_write_nonblocking;\r
697746df	236	plat_update_volume(0, 0);\r
	237	memset(sndBuffer, 0, sizeof(sndBuffer));\r
	238	PsndOut = sndBuffer;\r
697746df	239	}\r
	240	}\r
	241	\r
	242	void pemu_sound_stop(void)\r
	243	{\r
	244	}\r
	245	\r
	246	void pemu_sound_wait(void)\r
	247	{\r
	248	// don't need to do anything, writes will block by themselves\r
	249	}\r
	250	\r
	251	void plat_debug_cat(char *str)\r
	252	{\r
	253	}\r
	254	\r
	255	void emu_video_mode_change(int start_line, int line_count, int is_32cols)\r
	256	{\r
697746df	257	// clear whole screen in all buffers\r
	258	memset32(g_screen_ptr, 0, g_screen_width * g_screen_height * 2 / 4);\r
	259	}\r
	260	\r
	261	void pemu_loop_prep(void)\r
	262	{\r
5a681086	263	apply_renderer();\r
697746df	264	osd_text = osd_text16;\r
	265	\r
	266	pemu_sound_start();\r
	267	}\r
	268	\r
	269	void pemu_loop_end(void)\r
	270	{\r
697746df	271	pemu_sound_stop();\r
697746df	272	\r
697746df	273	/* do one more frame for menu bg */\r
45285368	274	pemu_forced_frame(0, 1);\r
697746df	275	}\r
	276	\r
	277	void plat_wait_till_us(unsigned int us_to)\r
	278	{\r
	279	unsigned int now;\r
	280	\r
	281	now = plat_get_ticks_us();\r
	282	\r
	283	while ((signed int)(us_to - now) > 512)\r
	284	{\r
	285	usleep(1024);\r
	286	now = plat_get_ticks_us();\r
	287	}\r
	288	}\r
	289	\r