From 037f58e14bcb4ece9c1cf5b081305b449897e693 Mon Sep 17 00:00:00 2001
From: kub <derkub@gmail.com>
Date: Wed, 26 Feb 2025 00:29:20 +0100
Subject: [PATCH] core, add mouse support for Pico

---
 platform/common/emu.c      | 61 ++++++++++++++++++++++++--------------
 platform/common/emu.h      |  3 ++
 platform/common/plat_sdl.c | 15 ++++++++++
 platform/linux/emu.c       |  3 ++
 4 files changed, 60 insertions(+), 22 deletions(-)

diff --git a/platform/common/emu.c b/platform/common/emu.c
index 86b5429a..618271e2 100644
--- a/platform/common/emu.c
+++ b/platform/common/emu.c
@@ -66,6 +66,7 @@ struct vkbd *vkbd;
 static int pico_page;
 static int pico_w, pico_h;
 static u16 *pico_overlay;
+static int pico_pad;
 
 static short __attribute__((aligned(4))) sndBuffer[2*54000/50];
 
@@ -1148,6 +1149,9 @@ void emu_pico_overlay(u16 *pd, int w, int h, int pitch)
 
 void run_events_pico(unsigned int events)
 {
+	// treat pad ports equal to support pad in one and mouse in the other
+	PicoIn.pad[0] |= PicoIn.pad[1];
+
 	if (events & PEV_PICO_PPREV) {
 		PicoPicohw.page--;
 		if (PicoPicohw.page < 0)
@@ -1200,12 +1204,23 @@ void run_events_pico(unsigned int events)
 	if (pico_inp_mode == 0)
 		return;
 
-	/* handle other input modes */
-	if (PicoIn.pad[0] & 1) pico_pen_y--;
-	if (PicoIn.pad[0] & 2) pico_pen_y++;
-	if (PicoIn.pad[0] & 4) pico_pen_x--;
-	if (PicoIn.pad[0] & 8) pico_pen_x++;
-	PicoIn.pad[0] &= ~0x0f; // release UDLR
+	/* handle other input modes using the pen */
+	if (currentConfig.input_dev0 == PICO_INPUT_MOUSE ||
+	    currentConfig.input_dev1 == PICO_INPUT_MOUSE) {
+		pico_pen_x = PicoIn.mouse[0];
+		pico_pen_y = PicoIn.mouse[1];
+		if ((pico_pad ^ PicoIn.pad[0]) & (1<<GBTN_START) & ~pico_pad) {
+			PicoPicohw.pen_pos[0] ^= 0x8000;
+			PicoPicohw.pen_pos[1] ^= 0x8000;
+		}
+		pico_pad = PicoIn.pad[0];
+	} else {
+		if (PicoIn.pad[0] & 1) pico_pen_y--;
+		if (PicoIn.pad[0] & 2) pico_pen_y++;
+		if (PicoIn.pad[0] & 4) pico_pen_x--;
+		if (PicoIn.pad[0] & 8) pico_pen_x++;
+		PicoIn.pad[0] &= ~0x0f; // release UDLR
+	}
 
 	/* cursor position, cursor drawing must not cross screen borders */
 	if (pico_pen_y < PICO_PEN_ADJUST_Y)
@@ -1333,7 +1348,7 @@ void emu_update_input(void)
 	int actions[IN_BINDTYPE_COUNT] = { 0, };
 	int actions_kbd[IN_BIND_LAST] = { 0, };
 	int pl_actions[4];
-	int count_kbd = 0;
+	int count_kbd = 0, buttons = 0;
 	int events, i = 0;
 
 	in_update(actions);
@@ -1346,21 +1361,23 @@ void emu_update_input(void)
 	events = actions[IN_BINDTYPE_EMU] & PEV_MASK;
 
 	// update mouse coordinates if there is an emulated mouse
-	in_update_analog(0, 0, &PicoIn.mouse[0]);
-	in_update_analog(0, 1, &PicoIn.mouse[1]);
-	// scale mouse coordinates according to window scale
-	PicoIn.mouse[0] = PicoIn.mouse[0] * g_screen_width  / (2*1024);
-	PicoIn.mouse[1] = PicoIn.mouse[1] * g_screen_height / (2*1024);
-
-	in_update_analog(0, -1, &i);
-	int buttons = 0;
-	if (i & 1) buttons |= 1<<GBTN_B;
-	if (i & 4) buttons |= 1<<GBTN_C;
-	if (i & 2) buttons |= 1<<GBTN_START;
-	if (currentConfig.input_dev0 == PICO_INPUT_MOUSE)
-		pl_actions[0] |= buttons;
-	if (currentConfig.input_dev1 == PICO_INPUT_MOUSE)
-		pl_actions[1] |= buttons;
+	if (currentConfig.input_dev0 == PICO_INPUT_MOUSE ||
+	    currentConfig.input_dev1 == PICO_INPUT_MOUSE) {
+		in_update_analog(0, 0, &PicoIn.mouse[0]);
+		in_update_analog(0, 1, &PicoIn.mouse[1]);
+		// scale mouse coordinates from -1024..1024 to 0..screen_w/h
+		PicoIn.mouse[0] = (PicoIn.mouse[0]+1024) * g_screen_width /2048;
+		PicoIn.mouse[1] = (PicoIn.mouse[1]+1024) * g_screen_height/2048;
+
+		in_update_analog(0, -1, &i); // get mouse buttons, bit 2-0 = RML
+		if (i & 1) buttons |= 1<<GBTN_B;
+		if (i & 4) buttons |= 1<<GBTN_C;
+		if (i & 2) buttons |= 1<<GBTN_START;
+		if (currentConfig.input_dev0 == PICO_INPUT_MOUSE)
+			pl_actions[0] |= buttons;
+		if (currentConfig.input_dev1 == PICO_INPUT_MOUSE)
+			pl_actions[1] |= buttons;
+	}
 
 	if (kbd_mode) {
 		int mask = (PicoIn.AHW & PAHW_PICO ? 0xf : 0x0);
diff --git a/platform/common/emu.h b/platform/common/emu.h
index 30ab20f1..8c4f733b 100644
--- a/platform/common/emu.h
+++ b/platform/common/emu.h
@@ -193,6 +193,9 @@ void plat_early_init(void);
 void plat_init(void);
 void plat_finish(void);
 
+void plat_show_cursor(int on);
+void plat_grab_input(int on);
+
 /* used before things blocking for a while (these funcs redraw on return) */
 void plat_status_msg_busy_first(const char *msg);
 void plat_status_msg_busy_next(const char *msg);
diff --git a/platform/common/plat_sdl.c b/platform/common/plat_sdl.c
index b3cd2395..bdef051a 100644
--- a/platform/common/plat_sdl.c
+++ b/platform/common/plat_sdl.c
@@ -28,6 +28,8 @@ static struct area { int w, h; } area;
 
 static struct in_pdata in_sdl_platform_data;
 
+static int hide_cursor;
+
 static int sound_rates[] = { 8000, 11025, 16000, 22050, 32000, 44100, 53000, -1 };
 struct plat_target plat_target = { .sound_rates = sound_rates };
 
@@ -452,6 +454,16 @@ void plat_video_loop_prepare(void)
 	plat_video_set_buffer(g_screen_ptr);
 }
 
+void plat_show_cursor(int on)
+{
+	SDL_ShowCursor(on && !hide_cursor);
+}
+
+void plat_grab_input(int on)
+{
+	SDL_WM_GrabInput(on ? SDL_GRAB_ON : SDL_GRAB_OFF);
+}
+
 static void plat_sdl_resize(int w, int h)
 {
 	// take over new settings
@@ -506,7 +518,10 @@ void plat_init(void)
 #elif !defined(__MIYOO__) && !defined(__RETROFW__) && !defined(__DINGUX__)
 	if (! plat_sdl_is_windowed())
 #endif
+	{
+		hide_cursor = 1;
 		SDL_ShowCursor(0);
+	}
 
 	plat_sdl_quit_cb = plat_sdl_quit;
 	plat_sdl_resize_cb = plat_sdl_resize;
diff --git a/platform/linux/emu.c b/platform/linux/emu.c
index f26689da..cb4ce0ae 100644
--- a/platform/linux/emu.c
+++ b/platform/linux/emu.c
@@ -486,6 +486,8 @@ void pemu_loop_prep(void)
 {
 	apply_renderer();
 	plat_video_clear_buffers();
+	plat_show_cursor(currentConfig.input_dev0 != PICO_INPUT_MOUSE &&
+			currentConfig.input_dev1 != PICO_INPUT_MOUSE);
 }
 
 void pemu_loop_end(void)
@@ -497,6 +499,7 @@ void pemu_loop_end(void)
 		free(ghost_buf);
 		ghost_buf = NULL;
 	}
+	plat_show_cursor(1);
 }
 
 void plat_wait_till_us(unsigned int us_to)
-- 
2.39.5