platform/linux/io.c

   1 /*
   2  * PicoDrive
   3  * (C) notaz, 2007-2010
   4  *
   5  * This work is licensed under the terms of MAME license.
   6  * See COPYING file in the top-level directory.
   7  */
   8 #include <stdio.h>
   9 #include <stdlib.h>
  10 #include <string.h>
  11
  12 #include "../libpicofe/menu.h"
  13 #include "../libpicofe/input.h"
  14 #include "../libpicofe/linux/sndout_oss.h"
  15 #include "../common/emu.h"
  16 #include "../common/input_pico.h"
  17 #include "version.h"
  18
  19 #include "log_io.h"
  20
  21 int current_keys;
  22 unsigned char *PicoDraw2FB;
  23
  24 #ifdef FBDEV
  25
  26 #include "fbdev.h"
  27
  28 #else
  29
  30 #include <pthread.h>
  31 #include <semaphore.h>
  32
  33 static int current_bpp = 16;
  34 static int current_pal[256];
  35 static const char *verstring = "PicoDrive " VERSION;
  36 static int scr_changed = 0, scr_w = SCREEN_WIDTH, scr_h = SCREEN_HEIGHT;
  37
  38 /* faking GP2X pad */
  39 enum  { GP2X_UP=0x1,       GP2X_LEFT=0x4,       GP2X_DOWN=0x10,  GP2X_RIGHT=0x40,
  40         GP2X_START=1<<8,   GP2X_SELECT=1<<9,    GP2X_L=1<<10,    GP2X_R=1<<11,
  41         GP2X_A=1<<12,      GP2X_B=1<<13,        GP2X_X=1<<14,    GP2X_Y=1<<15,
  42         GP2X_VOL_UP=1<<23, GP2X_VOL_DOWN=1<<22, GP2X_PUSH=1<<27 };
  43
  44 static void key_press_event(int keycode)
  45 {
  46         switch (keycode)
  47         {
  48                 case 111:
  49                 case 0x62: current_keys |= GP2X_UP;    break;
  50                 case 116:
  51                 case 0x68: current_keys |= GP2X_DOWN;  break;
  52                 case 113:
  53                 case 0x64: current_keys |= GP2X_LEFT;  break;
  54                 case 114:
  55                 case 0x66: current_keys |= GP2X_RIGHT; break;
  56                 case 0x24: current_keys |= GP2X_START; break; // enter
  57                 case 0x23: current_keys |= GP2X_SELECT;break; // ]
  58                 case 0x34: current_keys |= GP2X_A;     break; // z
  59                 case 0x35: current_keys |= GP2X_X;     break; // x
  60                 case 0x36: current_keys |= GP2X_B;     break; // c
  61                 case 0x37: current_keys |= GP2X_Y;     break; // v
  62                 case 0x27: current_keys |= GP2X_L;     break; // s
  63                 case 0x28: current_keys |= GP2X_R;     break; // d
  64                 case 0x29: current_keys |= GP2X_PUSH;  break; // f
  65                 case 0x18: current_keys |= GP2X_VOL_DOWN;break; // q
  66                 case 0x19: current_keys |= GP2X_VOL_UP;break; // w
  67                 case 0x2d: log_io_clear(); break; // k
  68                 case 0x2e: log_io_dump();  break; // l
  69                 case 0x17: { // tab
  70                         extern int PicoReset(void);
  71                         PicoReset();
  72                         break;
  73                 }
  74         }
  75 }
  76
  77 static void key_release_event(int keycode)
  78 {
  79         switch (keycode)
  80         {
  81                 case 111:
  82                 case 0x62: current_keys &= ~GP2X_UP;    break;
  83                 case 116:
  84                 case 0x68: current_keys &= ~GP2X_DOWN;  break;
  85                 case 113:
  86                 case 0x64: current_keys &= ~GP2X_LEFT;  break;
  87                 case 114:
  88                 case 0x66: current_keys &= ~GP2X_RIGHT; break;
  89                 case 0x24: current_keys &= ~GP2X_START; break; // enter
  90                 case 0x23: current_keys &= ~GP2X_SELECT;break; // ]
  91                 case 0x34: current_keys &= ~GP2X_A;     break; // z
  92                 case 0x35: current_keys &= ~GP2X_X;     break; // x
  93                 case 0x36: current_keys &= ~GP2X_B;     break; // c
  94                 case 0x37: current_keys &= ~GP2X_Y;     break; // v
  95                 case 0x27: current_keys &= ~GP2X_L;     break; // s
  96                 case 0x28: current_keys &= ~GP2X_R;     break; // d
  97                 case 0x29: current_keys &= ~GP2X_PUSH;  break; // f
  98                 case 0x18: current_keys &= ~GP2X_VOL_DOWN;break; // q
  99                 case 0x19: current_keys &= ~GP2X_VOL_UP;break; // w
 100         }
 101 }
 102
 103 /* --- */
 104
 105 #include <X11/Xlib.h>
 106 #include <X11/Xutil.h>
 107
 108 static Display *xlib_display;
 109 static Window xlib_window;
 110 static XImage *ximage;
 111
 112 static void ximage_realloc(Display *display, Visual *visual)
 113 {
 114         void *xlib_screen;
 115
 116         XLockDisplay(xlib_display);
 117
 118         if (ximage != NULL)
 119                 XDestroyImage(ximage);
 120         ximage = NULL;
 121
 122         xlib_screen = calloc(scr_w * scr_h, 4);
 123         if (xlib_screen != NULL)
 124                 ximage = XCreateImage(display, visual, 24, ZPixmap, 0,
 125                                 xlib_screen, scr_w, scr_h, 32, 0);
 126         if (ximage == NULL)
 127                 fprintf(stderr, "failed to alloc ximage\n");
 128
 129         XUnlockDisplay(xlib_display);
 130 }
 131
 132 static void xlib_update(void)
 133 {
 134         Status xstatus;
 135
 136         XLockDisplay(xlib_display);
 137
 138         xstatus = XPutImage(xlib_display, xlib_window, DefaultGC(xlib_display, 0), ximage,
 139                 0, 0, 0, 0, g_screen_width, g_screen_height);
 140         if (xstatus != 0)
 141                 fprintf(stderr, "XPutImage %d\n", xstatus);
 142
 143         XUnlockDisplay(xlib_display);
 144 }
 145
 146 static void *xlib_threadf(void *targ)
 147 {
 148         unsigned int width, height, display_width, display_height;
 149         sem_t *sem = targ;
 150         XTextProperty windowName;
 151         Window win;
 152         XEvent report;
 153         Display *display;
 154         Visual *visual;
 155         int screen;
 156
 157         XInitThreads();
 158
 159         xlib_display = display = XOpenDisplay(NULL);
 160         if (display == NULL)
 161         {
 162                 fprintf(stderr, "cannot connect to X server %s\n",
 163                                 XDisplayName(NULL));
 164                 sem_post(sem);
 165                 return NULL;
 166         }
 167
 168         visual = DefaultVisual(display, 0);
 169         if (visual->class != TrueColor)
 170         {
 171                 fprintf(stderr, "cannot handle non true color visual\n");
 172                 XCloseDisplay(display);
 173                 sem_post(sem);
 174                 return NULL;
 175         }
 176
 177         printf("X vendor: %s, rel: %d, display: %s, protocol ver: %d.%d\n", ServerVendor(display),
 178                 VendorRelease(display), DisplayString(display), ProtocolVersion(display),
 179                 ProtocolRevision(display));
 180
 181         screen = DefaultScreen(display);
 182
 183         ximage_realloc(display, visual);
 184         sem_post(sem);
 185
 186         display_width = DisplayWidth(display, screen);
 187         display_height = DisplayHeight(display, screen);
 188
 189         xlib_window = win = XCreateSimpleWindow(display,
 190                         RootWindow(display, screen),
 191                         display_width / 2 - scr_w / 2,
 192                         display_height / 2 - scr_h / 2,
 193                         scr_w + 2, scr_h + 2, 1,
 194                         BlackPixel(display, screen),
 195                         BlackPixel(display, screen));
 196
 197         XStringListToTextProperty((char **)&verstring, 1, &windowName);
 198         XSetWMName(display, win, &windowName);
 199
 200         XSelectInput(display, win, ExposureMask |
 201                         KeyPressMask | KeyReleaseMask |
 202                         StructureNotifyMask);
 203
 204         XMapWindow(display, win);
 205
 206         while (1)
 207         {
 208                 XNextEvent(display, &report);
 209                 switch (report.type)
 210                 {
 211                         case Expose:
 212                                 while (XCheckTypedEvent(display, Expose, &report))
 213                                         ;
 214                                 xlib_update();
 215                                 break;
 216
 217                         case ConfigureNotify:
 218                                 width = report.xconfigure.width;
 219                                 height = report.xconfigure.height;
 220                                 if (scr_w != width - 2 || scr_h != height - 2) {
 221                                         scr_w = width - 2;
 222                                         scr_h = height - 2;
 223                                         scr_changed = 1;
 224                                 }
 225                                 break;
 226
 227                         case ButtonPress:
 228                                 break;
 229
 230                         case KeyPress:
 231                                 key_press_event(report.xkey.keycode);
 232                                 break;
 233
 234                         case KeyRelease:
 235                                 key_release_event(report.xkey.keycode);
 236                                 break;
 237
 238                         default:
 239                                 break;
 240                 }
 241         }
 242 }
 243
 244 static void xlib_init(void)
 245 {
 246         pthread_t x_thread;
 247         sem_t xlib_sem;
 248
 249         sem_init(&xlib_sem, 0, 0);
 250
 251         pthread_create(&x_thread, NULL, xlib_threadf, &xlib_sem);
 252         pthread_detach(x_thread);
 253
 254         sem_wait(&xlib_sem);
 255         sem_destroy(&xlib_sem);
 256 }
 257
 258 /* --- */
 259
 260 static void realloc_screen(void)
 261 {
 262         int size = scr_w * scr_h * 2;
 263         g_screen_width = g_menuscreen_w = scr_w;
 264         g_screen_height = g_menuscreen_h = scr_h;
 265         g_screen_ptr = realloc(g_screen_ptr, size);
 266         g_menubg_ptr = realloc(g_menubg_ptr, size);
 267         memset(g_screen_ptr, 0, size);
 268         memset(g_menubg_ptr, 0, size);
 269         PicoDraw2FB = g_menubg_ptr;
 270         scr_changed = 0;
 271 }
 272
 273 void plat_video_flip(void)
 274 {
 275         unsigned int *image;
 276         int pixel_count, i;
 277
 278         if (ximage == NULL)
 279                 return;
 280
 281         pixel_count = g_screen_width * g_screen_height;
 282         image = (void *)ximage->data;
 283
 284         if (current_bpp == 8)
 285         {
 286                 unsigned char *pixels = g_screen_ptr;
 287                 int pix;
 288
 289                 for (i = 0; i < pixel_count; i++)
 290                 {
 291                         pix = current_pal[pixels[i]];
 292                         image[i] = pix;
 293                 }
 294         }
 295         else
 296         {
 297                 unsigned short *pixels = g_screen_ptr;
 298
 299                 for (i = 0; i < pixel_count; i++)
 300                 {
 301                         /*  in:           rrrr rggg gggb bbbb */
 302                         /* out: rrrr r000 gggg gg00 bbbb b000 */
 303                         image[i]  = (pixels[i] << 8) & 0xf80000;
 304                         image[i] |= (pixels[i] << 5) & 0x00fc00;
 305                         image[i] |= (pixels[i] << 3) & 0x0000f8;
 306                 }
 307         }
 308         xlib_update();
 309
 310         if (scr_changed) {
 311                 realloc_screen();
 312                 ximage_realloc(xlib_display, DefaultVisual(xlib_display, 0));
 313
 314                 // propagate new ponters to renderers
 315                 plat_video_toggle_renderer(0, 0);
 316         }
 317 }
 318
 319 void plat_video_wait_vsync(void)
 320 {
 321 }
 322
 323 #endif // !FBDEV
 324
 325 void plat_early_init(void)
 326 {
 327 }
 328
 329 void plat_init(void)
 330 {
 331 #ifdef FBDEV
 332         int ret, w, h;
 333         ret = vout_fbdev_init(&w, &h);
 334         if (ret != 0)
 335                 exit(1);
 336         g_screen_width = g_menuscreen_w = w;
 337         g_screen_height = g_menuscreen_h = h;
 338         g_menubg_ptr = realloc(g_menubg_ptr, w * g_screen_height * 2);
 339         PicoDraw2FB = g_menubg_ptr;
 340 #else
 341         realloc_screen();
 342         memset(g_screen_ptr, 0, g_screen_width * g_screen_height * 2);
 343         xlib_init();
 344 #endif
 345
 346         // snd
 347         sndout_oss_init();
 348 }
 349
 350 void plat_finish(void)
 351 {
 352 #ifdef FBDEV
 353         vout_fbdev_finish();
 354 #else
 355         free(g_screen_ptr);
 356 #endif
 357         sndout_oss_exit();
 358 }
 359
 360 /* misc */
 361 int mp3_get_bitrate(void *f, int size)
 362 {
 363         return 128;
 364 }
 365
 366 void mp3_start_play(void *f, int pos)
 367 {
 368 }
 369
 370 void mp3_update(int *buffer, int length, int stereo)
 371 {
 372 }
 373
 374 #include <linux/input.h>
 375
 376 struct in_default_bind in_evdev_defbinds[] =
 377 {
 378         /* MXYZ SACB RLDU */
 379         { KEY_UP,       IN_BINDTYPE_PLAYER12, 0 },
 380         { KEY_DOWN,     IN_BINDTYPE_PLAYER12, 1 },
 381         { KEY_LEFT,     IN_BINDTYPE_PLAYER12, 2 },
 382         { KEY_RIGHT,    IN_BINDTYPE_PLAYER12, 3 },
 383         { KEY_S,        IN_BINDTYPE_PLAYER12, 4 },      /* B */
 384         { KEY_D,        IN_BINDTYPE_PLAYER12, 5 },      /* C */
 385         { KEY_A,        IN_BINDTYPE_PLAYER12, 6 },      /* A */
 386         { KEY_ENTER,    IN_BINDTYPE_PLAYER12, 7 },
 387         { KEY_BACKSLASH, IN_BINDTYPE_EMU, PEVB_MENU },
 388         { 0, 0, 0 }
 389 };
 390