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 \r
  35 static char *gp2xKeyNames[] = {\r
  36         "UP",    "???",    "LEFT", "???",  "DOWN", "???", "RIGHT",    "???",\r
  37         "START", "SELECT", "L",    "R",    "A",    "B",   "X",        "Y",\r
  38         "???",   "???",    "???",  "???",  "???",  "???", "VOL DOWN", "VOL UP",\r
  39         "???",   "???",    "???",  "PUSH", "???",  "???", "???",      "???"\r
  40 };\r
  41 \r
  42 char menuErrorMsg[40] = {0, };\r
  43 \r
  44 \r
  45 static void gp2x_text(unsigned char *screen, int x, int y, const char *text, int color)\r
  46 {\r
  47         int i,l;\r
  48 \r
  49         screen = screen + x + y*320;\r
  50 \r
  51         for (i = 0; i < strlen(text); i++)\r
  52         {\r
  53                 for (l=0;l<8;l++)\r
  54                 {\r
  55                         if(fontdata8x8[((text[i])*8)+l]&0x80) screen[l*320+0]=color;\r
  56                         if(fontdata8x8[((text[i])*8)+l]&0x40) screen[l*320+1]=color;\r
  57                         if(fontdata8x8[((text[i])*8)+l]&0x20) screen[l*320+2]=color;\r
  58                         if(fontdata8x8[((text[i])*8)+l]&0x10) screen[l*320+3]=color;\r
  59                         if(fontdata8x8[((text[i])*8)+l]&0x08) screen[l*320+4]=color;\r
  60                         if(fontdata8x8[((text[i])*8)+l]&0x04) screen[l*320+5]=color;\r
  61                         if(fontdata8x8[((text[i])*8)+l]&0x02) screen[l*320+6]=color;\r
  62                         if(fontdata8x8[((text[i])*8)+l]&0x01) screen[l*320+7]=color;\r
  63                 }\r
  64                 screen += 8;\r
  65         }\r
  66 }\r
  67 \r
  68 // draws white text to current bbp15 screen\r
  69 void gp2x_text_out15(int x, int y, const char *text)\r
  70 {\r
  71         int i,l;\r
  72         unsigned short *screen = gp2x_screen;\r
  73 \r
  74         screen = screen + x + y*320;\r
  75 \r
  76         for (i = 0; i < strlen(text); i++)\r
  77         {\r
  78                 for (l=0;l<8;l++)\r
  79                 {\r
  80                         if(fontdata8x8[((text[i])*8)+l]&0x80) screen[l*320+0]=0xffff;\r
  81                         if(fontdata8x8[((text[i])*8)+l]&0x40) screen[l*320+1]=0xffff;\r
  82                         if(fontdata8x8[((text[i])*8)+l]&0x20) screen[l*320+2]=0xffff;\r
  83                         if(fontdata8x8[((text[i])*8)+l]&0x10) screen[l*320+3]=0xffff;\r
  84                         if(fontdata8x8[((text[i])*8)+l]&0x08) screen[l*320+4]=0xffff;\r
  85                         if(fontdata8x8[((text[i])*8)+l]&0x04) screen[l*320+5]=0xffff;\r
  86                         if(fontdata8x8[((text[i])*8)+l]&0x02) screen[l*320+6]=0xffff;\r
  87                         if(fontdata8x8[((text[i])*8)+l]&0x01) screen[l*320+7]=0xffff;\r
  88                 }\r
  89                 screen += 8;\r
  90         }\r
  91 }\r
  92 \r
  93 \r
  94 void gp2x_text_out8(int x, int y, const char *texto, ...)\r
  95 {\r
  96         va_list args;\r
  97         char    buffer[512];\r
  98 \r
  99         va_start(args,texto);\r
 100         vsprintf(buffer,texto,args);\r
 101         va_end(args);\r
 102 \r
 103         gp2x_text(gp2x_screen,x,y,buffer,0xf0);\r
 104 }\r
 105 \r
 106 \r
 107 void gp2x_text_out8_2(int x, int y, const char *texto, int color)\r
 108 {\r
 109         gp2x_text(gp2x_screen, x, y, texto, color);\r
 110 }\r
 111 \r
 112 void gp2x_text_out8_lim(int x, int y, const char *texto, int max)\r
 113 {\r
 114         char    buffer[320/8+1];\r
 115 \r
 116         strncpy(buffer, texto, 320/8);\r
 117         if (max > 320/8) max = 320/8;\r
 118         if (max < 0) max = 0;\r
 119         buffer[max] = 0;\r
 120 \r
 121         gp2x_text(gp2x_screen,x,y,buffer,0xf0);\r
 122 }\r
 123 \r
 124 static void gp2x_smalltext8(int x, int y, const char *texto)\r
 125 {\r
 126         int i;\r
 127         unsigned char *src, *dst;\r
 128 \r
 129         for (i = 0;; i++, x += 6)\r
 130         {\r
 131                 unsigned char c = (unsigned char) texto[i];\r
 132                 int h = 8;\r
 133 \r
 134                 if (!c) break;\r
 135 \r
 136                 src = fontdata6x8[c];\r
 137                 dst = (unsigned char *)gp2x_screen + x + y*320;\r
 138 \r
 139                 while (h--)\r
 140                 {\r
 141                         int w = 0x20;\r
 142                         while (w)\r
 143                         {\r
 144                                 if( *src & w ) *dst = 0xf0;\r
 145                                 dst++;\r
 146                                 w>>=1;\r
 147                         }\r
 148                         src++;\r
 149 \r
 150                         dst += 320-6;\r
 151                 }\r
 152         }\r
 153 }\r
 154 \r
 155 static void gp2x_smalltext8_lim(int x, int y, const char *texto, int max)\r
 156 {\r
 157         char    buffer[320/6+1];\r
 158 \r
 159         strncpy(buffer, texto, 320/6);\r
 160         if (max > 320/6) max = 320/6;\r
 161         if (max < 0) max = 0;\r
 162         buffer[max] = 0;\r
 163 \r
 164         gp2x_smalltext8(x, y, buffer);\r
 165 }\r
 166 \r
 167 \r
 168 static unsigned long inp_prev = 0;\r
 169 static int inp_prevjoy = 0;\r
 170 \r
 171 static unsigned long wait_for_input(unsigned long interesting)\r
 172 {\r
 173         unsigned long ret;\r
 174         static int repeats = 0, wait = 50*1000;\r
 175         int release = 0, i;\r
 176 \r
 177         if (repeats == 2 || repeats == 4) wait /= 2;\r
 178         if (repeats == 6) wait = 15 * 1000;\r
 179 \r
 180         for (i = 0; i < 6 && inp_prev == gp2x_joystick_read(1); i++) {\r
 181                 if (i == 0) repeats++;\r
 182                 if (wait >= 30*1000) usleep(wait); // usleep sleeps for ~30ms minimum\r
 183                 else spend_cycles(wait * currentConfig.CPUclock);\r
 184         }\r
 185 \r
 186         while ( !((ret = gp2x_joystick_read(1)) & interesting) ) {\r
 187                 usleep(50000);\r
 188                 release = 1;\r
 189         }\r
 190 \r
 191         if (release || ret != inp_prev) {\r
 192                 repeats = 0;\r
 193                 wait = 50*1000;\r
 194         }\r
 195         inp_prev = ret;\r
 196         inp_prevjoy = 0;\r
 197 \r
 198         // we don't need diagonals in menus\r
 199         if ((ret&GP2X_UP)   && (ret&GP2X_LEFT))  ret &= ~GP2X_LEFT;\r
 200         if ((ret&GP2X_UP)   && (ret&GP2X_RIGHT)) ret &= ~GP2X_RIGHT;\r
 201         if ((ret&GP2X_DOWN) && (ret&GP2X_LEFT))  ret &= ~GP2X_LEFT;\r
 202         if ((ret&GP2X_DOWN) && (ret&GP2X_RIGHT)) ret &= ~GP2X_RIGHT;\r
 203 \r
 204         return ret;\r
 205 }\r
 206 \r
 207 static unsigned long input2_read(unsigned long interesting, int *joy)\r
 208 {\r
 209         unsigned long ret;\r
 210         int i;\r
 211 \r
 212         do\r
 213         {\r
 214                 *joy = 0;\r
 215                 if ((ret = gp2x_joystick_read(0) & interesting)) break;\r
 216                 gp2x_usbjoy_update();\r
 217                 for (i = 0; i < num_of_joys; i++) {\r
 218                         ret = gp2x_usbjoy_check2(i);\r
 219                         if (ret) { *joy = i + 1; break; }\r
 220                 }\r
 221                 if (ret) break;\r
 222         }\r
 223         while(0);\r
 224 \r
 225         return ret;\r
 226 }\r
 227 \r
 228 // similar to wait_for_input(), but returns joy num\r
 229 static unsigned long wait_for_input_usbjoy(unsigned long interesting, int *joy)\r
 230 {\r
 231         unsigned long ret;\r
 232         const int wait = 300*1000;\r
 233         int i;\r
 234 \r
 235         if (inp_prevjoy == 0) inp_prev &= interesting;\r
 236         for (i = 0; i < 6; i++) {\r
 237                 ret = input2_read(interesting, joy);\r
 238                 if (*joy != inp_prevjoy || ret != inp_prev) break;\r
 239                 usleep(wait/6);\r
 240         }\r
 241 \r
 242         while ( !(ret = input2_read(interesting, joy)) ) {\r
 243                 usleep(50000);\r
 244         }\r
 245 \r
 246         inp_prev = ret;\r
 247         inp_prevjoy = *joy;\r
 248 \r
 249         return ret;\r
 250 }\r
 251 \r
 252 \r
 253 \r
 254 // -------------- ROM selector --------------\r
 255 \r
 256 static void draw_dirlist(char *curdir, struct dirent **namelist, int n, int sel)\r
 257 {\r
 258         int start, i, pos;\r
 259 \r
 260         start = 12 - sel;\r
 261         n--; // exclude current dir (".")\r
 262 \r
 263         //memset(gp2x_screen, 0, 320*240);\r
 264         gp2x_pd_clone_buffer2();\r
 265 \r
 266         if(start - 2 >= 0)\r
 267                 gp2x_smalltext8_lim(14, (start - 2)*10, curdir, 53-2);\r
 268         for (i = 0; i < n; i++) {\r
 269                 pos = start + i;\r
 270                 if (pos < 0)  continue;\r
 271                 if (pos > 23) break;\r
 272                 if (namelist[i+1]->d_type == DT_DIR) {\r
 273                         gp2x_smalltext8_lim(14,   pos*10, "/", 1);\r
 274                         gp2x_smalltext8_lim(14+6, pos*10, namelist[i+1]->d_name, 53-3);\r
 275                 } else {\r
 276                         gp2x_smalltext8_lim(14,   pos*10, namelist[i+1]->d_name, 53-2);\r
 277                 }\r
 278         }\r
 279         gp2x_text_out8(5, 120, ">");\r
 280         gp2x_video_flip2();\r
 281 }\r
 282 \r
 283 static int scandir_cmp(const void *p1, const void *p2)\r
 284 {\r
 285         struct dirent **d1 = (struct dirent **)p1, **d2 = (struct dirent **)p2;\r
 286         if ((*d1)->d_type == (*d2)->d_type) return alphasort(d1, d2);\r
 287         if ((*d1)->d_type == DT_DIR) return -1; // put before\r
 288         if ((*d2)->d_type == DT_DIR) return  1;\r
 289         return alphasort(d1, d2);\r
 290 }\r
 291 \r
 292 static char *filter_exts[] = {\r
 293         ".mp3", ".MP3", ".srm", ".brm", "s.gz", ".mds", "bcfg", ".txt", ".htm", "html",\r
 294         ".jpg", ".gpe", ".cue"\r
 295 };\r
 296 \r
 297 static int scandir_filter(const struct dirent *ent)\r
 298 {\r
 299         const char *p;\r
 300         int i;\r
 301 \r
 302         if (ent == NULL || ent->d_name == NULL) return 0;\r
 303         if (strlen(ent->d_name) < 5) return 1;\r
 304 \r
 305         p = ent->d_name + strlen(ent->d_name) - 4;\r
 306 \r
 307         for (i = 0; i < sizeof(filter_exts)/sizeof(filter_exts[0]); i++)\r
 308         {\r
 309                 if (strcmp(p, filter_exts[i]) == 0) return 0;\r
 310         }\r
 311 \r
 312         return 1;\r
 313 }\r
 314 \r
 315 static char *romsel_loop(char *curr_path)\r
 316 {\r
 317         struct dirent **namelist;\r
 318         DIR *dir;\r
 319         int n, sel = 0;\r
 320         unsigned long inp = 0;\r
 321         char *ret = NULL, *fname = NULL;\r
 322 \r
 323         // is this a dir or a full path?\r
 324         if ((dir = opendir(curr_path))) {\r
 325                 closedir(dir);\r
 326         } else {\r
 327                 char *p;\r
 328                 for (p = curr_path + strlen(curr_path) - 1; p > curr_path && *p != '/'; p--);\r
 329                 *p = 0;\r
 330                 fname = p+1;\r
 331         }\r
 332 \r
 333         n = scandir(curr_path, &namelist, scandir_filter, scandir_cmp);\r
 334         if (n < 0) {\r
 335                 // try root\r
 336                 n = scandir("/", &namelist, scandir_filter, scandir_cmp);\r
 337                 if (n < 0) {\r
 338                         // oops, we failed\r
 339                         printf("dir: "); printf(curr_path); printf("\n");\r
 340                         perror("scandir");\r
 341                         return NULL;\r
 342                 }\r
 343         }\r
 344 \r
 345         // try to find sel\r
 346         if (fname != NULL) {\r
 347                 int i;\r
 348                 for (i = 1; i < n; i++) {\r
 349                         if (strcmp(namelist[i]->d_name, fname) == 0) {\r
 350                                 sel = i - 1;\r
 351                                 break;\r
 352                         }\r
 353                 }\r
 354         }\r
 355 \r
 356         for (;;)\r
 357         {\r
 358                 draw_dirlist(curr_path, namelist, n, sel);\r
 359                 inp = wait_for_input(GP2X_UP|GP2X_DOWN|GP2X_LEFT|GP2X_RIGHT|GP2X_L|GP2X_R|GP2X_B|GP2X_X);\r
 360                 if(inp & GP2X_UP  )  { sel--;   if (sel < 0)   sel = n-2; }\r
 361                 if(inp & GP2X_DOWN)  { sel++;   if (sel > n-2) sel = 0; }\r
 362                 if(inp & GP2X_LEFT)  { sel-=10; if (sel < 0)   sel = 0; }\r
 363                 if(inp & GP2X_L)     { sel-=24; if (sel < 0)   sel = 0; }\r
 364                 if(inp & GP2X_RIGHT) { sel+=10; if (sel > n-2) sel = n-2; }\r
 365                 if(inp & GP2X_R)     { sel+=24; if (sel > n-2) sel = n-2; }\r
 366                 if(inp & GP2X_B)     { // enter dir/select\r
 367                         again:\r
 368                         if (namelist[sel+1]->d_type == DT_REG) {\r
 369                                 strcpy(romFileName, curr_path);\r
 370                                 strcat(romFileName, "/");\r
 371                                 strcat(romFileName, namelist[sel+1]->d_name);\r
 372                                 ret = romFileName;\r
 373                                 break;\r
 374                         } else if (namelist[sel+1]->d_type == DT_DIR) {\r
 375                                 int newlen = strlen(curr_path) + strlen(namelist[sel+1]->d_name) + 2;\r
 376                                 char *p, *newdir = malloc(newlen);\r
 377                                 if (strcmp(namelist[sel+1]->d_name, "..") == 0) {\r
 378                                         char *start = curr_path;\r
 379                                         p = start + strlen(start) - 1;\r
 380                                         while (*p == '/' && p > start) p--;\r
 381                                         while (*p != '/' && p > start) p--;\r
 382                                         if (p <= start) strcpy(newdir, "/");\r
 383                                         else { strncpy(newdir, start, p-start); newdir[p-start] = 0; }\r
 384                                 } else {\r
 385                                         strcpy(newdir, curr_path);\r
 386                                         p = newdir + strlen(newdir) - 1;\r
 387                                         while (*p == '/' && p >= newdir) *p-- = 0;\r
 388                                         strcat(newdir, "/");\r
 389                                         strcat(newdir, namelist[sel+1]->d_name);\r
 390                                 }\r
 391                                 ret = romsel_loop(newdir);\r
 392                                 free(newdir);\r
 393                                 break;\r
 394                         } else {\r
 395                                 // unknown file type, happens on NTFS mounts. Try to guess.\r
 396                                 FILE *tstf; int tmp;\r
 397                                 strcpy(romFileName, curr_path);\r
 398                                 strcat(romFileName, "/");\r
 399                                 strcat(romFileName, namelist[sel+1]->d_name);\r
 400                                 tstf = fopen(romFileName, "rb");\r
 401                                 if (tstf != NULL)\r
 402                                 {\r
 403                                         if (fread(&tmp, 1, 1, tstf) > 0 || ferror(tstf) == 0)\r
 404                                                 namelist[sel+1]->d_type = DT_REG;\r
 405                                         else    namelist[sel+1]->d_type = DT_DIR;\r
 406                                         fclose(tstf);\r
 407                                         goto again;\r
 408                                 }\r
 409                         }\r
 410                 }\r
 411                 if(inp & GP2X_X) break; // cancel\r
 412         }\r
 413 \r
 414         if (n > 0) {\r
 415                 while(n--) free(namelist[n]);\r
 416                 free(namelist);\r
 417         }\r
 418 \r
 419         return ret;\r
 420 }\r
 421 \r
 422 // ------------ patch/gg menu ------------\r
 423 \r
 424 static void draw_patchlist(int sel)\r
 425 {\r
 426         int start, i, pos;\r
 427 \r
 428         start = 12 - sel;\r
 429 \r
 430         gp2x_pd_clone_buffer2();\r
 431 \r
 432         for (i = 0; i < PicoPatchCount; i++) {\r
 433                 pos = start + i;\r
 434                 if (pos < 0)  continue;\r
 435                 if (pos > 23) break;\r
 436                 gp2x_smalltext8_lim(14,     pos*10, PicoPatches[i].active ? "ON " : "OFF", 3);\r
 437                 gp2x_smalltext8_lim(14+6*4, pos*10, PicoPatches[i].name, 53-6);\r
 438         }\r
 439         pos = start + i;\r
 440         if (pos < 24) gp2x_smalltext8_lim(14, pos*10, "done", 4);\r
 441 \r
 442         gp2x_text_out8(5, 120, ">");\r
 443         gp2x_video_flip2();\r
 444 }\r
 445 \r
 446 \r
 447 void patches_menu_loop(void)\r
 448 {\r
 449         int menu_sel = 0;\r
 450         unsigned long inp = 0;\r
 451 \r
 452         for(;;)\r
 453         {\r
 454                 draw_patchlist(menu_sel);\r
 455                 inp = wait_for_input(GP2X_UP|GP2X_DOWN|GP2X_LEFT|GP2X_RIGHT|GP2X_L|GP2X_R|GP2X_B|GP2X_X);\r
 456                 if(inp & GP2X_UP  ) { menu_sel--; if (menu_sel < 0) menu_sel = PicoPatchCount; }\r
 457                 if(inp & GP2X_DOWN) { menu_sel++; if (menu_sel > PicoPatchCount) menu_sel = 0; }\r
 458                 if(inp &(GP2X_LEFT|GP2X_L))  { menu_sel-=10; if (menu_sel < 0) menu_sel = 0; }\r
 459                 if(inp &(GP2X_RIGHT|GP2X_R)) { menu_sel+=10; if (menu_sel > PicoPatchCount) menu_sel = PicoPatchCount; }\r
 460                 if(inp & GP2X_B) { // action\r
 461                         if (menu_sel < PicoPatchCount)\r
 462                                 PicoPatches[menu_sel].active = !PicoPatches[menu_sel].active;\r
 463                         else    return;\r
 464                 }\r
 465                 if(inp & GP2X_X) return;\r
 466         }\r
 467 \r
 468 }\r
 469 \r
 470 // ------------ savestate loader ------------\r
 471 \r
 472 static void menu_prepare_bg(void);\r
 473 \r
 474 static int state_slot_flags = 0;\r
 475 \r
 476 static void state_check_slots(void)\r
 477 {\r
 478         int slot;\r
 479 \r
 480         state_slot_flags = 0;\r
 481 \r
 482         for (slot = 0; slot < 10; slot++)\r
 483         {\r
 484                 if (emu_check_save_file(slot))\r
 485                 {\r
 486                         state_slot_flags |= 1 << slot;\r
 487                 }\r
 488         }\r
 489 }\r
 490 \r
 491 static void draw_savestate_bg(int slot)\r
 492 {\r
 493         struct PicoVideo tmp_pv;\r
 494         unsigned short tmp_cram[0x40];\r
 495         unsigned short tmp_vsram[0x40];\r
 496         void *tmp_vram, *file;\r
 497         char *fname;\r
 498 \r
 499         fname = emu_GetSaveFName(1, 0, slot);\r
 500         if (!fname) return;\r
 501 \r
 502         tmp_vram = malloc(sizeof(Pico.vram));\r
 503         if (tmp_vram == NULL) return;\r
 504 \r
 505         memcpy(tmp_vram, Pico.vram, sizeof(Pico.vram));\r
 506         memcpy(tmp_cram, Pico.cram, sizeof(Pico.cram));\r
 507         memcpy(tmp_vsram, Pico.vsram, sizeof(Pico.vsram));\r
 508         memcpy(&tmp_pv, &Pico.video, sizeof(Pico.video));\r
 509 \r
 510         if (strcmp(fname + strlen(fname) - 3, ".gz") == 0) {\r
 511                 file = gzopen(fname, "rb");\r
 512                 emu_set_save_cbs(1);\r
 513         } else {\r
 514                 file = fopen(fname, "rb");\r
 515                 emu_set_save_cbs(0);\r
 516         }\r
 517 \r
 518         if (file) {\r
 519                 if (PicoMCD & 1) {\r
 520                         PicoCdLoadStateGfx(file);\r
 521                 } else {\r
 522                         areaSeek(file, 0x10020, SEEK_SET);  // skip header and RAM in state file\r
 523                         areaRead(Pico.vram, 1, sizeof(Pico.vram), file);\r
 524                         areaSeek(file, 0x2000, SEEK_CUR);\r
 525                         areaRead(Pico.cram, 1, sizeof(Pico.cram), file);\r
 526                         areaRead(Pico.vsram, 1, sizeof(Pico.vsram), file);\r
 527                         areaSeek(file, 0x221a0, SEEK_SET);\r
 528                         areaRead(&Pico.video, 1, sizeof(Pico.video), file);\r
 529                 }\r
 530                 areaClose(file);\r
 531         }\r
 532 \r
 533         emu_forced_frame();\r
 534         gp2x_memcpy_buffers((1<<2), gp2x_screen, 0, 320*240*2);\r
 535         menu_prepare_bg();\r
 536 \r
 537         memcpy(Pico.vram, tmp_vram, sizeof(Pico.vram));\r
 538         memcpy(Pico.cram, tmp_cram, sizeof(Pico.cram));\r
 539         memcpy(Pico.vsram, tmp_vsram, sizeof(Pico.vsram));\r
 540         memcpy(&Pico.video, &tmp_pv,  sizeof(Pico.video));\r
 541         free(tmp_vram);\r
 542 }\r
 543 \r
 544 static void draw_savestate_menu(int menu_sel, int is_loading)\r
 545 {\r
 546         int tl_x = 25, tl_y = 60, y, i;\r
 547 \r
 548         if (state_slot_flags & (1 << menu_sel))\r
 549                 draw_savestate_bg(menu_sel);\r
 550         gp2x_pd_clone_buffer2();\r
 551 \r
 552         gp2x_text_out8(tl_x, 30, is_loading ? "Load state" : "Save state");\r
 553 \r
 554         /* draw all 10 slots */\r
 555         y = tl_y;\r
 556         for (i = 0; i < 10; i++, y+=10)\r
 557         {\r
 558                 gp2x_text_out8(tl_x, y, "SLOT %i (%s)", i, (state_slot_flags & (1 << i)) ? "USED" : "free");\r
 559         }\r
 560         gp2x_text_out8(tl_x, y, "back");\r
 561 \r
 562         // draw cursor\r
 563         gp2x_text_out8(tl_x - 16, tl_y + menu_sel*10, ">");\r
 564 \r
 565         gp2x_video_flip2();\r
 566 }\r
 567 \r
 568 static int savestate_menu_loop(int is_loading)\r
 569 {\r
 570         int menu_sel = 10, menu_sel_max = 10;\r
 571         unsigned long inp = 0;\r
 572 \r
 573         state_check_slots();\r
 574 \r
 575         for(;;)\r
 576         {\r
 577                 draw_savestate_menu(menu_sel, is_loading);\r
 578                 inp = wait_for_input(GP2X_UP|GP2X_DOWN|GP2X_B|GP2X_X);\r
 579                 if(inp & GP2X_UP  ) {\r
 580                         do {\r
 581                                 menu_sel--; if (menu_sel < 0) menu_sel = menu_sel_max;\r
 582                         } while (!(state_slot_flags & (1 << menu_sel)) && menu_sel != menu_sel_max && is_loading);\r
 583                 }\r
 584                 if(inp & GP2X_DOWN) {\r
 585                         do {\r
 586                                 menu_sel++; if (menu_sel > menu_sel_max) menu_sel = 0;\r
 587                         } while (!(state_slot_flags & (1 << menu_sel)) && menu_sel != menu_sel_max && is_loading);\r
 588                 }\r
 589                 if(inp & GP2X_B) { // save/load\r
 590                         if (menu_sel < 10) {\r
 591                                 state_slot = menu_sel;\r
 592                                 if (emu_SaveLoadGame(is_loading, 0)) {\r
 593                                         strcpy(menuErrorMsg, is_loading ? "Load failed" : "Save failed");\r
 594                                         return 1;\r
 595                                 }\r
 596                                 return 0;\r
 597                         } else  return 1;\r
 598                 }\r
 599                 if(inp & GP2X_X) return 1;\r
 600         }\r
 601 }\r
 602 \r
 603 // -------------- key config --------------\r
 604 \r
 605 static char *usb_joy_key_name(int joy, int num)\r
 606 {\r
 607         static char name[16];\r
 608         switch (num)\r
 609         {\r
 610                 case 0: sprintf(name, "Joy%i UP", joy); break;\r
 611                 case 1: sprintf(name, "Joy%i DOWN", joy); break;\r
 612                 case 2: sprintf(name, "Joy%i LEFT", joy); break;\r
 613                 case 3: sprintf(name, "Joy%i RIGHT", joy); break;\r
 614                 default:sprintf(name, "Joy%i b%i", joy, num-3); break;\r
 615         }\r
 616         return name;\r
 617 }\r
 618 \r
 619 static void draw_key_config(int curr_act, int is_p2)\r
 620 {\r
 621         char strkeys[32*5];\r
 622         int joy, i;\r
 623 \r
 624         strkeys[0] = 0;\r
 625         for (i = 0; i < 32; i++)\r
 626         {\r
 627                 if (currentConfig.KeyBinds[i] & (1 << curr_act))\r
 628                 {\r
 629                         if (curr_act < 16 && (currentConfig.KeyBinds[i] & (1 << 16)) != (is_p2 << 16)) continue;\r
 630                         if (strkeys[0]) { strcat(strkeys, " + "); strcat(strkeys, gp2xKeyNames[i]); break; }\r
 631                         else strcpy(strkeys, gp2xKeyNames[i]);\r
 632                 }\r
 633         }\r
 634         for (joy = 0; joy < num_of_joys; joy++)\r
 635         {\r
 636                 for (i = 0; i < 32; i++)\r
 637                 {\r
 638                         if (currentConfig.JoyBinds[joy][i] & (1 << curr_act))\r
 639                         {\r
 640                                 if (curr_act < 16 && (currentConfig.JoyBinds[joy][i] & (1 << 16)) != (is_p2 << 16)) continue;\r
 641                                 if (strkeys[0]) {\r
 642                                         strcat(strkeys, ", "); strcat(strkeys, usb_joy_key_name(joy + 1, i));\r
 643                                         break;\r
 644                                 }\r
 645                                 else strcpy(strkeys, usb_joy_key_name(joy + 1, i));\r
 646                         }\r
 647                 }\r
 648         }\r
 649 \r
 650         //memset(gp2x_screen, 0, 320*240);\r
 651         gp2x_pd_clone_buffer2();\r
 652         gp2x_text_out8(60, 40, "Action: %s", actionNames[curr_act]);\r
 653         gp2x_text_out8(60, 60, "Keys: %s", strkeys);\r
 654 \r
 655         gp2x_text_out8(30, 180, "Use SELECT to change action");\r
 656         gp2x_text_out8(30, 190, "Press a key to bind/unbind");\r
 657         gp2x_text_out8(30, 200, "Select \"Done\" action and");\r
 658         gp2x_text_out8(30, 210, "  press any key to finish");\r
 659         gp2x_video_flip2();\r
 660 }\r
 661 \r
 662 static void key_config_loop(int is_p2)\r
 663 {\r
 664         int curr_act = 0, joy = 0, i;\r
 665         unsigned long inp = 0;\r
 666 \r
 667         for (;;)\r
 668         {\r
 669                 draw_key_config(curr_act, is_p2);\r
 670                 inp = wait_for_input_usbjoy(CONFIGURABLE_KEYS, &joy);\r
 671                 // printf("got %08lX from joy %i\n", inp, joy);\r
 672                 if (joy == 0) {\r
 673                         if (inp & GP2X_SELECT) {\r
 674                                 curr_act++;\r
 675                                 while (!actionNames[curr_act] && curr_act < 32) curr_act++;\r
 676                                 if (curr_act > 31) curr_act = 0;\r
 677                         }\r
 678                         inp &= CONFIGURABLE_KEYS;\r
 679                         inp &= ~GP2X_SELECT;\r
 680                 }\r
 681                 if (curr_act == 31 && inp) break;\r
 682                 if (joy == 0) {\r
 683                         for (i = 0; i < 32; i++)\r
 684                                 if (inp & (1 << i)) {\r
 685                                         currentConfig.KeyBinds[i] ^= (1 << curr_act);\r
 686                                         if (is_p2) currentConfig.KeyBinds[i] |=  (1 << 16); // player 2 flag\r
 687                                         else       currentConfig.KeyBinds[i] &= ~(1 << 16);\r
 688                                 }\r
 689                 } else {\r
 690                         for (i = 0; i < 32; i++)\r
 691                                 if (inp & (1 << i)) {\r
 692                                         currentConfig.JoyBinds[joy-1][i] ^= (1 << curr_act);\r
 693                                         if (is_p2) currentConfig.JoyBinds[joy-1][i] |=  (1 << 16);\r
 694                                         else       currentConfig.JoyBinds[joy-1][i] &= ~(1 << 16);\r
 695                                 }\r
 696                 }\r
 697         }\r
 698 }\r
 699 \r
 700 static void draw_kc_sel(int menu_sel)\r
 701 {\r
 702         int tl_x = 25+40, tl_y = 60, y, i;\r
 703         char joyname[36];\r
 704 \r
 705         y = tl_y;\r
 706         //memset(gp2x_screen, 0, 320*240);\r
 707         gp2x_pd_clone_buffer2();\r
 708         gp2x_text_out8(tl_x, y,       "Player 1");\r
 709         gp2x_text_out8(tl_x, (y+=10), "Player 2");\r
 710         gp2x_text_out8(tl_x, (y+=10), "Done");\r
 711 \r
 712         // draw cursor\r
 713         gp2x_text_out8(tl_x - 16, tl_y + menu_sel*10, ">");\r
 714 \r
 715         tl_x = 25;\r
 716         gp2x_text_out8(tl_x, (y=110), "USB joys detected:");\r
 717         if (num_of_joys > 0) {\r
 718                 for (i = 0; i < num_of_joys; i++) {\r
 719                         strncpy(joyname, joy_name(joys[i]), 33); joyname[33] = 0;\r
 720                         gp2x_text_out8(tl_x, (y+=10), "%i: %s", i+1, joyname);\r
 721                 }\r
 722         } else {\r
 723                 gp2x_text_out8(tl_x, (y+=10), "none");\r
 724         }\r
 725 \r
 726 \r
 727         gp2x_video_flip2();\r
 728 }\r
 729 \r
 730 static void kc_sel_loop(void)\r
 731 {\r
 732         int menu_sel = 2, menu_sel_max = 2;\r
 733         unsigned long inp = 0;\r
 734 \r
 735         for(;;)\r
 736         {\r
 737                 draw_kc_sel(menu_sel);\r
 738                 inp = wait_for_input(GP2X_UP|GP2X_DOWN|GP2X_B|GP2X_X);\r
 739                 if(inp & GP2X_UP  ) { menu_sel--; if (menu_sel < 0) menu_sel = menu_sel_max; }\r
 740                 if(inp & GP2X_DOWN) { menu_sel++; if (menu_sel > menu_sel_max) menu_sel = 0; }\r
 741                 if(inp & GP2X_B) {\r
 742                         switch (menu_sel) {\r
 743                                 case 0: key_config_loop(0); return;\r
 744                                 case 1: key_config_loop(1); return;\r
 745                                 default: return;\r
 746                         }\r
 747                 }\r
 748                 if(inp & GP2X_X) return;\r
 749         }\r
 750 }\r
 751 \r
 752 \r
 753 \r
 754 // --------- sega/mega cd options ----------\r
 755 \r
 756 static void draw_cd_menu_options(int menu_sel, char *b_us, char *b_eu, char *b_jp)\r
 757 {\r
 758         int tl_x = 25, tl_y = 60, y;\r
 759         char ra_buff[16];\r
 760 \r
 761         if (PicoCDBuffers > 1) sprintf(ra_buff, "%5iK", PicoCDBuffers * 2);\r
 762         else strcpy(ra_buff, "     OFF");\r
 763 \r
 764         y = tl_y;\r
 765         //memset(gp2x_screen, 0, 320*240);\r
 766         gp2x_pd_clone_buffer2();\r
 767 \r
 768         gp2x_text_out8(tl_x, y,       "USA BIOS:     %s", b_us); // 0\r
 769         gp2x_text_out8(tl_x, (y+=10), "EUR BIOS:     %s", b_eu); // 1\r
 770         gp2x_text_out8(tl_x, (y+=10), "JAP BIOS:     %s", b_jp); // 2\r
 771         gp2x_text_out8(tl_x, (y+=10), "CD LEDs                    %s", (currentConfig.EmuOpt &0x0400)?"ON":"OFF"); // 3\r
 772         gp2x_text_out8(tl_x, (y+=10), "CDDA audio (using mp3s)    %s", (currentConfig.PicoOpt&0x0800)?"ON":"OFF"); // 4\r
 773         gp2x_text_out8(tl_x, (y+=10), "PCM audio                  %s", (currentConfig.PicoOpt&0x0400)?"ON":"OFF"); // 5\r
 774         gp2x_text_out8(tl_x, (y+=10), "ReadAhead buffer      %s", ra_buff); // 6\r
 775         gp2x_text_out8(tl_x, (y+=10), "Scale/Rot. fx (slow)       %s", (currentConfig.PicoOpt&0x1000)?"ON":"OFF"); // 7\r
 776         gp2x_text_out8(tl_x, (y+=10), "Better sync (slow)         %s", (currentConfig.PicoOpt&0x2000)?"ON":"OFF"); // 8\r
 777         gp2x_text_out8(tl_x, (y+=10), "Done");\r
 778 \r
 779         // draw cursor\r
 780         gp2x_text_out8(tl_x - 16, tl_y + menu_sel*10, ">");\r
 781 \r
 782         if ((menu_sel == 0 && strcmp(b_us, "NOT FOUND")) ||\r
 783                 (menu_sel == 1 && strcmp(b_eu, "NOT FOUND")) ||\r
 784                 (menu_sel == 2 && strcmp(b_jp, "NOT FOUND")))\r
 785                         gp2x_text_out8(tl_x, 220, "Press start to test selected BIOS");\r
 786 \r
 787         gp2x_video_flip2();\r
 788 }\r
 789 \r
 790 static void cd_menu_loop_options(void)\r
 791 {\r
 792         int menu_sel = 0, menu_sel_max = 9;\r
 793         unsigned long inp = 0;\r
 794         char bios_us[32], bios_eu[32], bios_jp[32], *bios, *p;\r
 795 \r
 796         if (find_bios(4, &bios)) { // US\r
 797                 for (p = bios+strlen(bios)-1; p > bios && *p != '/'; p--); p++;\r
 798                 strncpy(bios_us, p, 31); bios_us[31] = 0;\r
 799         } else  strcpy(bios_us, "NOT FOUND");\r
 800 \r
 801         if (find_bios(8, &bios)) { // EU\r
 802                 for (p = bios+strlen(bios)-1; p > bios && *p != '/'; p--); p++;\r
 803                 strncpy(bios_eu, p, 31); bios_eu[31] = 0;\r
 804         } else  strcpy(bios_eu, "NOT FOUND");\r
 805 \r
 806         if (find_bios(1, &bios)) { // JP\r
 807                 for (p = bios+strlen(bios)-1; p > bios && *p != '/'; p--); p++;\r
 808                 strncpy(bios_jp, p, 31); bios_jp[31] = 0;\r
 809         } else  strcpy(bios_jp, "NOT FOUND");\r
 810 \r
 811         for(;;)\r
 812         {\r
 813                 draw_cd_menu_options(menu_sel, bios_us, bios_eu, bios_jp);\r
 814                 inp = wait_for_input(GP2X_UP|GP2X_DOWN|GP2X_LEFT|GP2X_RIGHT|GP2X_B|GP2X_X|GP2X_A|GP2X_START);\r
 815                 if(inp & GP2X_UP  ) { menu_sel--; if (menu_sel < 0) menu_sel = menu_sel_max; }\r
 816                 if(inp & GP2X_DOWN) { menu_sel++; if (menu_sel > menu_sel_max) menu_sel = 0; }\r
 817                 if((inp& GP2X_B)||(inp&GP2X_LEFT)||(inp&GP2X_RIGHT)) { // toggleable options\r
 818                         switch (menu_sel) {\r
 819                                 case  3: currentConfig.EmuOpt ^=0x0400; break;\r
 820                                 case  4: currentConfig.PicoOpt^=0x0800; break;\r
 821                                 case  5: currentConfig.PicoOpt^=0x0400; break;\r
 822                                 case  6:\r
 823                                         if (inp & GP2X_LEFT) {\r
 824                                                 PicoCDBuffers >>= 1;\r
 825                                                 if (PicoCDBuffers < 64) PicoCDBuffers = 0;\r
 826                                         } else {\r
 827                                                 if (PicoCDBuffers < 64) PicoCDBuffers = 64;\r
 828                                                 else PicoCDBuffers <<= 1;\r
 829                                                 if (PicoCDBuffers > 8*1024) PicoCDBuffers = 8*1024; // 16M\r
 830                                         }\r
 831                                         break;\r
 832                                 case  7: currentConfig.PicoOpt^=0x1000; break;\r
 833                                 case  8: currentConfig.PicoOpt^=0x2000; break;\r
 834                                 case  9: return;\r
 835                         }\r
 836                 }\r
 837                 if(inp & (GP2X_X|GP2X_A)) return;\r
 838                 if(inp &  GP2X_START) { // BIOS testers\r
 839                         switch (menu_sel) {\r
 840                                 case 0: if (find_bios(4, &bios)) { // test US\r
 841                                                 strcpy(romFileName, bios);\r
 842                                                 engineState = PGS_ReloadRom;\r
 843                                                 return;\r
 844                                         }\r
 845                                         break;\r
 846                                 case 1: if (find_bios(8, &bios)) { // test EU\r
 847                                                 strcpy(romFileName, bios);\r
 848                                                 engineState = PGS_ReloadRom;\r
 849                                                 return;\r
 850                                         }\r
 851                                         break;\r
 852                                 case 2: if (find_bios(1, &bios)) { // test JP\r
 853                                                 strcpy(romFileName, bios);\r
 854                                                 engineState = PGS_ReloadRom;\r
 855                                                 return;\r
 856                                         }\r
 857                                         break;\r
 858                         }\r
 859                 }\r
 860         }\r
 861 }\r
 862 \r
 863 \r
 864 // --------- advanced options ----------\r
 865 \r
 866 static void draw_amenu_options(int menu_sel)\r
 867 {\r
 868         int tl_x = 25, tl_y = 60, y;\r
 869         char *mms = mmuhack_status ? "active)  " : "inactive)";\r
 870 \r
 871         y = tl_y;\r
 872         //memset(gp2x_screen, 0, 320*240);\r
 873         gp2x_pd_clone_buffer2();\r
 874 \r
 875         gp2x_text_out8(tl_x, y,       "Gamma correction           %i.%02i", currentConfig.gamma / 100, currentConfig.gamma%100); // 0\r
 876         gp2x_text_out8(tl_x, (y+=10), "Emulate Z80                %s", (currentConfig.PicoOpt&0x004)?"ON":"OFF"); // 1\r
 877         gp2x_text_out8(tl_x, (y+=10), "Emulate YM2612 (FM)        %s", (currentConfig.PicoOpt&0x001)?"ON":"OFF"); // 2\r
 878         gp2x_text_out8(tl_x, (y+=10), "Emulate SN76496 (PSG)      %s", (currentConfig.PicoOpt&0x002)?"ON":"OFF"); // 3\r
 879         gp2x_text_out8(tl_x, (y+=10), "gzip savestates            %s", (currentConfig.EmuOpt &0x008)?"ON":"OFF"); // 4\r
 880         gp2x_text_out8(tl_x, (y+=10), "Don't save last used ROM   %s", (currentConfig.EmuOpt &0x020)?"ON":"OFF"); // 5\r
 881         gp2x_text_out8(tl_x, (y+=10), "needs restart:");\r
 882         gp2x_text_out8(tl_x, (y+=10), "craigix's RAM timings      %s", (currentConfig.EmuOpt &0x100)?"ON":"OFF"); // 7\r
 883         gp2x_text_out8(tl_x, (y+=10), "squidgehack (now %s %s",   mms, (currentConfig.EmuOpt &0x010)?"ON":"OFF"); // 8\r
 884         gp2x_text_out8(tl_x, (y+=10), "Done");\r
 885 \r
 886         // draw cursor\r
 887         gp2x_text_out8(tl_x - 16, tl_y + menu_sel*10, ">");\r
 888 \r
 889         gp2x_video_flip2();\r
 890 }\r
 891 \r
 892 static void amenu_loop_options(void)\r
 893 {\r
 894         int menu_sel = 0, menu_sel_max = 9;\r
 895         unsigned long inp = 0;\r
 896 \r
 897         for(;;)\r
 898         {\r
 899                 draw_amenu_options(menu_sel);\r
 900                 inp = wait_for_input(GP2X_UP|GP2X_DOWN|GP2X_LEFT|GP2X_RIGHT|GP2X_B|GP2X_X|GP2X_A);\r
 901                 if(inp & GP2X_UP  ) { menu_sel--; if (menu_sel < 0) menu_sel = menu_sel_max; }\r
 902                 if(inp & GP2X_DOWN) { menu_sel++; if (menu_sel > menu_sel_max) menu_sel = 0; }\r
 903                 if((inp& GP2X_B)||(inp&GP2X_LEFT)||(inp&GP2X_RIGHT)) { // toggleable options\r
 904                         switch (menu_sel) {\r
 905                                 case  1: currentConfig.PicoOpt^=0x004; break;\r
 906                                 case  2: currentConfig.PicoOpt^=0x001; break;\r
 907                                 case  3: currentConfig.PicoOpt^=0x002; break;\r
 908                                 case  4: currentConfig.EmuOpt ^=0x008; break;\r
 909                                 case  5: currentConfig.EmuOpt ^=0x020; break;\r
 910                                 case  7: currentConfig.EmuOpt ^=0x100; break;\r
 911                                 case  8: currentConfig.EmuOpt ^=0x010; break;\r
 912                                 case  9: return;\r
 913                         }\r
 914                 }\r
 915                 if(inp & (GP2X_X|GP2X_A)) return;\r
 916                 if(inp & (GP2X_LEFT|GP2X_RIGHT)) { // multi choise\r
 917                         switch (menu_sel) {\r
 918                                 case 0:\r
 919                                         while ((inp = gp2x_joystick_read(1)) & (GP2X_LEFT|GP2X_RIGHT)) {\r
 920                                                 currentConfig.gamma += (inp & GP2X_LEFT) ? -1 : 1;\r
 921                                                 if (currentConfig.gamma <   1) currentConfig.gamma =   1;\r
 922                                                 if (currentConfig.gamma > 300) currentConfig.gamma = 300;\r
 923                                                 draw_amenu_options(menu_sel);\r
 924                                                 usleep(18*1000);\r
 925                                         }\r
 926                                         break;\r
 927                         }\r
 928                 }\r
 929         }\r
 930 }\r
 931 \r
 932 // -------------- options --------------\r
 933 \r
 934 static const char *region_name(unsigned int code)\r
 935 {\r
 936         static const char *names[] = { "Auto", "      Japan NTSC", "      Japan PAL", "      USA", "      Europe" };\r
 937         static const char *names_short[] = { "", " JP", " JP", " US", " EU" };\r
 938         int u, i = 0;\r
 939         if (code) {\r
 940                 code <<= 1;\r
 941                 while((code >>= 1)) i++;\r
 942                 if (i > 4) return "unknown";\r
 943                 return names[i];\r
 944         } else {\r
 945                 static char name[24];\r
 946                 strcpy(name, "Auto:");\r
 947                 for (u = 0; u < 3; u++) {\r
 948                         i = 0; code = ((PicoAutoRgnOrder >> u*4) & 0xf) << 1;\r
 949                         while((code >>= 1)) i++;\r
 950                         strcat(name, names_short[i]);\r
 951                 }\r
 952                 return name;\r
 953         }\r
 954 }\r
 955 \r
 956 static void draw_menu_options(int menu_sel)\r
 957 {\r
 958         int tl_x = 25, tl_y = 32, y;\r
 959         char monostereo[8], strframeskip[8], *strrend, *strscaling, *strssconfirm;\r
 960 \r
 961         strcpy(monostereo, (currentConfig.PicoOpt&0x08)?"stereo":"mono");\r
 962         if (currentConfig.Frameskip < 0)\r
 963                  strcpy(strframeskip, "Auto");\r
 964         else sprintf(strframeskip, "%i", currentConfig.Frameskip);\r
 965         if (currentConfig.PicoOpt&0x10) {\r
 966                 strrend = " 8bit fast";\r
 967         } else if (currentConfig.EmuOpt&0x80) {\r
 968                 strrend = "16bit accurate";\r
 969         } else {\r
 970                 strrend = " 8bit accurate";\r
 971         }\r
 972         switch (currentConfig.scaling) {\r
 973                 default: strscaling = "            OFF";   break;\r
 974                 case 1:  strscaling = "hw horizontal";     break;\r
 975                 case 2:  strscaling = "hw horiz. + vert."; break;\r
 976                 case 3:  strscaling = "sw horizontal";     break;\r
 977         }\r
 978         switch ((currentConfig.EmuOpt >> 9) & 5) {\r
 979                 default: strssconfirm = "OFF";    break;\r
 980                 case 1:  strssconfirm = "writes"; break;\r
 981                 case 4:  strssconfirm = "loads";  break;\r
 982                 case 5:  strssconfirm = "both";   break;\r
 983         }\r
 984 \r
 985         y = tl_y;\r
 986         //memset(gp2x_screen, 0, 320*240);\r
 987         gp2x_pd_clone_buffer2();\r
 988 \r
 989         gp2x_text_out8(tl_x, y,       "Renderer:            %s", strrend); // 0\r
 990         gp2x_text_out8(tl_x, (y+=10), "Scaling:       %s", strscaling);    // 1\r
 991         gp2x_text_out8(tl_x, (y+=10), "Accurate timing (slower)   %s", (currentConfig.PicoOpt&0x040)?"ON":"OFF"); // 2\r
 992         gp2x_text_out8(tl_x, (y+=10), "Accurate sprites (slower)  %s", (currentConfig.PicoOpt&0x080)?"ON":"OFF"); // 3\r
 993         gp2x_text_out8(tl_x, (y+=10), "Show FPS                   %s", (currentConfig.EmuOpt &0x002)?"ON":"OFF"); // 4\r
 994         gp2x_text_out8(tl_x, (y+=10), "Frameskip                  %s", strframeskip);\r
 995         gp2x_text_out8(tl_x, (y+=10), "Enable sound               %s", (currentConfig.EmuOpt &0x004)?"ON":"OFF"); // 6\r
 996         gp2x_text_out8(tl_x, (y+=10), "Sound Quality:     %5iHz %s",   currentConfig.PsndRate, monostereo);\r
 997         gp2x_text_out8(tl_x, (y+=10), "Use ARM940 core for sound  %s", (currentConfig.PicoOpt&0x200)?"ON":"OFF"); // 8\r
 998         gp2x_text_out8(tl_x, (y+=10), "6 button pad               %s", (currentConfig.PicoOpt&0x020)?"ON":"OFF"); // 9\r
 999         gp2x_text_out8(tl_x, (y+=10), "Genesis Region:      %s",       region_name(currentConfig.PicoRegion));\r
1000         gp2x_text_out8(tl_x, (y+=10), "Use SRAM/BRAM savestates   %s", (currentConfig.EmuOpt &0x001)?"ON":"OFF"); // 11\r
1001         gp2x_text_out8(tl_x, (y+=10), "Confirm savestate          %s", strssconfirm); // 12\r
1002         gp2x_text_out8(tl_x, (y+=10), "Save slot                  %i", state_slot); // 13\r
1003         gp2x_text_out8(tl_x, (y+=10), "GP2X CPU clocks            %iMhz", currentConfig.CPUclock);\r
1004         gp2x_text_out8(tl_x, (y+=10), "[Sega/Mega CD options]");\r
1005         gp2x_text_out8(tl_x, (y+=10), "[advanced options]");            // 16\r
1006         gp2x_text_out8(tl_x, (y+=10), "Save cfg as default");\r
1007         if (rom_data)\r
1008                 gp2x_text_out8(tl_x, (y+=10), "Save cfg for current game only");\r
1009 \r
1010         // draw cursor\r
1011         gp2x_text_out8(tl_x - 16, tl_y + menu_sel*10, ">");\r
1012 \r
1013         gp2x_video_flip2();\r
1014 }\r
1015 \r
1016 static int sndrate_prevnext(int rate, int dir)\r
1017 {\r
1018         int i, rates[] = { 8000, 11025, 16000, 22050, 44100 };\r
1019 \r
1020         for (i = 0; i < 5; i++)\r
1021                 if (rates[i] == rate) break;\r
1022 \r
1023         i += dir ? 1 : -1;\r
1024         if (i > 4) return dir ? 44100 : 22050;\r
1025         if (i < 0) return dir ? 11025 : 8000;\r
1026         return rates[i];\r
1027 }\r
1028 \r
1029 static void region_prevnext(int right)\r
1030 {\r
1031         // jp_ntsc=1, jp_pal=2, usa=4, eu=8\r
1032         static int rgn_orders[] = { 0x148, 0x184, 0x814, 0x418, 0x841, 0x481 };\r
1033         int i;\r
1034         if (right) {\r
1035                 if (!currentConfig.PicoRegion) {\r
1036                         for (i = 0; i < 6; i++)\r
1037                                 if (rgn_orders[i] == PicoAutoRgnOrder) break;\r
1038                         if (i < 5) PicoAutoRgnOrder = rgn_orders[i+1];\r
1039                         else currentConfig.PicoRegion=1;\r
1040                 }\r
1041                 else currentConfig.PicoRegion<<=1;\r
1042                 if (currentConfig.PicoRegion > 8) currentConfig.PicoRegion = 8;\r
1043         } else {\r
1044                 if (!currentConfig.PicoRegion) {\r
1045                         for (i = 0; i < 6; i++)\r
1046                                 if (rgn_orders[i] == PicoAutoRgnOrder) break;\r
1047                         if (i > 0) PicoAutoRgnOrder = rgn_orders[i-1];\r
1048                 }\r
1049                 else currentConfig.PicoRegion>>=1;\r
1050         }\r
1051 }\r
1052 \r
1053 static void menu_options_save(void)\r
1054 {\r
1055         PicoOpt = currentConfig.PicoOpt;\r
1056         PsndRate = currentConfig.PsndRate;\r
1057         PicoRegionOverride = currentConfig.PicoRegion;\r
1058         if (PicoOpt & 0x20) {\r
1059                 actionNames[ 8] = "Z"; actionNames[ 9] = "Y";\r
1060                 actionNames[10] = "X"; actionNames[11] = "MODE";\r
1061         } else {\r
1062                 actionNames[8] = actionNames[9] = actionNames[10] = actionNames[11] = 0;\r
1063         }\r
1064         scaling_update();\r
1065 }\r
1066 \r
1067 static int menu_loop_options(void)\r
1068 {\r
1069         int menu_sel = 0, menu_sel_max = 17;\r
1070         unsigned long inp = 0;\r
1071 \r
1072         if (rom_data) menu_sel_max++;\r
1073         currentConfig.PicoOpt = PicoOpt;\r
1074         currentConfig.PsndRate = PsndRate;\r
1075         currentConfig.PicoRegion = PicoRegionOverride;\r
1076 \r
1077         for(;;)\r
1078         {\r
1079                 draw_menu_options(menu_sel);\r
1080                 inp = wait_for_input(GP2X_UP|GP2X_DOWN|GP2X_LEFT|GP2X_RIGHT|GP2X_B|GP2X_X|GP2X_A);\r
1081                 if(inp & GP2X_UP  ) { menu_sel--; if (menu_sel < 0) menu_sel = menu_sel_max; }\r
1082                 if(inp & GP2X_DOWN) { menu_sel++; if (menu_sel > menu_sel_max) menu_sel = 0; }\r
1083                 if((inp& GP2X_B)||(inp&GP2X_LEFT)||(inp&GP2X_RIGHT)) { // toggleable options\r
1084                         switch (menu_sel) {\r
1085                                 case  2: currentConfig.PicoOpt^=0x040; break;\r
1086                                 case  3: currentConfig.PicoOpt^=0x080; break;\r
1087                                 case  4: currentConfig.EmuOpt ^=0x002; break;\r
1088                                 case  6: currentConfig.EmuOpt ^=0x004; break;\r
1089                                 case  8: currentConfig.PicoOpt^=0x200; break;\r
1090                                 case  9: currentConfig.PicoOpt^=0x020; break;\r
1091                                 case 11: currentConfig.EmuOpt ^=0x001; break;\r
1092                                 case 15: cd_menu_loop_options();\r
1093                                         if (engineState == PGS_ReloadRom)\r
1094                                                 return 0; // test BIOS\r
1095                                         break;\r
1096                                 case 16: amenu_loop_options();    break;\r
1097                                 case 17: // done (update and write)\r
1098                                         menu_options_save();\r
1099                                         if (emu_WriteConfig(0)) strcpy(menuErrorMsg, "config saved");\r
1100                                         else strcpy(menuErrorMsg, "failed to write config");\r
1101                                         return 1;\r
1102                                 case 18: // done (update and write for current game)\r
1103                                         menu_options_save();\r
1104                                         if (emu_WriteConfig(1)) strcpy(menuErrorMsg, "config saved");\r
1105                                         else strcpy(menuErrorMsg, "failed to write config");\r
1106                                         return 1;\r
1107                         }\r
1108                 }\r
1109                 if(inp & (GP2X_X|GP2X_A)) {\r
1110                         menu_options_save();\r
1111                         return 0;  // done (update, no write)\r
1112                 }\r
1113                 if(inp & (GP2X_LEFT|GP2X_RIGHT)) { // multi choise\r
1114                         switch (menu_sel) {\r
1115                                 case  0:\r
1116                                         if (inp & GP2X_LEFT) {\r
1117                                                 if      (  currentConfig.PicoOpt&0x10) currentConfig.PicoOpt&= ~0x10;\r
1118                                                 else if (!(currentConfig.EmuOpt &0x80))currentConfig.EmuOpt |=  0x80;\r
1119                                                 else if (  currentConfig.EmuOpt &0x80) break;\r
1120                                         } else {\r
1121                                                 if      (  currentConfig.PicoOpt&0x10) break;\r
1122                                                 else if (!(currentConfig.EmuOpt &0x80))currentConfig.PicoOpt|=  0x10;\r
1123                                                 else if (  currentConfig.EmuOpt &0x80) currentConfig.EmuOpt &= ~0x80;\r
1124                                         }\r
1125                                         break;\r
1126                                 case  1:\r
1127                                         currentConfig.scaling += (inp & GP2X_LEFT) ? -1 : 1;\r
1128                                         if (currentConfig.scaling < 0) currentConfig.scaling = 0;\r
1129                                         if (currentConfig.scaling > 3) currentConfig.scaling = 3;\r
1130                                         break;\r
1131                                 case  5:\r
1132                                         currentConfig.Frameskip += (inp & GP2X_LEFT) ? -1 : 1;\r
1133                                         if (currentConfig.Frameskip < 0)  currentConfig.Frameskip = -1;\r
1134                                         if (currentConfig.Frameskip > 32) currentConfig.Frameskip = 32;\r
1135                                         break;\r
1136                                 case  7:\r
1137                                         if ((inp & GP2X_RIGHT) && currentConfig.PsndRate == 44100 && !(currentConfig.PicoOpt&0x08)) {\r
1138                                                 currentConfig.PsndRate = 8000;  currentConfig.PicoOpt|= 0x08;\r
1139                                         } else if ((inp & GP2X_LEFT) && currentConfig.PsndRate == 8000 && (currentConfig.PicoOpt&0x08)) {\r
1140                                                 currentConfig.PsndRate = 44100; currentConfig.PicoOpt&=~0x08;\r
1141                                         } else currentConfig.PsndRate = sndrate_prevnext(currentConfig.PsndRate, inp & GP2X_RIGHT);\r
1142                                         break;\r
1143                                 case 10:\r
1144                                         region_prevnext(inp & GP2X_RIGHT);\r
1145                                         break;\r
1146                                 case 12: {\r
1147                                         int n = ((currentConfig.EmuOpt>>9)&1) | ((currentConfig.EmuOpt>>10)&2);\r
1148                                         n += (inp & GP2X_LEFT) ? -1 : 1;\r
1149                                         if (n < 0) n = 0; else if (n > 3) n = 3;\r
1150                                         n |= n << 1; n &= ~2;\r
1151                                         currentConfig.EmuOpt &= ~0xa00;\r
1152                                         currentConfig.EmuOpt |= n << 9;\r
1153                                         break;\r
1154                                 }\r
1155                                 case 13:\r
1156                                         if (inp & GP2X_RIGHT) {\r
1157                                                 state_slot++; if (state_slot > 9) state_slot = 0;\r
1158                                         } else {state_slot--; if (state_slot < 0) state_slot = 9;\r
1159                                         }\r
1160                                         break;\r
1161                                 case 14:\r
1162                                         while ((inp = gp2x_joystick_read(1)) & (GP2X_LEFT|GP2X_RIGHT)) {\r
1163                                                 currentConfig.CPUclock += (inp & GP2X_LEFT) ? -1 : 1;\r
1164                                                 if (currentConfig.CPUclock < 1) currentConfig.CPUclock = 1;\r
1165                                                 draw_menu_options(menu_sel);\r
1166                                                 usleep(50*1000);\r
1167                                         }\r
1168                                         break;\r
1169                         }\r
1170                 }\r
1171         }\r
1172 }\r
1173 \r
1174 // -------------- credits --------------\r
1175 \r
1176 static void draw_menu_credits(void)\r
1177 {\r
1178         int tl_x = 15, tl_y = 70, y;\r
1179         //memset(gp2x_screen, 0, 320*240);\r
1180         gp2x_pd_clone_buffer2();\r
1181 \r
1182         gp2x_text_out8(tl_x, 20, "PicoDrive v" VERSION " (c) notaz, 2006,2007");\r
1183         y = tl_y;\r
1184         gp2x_text_out8(tl_x, y, "Credits:");\r
1185         gp2x_text_out8(tl_x, (y+=10), "Dave: Cyclone 68000 core,");\r
1186         gp2x_text_out8(tl_x, (y+=10), "      base code of PicoDrive");\r
1187         gp2x_text_out8(tl_x, (y+=10), "Reesy & FluBBa: DrZ80 core");\r
1188         gp2x_text_out8(tl_x, (y+=10), "MAME devs: YM2612 and SN76496 cores");\r
1189         gp2x_text_out8(tl_x, (y+=10), "Charles MacDonald: Genesis hw docs");\r
1190         gp2x_text_out8(tl_x, (y+=10), "Stephane Dallongeville:");\r
1191         gp2x_text_out8(tl_x, (y+=10), "      opensource Gens");\r
1192         gp2x_text_out8(tl_x, (y+=10), "Haze: Genesis hw info");\r
1193         gp2x_text_out8(tl_x, (y+=10), "rlyeh and others: minimal SDK");\r
1194         gp2x_text_out8(tl_x, (y+=10), "Squidge: squidgehack");\r
1195         gp2x_text_out8(tl_x, (y+=10), "Dzz: ARM940 sample");\r
1196         gp2x_text_out8(tl_x, (y+=10), "GnoStiC / Puck2099: USB joystick");\r
1197         gp2x_text_out8(tl_x, (y+=10), "craigix: GP2X hardware");\r
1198 \r
1199         gp2x_video_flip2();\r
1200 }\r
1201 \r
1202 \r
1203 // -------------- root menu --------------\r
1204 \r
1205 static void draw_menu_root(int menu_sel)\r
1206 {\r
1207         int tl_x = 70, tl_y = 70, y;\r
1208         //memset(gp2x_screen, 0, 320*240);\r
1209         gp2x_pd_clone_buffer2();\r
1210 \r
1211         gp2x_text_out8(tl_x, 20, "PicoDrive v" VERSION);\r
1212 \r
1213         y = tl_y;\r
1214         if (rom_data) {\r
1215                 gp2x_text_out8(tl_x, y,       "Resume game");\r
1216                 gp2x_text_out8(tl_x, (y+=10), "Save State");\r
1217                 gp2x_text_out8(tl_x, (y+=10), "Load State");\r
1218                 gp2x_text_out8(tl_x, (y+=10), "Reset game");\r
1219         } else {\r
1220                 y += 30;\r
1221         }\r
1222         gp2x_text_out8(tl_x, (y+=10), "Load new ROM/ISO");\r
1223         gp2x_text_out8(tl_x, (y+=10), "Change options");\r
1224         gp2x_text_out8(tl_x, (y+=10), "Configure controls");\r
1225         gp2x_text_out8(tl_x, (y+=10), "Credits");\r
1226         gp2x_text_out8(tl_x, (y+=10), "Exit");\r
1227         if (PicoPatches)\r
1228                 gp2x_text_out8(tl_x, (y+=10), "Patches / GameGenie");\r
1229 \r
1230         // draw cursor\r
1231         gp2x_text_out8(tl_x - 16, tl_y + menu_sel*10, ">");\r
1232         // error\r
1233         if (menuErrorMsg[0]) gp2x_text_out8(5, 226, menuErrorMsg);\r
1234         gp2x_video_flip2();\r
1235 }\r
1236 \r
1237 \r
1238 static void menu_loop_root(void)\r
1239 {\r
1240         int ret, menu_sel = 4, menu_sel_max = 8, menu_sel_min = 4;\r
1241         unsigned long inp = 0;\r
1242         char curr_path[PATH_MAX], *selfname;\r
1243         FILE *tstf;\r
1244 \r
1245         if ( (tstf = fopen(currentConfig.lastRomFile, "rb")) )\r
1246         {\r
1247                 fclose(tstf);\r
1248                 strcpy(curr_path, currentConfig.lastRomFile);\r
1249         }\r
1250         else\r
1251         {\r
1252                 getcwd(curr_path, PATH_MAX);\r
1253         }\r
1254 \r
1255         if (rom_data) menu_sel = menu_sel_min = 0;\r
1256         if (PicoPatches) menu_sel_max = 9;\r
1257 \r
1258         /* make sure action buttons are not pressed on entering menu */\r
1259         draw_menu_root(menu_sel);\r
1260         while (gp2x_joystick_read(1) & (GP2X_B|GP2X_X|GP2X_SELECT)) usleep(50*1000);\r
1261 \r
1262         for (;;)\r
1263         {\r
1264                 draw_menu_root(menu_sel);\r
1265                 inp = wait_for_input(GP2X_UP|GP2X_DOWN|GP2X_B|GP2X_X|GP2X_SELECT);\r
1266                 if(inp & GP2X_UP  )  { menu_sel--; if (menu_sel < menu_sel_min) menu_sel = menu_sel_max; }\r
1267                 if(inp & GP2X_DOWN)  { menu_sel++; if (menu_sel > menu_sel_max) menu_sel = menu_sel_min; }\r
1268                 if(inp &(GP2X_SELECT|GP2X_X)){\r
1269                         if (rom_data) {\r
1270                                 while (gp2x_joystick_read(1) & (GP2X_SELECT|GP2X_X)) usleep(50*1000); // wait until select is released\r
1271                                 engineState = PGS_Running;\r
1272                                 break;\r
1273                         }\r
1274                 }\r
1275                 if(inp & GP2X_B   )  {\r
1276                         switch (menu_sel) {\r
1277                                 case 0: // resume game\r
1278                                         if (rom_data) {\r
1279                                                 while (gp2x_joystick_read(1) & GP2X_B) usleep(50*1000);\r
1280                                                 engineState = PGS_Running;\r
1281                                                 return;\r
1282                                         }\r
1283                                         break;\r
1284                                 case 1: // save state\r
1285                                         if (rom_data) {\r
1286                                                 if(savestate_menu_loop(0))\r
1287                                                         continue;\r
1288                                                 engineState = PGS_Running;\r
1289                                                 return;\r
1290                                         }\r
1291                                         break;\r
1292                                 case 2: // load state\r
1293                                         if (rom_data) {\r
1294                                                 if(savestate_menu_loop(1))\r
1295                                                         continue;\r
1296                                                 engineState = PGS_Running;\r
1297                                                 return;\r
1298                                         }\r
1299                                         break;\r
1300                                 case 3: // reset game\r
1301                                         if (rom_data) {\r
1302                                                 emu_ResetGame();\r
1303                                                 engineState = PGS_Running;\r
1304                                                 return;\r
1305                                         }\r
1306                                         break;\r
1307                                 case 4: // select rom\r
1308                                         selfname = romsel_loop(curr_path);\r
1309                                         if (selfname) {\r
1310                                                 printf("selected file: %s\n", selfname);\r
1311                                                 engineState = PGS_ReloadRom;\r
1312                                         }\r
1313                                         return;\r
1314                                 case 5: // options\r
1315                                         ret = menu_loop_options();\r
1316                                         if (ret == 1) continue; // status update\r
1317                                         if (engineState == PGS_ReloadRom)\r
1318                                                 return; // BIOS test\r
1319                                         break;\r
1320                                 case 6: // controls\r
1321                                         kc_sel_loop();\r
1322                                         break;\r
1323                                 case 7: // credits\r
1324                                         draw_menu_credits();\r
1325                                         usleep(500*1000);\r
1326                                         inp = wait_for_input(GP2X_B|GP2X_X);\r
1327                                         break;\r
1328                                 case 8: // exit\r
1329                                         engineState = PGS_Quit;\r
1330                                         return;\r
1331                                 case 9: // patches/gg\r
1332                                         if (rom_data && PicoPatches) {\r
1333                                                 patches_menu_loop();\r
1334                                                 PicoPatchApply();\r
1335                                                 strcpy(menuErrorMsg, "Patches applied");\r
1336                                                 continue;\r
1337                                         }\r
1338                                         break;\r
1339                         }\r
1340                 }\r
1341                 menuErrorMsg[0] = 0; // clear error msg\r
1342         }\r
1343 }\r
1344 \r
1345 \r
1346 static void menu_prepare_bg(void)\r
1347 {\r
1348         extern int localPal[0x100];\r
1349         int c, i;\r
1350 \r
1351         // don't clear old palette just for fun (but make it dark)\r
1352         for (i = 0x100-1; i >= 0; i--) {\r
1353                 c = localPal[i];\r
1354                 localPal[i] = ((c >> 1) & 0x007f7f7f) - ((c >> 3) & 0x001f1f1f);\r
1355         }\r
1356         localPal[0xe0] = 0x00000000; // reserved pixels for OSD\r
1357         localPal[0xf0] = 0x00ffffff;\r
1358 \r
1359         gp2x_video_setpalette(localPal, 0x100);\r
1360 }\r
1361 \r
1362 static void menu_gfx_prepare(void)\r
1363 {\r
1364         menu_prepare_bg();\r
1365 \r
1366         // switch to 8bpp\r
1367         gp2x_video_changemode2(8);\r
1368         gp2x_video_RGB_setscaling(0, 320, 240);\r
1369         gp2x_video_flip2();\r
1370 }\r
1371 \r
1372 \r
1373 void menu_loop(void)\r
1374 {\r
1375         menu_gfx_prepare();\r
1376 \r
1377         menu_loop_root();\r
1378 \r
1379         menuErrorMsg[0] = 0;\r
1380 }\r
1381 \r
1382 \r
1383 // --------- CD tray close menu ----------\r
1384 \r
1385 static void draw_menu_tray(int menu_sel)\r
1386 {\r
1387         int tl_x = 70, tl_y = 90, y;\r
1388         memset(gp2x_screen, 0xe0, 320*240);\r
1389 \r
1390         gp2x_text_out8(tl_x, 20, "The unit is about to");\r
1391         gp2x_text_out8(tl_x, 30, "close the CD tray.");\r
1392 \r
1393         y = tl_y;\r
1394         gp2x_text_out8(tl_x, y,       "Load new CD image");\r
1395         gp2x_text_out8(tl_x, (y+=10), "Insert nothing");\r
1396 \r
1397         // draw cursor\r
1398         gp2x_text_out8(tl_x - 16, tl_y + menu_sel*10, ">");\r
1399         // error\r
1400         if (menuErrorMsg[0]) gp2x_text_out8(5, 226, menuErrorMsg);\r
1401         gp2x_video_flip2();\r
1402 }\r
1403 \r
1404 \r
1405 int menu_loop_tray(void)\r
1406 {\r
1407         int menu_sel = 0, menu_sel_max = 1;\r
1408         unsigned long inp = 0;\r
1409         char curr_path[PATH_MAX], *selfname;\r
1410         FILE *tstf;\r
1411 \r
1412         gp2x_memset_all_buffers(0, 0xe0, 320*240);\r
1413         menu_gfx_prepare();\r
1414 \r
1415         if ( (tstf = fopen(currentConfig.lastRomFile, "rb")) )\r
1416         {\r
1417                 fclose(tstf);\r
1418                 strcpy(curr_path, currentConfig.lastRomFile);\r
1419         }\r
1420         else\r
1421         {\r
1422                 getcwd(curr_path, PATH_MAX);\r
1423         }\r
1424 \r
1425         /* make sure action buttons are not pressed on entering menu */\r
1426         draw_menu_tray(menu_sel);\r
1427         while (gp2x_joystick_read(1) & GP2X_B) usleep(50*1000);\r
1428 \r
1429         for (;;)\r
1430         {\r
1431                 draw_menu_tray(menu_sel);\r
1432                 inp = wait_for_input(GP2X_UP|GP2X_DOWN|GP2X_B);\r
1433                 if(inp & GP2X_UP  )  { menu_sel--; if (menu_sel < 0) menu_sel = menu_sel_max; }\r
1434                 if(inp & GP2X_DOWN)  { menu_sel++; if (menu_sel > menu_sel_max) menu_sel = 0; }\r
1435                 if(inp & GP2X_B   )  {\r
1436                         switch (menu_sel) {\r
1437                                 case 0: // select image\r
1438                                         selfname = romsel_loop(curr_path);\r
1439                                         if (selfname) {\r
1440                                                 int ret = -1, cd_type;\r
1441                                                 cd_type = emu_cd_check(NULL);\r
1442                                                 if (cd_type > 0)\r
1443                                                         ret = Insert_CD(romFileName, cd_type == 2);\r
1444                                                 if (ret != 0) {\r
1445                                                         sprintf(menuErrorMsg, "Load failed, invalid CD image?");\r
1446                                                         printf("%s\n", menuErrorMsg);\r
1447                                                         continue;\r
1448                                                 }\r
1449                                                 engineState = PGS_RestartRun;\r
1450                                                 return 1;\r
1451                                         }\r
1452                                         break;\r
1453                                 case 1: // insert nothing\r
1454                                         engineState = PGS_RestartRun;\r
1455                                         return 0;\r
1456                         }\r
1457                 }\r
1458                 menuErrorMsg[0] = 0; // clear error msg\r
1459         }\r
1460 }\r
1461 \r
1462 \r