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