X-Git-Url: https://notaz.gp2x.de/cgi-bin/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=platform%2Fgp2x%2Femu.c;h=7e9a132f381239f52ca40cda8f2576dae76edf90;hb=refs%2Fremotes%2Fgithub%2Fmaster;hp=0375a7ff99bc0780635a6511b3c167b21008fe87;hpb=bdec53c90b6e53990fc206cabaec31b844f34d1e;p=picodrive.git

diff --git a/platform/gp2x/emu.c b/platform/gp2x/emu.c
index 0375a7ff..8a1fda83 100644
--- a/platform/gp2x/emu.c
+++ b/platform/gp2x/emu.c
@@ -1,35 +1,37 @@
-// (c) Copyright 2006-2007 notaz, All rights reserved.
-// Free for non-commercial use.
-
-// For commercial use, separate licencing terms must be obtained.
+/*
+ * (c) Copyright 2006-2010 notaz, All rights reserved.
+ * (c) Copyright 2019-2024 irixxxx
+ *
+ * For performance reasons 3 renderers are exported for both MD and 32x modes:
+ * - 16bpp line renderer
+ * - 8bpp line renderer (slightly faster)
+ * - 8bpp tile renderer
+ * In 32x mode:
+ * - 32x layer is overlayed on top of 16bpp one
+ * - line internal one done on .Draw2FB, then mixed with 32x
+ * - tile internal one done on .Draw2FB, then mixed with 32x
+ */
 
 #include <stdio.h>
 #include <stdlib.h>
-#include <sys/time.h>
-#include <sys/stat.h>
-#include <sys/types.h>
-#include <linux/limits.h>
-#include <ctype.h>
 #include <unistd.h>
 
-#include <stdarg.h>
-
-#include "emu.h"
-#include "gp2x.h"
-#include "usbjoy.h"
-#include "menu.h"
+#include "../libpicofe/gp2x/plat_gp2x.h"
+#include "../libpicofe/gp2x/soc.h"
+#include "../libpicofe/input.h"
+#include "../libpicofe/plat.h"
+#include "../libpicofe/gp2x/soc_pollux.h"
+#include "../common/menu_pico.h"
 #include "../common/arm_utils.h"
-#include "../common/fonts.h"
 #include "../common/emu.h"
-#include "../common/config.h"
-#include "cpuctrl.h"
+#include "../common/config_file.h"
+#include "../common/version.h"
+#include "plat.h"
 
-#include <Pico/PicoInt.h>
-#include <Pico/Patch.h>
-#include <Pico/sound/mix.h>
-#include <zlib/zlib.h>
-
-//#define PFRAMES
+#include <pico/pico_int.h>
+#include <pico/patch.h>
+#include <pico/sound/mix.h>
+#include <zlib.h>
 
 #ifdef BENCHMARK
 #define OSD_FPS_X 220
@@ -38,942 +40,832 @@
 #endif
 
 
-int engineState;
-int select_exits = 0;
-
-char romFileName[PATH_MAX];
+//extern int crashed_940;
 
-extern int crashed_940;
+static int osd_fps_x, osd_y, doing_bg_frame;
+const char *renderer_names[] = { "16bit accurate", " 8bit accurate", " 8bit fast", NULL };
+const char *renderer_names32x[] = { "accurate", "faster", "fastest", NULL };
+enum renderer_types { RT_16BIT, RT_8BIT_ACC, RT_8BIT_FAST, RT_COUNT };
 
-static short __attribute__((aligned(4))) sndBuffer[2*44100/50];
-static struct timeval noticeMsgTime = { 0, 0 };	// when started showing
-static int osd_fps_x;
-static int gp2x_old_gamma = 100;
-char noticeMsg[64];			// notice msg to draw
-unsigned char *PicoDraw2FB = NULL;  // temporary buffer for alt renderer
-int reset_timing = 0;
+static int is_1stblanked;
+static int firstline, linecount;
+static int firstcol, colcount;
 
-static void emu_msg_cb(const char *msg);
-static void emu_msg_tray_open(void);
+static int (*emu_scan_begin)(unsigned int num) = NULL;
+static int (*emu_scan_end)(unsigned int num) = NULL;
 
 
-void emu_noticeMsgUpdated(void)
+void pemu_prep_defconfig(void)
 {
-	gettimeofday(&noticeMsgTime, 0);
-}
+	gp2x_soc_t soc;
 
-void emu_getMainDir(char *dst, int len)
-{
-	extern char **g_argv;
-	int j;
+	defaultConfig.CPUclock = default_cpu_clock;
+	defaultConfig.renderer32x = RT_8BIT_ACC;
+	defaultConfig.analog_deadzone = 50;
 
-	strncpy(dst, g_argv[0], len);
-	len -= 32; // reserve
-	if (len < 0) len = 0;
-	dst[len] = 0;
-	for (j = strlen(dst); j > 0; j--)
-		if (dst[j] == '/') { dst[j+1] = 0; break; }
+	soc = soc_detect();
+	if (soc == SOCID_MMSP2)
+		defaultConfig.s_PicoOpt |= POPT_EXT_FM;
+	else if (soc == SOCID_POLLUX) {
+		defaultConfig.EmuOpt |= EOPT_WIZ_TEAR_FIX|EOPT_SHOW_RTC;
+		defaultConfig.s_PicoOpt |= POPT_EN_MCD_GFX;
+	}
 }
 
-void emu_Init(void)
+void pemu_validate_config(void)
 {
-	// make temp buffer for alt renderer
-	PicoDraw2FB = malloc((8+320)*(8+240+8));
-	if (!PicoDraw2FB)
-	{
-		printf("PicoDraw2FB == 0\n");
-	}
+	if (gp2x_dev_id != GP2X_DEV_GP2X)
+		PicoIn.opt &= ~POPT_EXT_FM;
+	if (gp2x_dev_id != GP2X_DEV_WIZ)
+		currentConfig.EmuOpt &= ~EOPT_WIZ_TEAR_FIX;
 
-	// make dirs for saves, cfgs, etc.
-	mkdir("mds", 0777);
-	mkdir("srm", 0777);
-	mkdir("brm", 0777);
-	mkdir("cfg", 0777);
+	if (currentConfig.gamma < 10 || currentConfig.gamma > 300)
+		currentConfig.gamma = 100;
 
-	PicoInit();
-	PicoMessage = emu_msg_cb;
-	PicoMCDopenTray = emu_msg_tray_open;
-	PicoMCDcloseTray = menu_loop_tray;
+	if (currentConfig.CPUclock < 10 || currentConfig.CPUclock > 1024)
+		currentConfig.CPUclock = default_cpu_clock;
 }
 
+static int get_renderer(void)
+{
+	if (doing_bg_frame)
+		return RT_16BIT;
+	if (PicoIn.AHW & PAHW_32X)
+		return currentConfig.renderer32x;
+	else
+		return currentConfig.renderer;
+}
 
-static void scaling_update(void)
+static void change_renderer(int diff)
 {
-	PicoOpt &= ~0x4100;
-	switch (currentConfig.scaling) {
-		default: break; // off
-		case 1:  // hw hor
-		case 2:  PicoOpt |=  0x0100; break; // hw hor+vert
-		case 3:  PicoOpt |=  0x4000; break; // sw hor
-	}
+	int *r;
+	if (PicoIn.AHW & PAHW_32X)
+		r = &currentConfig.renderer32x;
+	else
+		r = &currentConfig.renderer;
+	*r += diff;
+
+	if      (*r >= RT_COUNT)
+		*r = 0;
+	else if (*r < 0)
+		*r = RT_COUNT - 1;
 }
 
+#define is_16bit_mode() \
+	(currentConfig.renderer == RT_16BIT || (PicoIn.AHW & PAHW_32X) || doing_bg_frame)
+
+static void (*osd_text)(int x, int y, const char *text);
 
