linux/gp2x.c

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