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 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