[libpicofe.git] / linux / gp2x.c

/* faking/emulating gp2x.c by using gtk */
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <pthread.h>
#include <semaphore.h>
#include <gtk/gtk.h>

#include <unistd.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <errno.h>

#include "../gp2x/emu.h"
#include "../gp2x/gp2x.h"
#include "../gp2x/version.h"
#include "../common/emu.h"
#include "sndout_oss.h"

#include "log_io.h"

unsigned long current_keys = 0;
static int current_bpp = 8;
static int current_pal[256];
static const char *verstring = "PicoDrive " VERSION;
static int scr_changed = 0, scr_w = SCREEN_WIDTH, scr_h = SCREEN_HEIGHT;

// dummies
char *ext_menu = 0, *ext_state = 0;
int mix_32_to_16l_level;

/* gtk */
struct gtk_global_struct
{
        GtkWidget *window;
        GtkWidget *pixmap1;
} gtk_items;


static gboolean delete_event (GtkWidget *widget, GdkEvent *event, gpointer data)
{
	return FALSE;
}

static void destroy (GtkWidget *widget, gpointer data)
{
	gtk_main_quit ();
}

static gint key_press_event (GtkWidget *widget, GdkEventKey *event)
{
	switch (event->hardware_keycode)
	{
		case 111:
		case 0x62: current_keys |= GP2X_UP;    break;
		case 116:
		case 0x68: current_keys |= GP2X_DOWN;  break;
		case 113:
		case 0x64: current_keys |= GP2X_LEFT;  break;
		case 114:
		case 0x66: current_keys |= GP2X_RIGHT; break;
		case 0x24: current_keys |= GP2X_START; break; // enter
		case 0x23: current_keys |= GP2X_SELECT;break; // ]
		case 0x34: current_keys |= GP2X_A;     break; // z
		case 0x35: current_keys |= GP2X_X;     break; // x
		case 0x36: current_keys |= GP2X_B;     break; // c
		case 0x37: current_keys |= GP2X_Y;     break; // v
		case 0x27: current_keys |= GP2X_L;     break; // s
		case 0x28: current_keys |= GP2X_R;     break; // d
		case 0x29: current_keys |= GP2X_PUSH;  break; // f
		case 0x18: current_keys |= GP2X_VOL_DOWN;break; // q
		case 0x19: current_keys |= GP2X_VOL_UP;break; // w
		case 0x2d: log_io_clear(); break; // k
		case 0x2e: log_io_dump();  break; // l
		case 0x17: { // tab
			extern int PicoReset(void);
			PicoReset();
			break;
		}
	}

	return 0;
}

static gint key_release_event (GtkWidget *widget, GdkEventKey *event)
{
	switch (event->hardware_keycode)
	{
		case 111:
		case 0x62: current_keys &= ~GP2X_UP;    break;
		case 116:
		case 0x68: current_keys &= ~GP2X_DOWN;  break;
		case 113:
		case 0x64: current_keys &= ~GP2X_LEFT;  break;
		case 114:
		case 0x66: current_keys &= ~GP2X_RIGHT; break;
		case 0x24: current_keys &= ~GP2X_START; break; // enter
		case 0x23: current_keys &= ~GP2X_SELECT;break; // ]
		case 0x34: current_keys &= ~GP2X_A;     break; // z
		case 0x35: current_keys &= ~GP2X_X;     break; // x
		case 0x36: current_keys &= ~GP2X_B;     break; // c
		case 0x37: current_keys &= ~GP2X_Y;     break; // v
		case 0x27: current_keys &= ~GP2X_L;     break; // s
		case 0x28: current_keys &= ~GP2X_R;     break; // d
		case 0x29: current_keys &= ~GP2X_PUSH;  break; // f
		case 0x18: current_keys &= ~GP2X_VOL_DOWN;break; // q
		case 0x19: current_keys &= ~GP2X_VOL_UP;break; // w
	}

	return 0;
}

static void size_allocate_event(GtkWidget *widget, GtkAllocation *allocation, gpointer user_data)
{
	// printf("%dx%d\n", allocation->width, allocation->height);
	scr_w = allocation->width - 2;
	scr_h = allocation->height - 2;
	scr_changed = 1;
}

