new menu option code
[libpicofe.git] / gp2x / menu.c
1 // (c) Copyright 2006 notaz, All rights reserved.\r
2 // Free for non-commercial use.\r
3 \r
4 // For commercial use, separate licencing terms must be obtained.\r
5 \r
6 #include <stdio.h>\r
7 #include <string.h>\r
8 #include <stdlib.h>\r
9 #include <stdarg.h>\r
10 #include <unistd.h>\r
11 #include <dirent.h>\r
12 \r
13 #include "gp2x.h"\r
14 #include "emu.h"\r
15 #include "menu.h"\r
16 #include "fonts.h"\r
17 #include "usbjoy.h"\r
18 #include "asmutils.h"\r
19 #include "version.h"\r
20 \r
21 #include <Pico/PicoInt.h>\r
22 #include <Pico/Patch.h>\r
23 #include <zlib/zlib.h>\r
24 \r
25 #ifndef _DIRENT_HAVE_D_TYPE\r
26 #error "need d_type for file browser\r
27 #endif\r
28 \r
29 extern char *actionNames[];\r
30 extern char romFileName[PATH_MAX];\r
31 extern char *rom_data;\r
32 extern int  mmuhack_status;\r
33 extern int  state_slot;\r
34 extern int  config_slot, config_slot_current;\r
35 \r
36 static char *gp2xKeyNames[] = {\r
37         "UP",    "???",    "LEFT", "???",  "DOWN", "???", "RIGHT",    "???",\r
38         "START", "SELECT", "L",    "R",    "A",    "B",   "X",        "Y",\r
39         "???",   "???",    "???",  "???",  "???",  "???", "VOL DOWN", "VOL UP",\r
40         "???",   "???",    "???",  "PUSH", "???",  "???", "???",      "???"\r
41 };\r
42 \r
43 char menuErrorMsg[40] = {0, };\r
44 \r
45 \r
46 static void gp2x_text(unsigned char *screen, int x, int y, const char *text, int color)\r
47 {\r
48         int i,l;\r
49 \r
50         screen = screen + x + y*320;\r
51 \r
52         for (i = 0; i < strlen(text); i++)\r
53         {\r
54                 for (l=0;l<8;l++)\r
55                 {\r
56                         if(fontdata8x8[((text[i])*8)+l]&0x80) screen[l*320+0]=color;\r
57                         if(fontdata8x8[((text[i])*8)+l]&0x40) screen[l*320+1]=color;\r
58                         if(fontdata8x8[((text[i])*8)+l]&0x20) screen[l*320+2]=color;\r
59                         if(fontdata8x8[((text[i])*8)+l]&0x10) screen[l*320+3]=color;\r
60                         if(fontdata8x8[((text[i])*8)+l]&0x08) screen[l*320+4]=color;\r
61                         if(fontdata8x8[((text[i])*8)+l]&0x04) screen[l*320+5]=color;\r
62                         if(fontdata8x8[((text[i])*8)+l]&0x02) screen[l*320+6]=color;\r
63                         if(fontdata8x8[((text[i])*8)+l]&0x01) screen[l*320+7]=color;\r
64                 }\r
65                 screen += 8;\r
66         }\r
67 }\r
68 \r
69 // draws white text to current bbp15 screen\r
70 void gp2x_text_out15(int x, int y, const char *text)\r
71 {\r
72         int i,l;\r
73         unsigned short *screen = gp2x_screen;\r
74 \r
75         screen = screen + x + y*320;\r
76 \r
77         for (i = 0; i < strlen(text); i++)\r
78         {\r
79                 for (l=0;l<8;l++)\r
80                 {\r
81                         if(fontdata8x8[((text[i])*8)+l]&0x80) screen[l*320+0]=0xffff;\r
82                         if(fontdata8x8[((text[i])*8)+l]&0x40) screen[l*320+1]=0xffff;\r
83                         if(fontdata8x8[((text[i])*8)+l]&0x20) screen[l*320+2]=0xffff;\r
84                         if(fontdata8x8[((text[i])*8)+l]&0x10) screen[l*320+3]=0xffff;\r
85                         if(fontdata8x8[((text[i])*8)+l]&0x08) screen[l*320+4]=0xffff;\r
86                         if(fontdata8x8[((text[i])*8)+l]&0x04) screen[l*320+5]=0xffff;\r
87                         if(fontdata8x8[((text[i])*8)+l]&0x02) screen[l*320+6]=0xffff;\r
88                         if(fontdata8x8[((text[i])*8)+l]&0x01) screen[l*320+7]=0xffff;\r
89                 }\r
90                 screen += 8;\r
91         }\r
92 }\r
93 \r
94 \r
95 void gp2x_text_out8(int x, int y, const char *texto, ...)\r
96 {\r
97         va_list args;\r
98         char    buffer[512];\r
99 \r
100         va_start(args,texto);\r
101         vsprintf(buffer,texto,args);\r
102         va_end(args);\r
103 \r
104         gp2x_text(gp2x_screen,x,y,buffer,0xf0);\r
105 }\r
106 \r
107 \r
108 void gp2x_text_out8_2(int x, int y, const char *texto, int color)\r
109 {\r
110         gp2x_text(gp2x_screen, x, y, texto, color);\r
111 }\r
112 \r
113 void gp2x_text_out8_lim(int x, int y, const char *texto, int max)\r
114 {\r
115         char    buffer[320/8+1];\r
116 \r
117         strncpy(buffer, texto, 320/8);\r
118         if (max > 320/8) max = 320/8;\r
119         if (max < 0) max = 0;\r
120         buffer[max] = 0;\r
121 \r
122         gp2x_text(gp2x_screen,x,y,buffer,0xf0);\r
123 }\r
124 \r
125 static void gp2x_smalltext8(int x, int y, const char *texto)\r
126 {\r
127         int i;\r
128         unsigned char *src, *dst;\r
129 \r
130         for (i = 0;; i++, x += 6)\r
131         {\r
132                 unsigned char c = (unsigned char) texto[i];\r
133                 int h = 8;\r
134 \r
135                 if (!c) break;\r
136 \r
137                 src = fontdata6x8[c];\r
138                 dst = (unsigned char *)gp2x_screen + x + y*320;\r
139 \r
140                 while (h--)\r
141                 {\r
142                         int w = 0x20;\r
143                         while (w)\r
144                         {\r
145                                 if( *src & w ) *dst = 0xf0;\r
146                                 dst++;\r
147                                 w>>=1;\r
148                         }\r
149                         src++;\r
150 \r
151                         dst += 320-6;\r
152                 }\r
153         }\r
154 }\r
155 \r
156 static void gp2x_smalltext8_lim(int x, int y, const char *texto, int max)\r
157 {\r
158         char    buffer[320/6+1];\r
159 \r
160         strncpy(buffer, texto, 320/6);\r
161         if (max > 320/6) max = 320/6;\r
162         if (max < 0) max = 0;\r
163         buffer[max] = 0;\r
164 \r
165         gp2x_smalltext8(x, y, buffer);\r
166 }\r
167 \r
168 \r
169 typedef enum\r
170 {\r
171         MB_NONE = 1,            /* no auto processing */\r
172         MB_ONOFF,               /* ON/OFF setting */\r
173         MB_RANGE,               /* [min-max] setting */\r
174 } menu_behavior;\r
175 \r
176 typedef enum\r
177 {\r
178         MA_NONE = 1,\r
179         MA_MAIN_RESUME_GAME,\r
180         MA_MAIN_SAVE_STATE,\r
181         MA_MAIN_LOAD_STATE,\r
182         MA_MAIN_RESET_GAME,\r
183         MA_MAIN_LOAD_ROM,\r
184         MA_MAIN_OPTIONS,\r
185         MA_MAIN_CONTROLS,\r
186         MA_MAIN_CREDITS,\r
187         MA_MAIN_PATCHES,\r
188         MA_MAIN_EXIT,\r
189         MA_OPT_RENDERER,\r
190         MA_OPT_SCALING,\r
191         MA_OPT_ACC_TIMING,\r
192         MA_OPT_ACC_SPRITES,\r
193         MA_OPT_SHOW_FPS,\r
194         MA_OPT_FRAMESKIP,\r
195         MA_OPT_ENABLE_SOUND,\r
196         MA_OPT_SOUND_QUALITY,\r
197         MA_OPT_ARM940_SOUND,\r
198         MA_OPT_6BUTTON_PAD,\r
199         MA_OPT_REGION,\r
200         MA_OPT_SRAM_STATES,\r
201         MA_OPT_CONFIRM_STATES,\r
202         MA_OPT_SAVE_SLOT,\r
203         MA_OPT_CPU_CLOCKS,\r
204         MA_OPT_SCD_OPTS,\r
205         MA_OPT_ADV_OPTS,\r
206         MA_OPT_SAVECFG,\r
207         MA_OPT_SAVECFG_GAME,\r
208         MA_OPT_LOADCFG,\r
209         MA_OPT2_GAMMA,\r
210         MA_OPT2_A_SN_GAMMA,\r
211         MA_OPT2_VSYNC,\r
212         MA_OPT2_ENABLE_Z80,\r
213         MA_OPT2_ENABLE_YM2612,\r
214         MA_OPT2_ENABLE_SN76496,\r
215         MA_OPT2_GZIP_STATES,\r
216         MA_OPT2_NO_LAST_ROM,\r
217         MA_OPT2_RAMTIMINGS,\r
218         MA_OPT2_SQUIDGEHACK,\r
219         MA_OPT2_DONE,\r
220         MA_CDOPT_TESTBIOS_USA,\r
221         MA_CDOPT_TESTBIOS_EUR,\r
222         MA_CDOPT_TESTBIOS_JAP,\r
223         MA_CDOPT_LEDS,\r
224         MA_CDOPT_CDDA,\r
225         MA_CDOPT_PCM,\r
226         MA_CDOPT_READAHEAD,\r
227         MA_CDOPT_SAVERAM,\r
228         MA_CDOPT_SCALEROT_CHIP,\r
229         MA_CDOPT_BETTER_SYNC,\r
230         MA_CDOPT_DONE,\r
231 } menu_id;\r
232 \r
233 typedef struct\r
234 {\r
235         char *name;\r
236         menu_behavior beh;\r
237         menu_id id;\r
238         void *var;              /* for on-off settings */\r
239         int mask;\r
240         signed char min;        /* for ranged integer settings, to be sign-extended */\r
241         signed char max;\r
242         char enabled;\r
243 } menu_entry;\r
244 \r
245 static int me_id2offset(const menu_entry *entries, int count, menu_id id)\r
246 {\r
247         int i;\r
248         for (i = 0; i < count; i++)\r
249         {\r
250                 if (entries[i].id == id) return i;\r
251         }\r
252 \r
253         printf("%s: id %i not found\n", __FUNCTION__, id);\r
254         return 0;\r
255 }\r
256 \r
257 static void me_enable(menu_entry *entries, int count, menu_id id, int enable)\r
258 {\r
259         int i = me_id2offset(entries, count, id);\r
260         entries[i].enabled = enable;\r
261 }\r
262 \r
263 static int me_count_enabled(const menu_entry *entries, int count)\r
264 {\r
265         int i, ret = 0;\r
266 \r
267         for (i = 0; i < count; i++)\r
268         {\r
269                 if (entries[i].enabled) ret++;\r
270         }\r
271 \r
272         return ret;\r
273 }\r
274 \r
275 static menu_id me_index2id(const menu_entry *entries, int count, int index)\r
276 {\r
277         int i;\r
278 \r
279         for (i = 0; i < count; i++)\r
280         {\r
281                 if (entries[i].enabled)\r
282                 {\r
283                         if (index == 0) break;\r
284                         index--;\r
285                 }\r
286         }\r
287         if (i >= count) i = count - 1;\r
288         return entries[i].id;\r
289 }\r
290 \r
291 typedef void (me_draw_custom_f)(const menu_entry *entry, int x, int y, void *param);\r
292 \r
293 static void me_draw(const menu_entry *entries, int count, int x, int y, me_draw_custom_f *cust_draw, void *param)\r
294 {\r
295         int i, y1 = y;\r
296 \r
297         for (i = 0; i < count; i++)\r
298         {\r
299                 if (!entries[i].enabled) continue;\r
300                 if (entries[i].name == NULL)\r
301                 {\r
302                         if (cust_draw != NULL)\r
303                                 cust_draw(&entries[i], x, y1, param);\r
304                         y1 += 10;\r
305                         continue;\r
306                 }\r
307                 gp2x_text_out8(x, y1, entries[i].name);\r
308                 if (entries[i].beh == MB_ONOFF)\r
309                         gp2x_text_out8(x + 27*8, y1, (*(int *)entries[i].var & entries[i].mask) ? "ON" : "OFF");\r
310                 else if (entries[i].beh == MB_RANGE)\r
311                         gp2x_text_out8(x + 27*8, y1, "%i", *(int *)entries[i].var);\r
312                 y1 += 10;\r
313         }\r
314 }\r
315 \r
316 static int me_process(menu_entry *entries, int count, menu_id id, int is_next)\r
317 {\r
318         int i = me_id2offset(entries, count, id);\r
319         menu_entry *entry = &entries[i];\r
320         switch (entry->beh)\r
321         {\r
322                 case MB_ONOFF:\r
323                         *(int *)entry->var ^= entry->mask;\r
324                         return 1;\r
325                 case MB_RANGE:\r
326                         *(int *)entry->var += is_next ? 1 : -1;\r
327                         if (*(int *)entry->var < (int)entry->min) *(int *)entry->var = (int)entry->min;\r
328                         if (*(int *)entry->var > (int)entry->max) *(int *)entry->var = (int)entry->max;\r
329                         return 1;\r
330                 default:\r
331                         return 0;\r
332         }\r
333 }\r
334 \r
335 \r
336 \r
337 \r
338 static unsigned long inp_prev = 0;\r
339 static int inp_prevjoy = 0;\r
340 \r
341 static unsigned long wait_for_input(unsigned long interesting)\r
342 {\r
343         unsigned long ret;\r
344         static int repeats = 0, wait = 50*1000;\r
345         int release = 0, i;\r
346 \r
347         if (repeats == 2 || repeats == 4) wait /= 2;\r
348         if (repeats == 6) wait = 15 * 1000;\r
349 \r
350         for (i = 0; i < 6 && inp_prev == gp2x_joystick_read(1); i++) {\r
351                 if (i == 0) repeats++;\r
352                 if (wait >= 30*1000) usleep(wait); // usleep sleeps for ~30ms minimum\r
353                 else spend_cycles(wait * currentConfig.CPUclock);\r
354         }\r
355 \r
356         while ( !((ret = gp2x_joystick_read(1)) & interesting) ) {\r
357                 usleep(50000);\r
358                 release = 1;\r
359         }\r
360 \r
361         if (release || ret != inp_prev) {\r
362                 repeats = 0;\r
363                 wait = 50*1000;\r
364         }\r
365         inp_prev = ret;\r
366         inp_prevjoy = 0;\r
367 \r
368         // we don't need diagonals in menus\r
369         if ((ret&GP2X_UP)   && (ret&GP2X_LEFT))  ret &= ~GP2X_LEFT;\r
370         if ((ret&GP2X_UP)   && (ret&GP2X_RIGHT)) ret &= ~GP2X_RIGHT;\r
371         if ((ret&GP2X_DOWN) && (ret&GP2X_LEFT))  ret &= ~GP2X_LEFT;\r
372         if ((ret&GP2X_DOWN) && (ret&GP2X_RIGHT)) ret &= ~GP2X_RIGHT;\r
373 \r
374         return ret;\r
375 }\r
376 \r
377 static unsigned long input2_read(unsigned long interesting, int *joy)\r
378 {\r
379         unsigned long ret;\r
380         int i;\r
381 \r
382         do\r
383         {\r
384                 *joy = 0;\r
385                 if ((ret = gp2x_joystick_read(0) & interesting)) break;\r
386                 gp2x_usbjoy_update();\r
387                 for (i = 0; i < num_of_joys; i++) {\r
388                         ret = gp2x_usbjoy_check2(i);\r
389                         if (ret) { *joy = i + 1; break; }\r
390                 }\r
391                 if (ret) break;\r
392         }\r
393         while(0);\r
394 \r
395         return ret;\r
396 }\r
397 \r
398 // similar to wait_for_input(), but returns joy num\r
399 static unsigned long wait_for_input_usbjoy(unsigned long interesting, int *joy)\r
400 {\r
401         unsigned long ret;\r
402         const int wait = 300*1000;\r
403         int i;\r
404 \r
405         if (inp_prevjoy == 0) inp_prev &= interesting;\r
406         for (i = 0; i < 6; i++) {\r
407                 ret = input2_read(interesting, joy);\r
408                 if (*joy != inp_prevjoy || ret != inp_prev) break;\r
409                 usleep(wait/6);\r
410         }\r
411 \r
412         while ( !(ret = input2_read(interesting, joy)) ) {\r
413                 usleep(50000);\r
414         }\r
415 \r
416         inp_prev = ret;\r
417         inp_prevjoy = *joy;\r
418 \r
419         return ret;\r
420 }\r
421 \r
422 \r
423 \r
424 // -------------- ROM selector --------------\r
425 \r
426 static void draw_dirlist(char *curdir, struct dirent **namelist, int n, int sel)\r
427 {\r
428         int start, i, pos;\r
429 \r
430         start = 12 - sel;\r
431         n--; // exclude current dir (".")\r
432 \r
433         //memset(gp2x_screen, 0, 320*240);\r
434         gp2x_pd_clone_buffer2();\r
435 \r
436         if(start - 2 >= 0)\r
437                 gp2x_smalltext8_lim(14, (start - 2)*10, curdir, 53-2);\r
438         for (i = 0; i < n; i++) {\r
439                 pos = start + i;\r
440                 if (pos < 0)  continue;\r
441                 if (pos > 23) break;\r
442                 if (namelist[i+1]->d_type == DT_DIR) {\r
443                         gp2x_smalltext8_lim(14,   pos*10, "/", 1);\r
444                         gp2x_smalltext8_lim(14+6, pos*10, namelist[i+1]->d_name, 53-3);\r
445                 } else {\r
446                         gp2x_smalltext8_lim(14,   pos*10, namelist[i+1]->d_name, 53-2);\r
447                 }\r
448         }\r
449         gp2x_text_out8(5, 120, ">");\r
450         gp2x_video_flip2();\r
451 }\r
452 \r
453 static int scandir_cmp(const void *p1, const void *p2)\r
454 {\r
455         struct dirent **d1 = (struct dirent **)p1, **d2 = (struct dirent **)p2;\r
456         if ((*d1)->d_type == (*d2)->d_type) return alphasort(d1, d2);\r
457         if ((*d1)->d_type == DT_DIR) return -1; // put before\r
458         if ((*d2)->d_type == DT_DIR) return  1;\r
459         return alphasort(d1, d2);\r
460 }\r
461 \r
462 static char *filter_exts[] = {\r
463         ".mp3", ".MP3", ".srm", ".brm", "s.gz", ".mds", "bcfg", ".txt", ".htm", "html",\r
464         ".jpg", ".gpe", ".cue"\r
465 };\r
466 \r
467 static int scandir_filter(const struct dirent *ent)\r
468 {\r
469         const char *p;\r
470         int i;\r
471 \r
472         if (ent == NULL || ent->d_name == NULL) return 0;\r
473         if (strlen(ent->d_name) < 5) return 1;\r
474 \r
475         p = ent->d_name + strlen(ent->d_name) - 4;\r
476 \r
477         for (i = 0; i < sizeof(filter_exts)/sizeof(filter_exts[0]); i++)\r
478         {\r
479                 if (strcmp(p, filter_exts[i]) == 0) return 0;\r
480         }\r
481 \r
482         return 1;\r
483 }\r
484 \r
485 static char *romsel_loop(char *curr_path)\r
486 {\r
487         struct dirent **namelist;\r
488         DIR *dir;\r
489         int n, sel = 0;\r
490         unsigned long inp = 0;\r
491         char *ret = NULL, *fname = NULL;\r
492 \r
493         // is this a dir or a full path?\r
494         if ((dir = opendir(curr_path))) {\r
495                 closedir(dir);\r
496         } else {\r
497                 char *p;\r
498                 for (p = curr_path + strlen(curr_path) - 1; p > curr_path && *p != '/'; p--);\r
499                 *p = 0;\r
500                 fname = p+1;\r
501         }\r
502 \r
503         n = scandir(curr_path, &namelist, scandir_filter, scandir_cmp);\r
504         if (n < 0) {\r
505                 // try root\r
506                 n = scandir("/", &namelist, scandir_filter, scandir_cmp);\r
507                 if (n < 0) {\r
508                         // oops, we failed\r
509                         printf("dir: "); printf(curr_path); printf("\n");\r
510                         perror("scandir");\r
511                         return NULL;\r
512                 }\r
513         }\r
514 \r
515         // try to find sel\r
516         if (fname != NULL) {\r
517                 int i;\r
518                 for (i = 1; i < n; i++) {\r
519                         if (strcmp(namelist[i]->d_name, fname) == 0) {\r
520                                 sel = i - 1;\r
521                                 break;\r
522                         }\r
523                 }\r
524         }\r
525 \r
526         for (;;)\r
527         {\r
528                 draw_dirlist(curr_path, namelist, n, sel);\r
529                 inp = wait_for_input(GP2X_UP|GP2X_DOWN|GP2X_LEFT|GP2X_RIGHT|GP2X_L|GP2X_R|GP2X_B|GP2X_X);\r
530                 if(inp & GP2X_UP  )  { sel--;   if (sel < 0)   sel = n-2; }\r
531                 if(inp & GP2X_DOWN)  { sel++;   if (sel > n-2) sel = 0; }\r
532                 if(inp & GP2X_LEFT)  { sel-=10; if (sel < 0)   sel = 0; }\r
533                 if(inp & GP2X_L)     { sel-=24; if (sel < 0)   sel = 0; }\r
534                 if(inp & GP2X_RIGHT) { sel+=10; if (sel > n-2) sel = n-2; }\r
535                 if(inp & GP2X_R)     { sel+=24; if (sel > n-2) sel = n-2; }\r
536                 if(inp & GP2X_B)     { // enter dir/select\r
537                         again:\r
538                         if (namelist[sel+1]->d_type == DT_REG) {\r
539                                 strcpy(romFileName, curr_path);\r
540                                 strcat(romFileName, "/");\r
541                                 strcat(romFileName, namelist[sel+1]->d_name);\r
542                                 ret = romFileName;\r
543                                 break;\r
544                         } else if (namelist[sel+1]->d_type == DT_DIR) {\r
545                                 int newlen = strlen(curr_path) + strlen(namelist[sel+1]->d_name) + 2;\r
546                                 char *p, *newdir = malloc(newlen);\r
547                                 if (strcmp(namelist[sel+1]->d_name, "..") == 0) {\r
548                                         char *start = curr_path;\r
549                                         p = start + strlen(start) - 1;\r
550                                         while (*p == '/' && p > start) p--;\r
551                                         while (*p != '/' && p > start) p--;\r
552                                         if (p <= start) strcpy(newdir, "/");\r
553                                         else { strncpy(newdir, start, p-start); newdir[p-start] = 0; }\r
554                                 } else {\r
555                                         strcpy(newdir, curr_path);\r
556                                         p = newdir + strlen(newdir) - 1;\r
557                                         while (*p == '/' && p >= newdir) *p-- = 0;\r
558                                         strcat(newdir, "/");\r
559                                         strcat(newdir, namelist[sel+1]->d_name);\r
560                                 }\r
561                                 ret = romsel_loop(newdir);\r
562                                 free(newdir);\r
563                                 break;\r
564                         } else {\r
565                                 // unknown file type, happens on NTFS mounts. Try to guess.\r
566                                 FILE *tstf; int tmp;\r
567                                 strcpy(romFileName, curr_path);\r
568                                 strcat(romFileName, "/");\r
569                                 strcat(romFileName, namelist[sel+1]->d_name);\r
570                                 tstf = fopen(romFileName, "rb");\r
571                                 if (tstf != NULL)\r
572                                 {\r
573                                         if (fread(&tmp, 1, 1, tstf) > 0 || ferror(tstf) == 0)\r
574                                                 namelist[sel+1]->d_type = DT_REG;\r
575                                         else    namelist[sel+1]->d_type = DT_DIR;\r
576                                         fclose(tstf);\r
577                                         goto again;\r
578                                 }\r
579                         }\r
580                 }\r
581                 if(inp & GP2X_X) break; // cancel\r
582         }\r
583 \r
584         if (n > 0) {\r
585                 while(n--) free(namelist[n]);\r
586                 free(namelist);\r
587         }\r
588 \r
589         return ret;\r
590 }\r
591 \r
592 // ------------ debug menu ------------\r
593 \r
594 char *debugString(void);\r
595 \r
596 static void draw_debug(void)\r
597 {\r
598         char *p, *str = debugString();\r
599         int len, line;\r
600 \r
601         gp2x_pd_clone_buffer2();\r
602 \r
603         p = str;\r
604         for (line = 0; line < 24; line++)\r
605         {\r
606                 while (*p && *p != '\n') p++;\r
607                 len = p - str;\r
608                 if (len > 55) len = 55;\r
609                 gp2x_smalltext8_lim(1, line*10, str, len);\r
610                 if (*p == 0) break;\r
611                 p++; str = p;\r
612         }\r
613         gp2x_video_flip2();\r
614 }\r
615 \r
616 static void debug_menu_loop(void)\r
617 {\r
618         draw_debug();\r
619         wait_for_input(GP2X_B|GP2X_X);\r
620 }\r
621 \r
622 // ------------ patch/gg menu ------------\r
623 \r
624 static void draw_patchlist(int sel)\r
625 {\r
626         int start, i, pos;\r
627 \r
628         start = 12 - sel;\r
629 \r
630         gp2x_pd_clone_buffer2();\r
631 \r
632         for (i = 0; i < PicoPatchCount; i++) {\r
633                 pos = start + i;\r
634                 if (pos < 0)  continue;\r
635                 if (pos > 23) break;\r
636                 gp2x_smalltext8_lim(14,     pos*10, PicoPatches[i].active ? "ON " : "OFF", 3);\r
637                 gp2x_smalltext8_lim(14+6*4, pos*10, PicoPatches[i].name, 53-6);\r
638         }\r
639         pos = start + i;\r
640         if (pos < 24) gp2x_smalltext8_lim(14, pos*10, "done", 4);\r
641 \r
642         gp2x_text_out8(5, 120, ">");\r
643         gp2x_video_flip2();\r
644 }\r
645 \r
646 \r
647 static void patches_menu_loop(void)\r
648 {\r
649         int menu_sel = 0;\r
650         unsigned long inp = 0;\r
651 \r
652         for(;;)\r
653         {\r
654                 draw_patchlist(menu_sel);\r
655                 inp = wait_for_input(GP2X_UP|GP2X_DOWN|GP2X_LEFT|GP2X_RIGHT|GP2X_L|GP2X_R|GP2X_B|GP2X_X);\r
656                 if(inp & GP2X_UP  ) { menu_sel--; if (menu_sel < 0) menu_sel = PicoPatchCount; }\r
657                 if(inp & GP2X_DOWN) { menu_sel++; if (menu_sel > PicoPatchCount) menu_sel = 0; }\r
658                 if(inp &(GP2X_LEFT|GP2X_L))  { menu_sel-=10; if (menu_sel < 0) menu_sel = 0; }\r
659                 if(inp &(GP2X_RIGHT|GP2X_R)) { menu_sel+=10; if (menu_sel > PicoPatchCount) menu_sel = PicoPatchCount; }\r
660                 if(inp & GP2X_B) { // action\r
661                         if (menu_sel < PicoPatchCount)\r
662                                 PicoPatches[menu_sel].active = !PicoPatches[menu_sel].active;\r
663                         else    return;\r
664                 }\r
665                 if(inp & GP2X_X) return;\r
666         }\r
667 \r
668 }\r
669 \r
670 // ------------ savestate loader ------------\r
671 \r
672 static void menu_prepare_bg(void);\r
673 \r
674 static int state_slot_flags = 0;\r
675 \r
676 static void state_check_slots(void)\r
677 {\r
678         int slot;\r
679 \r
680         state_slot_flags = 0;\r
681 \r
682         for (slot = 0; slot < 10; slot++)\r
683         {\r
684                 if (emu_check_save_file(slot))\r
685                 {\r
686                         state_slot_flags |= 1 << slot;\r
687                 }\r
688         }\r
689 }\r
690 \r
691 static void draw_savestate_bg(int slot)\r
692 {\r
693         struct PicoVideo tmp_pv;\r
694         unsigned short tmp_cram[0x40];\r
695         unsigned short tmp_vsram[0x40];\r
696         void *tmp_vram, *file;\r
697         char *fname;\r
698 \r
699         fname = emu_GetSaveFName(1, 0, slot);\r
700         if (!fname) return;\r
701 \r
702         tmp_vram = malloc(sizeof(Pico.vram));\r
703         if (tmp_vram == NULL) return;\r
704 \r
705         memcpy(tmp_vram, Pico.vram, sizeof(Pico.vram));\r
706         memcpy(tmp_cram, Pico.cram, sizeof(Pico.cram));\r
707         memcpy(tmp_vsram, Pico.vsram, sizeof(Pico.vsram));\r
708         memcpy(&tmp_pv, &Pico.video, sizeof(Pico.video));\r
709 \r
710         if (strcmp(fname + strlen(fname) - 3, ".gz") == 0) {\r
711                 file = gzopen(fname, "rb");\r
712                 emu_set_save_cbs(1);\r
713         } else {\r
714                 file = fopen(fname, "rb");\r
715                 emu_set_save_cbs(0);\r
716         }\r
717 \r
718         if (file) {\r
719                 if (PicoMCD & 1) {\r
720                         PicoCdLoadStateGfx(file);\r
721                 } else {\r
722                         areaSeek(file, 0x10020, SEEK_SET);  // skip header and RAM in state file\r
723                         areaRead(Pico.vram, 1, sizeof(Pico.vram), file);\r
724                         areaSeek(file, 0x2000, SEEK_CUR);\r
725                         areaRead(Pico.cram, 1, sizeof(Pico.cram), file);\r
726                         areaRead(Pico.vsram, 1, sizeof(Pico.vsram), file);\r
727                         areaSeek(file, 0x221a0, SEEK_SET);\r
728                         areaRead(&Pico.video, 1, sizeof(Pico.video), file);\r
729                 }\r
730                 areaClose(file);\r
731         }\r
732 \r
733         emu_forced_frame();\r
734         gp2x_memcpy_buffers((1<<2), gp2x_screen, 0, 320*240*2);\r
735         menu_prepare_bg();\r
736 \r
737         memcpy(Pico.vram, tmp_vram, sizeof(Pico.vram));\r
738         memcpy(Pico.cram, tmp_cram, sizeof(Pico.cram));\r
739         memcpy(Pico.vsram, tmp_vsram, sizeof(Pico.vsram));\r
740         memcpy(&Pico.video, &tmp_pv,  sizeof(Pico.video));\r
741         free(tmp_vram);\r
742 }\r
743 \r
744 static void draw_savestate_menu(int menu_sel, int is_loading)\r
745 {\r
746         int tl_x = 25, tl_y = 60, y, i;\r
747 \r
748         if (state_slot_flags & (1 << menu_sel))\r
749                 draw_savestate_bg(menu_sel);\r
750         gp2x_pd_clone_buffer2();\r
751 \r
752         gp2x_text_out8(tl_x, 30, is_loading ? "Load state" : "Save state");\r
753 \r
754         /* draw all 10 slots */\r
755         y = tl_y;\r
756         for (i = 0; i < 10; i++, y+=10)\r
757         {\r
758                 gp2x_text_out8(tl_x, y, "SLOT %i (%s)", i, (state_slot_flags & (1 << i)) ? "USED" : "free");\r
759         }\r
760         gp2x_text_out8(tl_x, y, "back");\r
761 \r
762         // draw cursor\r
763         gp2x_text_out8(tl_x - 16, tl_y + menu_sel*10, ">");\r
764 \r
765         gp2x_video_flip2();\r
766 }\r
767 \r
768 static int savestate_menu_loop(int is_loading)\r
769 {\r
770         static int menu_sel = 10;\r
771         int menu_sel_max = 10;\r
772         unsigned long inp = 0;\r
773 \r
774         state_check_slots();\r
775 \r
776         for(;;)\r
777         {\r
778                 draw_savestate_menu(menu_sel, is_loading);\r
779                 inp = wait_for_input(GP2X_UP|GP2X_DOWN|GP2X_B|GP2X_X);\r
780                 if(inp & GP2X_UP  ) {\r
781                         do {\r
782                                 menu_sel--; if (menu_sel < 0) menu_sel = menu_sel_max;\r
783                         } while (!(state_slot_flags & (1 << menu_sel)) && menu_sel != menu_sel_max && is_loading);\r
784                 }\r
785                 if(inp & GP2X_DOWN) {\r
786                         do {\r
787                                 menu_sel++; if (menu_sel > menu_sel_max) menu_sel = 0;\r
788                         } while (!(state_slot_flags & (1 << menu_sel)) && menu_sel != menu_sel_max && is_loading);\r
789                 }\r
790                 if(inp & GP2X_B) { // save/load\r
791                         if (menu_sel < 10) {\r
792                                 state_slot = menu_sel;\r
793                                 if (emu_SaveLoadGame(is_loading, 0)) {\r
794                                         strcpy(menuErrorMsg, is_loading ? "Load failed" : "Save failed");\r
795                                         return 1;\r
796                                 }\r
797                                 return 0;\r
798                         } else  return 1;\r
799                 }\r
800                 if(inp & GP2X_X) return 1;\r
801         }\r
802 }\r
803 \r
804 // -------------- key config --------------\r
805 \r
806 static char *usb_joy_key_name(int joy, int num)\r
807 {\r
808         static char name[16];\r
809         switch (num)\r
810         {\r
811                 case 0: sprintf(name, "Joy%i UP", joy); break;\r
812                 case 1: sprintf(name, "Joy%i DOWN", joy); break;\r
813                 case 2: sprintf(name, "Joy%i LEFT", joy); break;\r
814                 case 3: sprintf(name, "Joy%i RIGHT", joy); break;\r
815                 default:sprintf(name, "Joy%i b%i", joy, num-3); break;\r
816         }\r
817         return name;\r
818 }\r
819 \r
820 static void draw_key_config(int curr_act, int is_p2)\r
821 {\r
822         char strkeys[32*5];\r
823         int joy, i;\r
824 \r
825         strkeys[0] = 0;\r
826         for (i = 0; i < 32; i++)\r
827         {\r
828                 if (currentConfig.KeyBinds[i] & (1 << curr_act))\r
829                 {\r
830                         if (curr_act < 16 && (currentConfig.KeyBinds[i] & (1 << 16)) != (is_p2 << 16)) continue;\r
831                         if (strkeys[0]) { strcat(strkeys, " + "); strcat(strkeys, gp2xKeyNames[i]); break; }\r
832                         else strcpy(strkeys, gp2xKeyNames[i]);\r
833                 }\r
834         }\r
835         for (joy = 0; joy < num_of_joys; joy++)\r
836         {\r
837                 for (i = 0; i < 32; i++)\r
838                 {\r
839                         if (currentConfig.JoyBinds[joy][i] & (1 << curr_act))\r
840                         {\r
841                                 if (curr_act < 16 && (currentConfig.JoyBinds[joy][i] & (1 << 16)) != (is_p2 << 16)) continue;\r
842                                 if (strkeys[0]) {\r
843                                         strcat(strkeys, ", "); strcat(strkeys, usb_joy_key_name(joy + 1, i));\r
844                                         break;\r
845                                 }\r
846                                 else strcpy(strkeys, usb_joy_key_name(joy + 1, i));\r
847                         }\r
848                 }\r
849         }\r
850 \r
851         //memset(gp2x_screen, 0, 320*240);\r
852         gp2x_pd_clone_buffer2();\r
853         gp2x_text_out8(60, 40, "Action: %s", actionNames[curr_act]);\r
854         gp2x_text_out8(60, 60, "Keys: %s", strkeys);\r
855 \r
856         gp2x_text_out8(30, 180, "Use SELECT to change action");\r
857         gp2x_text_out8(30, 190, "Press a key to bind/unbind");\r
858         gp2x_text_out8(30, 200, "Select \"Done\" action and");\r
859         gp2x_text_out8(30, 210, "  press any key to finish");\r
860         gp2x_video_flip2();\r
861 }\r
862 \r
863 static void key_config_loop(int is_p2)\r
864 {\r
865         int curr_act = 0, joy = 0, i;\r
866         unsigned long inp = 0;\r
867 \r
868         for (;;)\r
869         {\r
870                 draw_key_config(curr_act, is_p2);\r
871                 inp = wait_for_input_usbjoy(CONFIGURABLE_KEYS, &joy);\r
872                 // printf("got %08lX from joy %i\n", inp, joy);\r
873                 if (joy == 0) {\r
874                         if (inp & GP2X_SELECT) {\r
875                                 curr_act++;\r
876                                 while (!actionNames[curr_act] && curr_act < 32) curr_act++;\r
877                                 if (curr_act > 31) curr_act = 0;\r
878                         }\r
879                         inp &= CONFIGURABLE_KEYS;\r
880                         inp &= ~GP2X_SELECT;\r
881                 }\r
882                 if (curr_act == 31 && inp) break;\r
883                 if (joy == 0) {\r
884                         for (i = 0; i < 32; i++)\r
885                                 if (inp & (1 << i)) {\r
886                                         currentConfig.KeyBinds[i] ^= (1 << curr_act);\r
887                                         if (is_p2) currentConfig.KeyBinds[i] |=  (1 << 16); // player 2 flag\r
888                                         else       currentConfig.KeyBinds[i] &= ~(1 << 16);\r
889                                 }\r
890                 } else {\r
891                         for (i = 0; i < 32; i++)\r
892                                 if (inp & (1 << i)) {\r
893                                         currentConfig.JoyBinds[joy-1][i] ^= (1 << curr_act);\r
894                                         if (is_p2) currentConfig.JoyBinds[joy-1][i] |=  (1 << 16);\r
895                                         else       currentConfig.JoyBinds[joy-1][i] &= ~(1 << 16);\r
896                                 }\r
897                 }\r
898         }\r
899 }\r
900 \r
901 static void draw_kc_sel(int menu_sel)\r
902 {\r
903         int tl_x = 25+40, tl_y = 60, y, i;\r
904         char joyname[36];\r
905 \r
906         y = tl_y;\r
907         //memset(gp2x_screen, 0, 320*240);\r
908         gp2x_pd_clone_buffer2();\r
909         gp2x_text_out8(tl_x, y,       "Player 1");\r
910         gp2x_text_out8(tl_x, (y+=10), "Player 2");\r
911         gp2x_text_out8(tl_x, (y+=10), "Done");\r
912 \r
913         // draw cursor\r
914         gp2x_text_out8(tl_x - 16, tl_y + menu_sel*10, ">");\r
915 \r
916         tl_x = 25;\r
917         gp2x_text_out8(tl_x, (y=110), "USB joys detected:");\r
918         if (num_of_joys > 0) {\r
919                 for (i = 0; i < num_of_joys; i++) {\r
920                         strncpy(joyname, joy_name(joys[i]), 33); joyname[33] = 0;\r
921                         gp2x_text_out8(tl_x, (y+=10), "%i: %s", i+1, joyname);\r
922                 }\r
923         } else {\r
924                 gp2x_text_out8(tl_x, (y+=10), "none");\r
925         }\r
926 \r
927 \r
928         gp2x_video_flip2();\r
929 }\r
930 \r
931 static void kc_sel_loop(void)\r
932 {\r
933         int menu_sel = 2, menu_sel_max = 2;\r
934         unsigned long inp = 0;\r
935 \r
936         for(;;)\r
937         {\r
938                 draw_kc_sel(menu_sel);\r
939                 inp = wait_for_input(GP2X_UP|GP2X_DOWN|GP2X_B|GP2X_X);\r
940                 if(inp & GP2X_UP  ) { menu_sel--; if (menu_sel < 0) menu_sel = menu_sel_max; }\r
941                 if(inp & GP2X_DOWN) { menu_sel++; if (menu_sel > menu_sel_max) menu_sel = 0; }\r
942                 if(inp & GP2X_B) {\r
943                         switch (menu_sel) {\r
944                                 case 0: key_config_loop(0); return;\r
945                                 case 1: key_config_loop(1); return;\r
946                                 default: return;\r
947                         }\r
948                 }\r
949                 if(inp & GP2X_X) return;\r
950         }\r
951 }\r
952 \r
953 \r
954 \r
955 // --------- sega/mega cd options ----------\r
956 \r
957 menu_entry cdopt_entries[] =\r
958 {\r
959         { NULL,                        MB_NONE,  MA_CDOPT_TESTBIOS_USA, NULL, 0, 0, 0, 1 },\r
960         { NULL,                        MB_NONE,  MA_CDOPT_TESTBIOS_EUR, NULL, 0, 0, 0, 1 },\r
961         { NULL,                        MB_NONE,  MA_CDOPT_TESTBIOS_JAP, NULL, 0, 0, 0, 1 },\r
962         { "CD LEDs",                   MB_ONOFF, MA_CDOPT_LEDS,         &currentConfig.EmuOpt,  0x0400, 0, 0, 1 },\r
963         { "CDDA audio (using mp3s)",   MB_ONOFF, MA_CDOPT_CDDA,         &currentConfig.PicoOpt, 0x0800, 0, 0, 1 },\r
964         { "PCM audio",                 MB_ONOFF, MA_CDOPT_PCM,          &currentConfig.PicoOpt, 0x0400, 0, 0, 1 },\r
965         { NULL,                        MB_NONE,  MA_CDOPT_READAHEAD,    NULL, 0, 0, 0, 1 },\r
966         { "SaveRAM cart",              MB_ONOFF, MA_CDOPT_SAVERAM,      &currentConfig.PicoOpt, 0x8000, 0, 0, 1 },\r
967         { "Scale/Rot. fx (slow)",      MB_ONOFF, MA_CDOPT_SCALEROT_CHIP,&currentConfig.PicoOpt, 0x1000, 0, 0, 1 },\r
968         { "Better sync (slow)",        MB_ONOFF, MA_CDOPT_BETTER_SYNC,  &currentConfig.PicoOpt, 0x2000, 0, 0, 1 },\r
969         { "done",                      MB_NONE,  MA_CDOPT_DONE,         NULL, 0, 0, 0, 1 },\r
970 };\r
971 \r
972 #define CDOPT_ENTRY_COUNT (sizeof(cdopt_entries) / sizeof(cdopt_entries[0]))\r
973 \r
974 \r
975 struct bios_names_t\r
976 {\r
977         char us[32], eu[32], jp[32];\r
978 };\r
979 \r
980 static void menu_cdopt_cust_draw(const menu_entry *entry, int x, int y, void *param)\r
981 {\r
982         struct bios_names_t *bios_names = param;\r
983         char ra_buff[16];\r
984 \r
985         switch (entry->id)\r
986         {\r
987                 case MA_CDOPT_TESTBIOS_USA: gp2x_text_out8(x, y, "USA BIOS:     %s", bios_names->us); break;\r
988                 case MA_CDOPT_TESTBIOS_EUR: gp2x_text_out8(x, y, "EUR BIOS:     %s", bios_names->eu); break;\r
989                 case MA_CDOPT_TESTBIOS_JAP: gp2x_text_out8(x, y, "JAP BIOS:     %s", bios_names->jp); break;\r
990                 case MA_CDOPT_READAHEAD:\r
991                         if (PicoCDBuffers > 1) sprintf(ra_buff, "%5iK", PicoCDBuffers * 2);\r
992                         else strcpy(ra_buff, "     OFF");\r
993                         gp2x_text_out8(x, y, "ReadAhead buffer      %s", ra_buff);\r
994                         break;\r
995                 default:break;\r
996         }\r
997 }\r
998 \r
999 static void draw_cd_menu_options(int menu_sel, struct bios_names_t *bios_names)\r
1000 {\r
1001         int tl_x = 25, tl_y = 60;\r
1002         menu_id selected_id;\r
1003         char ra_buff[16];\r
1004 \r
1005         if (PicoCDBuffers > 1) sprintf(ra_buff, "%5iK", PicoCDBuffers * 2);\r
1006         else strcpy(ra_buff, "     OFF");\r
1007 \r
1008         gp2x_pd_clone_buffer2();\r
1009 \r
1010         me_draw(cdopt_entries, CDOPT_ENTRY_COUNT, tl_x, tl_y, menu_cdopt_cust_draw, bios_names);\r
1011 \r
1012         // draw cursor\r
1013         gp2x_text_out8(tl_x - 16, tl_y + menu_sel*10, ">");\r
1014 \r
1015         selected_id = me_index2id(cdopt_entries, CDOPT_ENTRY_COUNT, menu_sel);\r
1016         if ((selected_id == MA_CDOPT_TESTBIOS_USA && strcmp(bios_names->us, "NOT FOUND")) ||\r
1017                 (selected_id == MA_CDOPT_TESTBIOS_EUR && strcmp(bios_names->eu, "NOT FOUND")) ||\r
1018                 (selected_id == MA_CDOPT_TESTBIOS_JAP && strcmp(bios_names->jp, "NOT FOUND")))\r
1019                         gp2x_text_out8(tl_x, 220, "Press start to test selected BIOS");\r
1020 \r
1021         gp2x_video_flip2();\r
1022 }\r
1023 \r
1024 static void cd_menu_loop_options(void)\r
1025 {\r
1026         static int menu_sel = 0;\r
1027         int menu_sel_max = 10;\r
1028         unsigned long inp = 0;\r
1029         struct bios_names_t bios_names;\r
1030         menu_id selected_id;\r
1031         char *bios, *p;\r
1032 \r
1033         if (find_bios(4, &bios)) { // US\r
1034                 for (p = bios+strlen(bios)-1; p > bios && *p != '/'; p--); p++;\r
1035                 strncpy(bios_names.us, p, sizeof(bios_names.us)); bios_names.us[sizeof(bios_names.us)-1] = 0;\r
1036         } else  strcpy(bios_names.us, "NOT FOUND");\r
1037 \r
1038         if (find_bios(8, &bios)) { // EU\r
1039                 for (p = bios+strlen(bios)-1; p > bios && *p != '/'; p--); p++;\r
1040                 strncpy(bios_names.eu, p, sizeof(bios_names.eu)); bios_names.eu[sizeof(bios_names.eu)-1] = 0;\r
1041         } else  strcpy(bios_names.eu, "NOT FOUND");\r
1042 \r
1043         if (find_bios(1, &bios)) { // JP\r
1044                 for (p = bios+strlen(bios)-1; p > bios && *p != '/'; p--); p++;\r
1045                 strncpy(bios_names.jp, p, sizeof(bios_names.jp)); bios_names.jp[sizeof(bios_names.jp)-1] = 0;\r
1046         } else  strcpy(bios_names.jp, "NOT FOUND");\r
1047 \r
1048         for(;;)\r
1049         {\r
1050                 draw_cd_menu_options(menu_sel, &bios_names);\r
1051                 inp = wait_for_input(GP2X_UP|GP2X_DOWN|GP2X_LEFT|GP2X_RIGHT|GP2X_B|GP2X_X|GP2X_A|GP2X_START);\r
1052                 if (inp & GP2X_UP  ) { menu_sel--; if (menu_sel < 0) menu_sel = menu_sel_max; }\r
1053                 if (inp & GP2X_DOWN) { menu_sel++; if (menu_sel > menu_sel_max) menu_sel = 0; }\r
1054                 selected_id = me_index2id(cdopt_entries, CDOPT_ENTRY_COUNT, menu_sel);\r
1055                 if (inp & (GP2X_LEFT|GP2X_RIGHT)) { // multi choise\r
1056                         if (!me_process(cdopt_entries, CDOPT_ENTRY_COUNT, selected_id, (inp&GP2X_RIGHT) ? 1 : 0) &&\r
1057                             selected_id == MA_CDOPT_READAHEAD) {\r
1058                                 if (inp & GP2X_LEFT) {\r
1059                                         PicoCDBuffers >>= 1;\r
1060                                         if (PicoCDBuffers < 64) PicoCDBuffers = 0;\r
1061                                 } else {\r
1062                                         if (PicoCDBuffers < 64) PicoCDBuffers = 64;\r
1063                                         else PicoCDBuffers <<= 1;\r
1064                                         if (PicoCDBuffers > 8*1024) PicoCDBuffers = 8*1024; // 16M\r
1065                                 }\r
1066                         }\r
1067                 }\r
1068                 if (inp & GP2X_B) { // toggleable options\r
1069                         if (!me_process(cdopt_entries, CDOPT_ENTRY_COUNT, selected_id, 1) &&\r
1070                             selected_id == MA_CDOPT_DONE) {\r
1071                                 return;\r
1072                         }\r
1073                 }\r
1074                 if (inp & GP2X_START) { // BIOS testers\r
1075                         switch (selected_id) {\r
1076                                 case MA_CDOPT_TESTBIOS_USA:\r
1077                                         if (find_bios(4, &bios)) { // test US\r
1078                                                 strcpy(romFileName, bios);\r
1079                                                 engineState = PGS_ReloadRom;\r
1080                                                 return;\r
1081                                         }\r
1082                                         break;\r
1083                                 case MA_CDOPT_TESTBIOS_EUR:\r
1084                                         if (find_bios(8, &bios)) { // test EU\r
1085                                                 strcpy(romFileName, bios);\r
1086                                                 engineState = PGS_ReloadRom;\r
1087                                                 return;\r
1088                                         }\r
1089                                         break;\r
1090                                 case MA_CDOPT_TESTBIOS_JAP:\r
1091                                         if (find_bios(1, &bios)) { // test JP\r
1092                                                 strcpy(romFileName, bios);\r
1093                                                 engineState = PGS_ReloadRom;\r
1094                                                 return;\r
1095                                         }\r
1096                                         break;\r
1097                                 default:\r
1098                                         break;\r
1099                         }\r
1100                 }\r
1101                 if (inp & (GP2X_X|GP2X_A)) return;\r
1102         }\r
1103 }\r
1104 \r
1105 \r
1106 // --------- advanced options ----------\r
1107 \r
1108 menu_entry opt2_entries[] =\r
1109 {\r
1110         { NULL,                        MB_NONE,  MA_OPT2_GAMMA,         NULL, 0, 0, 0, 1 },\r
1111         { "A_SN's gamma curve",        MB_ONOFF, MA_OPT2_A_SN_GAMMA,    &currentConfig.EmuOpt, 0x1000, 0, 0, 1 },\r
1112         { "Perfecf vsync",             MB_ONOFF, MA_OPT2_VSYNC,         &currentConfig.EmuOpt, 0x2000, 0, 0, 1 },\r
1113         { "Emulate Z80",               MB_ONOFF, MA_OPT2_ENABLE_Z80,    &currentConfig.PicoOpt,0x0004, 0, 0, 1 },\r
1114         { "Emulate YM2612 (FM)",       MB_ONOFF, MA_OPT2_ENABLE_YM2612, &currentConfig.PicoOpt,0x0001, 0, 0, 1 },\r
1115         { "Emulate SN76496 (PSG)",     MB_ONOFF, MA_OPT2_ENABLE_SN76496,&currentConfig.PicoOpt,0x0002, 0, 0, 1 },\r
1116         { "gzip savestates",           MB_ONOFF, MA_OPT2_GZIP_STATES,   &currentConfig.EmuOpt, 0x0008, 0, 0, 1 },\r
1117         { "Don't save last used ROM",  MB_ONOFF, MA_OPT2_NO_LAST_ROM,   &currentConfig.EmuOpt, 0x0020, 0, 0, 1 },\r
1118         { "needs restart:",            MB_NONE,  MA_NONE,               NULL, 0, 0, 0, 1 },\r
1119         { "craigix's RAM timings",     MB_ONOFF, MA_OPT2_RAMTIMINGS,    &currentConfig.EmuOpt, 0x0100, 0, 0, 1 },\r
1120         { NULL,                        MB_ONOFF, MA_OPT2_SQUIDGEHACK,   &currentConfig.EmuOpt, 0x0010, 0, 0, 1 },\r
1121         { "done",                      MB_NONE,  MA_OPT2_DONE,          NULL, 0, 0, 0, 1 },\r
1122 };\r
1123 \r
1124 #define OPT2_ENTRY_COUNT (sizeof(opt2_entries) / sizeof(opt2_entries[0]))\r
1125 \r
1126 static void menu_opt2_cust_draw(const menu_entry *entry, int x, int y, void *param)\r
1127 {\r
1128         if (entry->id == MA_OPT2_GAMMA)\r
1129                 gp2x_text_out8(x, y, "Gamma correction           %i.%02i", currentConfig.gamma / 100, currentConfig.gamma%100);\r
1130         else if (entry->id == MA_OPT2_SQUIDGEHACK)\r
1131                 gp2x_text_out8(x, y, "squidgehack (now %s %s", mmuhack_status ? "active)  " : "inactive)",\r
1132                         (currentConfig.EmuOpt&0x0010)?"ON":"OFF");\r
1133 }\r
1134 \r
1135 \r
1136 static void draw_amenu_options(int menu_sel)\r
1137 {\r
1138         int tl_x = 25, tl_y = 50;\r
1139 \r
1140         gp2x_pd_clone_buffer2();\r
1141 \r
1142         me_draw(opt2_entries, OPT2_ENTRY_COUNT, tl_x, tl_y, menu_opt2_cust_draw, NULL);\r
1143 \r
1144         // draw cursor\r
1145         gp2x_text_out8(tl_x - 16, tl_y + menu_sel*10, ">");\r
1146 \r
1147         gp2x_video_flip2();\r
1148 }\r
1149 \r
1150 static void amenu_loop_options(void)\r
1151 {\r
1152         static int menu_sel = 0;\r
1153         int menu_sel_max;\r
1154         unsigned long inp = 0;\r
1155         menu_id selected_id;\r
1156 \r
1157         menu_sel_max = me_count_enabled(opt2_entries, OPT2_ENTRY_COUNT) - 1;\r
1158 \r
1159         for(;;)\r
1160         {\r
1161                 draw_amenu_options(menu_sel);\r
1162                 inp = wait_for_input(GP2X_UP|GP2X_DOWN|GP2X_LEFT|GP2X_RIGHT|GP2X_B|GP2X_X|GP2X_A);\r
1163                 if (inp & GP2X_UP  ) { menu_sel--; if (menu_sel < 0) menu_sel = menu_sel_max; }\r
1164                 if (inp & GP2X_DOWN) { menu_sel++; if (menu_sel > menu_sel_max) menu_sel = 0; }\r
1165                 selected_id = me_index2id(opt2_entries, OPT2_ENTRY_COUNT, menu_sel);\r
1166                 if (inp & (GP2X_LEFT|GP2X_RIGHT)) { // multi choise\r
1167                         if (!me_process(opt2_entries, OPT2_ENTRY_COUNT, selected_id, (inp&GP2X_RIGHT) ? 1 : 0) &&\r
1168                             selected_id == MA_OPT2_GAMMA) {\r
1169                                 while ((inp = gp2x_joystick_read(1)) & (GP2X_LEFT|GP2X_RIGHT)) {\r
1170                                         currentConfig.gamma += (inp & GP2X_LEFT) ? -1 : 1;\r
1171                                         if (currentConfig.gamma <   1) currentConfig.gamma =   1;\r
1172                                         if (currentConfig.gamma > 300) currentConfig.gamma = 300;\r
1173                                         draw_amenu_options(menu_sel);\r
1174                                         usleep(18*1000);\r
1175                                 }\r
1176                         }\r
1177                 }\r
1178                 if (inp & GP2X_B) { // toggleable options\r
1179                         if (!me_process(opt2_entries, OPT2_ENTRY_COUNT, selected_id, 1) &&\r
1180                             selected_id == MA_OPT2_DONE) {\r
1181                                 return;\r
1182                         }\r
1183                 }\r
1184                 if (inp & (GP2X_X|GP2X_A)) return;\r
1185         }\r
1186 }\r
1187 \r
1188 // -------------- options --------------\r
1189 \r
1190 \r
1191 menu_entry opt_entries[] =\r
1192 {\r
1193         { NULL,                        MB_NONE,  MA_OPT_RENDERER,      NULL, 0, 0, 0, 1 },\r
1194         { NULL,                        MB_RANGE, MA_OPT_SCALING,       &currentConfig.scaling, 0, 0, 3, 1 },\r
1195         { "Accurate timing (slower)",  MB_ONOFF, MA_OPT_ACC_TIMING,    &currentConfig.PicoOpt, 0x040, 0, 0, 1 },\r
1196         { "Accurate sprites (slower)", MB_ONOFF, MA_OPT_ACC_SPRITES,   &currentConfig.PicoOpt, 0x080, 0, 0, 1 },\r
1197         { "Show FPS",                  MB_ONOFF, MA_OPT_SHOW_FPS,      &currentConfig.EmuOpt,  0x002, 0, 0, 1 },\r
1198         { NULL,                        MB_RANGE, MA_OPT_FRAMESKIP,     &currentConfig.Frameskip, 0, -1, 16, 1 },\r
1199         { "Enable sound",              MB_ONOFF, MA_OPT_ENABLE_SOUND,  &currentConfig.EmuOpt,  0x004, 0, 0, 1 },\r
1200         { NULL,                        MB_NONE,  MA_OPT_SOUND_QUALITY, NULL, 0, 0, 0, 1 },\r
1201         { "Use ARM940 core for sound", MB_ONOFF, MA_OPT_ARM940_SOUND,  &currentConfig.PicoOpt, 0x200, 0, 0, 1 },\r
1202         { "6 button pad",              MB_ONOFF, MA_OPT_6BUTTON_PAD,   &currentConfig.PicoOpt, 0x020, 0, 0, 1 },\r
1203         { NULL,                        MB_NONE,  MA_OPT_REGION,        NULL, 0, 0, 0, 1 },\r
1204         { "Use SRAM/BRAM savestates",  MB_ONOFF, MA_OPT_SRAM_STATES,   &currentConfig.EmuOpt,  0x001, 0, 0, 1 },\r
1205         { NULL,                        MB_NONE,  MA_OPT_CONFIRM_STATES,NULL, 0, 0, 0, 1 },\r
1206         { "Save slot",                 MB_RANGE, MA_OPT_SAVE_SLOT,     &state_slot, 0, 0, 9, 1 },\r
1207         { NULL,                        MB_NONE,  MA_OPT_CPU_CLOCKS,    NULL, 0, 0, 0, 1 },\r
1208         { "[Sega/Mega CD options]",    MB_NONE,  MA_OPT_SCD_OPTS,      NULL, 0, 0, 0, 1 },\r
1209         { "[advanced options]",        MB_NONE,  MA_OPT_ADV_OPTS,      NULL, 0, 0, 0, 1 },\r
1210         { NULL,                        MB_NONE,  MA_OPT_SAVECFG,       NULL, 0, 0, 0, 1 },\r
1211         { "Save cfg for current game only",MB_NONE,MA_OPT_SAVECFG_GAME,NULL, 0, 0, 0, 1 },\r
1212         { NULL,                        MB_NONE,  MA_OPT_LOADCFG,       NULL, 0, 0, 0, 1 },\r
1213 };\r
1214 \r
1215 #define OPT_ENTRY_COUNT (sizeof(opt_entries) / sizeof(opt_entries[0]))\r
1216 \r
1217 \r
1218 static const char *region_name(unsigned int code)\r
1219 {\r
1220         static const char *names[] = { "Auto", "      Japan NTSC", "      Japan PAL", "      USA", "      Europe" };\r
1221         static const char *names_short[] = { "", " JP", " JP", " US", " EU" };\r
1222         int u, i = 0;\r
1223         if (code) {\r
1224                 code <<= 1;\r
1225                 while((code >>= 1)) i++;\r
1226                 if (i > 4) return "unknown";\r
1227                 return names[i];\r
1228         } else {\r
1229                 static char name[24];\r
1230                 strcpy(name, "Auto:");\r
1231                 for (u = 0; u < 3; u++) {\r
1232                         i = 0; code = ((PicoAutoRgnOrder >> u*4) & 0xf) << 1;\r
1233                         while((code >>= 1)) i++;\r
1234                         strcat(name, names_short[i]);\r
1235                 }\r
1236                 return name;\r
1237         }\r
1238 }\r
1239 \r
1240 \r
1241 static void menu_opt_cust_draw(const menu_entry *entry, int x, int y, void *param)\r
1242 {\r
1243         char *str, str24[24];\r
1244 \r
1245         switch (entry->id)\r
1246         {\r
1247                 case MA_OPT_RENDERER:\r
1248                         if (currentConfig.PicoOpt&0x10)\r
1249                                 str = " 8bit fast";\r
1250                         else if (currentConfig.EmuOpt&0x80)\r
1251                                 str = "16bit accurate";\r
1252                         else\r
1253                                 str = " 8bit accurate";\r
1254                         gp2x_text_out8(x, y, "Renderer:            %s", str);\r
1255                         break;\r
1256                 case MA_OPT_SCALING:\r
1257                         switch (currentConfig.scaling) {\r
1258                                 default: str = "            OFF";   break;\r
1259                                 case 1:  str = "hw horizontal";     break;\r
1260                                 case 2:  str = "hw horiz. + vert."; break;\r
1261                                 case 3:  str = "sw horizontal";     break;\r
1262                         }\r
1263                         gp2x_text_out8(x, y, "Scaling:       %s", str);\r
1264                         break;\r
1265                 case MA_OPT_FRAMESKIP:\r
1266                         if (currentConfig.Frameskip < 0)\r
1267                              strcpy(str24, "Auto");\r
1268                         else sprintf(str24, "%i", currentConfig.Frameskip);\r
1269                         gp2x_text_out8(x, y, "Frameskip                  %s", str24);\r
1270                         break;\r
1271                 case MA_OPT_SOUND_QUALITY:\r
1272                         str = (currentConfig.PicoOpt&0x08)?"stereo":"mono";\r
1273                         gp2x_text_out8(x, y, "Sound Quality:     %5iHz %s", currentConfig.PsndRate, str);\r
1274                         break;\r
1275                 case MA_OPT_REGION:\r
1276                         gp2x_text_out8(x, y, "Region:              %s", region_name(currentConfig.PicoRegion));\r
1277                         break;\r
1278                 case MA_OPT_CONFIRM_STATES:\r
1279                         switch ((currentConfig.EmuOpt >> 9) & 5) {\r
1280                                 default: str = "OFF";    break;\r
1281                                 case 1:  str = "writes"; break;\r
1282                                 case 4:  str = "loads";  break;\r
1283                                 case 5:  str = "both";   break;\r
1284                         }\r
1285                         gp2x_text_out8(x, y, "Confirm savestate          %s", str);\r
1286                         break;\r
1287                 case MA_OPT_CPU_CLOCKS:\r
1288                         gp2x_text_out8(x, y, "GP2X CPU clocks            %iMhz", currentConfig.CPUclock);\r
1289                         break;\r
1290                 case MA_OPT_SAVECFG:\r
1291                         str24[0] = 0;\r
1292                         if (config_slot != 0) sprintf(str24, " (profile: %i)", config_slot);\r
1293                         gp2x_text_out8(x, y, "Save cfg as default%s", str24);\r
1294                         break;\r
1295                 case MA_OPT_LOADCFG:\r
1296                         gp2x_text_out8(x, y, "Load cfg from profile %i", config_slot);\r
1297                         break;\r
1298                 default:\r
1299                         printf("%s: unimplemented (%i)\n", __FUNCTION__, entry->id);\r
1300                         break;\r
1301         }\r
1302 }\r
1303 \r
1304 \r
1305 \r
1306 static void draw_menu_options(int menu_sel)\r
1307 {\r
1308         int tl_x = 25, tl_y = 32;\r
1309 \r
1310         gp2x_pd_clone_buffer2();\r
1311 \r
1312         me_draw(opt_entries, OPT_ENTRY_COUNT, tl_x, tl_y, menu_opt_cust_draw, NULL);\r
1313 \r
1314         // draw cursor\r
1315         gp2x_text_out8(tl_x - 16, tl_y + menu_sel*10, ">");\r
1316 \r
1317         gp2x_video_flip2();\r
1318 }\r
1319 \r
1320 static int sndrate_prevnext(int rate, int dir)\r
1321 {\r
1322         int i, rates[] = { 8000, 11025, 16000, 22050, 44100 };\r
1323 \r
1324         for (i = 0; i < 5; i++)\r
1325                 if (rates[i] == rate) break;\r
1326 \r
1327         i += dir ? 1 : -1;\r
1328         if (i > 4) return dir ? 44100 : 22050;\r
1329         if (i < 0) return dir ? 11025 : 8000;\r
1330         return rates[i];\r
1331 }\r
1332 \r
1333 static void region_prevnext(int right)\r
1334 {\r
1335         // jp_ntsc=1, jp_pal=2, usa=4, eu=8\r
1336         static int rgn_orders[] = { 0x148, 0x184, 0x814, 0x418, 0x841, 0x481 };\r
1337         int i;\r
1338         if (right) {\r
1339                 if (!currentConfig.PicoRegion) {\r
1340                         for (i = 0; i < 6; i++)\r
1341                                 if (rgn_orders[i] == PicoAutoRgnOrder) break;\r
1342                         if (i < 5) PicoAutoRgnOrder = rgn_orders[i+1];\r
1343                         else currentConfig.PicoRegion=1;\r
1344                 }\r
1345                 else currentConfig.PicoRegion<<=1;\r
1346                 if (currentConfig.PicoRegion > 8) currentConfig.PicoRegion = 8;\r
1347         } else {\r
1348                 if (!currentConfig.PicoRegion) {\r
1349                         for (i = 0; i < 6; i++)\r
1350                                 if (rgn_orders[i] == PicoAutoRgnOrder) break;\r
1351                         if (i > 0) PicoAutoRgnOrder = rgn_orders[i-1];\r
1352                 }\r
1353                 else currentConfig.PicoRegion>>=1;\r
1354         }\r
1355 }\r
1356 \r
1357 static void menu_options_save(void)\r
1358 {\r
1359         PicoOpt = currentConfig.PicoOpt;\r
1360         PsndRate = currentConfig.PsndRate;\r
1361         PicoRegionOverride = currentConfig.PicoRegion;\r
1362         if (PicoOpt & 0x20) {\r
1363                 actionNames[ 8] = "Z"; actionNames[ 9] = "Y";\r
1364                 actionNames[10] = "X"; actionNames[11] = "MODE";\r
1365         } else {\r
1366                 actionNames[8] = actionNames[9] = actionNames[10] = actionNames[11] = 0;\r
1367         }\r
1368         scaling_update();\r
1369 }\r
1370 \r
1371 static int menu_loop_options(void)\r
1372 {\r
1373         static int menu_sel = 0;\r
1374         int menu_sel_max, ret;\r
1375         unsigned long inp = 0;\r
1376         menu_id selected_id;\r
1377 \r
1378         currentConfig.PicoOpt = PicoOpt;\r
1379         currentConfig.PsndRate = PsndRate;\r
1380         currentConfig.PicoRegion = PicoRegionOverride;\r
1381 \r
1382         me_enable(opt_entries, OPT_ENTRY_COUNT, MA_OPT_SAVECFG_GAME, rom_data != NULL);\r
1383         me_enable(opt_entries, OPT_ENTRY_COUNT, MA_OPT_LOADCFG, config_slot != config_slot_current);\r
1384         menu_sel_max = me_count_enabled(opt_entries, OPT_ENTRY_COUNT) - 1;\r
1385 \r
1386         while (1)\r
1387         {\r
1388                 draw_menu_options(menu_sel);\r
1389                 inp = wait_for_input(GP2X_UP|GP2X_DOWN|GP2X_LEFT|GP2X_RIGHT|GP2X_B|GP2X_X|GP2X_A);\r
1390                 if (inp & GP2X_UP  ) { menu_sel--; if (menu_sel < 0) menu_sel = menu_sel_max; }\r
1391                 if (inp & GP2X_DOWN) { menu_sel++; if (menu_sel > menu_sel_max) menu_sel = 0; }\r
1392                 selected_id = me_index2id(opt_entries, OPT_ENTRY_COUNT, menu_sel);\r
1393                 if (inp & (GP2X_LEFT|GP2X_RIGHT)) { // multi choise\r
1394                         if (!me_process(opt_entries, OPT_ENTRY_COUNT, selected_id, (inp&GP2X_RIGHT) ? 1 : 0)) {\r
1395                                 switch (selected_id) {\r
1396                                         case MA_OPT_RENDERER:\r
1397                                                 if (inp & GP2X_LEFT) {\r
1398                                                         if      (  currentConfig.PicoOpt&0x10) currentConfig.PicoOpt&= ~0x10;\r
1399                                                         else if (!(currentConfig.EmuOpt &0x80))currentConfig.EmuOpt |=  0x80;\r
1400                                                         else if (  currentConfig.EmuOpt &0x80) break;\r
1401                                                 } else {\r
1402                                                         if      (  currentConfig.PicoOpt&0x10) break;\r
1403                                                         else if (!(currentConfig.EmuOpt &0x80))currentConfig.PicoOpt|=  0x10;\r
1404                                                         else if (  currentConfig.EmuOpt &0x80) currentConfig.EmuOpt &= ~0x80;\r
1405                                                 }\r
1406                                                 break;\r
1407                                         case MA_OPT_SOUND_QUALITY:\r
1408                                                 if ((inp & GP2X_RIGHT) && currentConfig.PsndRate == 44100 && !(currentConfig.PicoOpt&0x08)) {\r
1409                                                         currentConfig.PsndRate = 8000;  currentConfig.PicoOpt|= 0x08;\r
1410                                                 } else if ((inp & GP2X_LEFT) && currentConfig.PsndRate == 8000 && (currentConfig.PicoOpt&0x08)) {\r
1411                                                         currentConfig.PsndRate = 44100; currentConfig.PicoOpt&=~0x08;\r
1412                                                 } else currentConfig.PsndRate = sndrate_prevnext(currentConfig.PsndRate, inp & GP2X_RIGHT);\r
1413                                                 break;\r
1414                                         case MA_OPT_REGION:\r
1415                                                 region_prevnext(inp & GP2X_RIGHT);\r
1416                                                 break;\r
1417                                         case MA_OPT_CONFIRM_STATES: {\r
1418                                                          int n = ((currentConfig.EmuOpt>>9)&1) | ((currentConfig.EmuOpt>>10)&2);\r
1419                                                          n += (inp & GP2X_LEFT) ? -1 : 1;\r
1420                                                          if (n < 0) n = 0; else if (n > 3) n = 3;\r
1421                                                          n |= n << 1; n &= ~2;\r
1422                                                          currentConfig.EmuOpt &= ~0xa00;\r
1423                                                          currentConfig.EmuOpt |= n << 9;\r
1424                                                          break;\r
1425                                                  }\r
1426                                         case MA_OPT_SAVE_SLOT:\r
1427                                                  if (inp & GP2X_RIGHT) {\r
1428                                                          state_slot++; if (state_slot > 9) state_slot = 0;\r
1429                                                  } else {state_slot--; if (state_slot < 0) state_slot = 9;\r
1430                                                  }\r
1431                                                  break;\r
1432                                         case MA_OPT_CPU_CLOCKS:\r
1433                                                  while ((inp = gp2x_joystick_read(1)) & (GP2X_LEFT|GP2X_RIGHT)) {\r
1434                                                          currentConfig.CPUclock += (inp & GP2X_LEFT) ? -1 : 1;\r
1435                                                          if (currentConfig.CPUclock < 1) currentConfig.CPUclock = 1;\r
1436                                                          draw_menu_options(menu_sel);\r
1437                                                          usleep(50*1000);\r
1438                                                  }\r
1439                                                  break;\r
1440                                         case MA_OPT_SAVECFG:\r
1441                                         case MA_OPT_SAVECFG_GAME:\r
1442                                         case MA_OPT_LOADCFG:\r
1443                                                  config_slot += (inp&GP2X_RIGHT) ? 1 : -1;\r
1444                                                  if (config_slot > 9) config_slot = 0;\r
1445                                                  if (config_slot < 0) config_slot = 9;\r
1446                                                  me_enable(opt_entries, OPT_ENTRY_COUNT, MA_OPT_LOADCFG, config_slot != config_slot_current);\r
1447                                                  menu_sel_max = me_count_enabled(opt_entries, OPT_ENTRY_COUNT) - 1;\r
1448                                                  if (menu_sel > menu_sel_max) menu_sel = menu_sel_max;\r
1449                                                  break;\r
1450                                         default:\r
1451                                                 //printf("%s: something unknown selected (%i)\n", __FUNCTION__, selected_id);\r
1452                                                 break;\r
1453                                 }\r
1454                         }\r
1455                 }\r
1456                 if (inp & GP2X_B) {\r
1457                         if (!me_process(opt_entries, OPT_ENTRY_COUNT, selected_id, 1))\r
1458                         {\r
1459                                 switch (selected_id)\r
1460                                 {\r
1461                                         case MA_OPT_SCD_OPTS:\r
1462                                                 cd_menu_loop_options();\r
1463                                                 if (engineState == PGS_ReloadRom)\r
1464                                                         return 0; // test BIOS\r
1465                                                 break;\r
1466                                         case MA_OPT_ADV_OPTS:\r
1467                                                 amenu_loop_options();\r
1468                                                 break;\r
1469                                         case MA_OPT_SAVECFG: // done (update and write)\r
1470                                                 menu_options_save();\r
1471                                                 if (emu_WriteConfig(0)) strcpy(menuErrorMsg, "config saved");\r
1472                                                 else strcpy(menuErrorMsg, "failed to write config");\r
1473                                                 return 1;\r
1474                                         case MA_OPT_SAVECFG_GAME: // done (update and write for current game)\r
1475                                                 menu_options_save();\r
1476                                                 if (emu_WriteConfig(1)) strcpy(menuErrorMsg, "config saved");\r
1477                                                 else strcpy(menuErrorMsg, "failed to write config");\r
1478                                                 return 1;\r
1479                                         case MA_OPT_LOADCFG:\r
1480                                                 ret = emu_ReadConfig(1);\r
1481                                                 if (!ret) ret = emu_ReadConfig(0);\r
1482                                                 if (!ret) strcpy(menuErrorMsg, "config loaded");\r
1483                                                 else      strcpy(menuErrorMsg, "failed to load config");\r
1484                                                 return 1;\r
1485                                         default:\r
1486                                                 //printf("%s: something unknown selected (%i)\n", __FUNCTION__, selected_id);\r
1487                                                 break;\r
1488                                 }\r
1489                         }\r
1490                 }\r
1491                 if(inp & (GP2X_X|GP2X_A)) {\r
1492                         menu_options_save();\r
1493                         return 0;  // done (update, no write)\r
1494                 }\r
1495         }\r
1496 }\r
1497 \r
1498 // -------------- credits --------------\r
1499 \r
1500 static void draw_menu_credits(void)\r
1501 {\r
1502         int tl_x = 15, tl_y = 70, y;\r
1503         //memset(gp2x_screen, 0, 320*240);\r
1504         gp2x_pd_clone_buffer2();\r
1505 \r
1506         gp2x_text_out8(tl_x, 20, "PicoDrive v" VERSION " (c) notaz, 2006,2007");\r
1507         y = tl_y;\r
1508         gp2x_text_out8(tl_x, y, "Credits:");\r
1509         gp2x_text_out8(tl_x, (y+=10), "Dave: Cyclone 68000 core,");\r
1510         gp2x_text_out8(tl_x, (y+=10), "      base code of PicoDrive");\r
1511         gp2x_text_out8(tl_x, (y+=10), "Reesy & FluBBa: DrZ80 core");\r
1512         gp2x_text_out8(tl_x, (y+=10), "MAME devs: YM2612 and SN76496 cores");\r
1513         gp2x_text_out8(tl_x, (y+=10), "Charles MacDonald: Genesis hw docs");\r
1514         gp2x_text_out8(tl_x, (y+=10), "Stephane Dallongeville:");\r
1515         gp2x_text_out8(tl_x, (y+=10), "      opensource Gens");\r
1516         gp2x_text_out8(tl_x, (y+=10), "Haze: Genesis hw info");\r
1517         gp2x_text_out8(tl_x, (y+=10), "rlyeh and others: minimal SDK");\r
1518         gp2x_text_out8(tl_x, (y+=10), "Squidge: squidgehack");\r
1519         gp2x_text_out8(tl_x, (y+=10), "Dzz: ARM940 sample");\r
1520         gp2x_text_out8(tl_x, (y+=10), "GnoStiC / Puck2099: USB joystick");\r
1521         gp2x_text_out8(tl_x, (y+=10), "craigix: GP2X hardware");\r
1522 \r
1523         gp2x_video_flip2();\r
1524 }\r
1525 \r
1526 \r
1527 // -------------- root menu --------------\r
1528 \r
1529 menu_entry main_entries[] =\r
1530 {\r
1531         { "Resume game",        MB_NONE, MA_MAIN_RESUME_GAME, NULL, 0, 0, 0, 0 },\r
1532         { "Save State",         MB_NONE, MA_MAIN_SAVE_STATE,  NULL, 0, 0, 0, 0 },\r
1533         { "Load State",         MB_NONE, MA_MAIN_LOAD_STATE,  NULL, 0, 0, 0, 0 },\r
1534         { "Reset game",         MB_NONE, MA_MAIN_RESET_GAME,  NULL, 0, 0, 0, 0 },\r
1535         { "Load new ROM/ISO",   MB_NONE, MA_MAIN_LOAD_ROM,    NULL, 0, 0, 0, 1 },\r
1536         { "Change options",     MB_NONE, MA_MAIN_OPTIONS,     NULL, 0, 0, 0, 1 },\r
1537         { "Configure controls", MB_NONE, MA_MAIN_CONTROLS,    NULL, 0, 0, 0, 1 },\r
1538         { "Credits",            MB_NONE, MA_MAIN_CREDITS,     NULL, 0, 0, 0, 1 },\r
1539         { "Patches / GameGenie",MB_NONE, MA_MAIN_PATCHES,     NULL, 0, 0, 0, 0 },\r
1540         { "Exit",               MB_NONE, MA_MAIN_EXIT,        NULL, 0, 0, 0, 1 }\r
1541 };\r
1542 \r
1543 #define MAIN_ENTRY_COUNT (sizeof(main_entries) / sizeof(main_entries[0]))\r
1544 \r
1545 static void draw_menu_root(int menu_sel)\r
1546 {\r
1547         const int tl_x = 70, tl_y = 70;\r
1548 \r
1549         gp2x_pd_clone_buffer2();\r
1550 \r
1551         gp2x_text_out8(tl_x, 20, "PicoDrive v" VERSION);\r
1552 \r
1553         me_draw(main_entries, MAIN_ENTRY_COUNT, tl_x, tl_y, NULL, NULL);\r
1554 \r
1555         // draw cursor\r
1556         gp2x_text_out8(tl_x - 16, tl_y + menu_sel*10, ">");\r
1557         // error\r
1558         if (menuErrorMsg[0]) gp2x_text_out8(5, 226, menuErrorMsg);\r
1559         gp2x_video_flip2();\r
1560 }\r
1561 \r
1562 \r
1563 static void menu_loop_root(void)\r
1564 {\r
1565         static int menu_sel = 0;\r
1566         int ret, menu_sel_max;\r
1567         unsigned long inp = 0;\r
1568         char curr_path[PATH_MAX], *selfname;\r
1569         FILE *tstf;\r
1570 \r
1571         if ( (tstf = fopen(currentConfig.lastRomFile, "rb")) )\r
1572         {\r
1573                 fclose(tstf);\r
1574                 strcpy(curr_path, currentConfig.lastRomFile);\r
1575         }\r
1576         else\r
1577         {\r
1578                 getcwd(curr_path, PATH_MAX);\r
1579         }\r
1580 \r
1581         me_enable(main_entries, MAIN_ENTRY_COUNT, MA_MAIN_RESUME_GAME, rom_data != NULL);\r
1582         me_enable(main_entries, MAIN_ENTRY_COUNT, MA_MAIN_SAVE_STATE,  rom_data != NULL);\r
1583         me_enable(main_entries, MAIN_ENTRY_COUNT, MA_MAIN_LOAD_STATE,  rom_data != NULL);\r
1584         me_enable(main_entries, MAIN_ENTRY_COUNT, MA_MAIN_RESET_GAME,  rom_data != NULL);\r
1585         me_enable(main_entries, MAIN_ENTRY_COUNT, MA_MAIN_PATCHES,     PicoPatches != NULL);\r
1586 \r
1587         menu_sel_max = me_count_enabled(main_entries, MAIN_ENTRY_COUNT) - 1;\r
1588 \r
1589         /* make sure action buttons are not pressed on entering menu */\r
1590         draw_menu_root(menu_sel);\r
1591         while (gp2x_joystick_read(1) & (GP2X_B|GP2X_X|GP2X_SELECT)) usleep(50*1000);\r
1592 \r
1593         for (;;)\r
1594         {\r
1595                 draw_menu_root(menu_sel);\r
1596                 inp = wait_for_input(GP2X_UP|GP2X_DOWN|GP2X_B|GP2X_X|GP2X_SELECT|GP2X_L|GP2X_R);\r
1597                 if(inp & GP2X_UP  )  { menu_sel--; if (menu_sel < 0) menu_sel = menu_sel_max; }\r
1598                 if(inp & GP2X_DOWN)  { menu_sel++; if (menu_sel > menu_sel_max) menu_sel = 0; }\r
1599                 if((inp & (GP2X_L|GP2X_R)) == (GP2X_L|GP2X_R)) debug_menu_loop();\r
1600                 if(inp &(GP2X_SELECT|GP2X_X)){\r
1601                         if (rom_data) {\r
1602                                 while (gp2x_joystick_read(1) & (GP2X_SELECT|GP2X_X)) usleep(50*1000); // wait until select is released\r
1603                                 engineState = PGS_Running;\r
1604                                 break;\r
1605                         }\r
1606                 }\r
1607                 if(inp & GP2X_B)  {\r
1608                         switch (me_index2id(main_entries, MAIN_ENTRY_COUNT, menu_sel))\r
1609                         {\r
1610                                 case MA_MAIN_RESUME_GAME:\r
1611                                         if (rom_data) {\r
1612                                                 while (gp2x_joystick_read(1) & GP2X_B) usleep(50*1000);\r
1613                                                 engineState = PGS_Running;\r
1614                                                 return;\r
1615                                         }\r
1616                                         break;\r
1617                                 case MA_MAIN_SAVE_STATE:\r
1618                                         if (rom_data) {\r
1619                                                 if(savestate_menu_loop(0))\r
1620                                                         continue;\r
1621                                                 engineState = PGS_Running;\r
1622                                                 return;\r
1623                                         }\r
1624                                         break;\r
1625                                 case MA_MAIN_LOAD_STATE:\r
1626                                         if (rom_data) {\r
1627                                                 if(savestate_menu_loop(1))\r
1628                                                         continue;\r
1629                                                 engineState = PGS_Running;\r
1630                                                 return;\r
1631                                         }\r
1632                                         break;\r
1633                                 case MA_MAIN_RESET_GAME:\r
1634                                         if (rom_data) {\r
1635                                                 emu_ResetGame();\r
1636                                                 engineState = PGS_Running;\r
1637                                                 return;\r
1638                                         }\r
1639                                         break;\r
1640                                 case MA_MAIN_LOAD_ROM:\r
1641                                         selfname = romsel_loop(curr_path);\r
1642                                         if (selfname) {\r
1643                                                 printf("selected file: %s\n", selfname);\r
1644                                                 engineState = PGS_ReloadRom;\r
1645                                         }\r
1646                                         return;\r
1647                                 case MA_MAIN_OPTIONS:\r
1648                                         ret = menu_loop_options();\r
1649                                         if (ret == 1) continue; // status update\r
1650                                         if (engineState == PGS_ReloadRom)\r
1651                                                 return; // BIOS test\r
1652                                         break;\r
1653                                 case MA_MAIN_CONTROLS:\r
1654                                         kc_sel_loop();\r
1655                                         break;\r
1656                                 case MA_MAIN_CREDITS:\r
1657                                         draw_menu_credits();\r
1658                                         usleep(500*1000);\r
1659                                         inp = wait_for_input(GP2X_B|GP2X_X);\r
1660                                         break;\r
1661                                 case MA_MAIN_EXIT:\r
1662                                         engineState = PGS_Quit;\r
1663                                         return;\r
1664                                 case MA_MAIN_PATCHES:\r
1665                                         if (rom_data && PicoPatches) {\r
1666                                                 patches_menu_loop();\r
1667                                                 PicoPatchApply();\r
1668                                                 strcpy(menuErrorMsg, "Patches applied");\r
1669                                                 continue;\r
1670                                         }\r
1671                                         break;\r
1672                                 default:\r
1673                                         printf("%s: something unknown selected\n", __FUNCTION__);\r
1674                                         break;\r
1675                         }\r
1676                 }\r
1677                 menuErrorMsg[0] = 0; // clear error msg\r
1678         }\r
1679 }\r
1680 \r
1681 \r
1682 static void menu_prepare_bg(void)\r
1683 {\r
1684         extern int localPal[0x100];\r
1685         int c, i;\r
1686 \r
1687         // don't clear old palette just for fun (but make it dark)\r
1688         for (i = 0x100-1; i >= 0; i--) {\r
1689                 c = localPal[i];\r
1690                 localPal[i] = ((c >> 1) & 0x007f7f7f) - ((c >> 3) & 0x001f1f1f);\r
1691         }\r
1692         localPal[0xe0] = 0x00000000; // reserved pixels for OSD\r
1693         localPal[0xf0] = 0x00ffffff;\r
1694 \r
1695         gp2x_video_setpalette(localPal, 0x100);\r
1696 }\r
1697 \r
1698 static void menu_gfx_prepare(void)\r
1699 {\r
1700         menu_prepare_bg();\r
1701 \r
1702         // switch to 8bpp\r
1703         gp2x_video_changemode2(8);\r
1704         gp2x_video_RGB_setscaling(0, 320, 240);\r
1705         gp2x_video_flip2();\r
1706 }\r
1707 \r
1708 \r
1709 void menu_loop(void)\r
1710 {\r
1711         menu_gfx_prepare();\r
1712 \r
1713         menu_loop_root();\r
1714 \r
1715         menuErrorMsg[0] = 0;\r
1716 }\r
1717 \r
1718 \r
1719 // --------- CD tray close menu ----------\r
1720 \r
1721 static void draw_menu_tray(int menu_sel)\r
1722 {\r
1723         int tl_x = 70, tl_y = 90, y;\r
1724         memset(gp2x_screen, 0xe0, 320*240);\r
1725 \r
1726         gp2x_text_out8(tl_x, 20, "The unit is about to");\r
1727         gp2x_text_out8(tl_x, 30, "close the CD tray.");\r
1728 \r
1729         y = tl_y;\r
1730         gp2x_text_out8(tl_x, y,       "Load new CD image");\r
1731         gp2x_text_out8(tl_x, (y+=10), "Insert nothing");\r
1732 \r
1733         // draw cursor\r
1734         gp2x_text_out8(tl_x - 16, tl_y + menu_sel*10, ">");\r
1735         // error\r
1736         if (menuErrorMsg[0]) gp2x_text_out8(5, 226, menuErrorMsg);\r
1737         gp2x_video_flip2();\r
1738 }\r
1739 \r
1740 \r
1741 int menu_loop_tray(void)\r
1742 {\r
1743         int menu_sel = 0, menu_sel_max = 1;\r
1744         unsigned long inp = 0;\r
1745         char curr_path[PATH_MAX], *selfname;\r
1746         FILE *tstf;\r
1747 \r
1748         gp2x_memset_all_buffers(0, 0xe0, 320*240);\r
1749         menu_gfx_prepare();\r
1750 \r
1751         if ( (tstf = fopen(currentConfig.lastRomFile, "rb")) )\r
1752         {\r
1753                 fclose(tstf);\r
1754                 strcpy(curr_path, currentConfig.lastRomFile);\r
1755         }\r
1756         else\r
1757         {\r
1758                 getcwd(curr_path, PATH_MAX);\r
1759         }\r
1760 \r
1761         /* make sure action buttons are not pressed on entering menu */\r
1762         draw_menu_tray(menu_sel);\r
1763         while (gp2x_joystick_read(1) & GP2X_B) usleep(50*1000);\r
1764 \r
1765         for (;;)\r
1766         {\r
1767                 draw_menu_tray(menu_sel);\r
1768                 inp = wait_for_input(GP2X_UP|GP2X_DOWN|GP2X_B);\r
1769                 if(inp & GP2X_UP  )  { menu_sel--; if (menu_sel < 0) menu_sel = menu_sel_max; }\r
1770                 if(inp & GP2X_DOWN)  { menu_sel++; if (menu_sel > menu_sel_max) menu_sel = 0; }\r
1771                 if(inp & GP2X_B   )  {\r
1772                         switch (menu_sel) {\r
1773                                 case 0: // select image\r
1774                                         selfname = romsel_loop(curr_path);\r
1775                                         if (selfname) {\r
1776                                                 int ret = -1, cd_type;\r
1777                                                 cd_type = emu_cd_check(NULL);\r
1778                                                 if (cd_type > 0)\r
1779                                                         ret = Insert_CD(romFileName, cd_type == 2);\r
1780                                                 if (ret != 0) {\r
1781                                                         sprintf(menuErrorMsg, "Load failed, invalid CD image?");\r
1782                                                         printf("%s\n", menuErrorMsg);\r
1783                                                         continue;\r
1784                                                 }\r
1785                                                 engineState = PGS_RestartRun;\r
1786                                                 return 1;\r
1787                                         }\r
1788                                         break;\r
1789                                 case 1: // insert nothing\r
1790                                         engineState = PGS_RestartRun;\r
1791                                         return 0;\r
1792                         }\r
1793                 }\r
1794                 menuErrorMsg[0] = 0; // clear error msg\r
1795         }\r
1796 }\r
1797 \r
1798 \r