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