static void *gtk_threadf(void *targ)
{
	int argc = 0;
	char *argv[] = { "" };
	GtkWidget *box;
	sem_t *sem = targ;

	g_thread_init (NULL);
	gdk_threads_init ();
	gdk_set_locale ();
	gtk_init (&argc, (char ***) &argv);

	/* create new window */
	gtk_items.window = gtk_window_new (GTK_WINDOW_TOPLEVEL);
	g_signal_connect (G_OBJECT (gtk_items.window), "delete_event",
			G_CALLBACK (delete_event), NULL);

	g_signal_connect (G_OBJECT (gtk_items.window), "destroy",
			G_CALLBACK (destroy), NULL);

	g_signal_connect (G_OBJECT (gtk_items.window), "key_press_event",
			G_CALLBACK (key_press_event), NULL);

	g_signal_connect (G_OBJECT (gtk_items.window), "key_release_event",
			G_CALLBACK (key_release_event), NULL);

	g_signal_connect (G_OBJECT (gtk_items.window), "size_allocate",
			G_CALLBACK (size_allocate_event), NULL);

	gtk_container_set_border_width (GTK_CONTAINER (gtk_items.window), 1);
	gtk_window_set_title ((GtkWindow *) gtk_items.window, verstring);

	box = gtk_hbox_new(FALSE, 0);
	gtk_widget_show(box);
	gtk_container_add (GTK_CONTAINER (gtk_items.window), box);

	/* live pixmap */
	gtk_items.pixmap1 = gtk_image_new ();
	gtk_container_add (GTK_CONTAINER (box), gtk_items.pixmap1);
	gtk_widget_show (gtk_items.pixmap1);
	gtk_widget_set_size_request (gtk_items.pixmap1, 320, 240);

	gtk_widget_show  (gtk_items.window);

	sem_post(sem);

	gtk_main();

	printf("linux: gtk thread finishing\n");
	exit(1);

	return NULL;
}

static void gtk_initf(void)
{
	pthread_t gtk_thread;
	sem_t sem;
	sem_init(&sem, 0, 0);

	pthread_create(&gtk_thread, NULL, gtk_threadf, &sem);
	pthread_detach(gtk_thread);

	sem_wait(&sem);
	sem_close(&sem);
}

void finalize_image(guchar *pixels, gpointer data)
{
	free(pixels);
}

/* --- */

static void realloc_screen(void)
{
	void *old = g_screen_ptr;
	g_screen_width = scr_w;
	g_screen_height = scr_h;
	g_screen_ptr = malloc(g_screen_width * g_screen_height * 2);
	free(old);
	scr_changed = 0;
}

void gp2x_init(void)
{
	printf("entering init()\n"); fflush(stdout);

	realloc_screen();
	memset(g_screen_ptr, 0, g_screen_width * g_screen_height * 2);

	// snd
	sndout_oss_init();

	gtk_initf();

	printf("exitting init()\n"); fflush(stdout);
}

void gp2x_deinit(void)
{
	free(g_screen_ptr);
	sndout_oss_exit();
}

/* video */
void gp2x_video_flip(void)
{
	GdkPixbuf	*pixbuf;
	unsigned char	*image;
	int		pixel_count, i;

	pixel_count = g_screen_width * g_screen_height;

	gdk_threads_enter();

	image = malloc(pixel_count * 3);
	if (image == NULL)
	{
		gdk_threads_leave();
		return;
	}

	if (current_bpp == 8)
	{
		unsigned char *pixels = g_screen_ptr;
		int pix;

		for (i = 0; i < pixel_count; i++)
		{
			pix = current_pal[pixels[i]];
			image[3 * i + 0] = pix >> 16;
			image[3 * i + 1] = pix >>  8;
			image[3 * i + 2] = pix;
		}
	}
	else
	{
		unsigned short *pixels = g_screen_ptr;

		for (i = 0; i < pixel_count; i++)
		{
			/*  in:           rrrr rggg gggb bbbb */
			/* out: rrrr r000 gggg gg00 bbbb b000 */
			image[3 * i + 0] = (pixels[i] >> 8) & 0xf8;
			image[3 * i + 1] = (pixels[i] >> 3) & 0xfc;
			image[3 * i + 2] = (pixels[i] << 3);
		}
	}

	pixbuf = gdk_pixbuf_new_from_data (image, GDK_COLORSPACE_RGB,
			FALSE, 8, g_screen_width, g_screen_height,
			g_screen_width * 3, finalize_image, NULL);
	gtk_image_set_from_pixbuf (GTK_IMAGE (gtk_items.pixmap1), pixbuf);
	g_object_unref (pixbuf);

	gdk_threads_leave();

	if (scr_changed)
		realloc_screen();
}

