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