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