void gp2x_video_flip2(void)
{
	gp2x_video_flip();
}

void gp2x_video_changemode(int bpp)
{
	current_bpp = bpp;
}

void gp2x_video_changemode2(int bpp)
{
	current_bpp = bpp;
}

void gp2x_video_setpalette(int *pal, int len)
{
	memcpy(current_pal, pal, len*4);
}

void gp2x_video_flush_cache(void)
{
}

void gp2x_video_RGB_setscaling(int v_offs, int W, int H)
{
}

void gp2x_memcpy_buffers(int buffers, void *data, int offset, int len)
{
	if ((char *)g_screen_ptr + offset != data)
		memcpy((char *)g_screen_ptr + offset, data, len);
}

void gp2x_memcpy_all_buffers(void *data, int offset, int len)
{
	memcpy((char *)g_screen_ptr + offset, data, len);
}


void gp2x_memset_all_buffers(int offset, int byte, int len)
{
	memset((char *)g_screen_ptr + offset, byte, len);
}

void gp2x_pd_clone_buffer2(void)
{
	memset(g_screen_ptr, 0, g_screen_width * g_screen_height * 2);
}

/* joy */
unsigned long gp2x_joystick_read(int allow_usb_joy)
{
	return current_keys;
}

int gp2x_touchpad_read(int *x, int *y)
{
	return -1;
}

/* 940 */
int crashed_940 = 0;
void Pause940(int yes)
{
}

void Reset940(int yes, int bank)
{
}

/* faking gp2x cpuctrl.c */
void cpuctrl_init(void)
{
}

void cpuctrl_deinit(void)
{
}

void set_FCLK(unsigned MHZ)
{
}

void Disable_940(void)
{
}

void gp2x_video_wait_vsync(void)
{
}

void set_RAM_Timings(int tRC, int tRAS, int tWR, int tMRD, int tRFC, int tRP, int tRCD)
{
}

void set_gamma(int g100, int A_SNs_curve)
{
}

void set_LCD_custom_rate(int rate)
{
}

void unset_LCD_custom_rate(void)
{
}

/* squidgehack.c */
int mmuhack(void)
{
	return 0;
}


int mmuunhack(void)
{
	return 0;
}


/* misc */
void spend_cycles(int c)
{
	usleep(c/200);
}