-void emu_Deinit(void)
+static void osd_text8(int x, int y, const char *text)
 {
-	// save SRAM
-	if((currentConfig.EmuOpt & 1) && SRam.changed) {
-		emu_SaveLoadGame(0, 1);
-		SRam.changed = 0;
-	}
+	int len = strlen(text)*8;
+	int *p, i, h, offs;
 
-	if (!(currentConfig.EmuOpt & 0x20)) {
-		config_writelrom(PicoConfigFile);
-#ifndef NO_SYNC
-		sync();
-#endif
+	len = (len+3) >> 2;
+	for (h = 0; h < 8; h++) {
+		offs = (x + g_screen_width * (y+h)) & ~3;
+		p = (int *) ((char *)g_screen_ptr + offs);
+		for (i = len; i; i--, p++)
+			*p = 0xe0e0e0e0;
 	}
+	emu_text_out8(x, y, text);
+}
 
-	free(PicoDraw2FB);
+static void osd_text8_rot(int x, int y, const char *text)
+{
+	int len = strlen(text) * 8;
+	char *p = (char *)g_screen_ptr + 240*(320-x) + y;
 
-	PicoExit();
+	while (len--) {
+		memset(p, 0xe0, 8);
+		p -= 240;
+	}
 
-	// restore gamma
-	if (gp2x_old_gamma != 100)
-		set_gamma(100, 0);
+	emu_text_out8_rot(x, y, text);
 }
 
-void emu_prepareDefaultConfig(void)
+static void osd_text16_rot(int x, int y, const char *text)
 {
-	memset(&defaultConfig, 0, sizeof(defaultConfig));
-	defaultConfig.EmuOpt    = 0x1d | 0x00700; // | <- ram_tmng, confirm_save, cd_leds
-	defaultConfig.s_PicoOpt = 0x0f | 0x20e00; // | <- use_940, cd_pcm, cd_cdda, svp drc
-	defaultConfig.s_PsndRate = 44100;
-	defaultConfig.s_PicoRegion = 0; // auto
-	defaultConfig.s_PicoAutoRgnOrder = 0x184; // US, EU, JP
-	defaultConfig.s_PicoCDBuffers = 64;
-	defaultConfig.Frameskip = -1; // auto
-	defaultConfig.CPUclock = 200;
-	defaultConfig.volume = 50;
-	defaultConfig.KeyBinds[ 0] = 1<<0; // SACB RLDU
-	defaultConfig.KeyBinds[ 4] = 1<<1;
-	defaultConfig.KeyBinds[ 2] = 1<<2;
-	defaultConfig.KeyBinds[ 6] = 1<<3;
-	defaultConfig.KeyBinds[14] = 1<<4;
-	defaultConfig.KeyBinds[13] = 1<<5;
-	defaultConfig.KeyBinds[12] = 1<<6;
-	defaultConfig.KeyBinds[ 8] = 1<<7;
-	defaultConfig.KeyBinds[15] = 1<<26; // switch rend
-	defaultConfig.KeyBinds[10] = 1<<27; // save state
-	defaultConfig.KeyBinds[11] = 1<<28; // load state
-	defaultConfig.KeyBinds[23] = 1<<29; // vol up
-	defaultConfig.KeyBinds[22] = 1<<30; // vol down
-	defaultConfig.gamma = 100;
-	defaultConfig.scaling = 0;
+	int len = strlen(text) * 8;
+	short *p = (short *)g_screen_ptr + 240*(320-x) + y;
+
+	while (len--) {
+		memset(p, 0, 8*2);
+		p -= 240;
+	}
+
+	emu_text_out16_rot(x, y, text);
 }
 
-void emu_setDefaultConfig(void)
+static void draw_cd_leds(void)
 {
-	memcpy(&currentConfig, &defaultConfig, sizeof(currentConfig));
-	PicoOpt = currentConfig.s_PicoOpt;
-	PsndRate = currentConfig.s_PsndRate;
-	PicoRegionOverride = currentConfig.s_PicoRegion;
-	PicoAutoRgnOrder = currentConfig.s_PicoAutoRgnOrder;
-	PicoCDBuffers = currentConfig.s_PicoCDBuffers;
+	int led_reg, pitch, scr_offs, led_offs;
+	led_reg = Pico_mcd->s68k_regs[0];
+
+	if (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) {
+		pitch = 240;
+		led_offs = -pitch * 6;
+		scr_offs = pitch * (320 - 4);
+	} else {
+		pitch = 320;
+		led_offs = 4;
+		scr_offs = pitch * 2 + 4;
+	}
+
+	if (!is_16bit_mode()) {
+	#define p(x) px[(x) >> 2]
+		// 8-bit modes
+		unsigned int *px = (unsigned int *)((char *)g_screen_ptr + scr_offs);
+		unsigned int col_g = (led_reg & 2) ? 0xc0c0c0c0 : 0xe0e0e0e0;
+		unsigned int col_r = (led_reg & 1) ? 0xd0d0d0d0 : 0xe0e0e0e0;
+		p(pitch*0) = p(pitch*1) = p(pitch*2) = col_g;
+		p(pitch*0 + led_offs) = p(pitch*1 + led_offs) = p(pitch*2 + led_offs) = col_r;
+	#undef p
+	} else {
+	#define p(x) px[(x)*2 >> 2] = px[((x)*2 >> 2) + 1]
+		// 16-bit modes
+		unsigned int *px = (unsigned int *)((short *)g_screen_ptr + scr_offs);
+		unsigned int col_g = (led_reg & 2) ? 0x06000600 : 0;
+		unsigned int col_r = (led_reg & 1) ? 0xc000c000 : 0;
+		p(pitch*0) = p(pitch*1) = p(pitch*2) = col_g;
+		p(pitch*0 + led_offs) = p(pitch*1 + led_offs) = p(pitch*2 + led_offs) = col_r;
+	#undef p
+	}
 }
 
-void osd_text(int x, int y, const char *text)
+static void draw_pico_ptr(void)
 {
-	int len = strlen(text)*8;
+	int up = (PicoPicohw.pen_pos[0]|PicoPicohw.pen_pos[1]) & 0x8000;
+	int x, y, pitch = 320, offs;
+	// storyware pages are actually squished, 2:1
+	int h = (pico_inp_mode == 1 ? 160 : linecount);
+	if (h < 224) y++;
+
+	x = ((pico_pen_x * colcount  * ((1ULL<<32)/320 + 1)) >> 32) + firstcol;
+	y = ((pico_pen_y * h         * ((1ULL<<32)/224 + 1)) >> 32) + firstline;
+
+	if (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) {
+		pitch = 240;
+		offs = (319 - x) * pitch + y;
+	} else
+		offs = x + y * pitch;
 
-	if ((PicoOpt&0x10)||!(currentConfig.EmuOpt&0x80)) {
-		int *p, i, h;
-		x &= ~3; // align x
-		len = (len+3) >> 2;
-		for (h = 0; h < 8; h++) {
-			p = (int *) ((unsigned char *) gp2x_screen+x+320*(y+h));
-			for (i = len; i; i--, p++) *p = 0xe0e0e0e0;
-		}
-		emu_textOut8(x, y, text);
+	if (is_16bit_mode()) {
+		unsigned short *p = (unsigned short *)g_screen_ptr + offs;
+		int o = (up ? 0x0000 : 0xffff), _ = (up ? 0xffff : 0x0000);
+
+		p[-pitch-1] ^= o; p[-pitch] ^= _; p[-pitch+1] ^= _; p[-pitch+2] ^= o;
+		p[-1]       ^= _; p[0]      ^= o; p[1]        ^= o; p[2]        ^= _;
+		p[pitch-1]  ^= _; p[pitch]  ^= o; p[pitch+1]  ^= o; p[pitch+2]  ^= _;
+		p[2*pitch-1]^= o; p[2*pitch]^= _; p[2*pitch+1]^= _; p[2*pitch+2]^= o;
 	} else {
-		int *p, i, h;
-		x &= ~1; // align x
-		len = (len+1) >> 1;
-		for (h = 0; h < 8; h++) {
-			p = (int *) ((unsigned short *) gp2x_screen+x+320*(y+h));
-			for (i = len; i; i--, p++) *p = (*p>>2)&0x39e7;
-		}
-		emu_textOut16(x, y, text);
+		unsigned char *p = (unsigned char *)g_screen_ptr + offs;
+		int o = (up ? 0xe0 : 0xf0), _ = (up ? 0xf0 : 0xe0);
+
+		p[-pitch-1] = o; p[-pitch] = _; p[-pitch+1] = _; p[-pitch+2] = o;
+		p[-1]       = _; p[0]      = o; p[1]        = o; p[2]        = _;
+		p[pitch-1]  = _; p[pitch]  = o; p[pitch+1]  = o; p[pitch+2]  = _;
+		p[2*pitch-1]= o; p[2*pitch]= _; p[2*pitch+1]= _; p[2*pitch+2]= o;
 	}
 }
 
-static void cd_leds(void)
+static void clear_1st_column(int firstcol, int firstline, int linecount)
 {
-//	static
-	int old_reg;
-//	if (!((Pico_mcd->s68k_regs[0] ^ old_reg) & 3)) return; // no change // mmu hack problems?
-	old_reg = Pico_mcd->s68k_regs[0];
-
-	if ((PicoOpt&0x10)||!(currentConfig.EmuOpt&0x80)) {
-		// 8-bit modes
-		unsigned int col_g = (old_reg & 2) ? 0xc0c0c0c0 : 0xe0e0e0e0;
-		unsigned int col_r = (old_reg & 1) ? 0xd0d0d0d0 : 0xe0e0e0e0;
-		*(unsigned int *)((char *)gp2x_screen + 320*2+ 4) =
-		*(unsigned int *)((char *)gp2x_screen + 320*3+ 4) =
-		*(unsigned int *)((char *)gp2x_screen + 320*4+ 4) = col_g;
-		*(unsigned int *)((char *)gp2x_screen + 320*2+12) =
-		*(unsigned int *)((char *)gp2x_screen + 320*3+12) =
-		*(unsigned int *)((char *)gp2x_screen + 320*4+12) = col_r;
+	int size = is_16bit_mode() ? 2 : 1;
+	int black = is_16bit_mode() ? 0 : 0xe0;
+	int i;
+
+	// SMS 1st column blanked, replace with black
+	if ((currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) && !doing_bg_frame) {
+		int pitch = 240*size;
+		char *p = (char *)g_screen_ptr + (319-(firstcol-8))*pitch;
+		for (i = 0; i < 8; i++, p -= pitch)
+			memset(p+(firstline)*size, black, linecount*size);
 	} else {
-		// 16-bit modes
-		unsigned int *p = (unsigned int *)((short *)gp2x_screen + 320*2+4);
-		unsigned int col_g = (old_reg & 2) ? 0x06000600 : 0;
-		unsigned int col_r = (old_reg & 1) ? 0xc000c000 : 0;
-		*p++ = col_g; *p++ = col_g; p+=2; *p++ = col_r; *p++ = col_r; p += 320/2 - 12/2;
-		*p++ = col_g; *p++ = col_g; p+=2; *p++ = col_r; *p++ = col_r; p += 320/2 - 12/2;
-		*p++ = col_g; *p++ = col_g; p+=2; *p++ = col_r; *p++ = col_r;
+		int pitch = 320*size;
+		char *p = (char *)g_screen_ptr + (firstline)*pitch;
+		for (i = 0; i < linecount; i++, p += pitch)
+			memset(p+(firstcol-8)*size, black, 8*size);
 	}
 }
 
-static int EmuScan16(unsigned int num, void *sdata)
+/* rot thing for Wiz */
+static unsigned char __attribute__((aligned(4))) rot_buff[320*4*2];
+
+static int EmuScanBegin16_rot(unsigned int num)
 {
-	if (!(Pico.video.reg[1]&8)) num += 8;
-	DrawLineDest = (unsigned short *) gp2x_screen + 320*(num+1);
+	Pico.est.DrawLineDest = rot_buff + (num & 3) * 320 * 2;
+	return 0;
+}
 
+static int EmuScanEnd16_rot(unsigned int num)
+{
+	if ((num & 3) != 3)
+		return 0;
+	rotated_blit16(g_screen_ptr, rot_buff, num + 1,
+		!(Pico.video.reg[12] & 1) && !(PicoIn.opt & POPT_EN_SOFTSCALE));
 	return 0;
 }
 
-static int EmuScan8(unsigned int num, void *sdata)
+static int EmuScanBegin8_rot(unsigned int num)
 {
-	if (!(Pico.video.reg[1]&8)) num += 8;
-	DrawLineDest = (unsigned char *)  gp2x_screen + 320*(num+1);
+	Pico.est.DrawLineDest = rot_buff + (num & 3) * 320;
+	return 0;
+}
 
+static int EmuScanEnd8_rot(unsigned int num)
+{
+	if ((num & 3) != 3)
+		return 0;
+	rotated_blit8(g_screen_ptr, rot_buff, num + 1,
+		!(Pico.video.reg[12] & 1) && !(PicoIn.opt & POPT_EN_SOFTSCALE));
 	return 0;
 }
 
-int localPal[0x100];
-static void (*vidCpyM2)(void *dest, void *src) = NULL;
+/* line doublers */
+static unsigned int ld_counter;
+static int ld_left, ld_lines; // numbers in Q1 format
 
-static void blit(const char *fps, const char *notice)
+static int EmuScanBegin16_ld(unsigned int num)
 {
-	int emu_opt = currentConfig.EmuOpt;
-
-	if (PicoOpt&0x10)
-	{
-		// 8bit fast renderer
-		if (Pico.m.dirtyPal) {
-			Pico.m.dirtyPal = 0;
-			vidConvCpyRGB32(localPal, Pico.cram, 0x40);
-			// feed new palette to our device
-			gp2x_video_setpalette(localPal, 0x40);
-		}
-		// a hack for VR
-		if (PicoRead16Hook == PicoSVPRead16)
-			memset32((int *)(PicoDraw2FB+328*8+328*223), 0xe0e0e0e0, 328);
-		// do actual copy
-		vidCpyM2((unsigned char *)gp2x_screen+320*8, PicoDraw2FB+328*8);
-	}
-	else if (!(emu_opt&0x80))
-	{
-		// 8bit accurate renderer
-		if (Pico.m.dirtyPal) {
-			Pico.m.dirtyPal = 0;
-			if(Pico.video.reg[0xC]&8) { // shadow/hilight mode
-				vidConvCpyRGB32(localPal, Pico.cram, 0x40);
-				vidConvCpyRGB32sh(localPal+0x40, Pico.cram, 0x40);
-				vidConvCpyRGB32hi(localPal+0x80, Pico.cram, 0x40);
-				blockcpy(localPal+0xc0, localPal+0x40, 0x40*4);
-				localPal[0xc0] = 0x0000c000;
-				localPal[0xd0] = 0x00c00000;
-				localPal[0xe0] = 0x00000000; // reserved pixels for OSD
-				localPal[0xf0] = 0x00ffffff;
-				gp2x_video_setpalette(localPal, 0x100);
-			} else if (rendstatus & 0x20) { // mid-frame palette changes
-				vidConvCpyRGB32(localPal, Pico.cram, 0x40);
-				vidConvCpyRGB32(localPal+0x40, HighPal, 0x40);
-				vidConvCpyRGB32(localPal+0x80, HighPal+0x40, 0x40);
-				gp2x_video_setpalette(localPal, 0xc0);
-			} else {
-				vidConvCpyRGB32(localPal, Pico.cram, 0x40);
-				gp2x_video_setpalette(localPal, 0x40);
-			}
-		}
+	if ((signed int)(ld_counter - num) > 100) {
+		// vsync, offset so that the upscaled image is centered
+		ld_counter = 120 - (120-num) * (ld_lines+2)/ld_lines;
+		ld_left = ld_lines;
 	}
 
-	if (notice || (emu_opt & 2)) {
-		int h = 232;
-		if (currentConfig.scaling == 2 && !(Pico.video.reg[1]&8)) h -= 8;
-		if (notice) osd_text(4, h, notice);
-		if (emu_opt & 2)
-			osd_text(osd_fps_x, h, fps);
+	if (emu_scan_begin)
+		return emu_scan_begin(ld_counter);
+	else
+		Pico.est.DrawLineDest = (char *)g_screen_ptr + 320 * ld_counter * gp2x_current_bpp / 8;
+
+	return 0;
+}
+
+static int EmuScanEnd16_ld(unsigned int num)
+{
+	void *oldline = Pico.est.DrawLineDest;
+
+	if (emu_scan_end)
+		emu_scan_end(ld_counter);
+
+	ld_counter++;
+	ld_left -= 2;
+	if (ld_left <= 0) {
+		ld_left += ld_lines;
+
+		EmuScanBegin16_ld(num);
+		memcpy(Pico.est.DrawLineDest, oldline, 320 * gp2x_current_bpp / 8);
+		if (emu_scan_end)
+			emu_scan_end(ld_counter);
+
+		ld_counter++;
 	}
-	if ((emu_opt & 0x400) && (PicoMCD & 1))
-		cd_leds();
 
-	//gp2x_video_wait_vsync();
-	gp2x_video_flip();
+	return 0;
+}
 
-	if (!(PicoOpt&0x10)) {
-		if (!(Pico.video.reg[1]&8)) {
-			if (currentConfig.EmuOpt&0x80) {
-				DrawLineDest = (unsigned short *) gp2x_screen + 320*8;
-			} else {
-				DrawLineDest = (unsigned char  *) gp2x_screen + 320*8;
-			}
-		} else {
-			DrawLineDest = gp2x_screen;
+static int localPal[0x100];
+static int localPalSize;
+
+static void (*vidcpy8bit)(void *dest, void *src, int x_y, int w_h);
+static int (*make_local_pal)(int fast_mode);
+
+static int make_local_pal_md(int fast_mode)
+{
+	int pallen = 0x100;
+
+	if (fast_mode) {
+		bgr444_to_rgb32(localPal, PicoMem.cram, 64);
+		pallen = 0x40;
+		Pico.m.dirtyPal = 0;
+	}
+	else if (Pico.est.rendstatus & PDRAW_SONIC_MODE) { // mid-frame palette changes
+		switch (Pico.est.SonicPalCount) {
+		case 3: bgr444_to_rgb32(localPal+0xc0, Pico.est.SonicPal+0xc0, 64);
+		case 2: bgr444_to_rgb32(localPal+0x80, Pico.est.SonicPal+0x80, 64);
+		case 1: bgr444_to_rgb32(localPal+0x40, Pico.est.SonicPal+0x40, 64);
+		default:bgr444_to_rgb32(localPal, Pico.est.SonicPal, 64);
 		}
+		pallen = (Pico.est.SonicPalCount+1)*0x40;
 	}
+	else if (Pico.video.reg[0xC] & 8) { // shadow/hilight mode
+		bgr444_to_rgb32(localPal, Pico.est.SonicPal, 64);
+		bgr444_to_rgb32_sh(localPal, Pico.est.SonicPal);
+		memcpy(localPal+0xc0, localPal, 0x40*4); // for spr prio mess
+	}
+	else {
+		bgr444_to_rgb32(localPal, Pico.est.SonicPal, 64);
+		memcpy(localPal+0x40, localPal, 0x40*4); // for spr prio mess
+		memcpy(localPal+0x80, localPal, 0x80*4); // for spr prio mess
+	}
+	localPal[0xc0] = 0x0000c000;
+	localPal[0xd0] = 0x00c00000;
+	localPal[0xe0] = 0x00000000; // reserved pixels for OSD
+	localPal[0xf0] = 0x00ffffff;
+
+	if (Pico.m.dirtyPal == 2)
+		Pico.m.dirtyPal = 0;
+	return pallen;
 }
 
-
-// clears whole screen or just the notice area (in all buffers)
-static void clearArea(int full)
+static int make_local_pal_sms(int fast_mode)
 {
-	if ((PicoOpt&0x10)||!(currentConfig.EmuOpt&0x80)) {
-		// 8-bit renderers
-		if (full) gp2x_memset_all_buffers(0, 0xe0, 320*240);
-		else      gp2x_memset_all_buffers(320*232, 0xe0, 320*8);
+	static u16 tmspal[32] = {
+		// SMS palette for TMS modes
+		0x0000, 0x0000, 0x00a0, 0x00f0, 0x0500, 0x0f00, 0x0005, 0x0ff0,
+		0x000a, 0x000f, 0x0055, 0x00ff, 0x0050, 0x0f0f, 0x0555, 0x0fff,
+		// TMS palette
+		0x0000, 0x0000, 0x04c2, 0x07d6, 0x0e55, 0x0f77, 0x055c, 0x0ee4,
+		0x055f, 0x077f, 0x05bc, 0x08ce, 0x03a2, 0x0b5c, 0x0ccc, 0x0fff,
+	};
+	int i;
+	
+	if (!(Pico.video.reg[0] & 0x4)) {
+		for (i = Pico.est.SonicPalCount; i >= 0; i--) {
+			int sg = !!(PicoIn.AHW & (PAHW_SG|PAHW_SC));
+			bgr444_to_rgb32(localPal+i*0x40, tmspal+sg*0x10, 32);
+			memcpy(localPal+i*0x40+0x20, localPal+i*0x40, 0x20*4);
+		}
+	} else if (fast_mode) {
+		for (i = 0;i >= 0; i--) {
+			bgr444_to_rgb32(localPal+i*0x40, PicoMem.cram+i*0x40, 32);
+			memcpy(localPal+i*0x40+0x20, localPal+i*0x40, 0x20*4);
+		}
 	} else {
-		// 16bit accurate renderer
-		if (full) gp2x_memset_all_buffers(0, 0, 320*240*2);
-		else      gp2x_memset_all_buffers(320*232*2, 0, 320*8*2);
+		for (i = Pico.est.SonicPalCount; i >= 0; i--) {
+			bgr444_to_rgb32(localPal+i*0x40, Pico.est.SonicPal+i*0x40, 32);
+			memcpy(localPal+i*0x40+0x20, localPal+i*0x40, 0x20*4);
+		}
 	}
+	if (Pico.m.dirtyPal == 2)
+		Pico.m.dirtyPal = 0;
+	return (Pico.est.SonicPalCount+1)*0x40;
 }
 
-
-static void vidResetMode(void)
+void pemu_finalize_frame(const char *fps, const char *notice)
 {
-	if (PicoOpt&0x10) {
-		gp2x_video_changemode(8);
-	} else if (currentConfig.EmuOpt&0x80) {
-		gp2x_video_changemode(16);
-		PicoDrawSetColorFormat(1);
-		PicoScan = EmuScan16;
-		PicoScan(0, 0);
-	} else {
-		gp2x_video_changemode(8);
-		PicoDrawSetColorFormat(2);
-		PicoScan = EmuScan8;
-		PicoScan(0, 0);
+	int emu_opt = currentConfig.EmuOpt;
+	int direct_rendered = 1;
+
+	if (is_16bit_mode())
+		localPalSize = 0; // nothing to do
+	else if (get_renderer() == RT_8BIT_FAST)
+	{
+		// 8bit fast renderer
+		if (Pico.m.dirtyPal)
+			localPalSize = make_local_pal(1);
+		// a hack for VR
+		if (PicoIn.AHW & PAHW_SVP)
+			memset32((int *)(Pico.est.Draw2FB+328*8+328*223), 0xe0e0e0e0, 328/4);
+		// do actual copy
+		vidcpy8bit(g_screen_ptr, Pico.est.Draw2FB,
+			(firstcol << 16) | firstline, (colcount << 16) | linecount);
+		direct_rendered = 0;
 	}
-	if ((PicoOpt&0x10)||!(currentConfig.EmuOpt&0x80)) {
-		// setup pal for 8-bit modes
-		localPal[0xc0] = 0x0000c000; // MCD LEDs
-		localPal[0xd0] = 0x00c00000;
-		localPal[0xe0] = 0x00000000; // reserved pixels for OSD
-		localPal[0xf0] = 0x00ffffff;
-		gp2x_video_setpalette(localPal, 0x100);
-		gp2x_memset_all_buffers(0, 0xe0, 320*240);
-		gp2x_video_flip();
+	else if (get_renderer() == RT_8BIT_ACC)
+	{
+		// 8bit accurate renderer
+		if (Pico.m.dirtyPal)
+			localPalSize = make_local_pal(0);
 	}
-	Pico.m.dirtyPal = 1;
-	// reset scaling
-	if (currentConfig.scaling == 2 && !(Pico.video.reg[1]&8))
-	     gp2x_video_RGB_setscaling(8, (PicoOpt&0x100)&&!(Pico.video.reg[12]&1) ? 256 : 320, 224);
-	else gp2x_video_RGB_setscaling(0, (PicoOpt&0x100)&&!(Pico.video.reg[12]&1) ? 256 : 320, 240);
-}
 
+	// blank 1st column, only needed in modes directly rendering to screen
+	if (is_1stblanked && direct_rendered)
+		clear_1st_column(firstcol, firstline, linecount);
 
-static void emu_msg_cb(const char *msg)
-{
-	if ((PicoOpt&0x10)||!(currentConfig.EmuOpt&0x80)) {
-		// 8-bit renderers
-		gp2x_memset_all_buffers(320*232, 0xe0, 320*8);
-		osd_text(4, 232, msg);
-		gp2x_memcpy_all_buffers((char *)gp2x_screen+320*232, 320*232, 320*8);
-	} else {
-		// 16bit accurate renderer
-		gp2x_memset_all_buffers(320*232*2, 0, 320*8*2);
-		osd_text(4, 232, msg);
-		gp2x_memcpy_all_buffers((char *)gp2x_screen+320*232*2, 320*232*2, 320*8*2);
+	if (notice)
+		osd_text(4, osd_y, notice);
+	if (emu_opt & EOPT_SHOW_FPS)
+		osd_text(osd_fps_x, osd_y, fps);
+	if ((PicoIn.AHW & PAHW_MCD) && (emu_opt & EOPT_EN_CD_LEDS))
+		draw_cd_leds();
+	if (PicoIn.AHW & PAHW_PICO) {
+		int h = linecount, w = colcount;
+		u16 *pd = g_screen_ptr + firstline*g_screen_ppitch + firstcol;
+
+		if (pico_inp_mode && is_16bit_mode())
+			emu_pico_overlay(pd, w, h, g_screen_ppitch);
+		if (pico_inp_mode /*== 2 || overlay*/)
+			draw_pico_ptr();
 	}
-	gettimeofday(&noticeMsgTime, 0);
-	noticeMsgTime.tv_sec -= 2;
+}
 
-	/* assumption: emu_msg_cb gets called only when something slow is about to happen */
-	reset_timing = 1;
+void plat_video_flip(void)
+{
+	int stride = g_screen_width;
+	gp2x_video_flip();
+	// switching the palette takes immediate effect, whilst flipping only
+	// takes effect with the next vsync; unavoidable flicker may occur!
+	if (localPalSize)
+		gp2x_video_setpalette(localPal, localPalSize);
+
+	if (is_16bit_mode())
+		stride *= 2;
+	// the fast renderer has overlap areas and can't directly render to
+	// screen buffers. Its output is copied to screen in finalize_frame
+	if (get_renderer() != RT_8BIT_FAST || (PicoIn.AHW & PAHW_32X))
+		PicoDrawSetOutBuf(g_screen_ptr, stride);
 }
 
-static void emu_state_cb(const char *str)
+/* XXX */
+unsigned int plat_get_ticks_ms(void)
 {
-	clearArea(0);
-	blit("", str);
+	return gp2x_get_ticks_ms();
 }
 
-static void emu_msg_tray_open(void)
+unsigned int plat_get_ticks_us(void)
 {
-	strcpy(noticeMsg, "CD tray opened");
-	gettimeofday(&noticeMsgTime, 0);
+	return gp2x_get_ticks_us();
 }
 
-static void update_volume(int has_changed, int is_up)
+void plat_wait_till_us(unsigned int us_to)
 {
-	static int prev_frame = 0, wait_frames = 0;
-	int vol = currentConfig.volume;
+	unsigned int now;
 
-	if (has_changed)
+	spend_cycles(1024);
+	now = plat_get_ticks_us();
+
+	while ((signed int)(us_to - now) > 512)
 	{
-		if (vol < 5 && (PicoOpt&8) && prev_frame == Pico.m.frame_count - 1 && wait_frames < 12)
-			wait_frames++;
-		else {
-			if (is_up) {
-				if (vol < 99) vol++;
+		spend_cycles(1024);
+		now = plat_get_ticks_us();
+	}
+}
+
+void plat_video_wait_vsync(void)
+{
+	gp2x_video_wait_vsync();
+}
+
+void plat_status_msg_clear(void)
+{
+	int i, is_8bit = !is_16bit_mode();
+
+	for (i = 0; i < 4; i++) {
+		if (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) {
+			/* ugh.. */
+			int u, *p;
+			if (is_8bit) {
+				p = (int *)gp2x_screens[i] + (240-8) / 4;
+				for (u = 320; u > 0; u--, p += 240/4)
+					p[0] = p[1] = 0xe0e0e0e0;
 			} else {
-				if (vol >  0) vol--;
+				p = (int *)gp2x_screens[i] + (240-8)*2 / 4;
+				for (u = 320; u > 0; u--, p += 240*2/4)
+					p[0] = p[1] = p[2] = p[3] = 0;
+			}
+		} else {
+			if (is_8bit) {
+				char *d = (char *)gp2x_screens[i] + 320 * (240-8);
+				memset32((int *)d, 0xe0e0e0e0, 320 * 8 / 4);
+			} else {
+				char *d = (char *)gp2x_screens[i] + 320*2 * (240-8);
+				memset32((int *)d, 0, 2*320 * 8 / 4);
 			}
-			wait_frames = 0;
-			gp2x_sound_volume(vol, vol);
-			currentConfig.volume = vol;
 		}
-		sprintf(noticeMsg, "VOL: %02i", vol);
-		gettimeofday(&noticeMsgTime, 0);
-		prev_frame = Pico.m.frame_count;
-	}
-
-	// set the right mixer func
-	if (!(PicoOpt&8)) return; // just use defaults for mono
-	if (vol >= 5)
-		PsndMix_32_to_16l = mix_32_to_16l_stereo;
-	else {
-		mix_32_to_16l_level = 5 - vol;
-		PsndMix_32_to_16l = mix_32_to_16l_stereo_lvl;
 	}
 }
 
-static void change_fast_forward(int set_on)
+void plat_status_msg_busy_next(const char *msg)
 {
-	static void *set_PsndOut = NULL;
-	static int set_Frameskip, set_EmuOpt, is_on = 0;
+	plat_status_msg_clear();
+	pemu_finalize_frame("", msg);
+	plat_video_flip();
+	emu_status_msg("");
 
-	if (set_on && !is_on) {
-		set_PsndOut = PsndOut;
-		set_Frameskip = currentConfig.Frameskip;
-		set_EmuOpt = currentConfig.EmuOpt;
-		PsndOut = NULL;
-		currentConfig.Frameskip = 8;
-		currentConfig.EmuOpt &= ~4;
-		is_on = 1;
-	}
-	else if (!set_on && is_on) {
-		PsndOut = set_PsndOut;
-		currentConfig.Frameskip = set_Frameskip;
-		currentConfig.EmuOpt = set_EmuOpt;
-		PsndRerate(1);
-		update_volume(0, 0);
-		reset_timing = 1;
-		is_on = 0;
-	}
+	/* assumption: msg_busy_next gets called only when
+	 * something slow is about to happen */
+	reset_timing = 1;
 }
 
-static void RunEvents(unsigned int which)
+void plat_status_msg_busy_first(const char *msg)
 {
-	if (which & 0x1800) // save or load (but not both)
-	{
-		int do_it = 1;
-		if ( emu_checkSaveFile(state_slot) &&
-				(( (which & 0x1000) && (currentConfig.EmuOpt & 0x800)) ||   // load
-				 (!(which & 0x1000) && (currentConfig.EmuOpt & 0x200))) ) { // save
-			unsigned long keys;
-			blit("", (which & 0x1000) ? "LOAD STATE? (Y=yes, X=no)" : "OVERWRITE SAVE? (Y=yes, X=no)");
-			while( !((keys = gp2x_joystick_read(1)) & (GP2X_X|GP2X_Y)) )
-				usleep(50*1024);
-			if (keys & GP2X_X) do_it = 0;
-			clearArea(0);
-		}
-		if (do_it) {
-			osd_text(4, 232, (which & 0x1000) ? "LOADING GAME" : "SAVING GAME");
-			PicoStateProgressCB = emu_state_cb;
-			gp2x_memcpy_all_buffers(gp2x_screen, 0, 320*240*2);
-			emu_SaveLoadGame((which & 0x1000) >> 12, 0);
-			PicoStateProgressCB = NULL;
-		}
+	plat_status_msg_busy_next(msg);
+}
 
-		reset_timing = 1;
+static void vid_reset_mode(void)
+{
+	int gp2x_mode = 16;
+	int renderer = get_renderer();
+
+	PicoIn.opt &= ~(POPT_ALT_RENDERER|POPT_DIS_32C_BORDER|POPT_EN_SOFTSCALE);
+	if (currentConfig.scaling == EOPT_SCALE_SW) {
+		PicoIn.opt |= POPT_EN_SOFTSCALE;
+		PicoIn.filter = EOPT_FILTER_BILINEAR2;
+	} else if (currentConfig.scaling == EOPT_SCALE_HW)
+		// hw scaling, render without any padding
+		PicoIn.opt |= POPT_DIS_32C_BORDER;
+
+	switch (renderer) {
+	case RT_16BIT:
+		PicoDrawSetOutFormat(PDF_RGB555, 0);
+		PicoDrawSetOutBuf(g_screen_ptr, g_screen_width * 2);
+		break;
+	case RT_8BIT_ACC:
+		PicoDrawSetOutFormat(PDF_8BIT, 0);
+		PicoDrawSetOutBuf(g_screen_ptr, g_screen_width);
+		gp2x_mode = 8;
+		break;
+	case RT_8BIT_FAST:
+		PicoIn.opt |= POPT_ALT_RENDERER;
+		PicoDrawSetOutFormat(PDF_NONE, 0);
+		vidcpy8bit = vidcpy_8bit;
+		gp2x_mode = 8;
+		break;
+	default:
+		printf("bad renderer\n");
+		break;
+	}
+
+	if (PicoIn.AHW & PAHW_32X) {
+		// Wiz 16bit is an exception, uses line rendering due to rotation mess
+		if (renderer == RT_16BIT && (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX)) {
+			PicoDrawSetOutFormat(PDF_RGB555, 1);
+		}
+		PicoDrawSetOutBuf(g_screen_ptr, g_screen_width * 2);
+		gp2x_mode = 16;
 	}
-	if (which & 0x0400) // switch renderer
-	{
-		if      (  PicoOpt&0x10)             { PicoOpt&=~0x10; currentConfig.EmuOpt |= 0x80; }
-		else if (!(currentConfig.EmuOpt&0x80)) PicoOpt|= 0x10;
-		else   currentConfig.EmuOpt &= ~0x80;
 
-		vidResetMode();
+	emu_scan_begin = NULL;
+	emu_scan_end = NULL;
 
-		if (PicoOpt&0x10) {
-			strcpy(noticeMsg, " 8bit fast renderer");
-		} else if (currentConfig.EmuOpt&0x80) {
-			strcpy(noticeMsg, "16bit accurate renderer");
-		} else {
-			strcpy(noticeMsg, " 8bit accurate renderer");
+	if (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) {
+		if ((PicoIn.AHW & PAHW_32X) || renderer == RT_16BIT) {
+			emu_scan_begin = EmuScanBegin16_rot;
+			emu_scan_end = EmuScanEnd16_rot;
+			memset(rot_buff, 0, 320*4*2);
 		}
-
-		gettimeofday(&noticeMsgTime, 0);
-	}
-	if (which & 0x0300)
-	{
-		if(which&0x0200) {
-			state_slot -= 1;
-			if(state_slot < 0) state_slot = 9;
-		} else {
-			state_slot += 1;
-			if(state_slot > 9) state_slot = 0;
+		else if (renderer == RT_8BIT_ACC) {
+			emu_scan_begin = EmuScanBegin8_rot;
+			emu_scan_end = EmuScanEnd8_rot;
+			memset(rot_buff, 0xe0, 320*4);
 		}
-		sprintf(noticeMsg, "SAVE SLOT %i [%s]", state_slot, emu_checkSaveFile(state_slot) ? "USED" : "FREE");
-		gettimeofday(&noticeMsgTime, 0);
+		else if (renderer == RT_8BIT_FAST)
+			vidcpy8bit = vidcpy_8bit_rot;
 	}
-	if (which & 0x0080) {
-		engineState = PGS_Menu;
-	}
-}
 
+	PicoDrawSetCallbacks(emu_scan_begin, emu_scan_end);
 
-static void updateKeys(void)
-{
-	unsigned long keys, allActions[2] = { 0, 0 }, events;
-	static unsigned long prevEvents = 0;
-	int joy, i;
+	if (is_16bit_mode())
+		osd_text = (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) ? osd_text16_rot : emu_osd_text16;
+	else
+		osd_text = (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) ? osd_text8_rot : osd_text8;
 
-	keys = gp2x_joystick_read(0);
-	if (keys & GP2X_SELECT) {
-		engineState = select_exits ? PGS_Quit : PGS_Menu;
-		// wait until select is released, so menu would not resume game
-		while (gp2x_joystick_read(1) & GP2X_SELECT) usleep(50*1000);
+	gp2x_video_wait_vsync();
+	if (!is_16bit_mode()) {
+		// setup pal for 8-bit modes
+		localPal[0xc0] = 0x0000c000; // MCD LEDs
+		localPal[0xd0] = 0x00c00000;
+		localPal[0xe0] = 0x00000000; // reserved pixels for OSD
+		localPal[0xf0] = 0x00ffffff;
+		gp2x_video_setpalette(localPal, 0x100);
 	}
 
-	keys &= CONFIGURABLE_KEYS;
+	if (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX)
+		gp2x_mode = -gp2x_mode;
 
-	for (i = 0; i < 32; i++)
-	{
-		if (keys & (1 << i))
-		{
-			int pl, acts = currentConfig.KeyBinds[i];
-			if (!acts) continue;
-			pl = (acts >> 16) & 1;
-			if (kb_combo_keys & (1 << i))
-			{
-				int u, acts_c = acts & kb_combo_acts;
-				// let's try to find the other one
-				if (acts_c) {
-					for (u = i + 1; u < 32; u++)
-						if ( (keys & (1 << u)) && (currentConfig.KeyBinds[u] & acts_c) ) {
-							allActions[pl] |= acts_c & currentConfig.KeyBinds[u];
-							keys &= ~((1 << i) | (1 << u));
-							break;
-						}
-				}
-				// add non-combo actions if combo ones were not found
-				if (!acts_c || u == 32)
-					allActions[pl] |= acts & ~kb_combo_acts;
-			} else {
-				allActions[pl] |= acts;
-			}
-		}
-	}
+	gp2x_video_changemode(gp2x_mode, Pico.m.pal);
 
-	// add joy inputs
-	if (num_of_joys > 0)
-	{
-		gp2x_usbjoy_update();
-		for (joy = 0; joy < num_of_joys; joy++) {
-			int keys = gp2x_usbjoy_check2(joy);
-			for (i = 0; i < 32; i++) {
-				if (keys & (1 << i)) {
-					int acts = currentConfig.JoyBinds[joy][i];
-					int pl = (acts >> 16) & 1;
-					allActions[pl] |= acts;
-				}
-			}
-		}
-	}
+	// clear whole screen in all buffers
+	if (!is_16bit_mode())
+		gp2x_memset_all_buffers(0, 0xe0, 320*240);
+	else
+		gp2x_memset_all_buffers(0, 0, 320*240*2);
 
-	PicoPad[0] = (unsigned short) allActions[0];
-	PicoPad[1] = (unsigned short) allActions[1];
+	Pico.m.dirtyPal = 1;
 
-	events = (allActions[0] | allActions[1]) >> 16;
+	// palette converters for 8bit modes
+	make_local_pal = (PicoIn.AHW & PAHW_SMS) ? make_local_pal_sms : make_local_pal_md;
+}
 
-	// volume is treated in special way and triggered every frame
-	if (events & 0x6000)
-		update_volume(1, events & 0x2000);
+void emu_video_mode_change(int start_line, int line_count, int start_col, int col_count)
+{
+	int scalex = 320, scaley = 240;
+	int ln_offs = 0;
+
+	if (currentConfig.vscaling != EOPT_SCALE_NONE &&
+			(is_16bit_mode() || get_renderer() != RT_8BIT_FAST)) {
+		/* NTSC always has 224 visible lines, anything smaller has bars */
+		if (line_count < 224 && line_count > 144) {
+			start_line -= (224-line_count) /2;
+			line_count = 224;
+		}
 
-	if ((events ^ prevEvents) & 0x40)
-		change_fast_forward(events & 0x40);
+		/* line doubling for swscaling, also needed for bg frames */
+		if (currentConfig.vscaling == EOPT_SCALE_SW && line_count < 240) {
+			ld_lines = ld_left = 2*line_count / (240 - line_count);
+			PicoDrawSetCallbacks(EmuScanBegin16_ld,EmuScanEnd16_ld);
+		}
+	}
 
-	events &= ~prevEvents;
-	if (events) RunEvents(events);
-	if (movie_data) emu_updateMovie();
+	/* blanking for SMS with 1st tile blanked */
+	is_1stblanked = (col_count == 248);
+	firstline = start_line; linecount = line_count;
+	firstcol = start_col; colcount = col_count;
 
-	prevEvents = (allActions[0] | allActions[1]) >> 16;
-}
+	if (doing_bg_frame)
+		return;
 
+	osd_fps_x = OSD_FPS_X;
+	osd_y = 232;
 
-static void updateSound(int len)
-{
-	if (PicoOpt&8) len<<=1;
+	/* set up hwscaling here */
+	if (col_count < 320 && currentConfig.scaling == EOPT_SCALE_HW) {
+		scalex = col_count;
+		osd_fps_x = col_count - (320-OSD_FPS_X);
+	}
 
-	/* avoid writing audio when lagging behind to prevent audio lag */
-	if (PicoSkipFrame != 2)
-		gp2x_sound_write(PsndOut, len<<1);
-}
+	if (currentConfig.vscaling == EOPT_SCALE_HW) {
+		ln_offs = start_line;
+		scaley = line_count;
+		osd_y = start_line + line_count - 8;
+	}
 
+	gp2x_video_RGB_setscaling(ln_offs, scalex, scaley);
 
-static void SkipFrame(int do_audio)
-{
-	PicoSkipFrame=do_audio ? 1 : 2;
-	PicoFrame();
-	PicoSkipFrame=0;
+	// clear whole screen in all buffers
+	if (!is_16bit_mode())
+		gp2x_memset_all_buffers(0, 0xe0, 320*240);
+	else
+		gp2x_memset_all_buffers(0, 0, 320*240*2);
 }
 
-
-void emu_forcedFrame(void)
+void plat_video_toggle_renderer(int change, int is_menu_call)
 {
-	int po_old = PicoOpt;
-	int eo_old = currentConfig.EmuOpt;
+	change_renderer(change);
 
-	PicoOpt &= ~0x0010;
-	PicoOpt |=  0x4080; // soft_scale | acc_sprites
-	currentConfig.EmuOpt |= 0x80;
+	if (is_menu_call)
+		return;
 
-	//vidResetMode();
-	PicoDrawSetColorFormat(1);
-	PicoScan = EmuScan16;
-	PicoScan(0, 0);
-	Pico.m.dirtyPal = 1;
-	PicoFrameDrawOnly();
-
-/*
-	if (!(Pico.video.reg[12]&1)) {
-		vidCpyM2 = vidCpyM2_32col;
-		clearArea(1);
-	} else	vidCpyM2 = vidCpyM2_40col;
+	vid_reset_mode();
+	rendstatus_old = -1;
 
-	vidCpyM2((unsigned char *)gp2x_screen+320*8, PicoDraw2FB+328*8);
-	vidConvCpyRGB32(localPal, Pico.cram, 0x40);
-	gp2x_video_setpalette(localPal, 0x40);
-*/
-	PicoOpt = po_old;
-	currentConfig.EmuOpt = eo_old;
+	if (PicoIn.AHW & PAHW_32X)
+		emu_status_msg(renderer_names32x[get_renderer()]);
+	else
+		emu_status_msg(renderer_names[get_renderer()]);
 }
 
-static void simpleWait(int thissec, int lim_time)
+#if 0 // TODO
+static void RunEventsPico(unsigned int events)
 {
-	struct timeval tval;
-
-	spend_cycles(1024);
-	gettimeofday(&tval, 0);
-	if(thissec != tval.tv_sec) tval.tv_usec+=1000000;
+	int ret, px, py, lim_x;
+	static int pdown_frames = 0;
 
-	while(tval.tv_usec < lim_time)
+	// for F200
+	ret = gp2x_touchpad_read(&px, &py);
+	if (ret >= 0)
 	{
-		spend_cycles(1024);
-		gettimeofday(&tval, 0);
-		if(thissec != tval.tv_sec) tval.tv_usec+=1000000;
+		if (ret > 35000)
+		{
+			if (pdown_frames++ > 5)
+				PicoIn.pad[0] |= 0x20;
+
+			pico_pen_x = px;
+			pico_pen_y = py;
+			if (!(Pico.video.reg[12]&1)) {
+				pico_pen_x -= 32;
+				if (pico_pen_x <   0) pico_pen_x = 0;
+				if (pico_pen_x > 248) pico_pen_x = 248;
+			}
+			if (pico_pen_y > 224) pico_pen_y = 224;
+		}
+		else
+			pdown_frames = 0;
+
+		//if (ret == 0)
+		//	PicoPicohw.pen_pos[0] = PicoPicohw.pen_pos[1] = 0x8000;
 	}
 }
+#endif
 
-
-void emu_Loop(void)
+void plat_update_volume(int has_changed, int is_up)
 {
-	static int gp2x_old_clock = 200;
-	static int PsndRate_old = 0, PicoOpt_old = 0, EmuOpt_old = 0, pal_old = 0;
-	char fpsbuff[24]; // fps count c string
-	struct timeval tval; // timing
-	int thissec = 0, frames_done = 0, frames_shown = 0, oldmodes = 0;
-	int target_fps, target_frametime, lim_time, vsync_offset, i;
-	char *notice = 0;
+	static int prev_frame = 0, wait_frames = 0;
+	int need_low_volume = 0;
+	int vol = currentConfig.volume;
+	gp2x_soc_t soc;
 
-	printf("entered emu_Loop()\n");
+	soc = soc_detect();
+	if ((PicoIn.opt & POPT_EN_STEREO) && soc == SOCID_MMSP2)
+		need_low_volume = 1;
 
-	if (gp2x_old_clock != currentConfig.CPUclock) {
-		printf("changing clock to %i...", currentConfig.CPUclock); fflush(stdout);
-		set_FCLK(currentConfig.CPUclock);
-		gp2x_old_clock = currentConfig.CPUclock;
-		printf(" done\n");
+	if (has_changed)
+	{
+		if (need_low_volume && vol < 5 && prev_frame == Pico.m.frame_count - 1 && wait_frames < 12)
+			wait_frames++;
+		else {
+			wait_frames = 0;
+			plat_target_step_volume(&currentConfig.volume, is_up ? 1 : -1);
+			vol = currentConfig.volume;
+		}
+		emu_status_msg("VOL: %02i", vol);
+		prev_frame = Pico.m.frame_count;
 	}
 
-	if (gp2x_old_gamma != currentConfig.gamma || (EmuOpt_old&0x1000) != (currentConfig.EmuOpt&0x1000)) {
-		set_gamma(currentConfig.gamma, !!(currentConfig.EmuOpt&0x1000));
-		gp2x_old_gamma = currentConfig.gamma;
-		printf("updated gamma to %i, A_SN's curve: %i\n", currentConfig.gamma, !!(currentConfig.EmuOpt&0x1000));
-	}
+	if (!need_low_volume)
+		return;
 
-	if ((EmuOpt_old&0x2000) != (currentConfig.EmuOpt&0x2000)) {
-		if (currentConfig.EmuOpt&0x2000)
-		     set_LCD_custom_rate(Pico.m.pal ? LCDR_100 : LCDR_120);
-		else unset_LCD_custom_rate();
+	/* set the right mixer func */
+	if (vol >= 5)
+		PsndMix_32_to_16 = mix_32_to_16_stereo;
+	else {
+		mix_32_to_16_level = 5 - vol;
+		PsndMix_32_to_16 = mix_32_to_16_stereo_lvl;
 	}
+}
 
-	EmuOpt_old = currentConfig.EmuOpt;
-	fpsbuff[0] = 0;
-
-	// make sure we are in correct mode
-	vidResetMode();
-	scaling_update();
-	Pico.m.dirtyPal = 1;
-	oldmodes = ((Pico.video.reg[12]&1)<<2) ^ 0xc;
-	emu_findKeyBindCombos();
+void pemu_sound_start(void)
+{
+	gp2x_soc_t soc;
 
-	// pal/ntsc might have changed, reset related stuff
-	target_fps = Pico.m.pal ? 50 : 60;
-	target_frametime = 1000000/target_fps;
-	reset_timing = 1;
+	emu_sound_start();
 
-	// prepare sound stuff
-	if (currentConfig.EmuOpt & 4)
+	if (currentConfig.EmuOpt & EOPT_EN_SOUND)
 	{
-		int snd_excess_add;
-		if (PsndRate != PsndRate_old || (PicoOpt&0x20b) != (PicoOpt_old&0x20b) || Pico.m.pal != pal_old ||
-				((PicoOpt&0x200) && crashed_940)) {
+		soc = soc_detect();
+		if (soc == SOCID_POLLUX) {
+			PicoIn.sndRate = pollux_get_real_snd_rate(PicoIn.sndRate);
 			PsndRerate(Pico.m.frame_count ? 1 : 0);
 		}
-		snd_excess_add = ((PsndRate - PsndLen*target_fps)<<16) / target_fps;
-		printf("starting audio: %i len: %i (ex: %04x) stereo: %i, pal: %i\n",
-			PsndRate, PsndLen, snd_excess_add, (PicoOpt&8)>>3, Pico.m.pal);
-		gp2x_start_sound(PsndRate, 16, (PicoOpt&8)>>3);
-		gp2x_sound_volume(currentConfig.volume, currentConfig.volume);
-		PicoWriteSound = updateSound;
-		update_volume(0, 0);
-		memset(sndBuffer, 0, sizeof(sndBuffer));
-		PsndOut = sndBuffer;
-		PsndRate_old = PsndRate;
-		PicoOpt_old  = PicoOpt;
-		pal_old = Pico.m.pal;
-	} else {
-		PsndOut = NULL;
-	}
-
-	// prepare CD buffer
-	if (PicoMCD & 1) PicoCDBufferInit();
-
-	// calc vsync offset to sync timing code with vsync
-	if (currentConfig.EmuOpt&0x2000) {
-		gettimeofday(&tval, 0);
-		gp2x_video_wait_vsync();
-		gettimeofday(&tval, 0);
-		vsync_offset = tval.tv_usec;
-		while (vsync_offset >= target_frametime)
-			vsync_offset -= target_frametime;
-		if (!vsync_offset) vsync_offset++;
-		printf("vsync_offset: %i\n", vsync_offset);
-	} else
-		vsync_offset = 0;
-
-	// loop?
-	while (engineState == PGS_Running)
-	{
-		int modes;
-
-		gettimeofday(&tval, 0);
-		if (reset_timing) {
-			reset_timing = 0;
-			thissec = tval.tv_sec;
-			frames_shown = frames_done = tval.tv_usec/target_frametime;
-		}
-
-		// show notice message?
-		if (noticeMsgTime.tv_sec)
-		{
-			static int noticeMsgSum;
-			if((tval.tv_sec*1000000+tval.tv_usec) - (noticeMsgTime.tv_sec*1000000+noticeMsgTime.tv_usec) > 2000000) { // > 2.0 sec
-				noticeMsgTime.tv_sec = noticeMsgTime.tv_usec = 0;
-				clearArea(0);
-				notice = 0;
-			} else {
-				int sum = noticeMsg[0]+noticeMsg[1]+noticeMsg[2];
-				if (sum != noticeMsgSum) { clearArea(0); noticeMsgSum = sum; }
-				notice = noticeMsg;
-			}
-		}
-
-		// check for mode changes
-		modes = ((Pico.video.reg[12]&1)<<2)|(Pico.video.reg[1]&8);
-		if (modes != oldmodes)
-		{
-			int scalex = 320;
-			osd_fps_x = OSD_FPS_X;
-			if (modes & 4) {
-				vidCpyM2 = vidCpyM2_40col;
-			} else {
-				if (PicoOpt & 0x100) {
-					vidCpyM2 = vidCpyM2_32col_nobord;
-					scalex = 256;
-					osd_fps_x = OSD_FPS_X - 64;
-				} else {
-					vidCpyM2 = vidCpyM2_32col;
-				}
-			}
-			if (currentConfig.scaling == 2 && !(modes&8)) // want vertical scaling and game is not in 240 line mode
-			     gp2x_video_RGB_setscaling(8, scalex, 224);
-			else gp2x_video_RGB_setscaling(0, scalex, 240);
-			oldmodes = modes;
-			clearArea(1);
-		}
-
-		// second changed?
-		if (thissec != tval.tv_sec)
-		{
-#ifdef BENCHMARK
-			static int bench = 0, bench_fps = 0, bench_fps_s = 0, bfp = 0, bf[4];
-			if (++bench == 10) {
-				bench = 0;
-				bench_fps_s = bench_fps;
-				bf[bfp++ & 3] = bench_fps;
-				bench_fps = 0;
-			}
-			bench_fps += frames_shown;
-			sprintf(fpsbuff, "%02i/%02i/%02i", frames_shown, bench_fps_s, (bf[0]+bf[1]+bf[2]+bf[3])>>2);
-#else
-			if (currentConfig.EmuOpt & 2)
-				sprintf(fpsbuff, "%02i/%02i", frames_shown, frames_done);
-			if (fpsbuff[5] == 0) { fpsbuff[5] = fpsbuff[6] = ' '; fpsbuff[7] = 0; }
-#endif
-			thissec = tval.tv_sec;
-
-			if (PsndOut == 0 && currentConfig.Frameskip >= 0) {
-				frames_done = frames_shown = 0;
-			} else {
-				// it is quite common for this implementation to leave 1 fame unfinished
-				// when second changes, but we don't want buffer to starve.
-				if(PsndOut && frames_done < target_fps && frames_done > target_fps-5) {
-					updateKeys();
-					SkipFrame(1); frames_done++;
-				}
-
-				frames_done  -= target_fps; if (frames_done  < 0) frames_done  = 0;
-				frames_shown -= target_fps; if (frames_shown < 0) frames_shown = 0;
-				if (frames_shown > frames_done) frames_shown = frames_done;
-			}
-		}
-#ifdef PFRAMES
-		sprintf(fpsbuff, "%i", Pico.m.frame_count);
-#endif
 
-		lim_time = (frames_done+1) * target_frametime + vsync_offset;
-		if(currentConfig.Frameskip >= 0) { // frameskip enabled
-			for(i = 0; i < currentConfig.Frameskip; i++) {
-				updateKeys();
-				SkipFrame(1); frames_done++;
-				if (PsndOut && !reset_timing) { // do framelimitting if sound is enabled
-					gettimeofday(&tval, 0);
-					if(thissec != tval.tv_sec) tval.tv_usec+=1000000;
-					if(tval.tv_usec < lim_time) { // we are too fast
-						simpleWait(thissec, lim_time);
-					}
-				}
-				lim_time += target_frametime;
-			}
-		} else if(tval.tv_usec > lim_time) { // auto frameskip
-			// no time left for this frame - skip
-			if (tval.tv_usec - lim_time >= 300000) {
-				/* something caused a slowdown for us (disk access? cache flush?)
-				 * try to recover by resetting timing... */
-				reset_timing = 1;
-				continue;
-			}
-			updateKeys();
-			SkipFrame(tval.tv_usec < lim_time+target_frametime*2); frames_done++;
-			continue;
-		}
-
-		updateKeys();
-		PicoFrame();
-
-#if 0
-if (Pico.m.frame_count == 31563) {
-	FILE *f;
-	f = fopen("ram_p.bin", "wb");
-	if (!f) { printf("!f\n"); exit(1); }
-	fwrite(Pico.ram, 1, 0x10000, f);
-	fclose(f);
-	exit(0);
+		plat_target_step_volume(&currentConfig.volume, 0);
+	}
 }
-#endif
-#if 0
-		// debug
-		{
-			#define BYTE unsigned char
-			#define WORD unsigned short
-			struct
-			{
-				BYTE IDLength;        /* 00h  Size of Image ID field */
-				BYTE ColorMapType;    /* 01h  Color map type */
-				BYTE ImageType;       /* 02h  Image type code */
-				WORD CMapStart;       /* 03h  Color map origin */
-				WORD CMapLength;      /* 05h  Color map length */
-				BYTE CMapDepth;       /* 07h  Depth of color map entries */
-				WORD XOffset;         /* 08h  X origin of image */
-				WORD YOffset;         /* 0Ah  Y origin of image */
-				WORD Width;           /* 0Ch  Width of image */
-				WORD Height;          /* 0Eh  Height of image */
-				BYTE PixelDepth;      /* 10h  Image pixel size */
-				BYTE ImageDescriptor; /* 11h  Image descriptor byte */
-			} __attribute__((packed)) TGAHEAD;
-			static unsigned short oldscr[320*240];
-			FILE *f; char name[128]; int i;
-
-			memset(&TGAHEAD, 0, sizeof(TGAHEAD));
-			TGAHEAD.ImageType = 2;
-			TGAHEAD.Width = 320;
-			TGAHEAD.Height = 240;
-			TGAHEAD.PixelDepth = 16;
-			TGAHEAD.ImageDescriptor = 2<<4; // image starts at top-left
-
-			#define CONV(X) (((X>>1)&0x7fe0)|(X&0x1f)) // 555?
-
-			for (i = 0; i < 320*240; i++)
-				if(oldscr[i] != CONV(((unsigned short *)gp2x_screen)[i])) break;
-			if (i < 320*240)
-			{
-				for (i = 0; i < 320*240; i++)
-					oldscr[i] = CONV(((unsigned short *)gp2x_screen)[i]);
-				sprintf(name, "%05i.tga", Pico.m.frame_count);
-				f = fopen(name, "wb");
-				if (!f) { printf("!f\n"); exit(1); }
-				fwrite(&TGAHEAD, 1, sizeof(TGAHEAD), f);
-				fwrite(oldscr, 1, 320*240*2, f);
-				fclose(f);
-			}
-		}
-#endif
 
-		// check time
-		gettimeofday(&tval, 0);
-		if (thissec != tval.tv_sec) tval.tv_usec+=1000000;
+static const int sound_rates[] = { 52000, 44100, 32000, 22050, 16000, 11025, 8000 };
 
-		if (currentConfig.Frameskip < 0 && tval.tv_usec - lim_time >= 300000) // slowdown detection
-			reset_timing = 1;
-		else if (PsndOut != NULL || currentConfig.Frameskip < 0)
-		{
-			// sleep or vsync if we are still too fast
-			// usleep sleeps for ~20ms minimum, so it is not a solution here
-			if (!reset_timing && tval.tv_usec < lim_time)
-			{
-				// we are too fast
-				if (vsync_offset) {
-					if (lim_time - tval.tv_usec > target_frametime/2)
-						simpleWait(thissec, lim_time - target_frametime/4);
-					gp2x_video_wait_vsync();
-				} else {
-					simpleWait(thissec, lim_time);
-				}
-			}
+void pemu_sound_stop(void)
+{
+	int i;
+
+	/* get back from Pollux pain */
+	PicoIn.sndRate += 1000;
+	for (i = 0; i < ARRAY_SIZE(sound_rates); i++) {
+		if (PicoIn.sndRate >= sound_rates[i]) {
+			PicoIn.sndRate = sound_rates[i];
+			break;
 		}
-
-		blit(fpsbuff, notice);
-
-		frames_done++; frames_shown++;
 	}
+}
 
-	change_fast_forward(0);
+void pemu_forced_frame(int no_scale, int do_emu)
+{
+	doing_bg_frame = 1;
+	PicoDrawSetCallbacks(NULL, NULL);
+	Pico.m.dirtyPal = 1;
+	PicoIn.opt &= ~POPT_DIS_32C_BORDER;
+	gp2x_current_bpp = 16;
+	// always render in screen 3 since menu uses 0-2
+	g_screen_ptr = gp2x_screens[3];
 
-	if (PicoMCD & 1) PicoCDBufferFree();
+	if (!no_scale)
+		no_scale = currentConfig.scaling == EOPT_SCALE_NONE;
+	emu_cmn_forced_frame(no_scale, do_emu, g_screen_ptr);
 
-	// save SRAM
-	if((currentConfig.EmuOpt & 1) && SRam.changed) {
-		emu_state_cb("Writing SRAM/BRAM..");
-		emu_SaveLoadGame(0, 1);
-		SRam.changed = 0;
-	}
+	if (is_1stblanked)
+		clear_1st_column(firstcol, firstline, linecount);
 
-	// if in 8bit mode, generate 16bit image for menu background
-	if ((PicoOpt&0x10) || !(currentConfig.EmuOpt&0x80))
-		emu_forcedFrame();
+	g_menubg_src_ptr = g_screen_ptr;
+	doing_bg_frame = 0;
 }
 
+void plat_debug_cat(char *str)
+{
+}
 
-void emu_ResetGame(void)
+void plat_video_loop_prepare(void) 
 {
-	PicoReset(0);
-	reset_timing = 1;
+	// make sure we are in correct mode
+	change_renderer(0);
+	vid_reset_mode();
+	rendstatus_old = -1;
 }
 
+void pemu_loop_prep(void)
+{
+	if (gp2x_dev_id == GP2X_DEV_CAANOO)
+		in_set_config_int(in_name_to_id("evdev:pollux-analog"),
+			IN_CFG_ABS_DEAD_ZONE,
+			currentConfig.analog_deadzone);
+
+	// dirty buffers better go now than during gameplay
+	sync();
+	sleep(0);
+}
+
+void pemu_loop_end(void)
+{
+	pemu_sound_stop();
+
+	if (g_screen_ptr == gp2x_screens[0]) {
+		/* currently on screen 3, which is needed for forced_frame */
+		int size = gp2x_current_bpp / 8;
+		gp2x_memcpy_all_buffers(g_screen_ptr, 0, 320*240 * size);
+		gp2x_video_flip();
+	}
+	/* do one more frame for menu bg */
+	pemu_forced_frame(0, 1);
+}