/* lprintf */
void lprintf(const char *fmt, ...)
{
	va_list vl;

	va_start(vl, fmt);
	vprintf(fmt, vl);
	va_end(vl);
}
Commit	Line	Data
	1	/* faking/emulating gp2x.c by using gtk */
	2	#include <stdio.h>
	3	#include <stdlib.h>
	4	#include <string.h>
	5	#include <pthread.h>
	6	#include <semaphore.h>
	7	#include <gtk/gtk.h>
	8
	9	#include <unistd.h>
	10	#include <sys/types.h>
	11	#include <sys/stat.h>
	12	#include <fcntl.h>
	13	#include <errno.h>
	14
	15	#include "../gp2x/emu.h"
	16	#include "../gp2x/gp2x.h"
	17	#include "../gp2x/version.h"
	18	#include "../common/emu.h"
	19	#include "sndout_oss.h"
	20
	21	#include "log_io.h"
	22
	23	unsigned long current_keys = 0;
	24	static int current_bpp = 8;
	25	static int current_pal[256];
	26	static const char *verstring = "PicoDrive " VERSION;
	27	static int scr_changed = 0, scr_w = SCREEN_WIDTH, scr_h = SCREEN_HEIGHT;
	28
	29	// dummies
	30	char ext_menu = 0, ext_state = 0;
	31	int mix_32_to_16l_level;
	32
	33	/* gtk */
	34	struct gtk_global_struct
	35	{
	36	GtkWidget *window;
	37	GtkWidget *pixmap1;
	38	} gtk_items;
	39
	40
	41	static gboolean delete_event (GtkWidget widget, GdkEvent event, gpointer data)
	42	{
	43	return FALSE;
	44	}
	45
	46	static void destroy (GtkWidget *widget, gpointer data)
	47	{
	48	gtk_main_quit ();
	49	}
	50
	51	static gint key_press_event (GtkWidget widget, GdkEventKey event)
	52	{
	53	switch (event->hardware_keycode)
	54	{
	55	case 111:
	56	case 0x62: current_keys \|= GP2X_UP; break;
	57	case 116:
	58	case 0x68: current_keys \|= GP2X_DOWN; break;
	59	case 113:
	60	case 0x64: current_keys \|= GP2X_LEFT; break;
	61	case 114:
	62	case 0x66: current_keys \|= GP2X_RIGHT; break;
	63	case 0x24: current_keys \|= GP2X_START; break; // enter
	64	case 0x23: current_keys \|= GP2X_SELECT;break; // ]
	65	case 0x34: current_keys \|= GP2X_A; break; // z
	66	case 0x35: current_keys \|= GP2X_X; break; // x
	67	case 0x36: current_keys \|= GP2X_B; break; // c
	68	case 0x37: current_keys \|= GP2X_Y; break; // v
	69	case 0x27: current_keys \|= GP2X_L; break; // s
	70	case 0x28: current_keys \|= GP2X_R; break; // d
	71	case 0x29: current_keys \|= GP2X_PUSH; break; // f
	72	case 0x18: current_keys \|= GP2X_VOL_DOWN;break; // q
	73	case 0x19: current_keys \|= GP2X_VOL_UP;break; // w
	74	case 0x2d: log_io_clear(); break; // k
	75	case 0x2e: log_io_dump(); break; // l
	76	case 0x17: { // tab
	77	extern int PicoReset(void);
	78	PicoReset();
	79	break;
	80	}
	81	}
	82
	83	return 0;
	84	}
	85
	86	static gint key_release_event (GtkWidget widget, GdkEventKey event)
	87	{
	88	switch (event->hardware_keycode)
	89	{
	90	case 111:
	91	case 0x62: current_keys &= ~GP2X_UP; break;
	92	case 116:
	93	case 0x68: current_keys &= ~GP2X_DOWN; break;
	94	case 113:
	95	case 0x64: current_keys &= ~GP2X_LEFT; break;
	96	case 114:
	97	case 0x66: current_keys &= ~GP2X_RIGHT; break;
	98	case 0x24: current_keys &= ~GP2X_START; break; // enter
	99	case 0x23: current_keys &= ~GP2X_SELECT;break; // ]
	100	case 0x34: current_keys &= ~GP2X_A; break; // z
	101	case 0x35: current_keys &= ~GP2X_X; break; // x
	102	case 0x36: current_keys &= ~GP2X_B; break; // c
	103	case 0x37: current_keys &= ~GP2X_Y; break; // v
	104	case 0x27: current_keys &= ~GP2X_L; break; // s
	105	case 0x28: current_keys &= ~GP2X_R; break; // d
	106	case 0x29: current_keys &= ~GP2X_PUSH; break; // f
	107	case 0x18: current_keys &= ~GP2X_VOL_DOWN;break; // q
	108	case 0x19: current_keys &= ~GP2X_VOL_UP;break; // w
	109	}
	110
	111	return 0;
	112	}
	113
	114	static void size_allocate_event(GtkWidget widget, GtkAllocation allocation, gpointer user_data)
	115	{
	116	// printf("%dx%d\n", allocation->width, allocation->height);
	117	scr_w = allocation->width - 2;
	118	scr_h = allocation->height - 2;
	119	scr_changed = 1;
	120	}
	121
	122	static void gtk_threadf(void targ)
	123	{
	124	int argc = 0;
	125	char *argv[] = { "" };
	126	GtkWidget *box;
	127	sem_t *sem = targ;
	128
	129	g_thread_init (NULL);
	130	gdk_threads_init ();
	131	gdk_set_locale ();
	132	gtk_init (&argc, (char ***) &argv);
	133
	134	/* create new window */
	135	gtk_items.window = gtk_window_new (GTK_WINDOW_TOPLEVEL);
	136	g_signal_connect (G_OBJECT (gtk_items.window), "delete_event",
	137	G_CALLBACK (delete_event), NULL);
	138
	139	g_signal_connect (G_OBJECT (gtk_items.window), "destroy",
	140	G_CALLBACK (destroy), NULL);
	141
	142	g_signal_connect (G_OBJECT (gtk_items.window), "key_press_event",
	143	G_CALLBACK (key_press_event), NULL);
	144
	145	g_signal_connect (G_OBJECT (gtk_items.window), "key_release_event",
	146	G_CALLBACK (key_release_event), NULL);
	147
	148	g_signal_connect (G_OBJECT (gtk_items.window), "size_allocate",
	149	G_CALLBACK (size_allocate_event), NULL);
	150
	151	gtk_container_set_border_width (GTK_CONTAINER (gtk_items.window), 1);
	152	gtk_window_set_title ((GtkWindow *) gtk_items.window, verstring);
	153
	154	box = gtk_hbox_new(FALSE, 0);
	155	gtk_widget_show(box);
	156	gtk_container_add (GTK_CONTAINER (gtk_items.window), box);
	157
	158	/* live pixmap */
	159	gtk_items.pixmap1 = gtk_image_new ();
	160	gtk_container_add (GTK_CONTAINER (box), gtk_items.pixmap1);
	161	gtk_widget_show (gtk_items.pixmap1);
	162	gtk_widget_set_size_request (gtk_items.pixmap1, 320, 240);
	163
	164	gtk_widget_show (gtk_items.window);
	165
	166	sem_post(sem);
	167
	168	gtk_main();
	169
	170	printf("linux: gtk thread finishing\n");
	171	exit(1);
	172
	173	return NULL;
	174	}
	175
	176	static void gtk_initf(void)
	177	{
	178	pthread_t gtk_thread;
	179	sem_t sem;
	180	sem_init(&sem, 0, 0);
	181
	182	pthread_create(&gtk_thread, NULL, gtk_threadf, &sem);
	183	pthread_detach(gtk_thread);
	184
	185	sem_wait(&sem);
	186	sem_close(&sem);
	187	}
	188
	189	void finalize_image(guchar *pixels, gpointer data)
	190	{
	191	free(pixels);
	192	}
	193
	194	/* --- */
	195
	196	static void realloc_screen(void)
	197	{
	198	void *old = g_screen_ptr;
	199	g_screen_width = scr_w;
	200	g_screen_height = scr_h;
	201	g_screen_ptr = malloc(g_screen_width * g_screen_height * 2);
	202	free(old);
	203	scr_changed = 0;
	204	}
	205
	206	void gp2x_init(void)
	207	{
	208	printf("entering init()\n"); fflush(stdout);
	209
	210	realloc_screen();
	211	memset(g_screen_ptr, 0, g_screen_width * g_screen_height * 2);
	212
	213	// snd
	214	sndout_oss_init();
	215
	216	gtk_initf();
	217
	218	printf("exitting init()\n"); fflush(stdout);
	219	}
	220
	221	void gp2x_deinit(void)
	222	{
	223	free(g_screen_ptr);
	224	sndout_oss_exit();
	225	}
	226
	227	/* video */
	228	void gp2x_video_flip(void)
	229	{
	230	GdkPixbuf *pixbuf;
	231	unsigned char *image;
	232	int pixel_count, i;
	233
	234	pixel_count = g_screen_width * g_screen_height;
	235
	236	gdk_threads_enter();
	237
	238	image = malloc(pixel_count * 3);
	239	if (image == NULL)
	240	{
	241	gdk_threads_leave();
	242	return;
	243	}
	244
	245	if (current_bpp == 8)
	246	{
	247	unsigned char *pixels = g_screen_ptr;
	248	int pix;
	249
	250	for (i = 0; i < pixel_count; i++)
	251	{
	252	pix = current_pal[pixels[i]];
	253	image[3 * i + 0] = pix >> 16;
	254	image[3 * i + 1] = pix >> 8;
	255	image[3 * i + 2] = pix;
	256	}
	257	}
	258	else
	259	{
	260	unsigned short *pixels = g_screen_ptr;
	261
	262	for (i = 0; i < pixel_count; i++)
	263	{
	264	/* in: rrrr rggg gggb bbbb */
	265	/* out: rrrr r000 gggg gg00 bbbb b000 */
	266	image[3 * i + 0] = (pixels[i] >> 8) & 0xf8;
	267	image[3 * i + 1] = (pixels[i] >> 3) & 0xfc;
	268	image[3 * i + 2] = (pixels[i] << 3);
	269	}
	270	}
	271
	272	pixbuf = gdk_pixbuf_new_from_data (image, GDK_COLORSPACE_RGB,
	273	FALSE, 8, g_screen_width, g_screen_height,
	274	g_screen_width * 3, finalize_image, NULL);
	275	gtk_image_set_from_pixbuf (GTK_IMAGE (gtk_items.pixmap1), pixbuf);
	276	g_object_unref (pixbuf);
	277
	278	gdk_threads_leave();
	279
	280	if (scr_changed)
	281	realloc_screen();
	282	}
	283
	284	void gp2x_video_flip2(void)
	285	{
	286	gp2x_video_flip();
	287	}
	288
	289	void gp2x_video_changemode(int bpp)
	290	{
	291	current_bpp = bpp;
	292	}
	293
	294	void gp2x_video_changemode2(int bpp)
	295	{
	296	current_bpp = bpp;
	297	}
	298
	299	void gp2x_video_setpalette(int *pal, int len)
	300	{
	301	memcpy(current_pal, pal, len*4);
	302	}
	303
	304	void gp2x_video_flush_cache(void)
	305	{
	306	}
	307
	308	void gp2x_video_RGB_setscaling(int v_offs, int W, int H)
	309	{
	310	}
	311
	312	void gp2x_memcpy_buffers(int buffers, void *data, int offset, int len)
	313	{
	314	if ((char *)g_screen_ptr + offset != data)
	315	memcpy((char *)g_screen_ptr + offset, data, len);
	316	}
	317
	318	void gp2x_memcpy_all_buffers(void *data, int offset, int len)
	319	{
	320	memcpy((char *)g_screen_ptr + offset, data, len);
	321	}
	322
	323
	324	void gp2x_memset_all_buffers(int offset, int byte, int len)
	325	{
	326	memset((char *)g_screen_ptr + offset, byte, len);
	327	}
	328
	329	void gp2x_pd_clone_buffer2(void)
	330	{
	331	memset(g_screen_ptr, 0, g_screen_width * g_screen_height * 2);
	332	}
	333
	334	/* joy */
	335	unsigned long gp2x_joystick_read(int allow_usb_joy)
	336	{
	337	return current_keys;
	338	}
	339
	340	int gp2x_touchpad_read(int x, int y)
	341	{
	342	return -1;
	343	}
	344
	345	/* 940 */
	346	int crashed_940 = 0;
	347	void Pause940(int yes)
	348	{
	349	}
	350
	351	void Reset940(int yes, int bank)
	352	{
	353	}
	354
	355	/* faking gp2x cpuctrl.c */
	356	void cpuctrl_init(void)
	357	{
	358	}
	359
	360	void cpuctrl_deinit(void)
	361	{
	362	}
	363
	364	void set_FCLK(unsigned MHZ)
	365	{
	366	}
	367
	368	void Disable_940(void)
	369	{
	370	}
	371
	372	void gp2x_video_wait_vsync(void)
	373	{
	374	}
	375
	376	void set_RAM_Timings(int tRC, int tRAS, int tWR, int tMRD, int tRFC, int tRP, int tRCD)
	377	{
	378	}
	379
	380	void set_gamma(int g100, int A_SNs_curve)
	381	{
	382	}
	383
	384	void set_LCD_custom_rate(int rate)
	385	{
	386	}
	387
	388	void unset_LCD_custom_rate(void)
	389	{
	390	}
	391
	392	/* squidgehack.c */
	393	int mmuhack(void)
	394	{
	395	return 0;
	396	}
	397
	398
	399	int mmuunhack(void)
	400	{
	401	return 0;
	402	}
	403
	404
	405	/* misc */
	406	void spend_cycles(int c)
	407	{
	408	usleep(c/200);
	409	}
	410
	411	/* lprintf */
	412	void lprintf(const char *fmt, ...)
	413	{
	414	va_list vl;
	415
	416	va_start(vl, fmt);
	417	vprintf(fmt, vl);
	418	va_end(vl);
	419	}
	420