frontend/menu.c

   1 /*
   2  * (C) Gražvydas "notaz" Ignotas, 2010-2011
   3  *
   4  * This work is licensed under the terms of any of these licenses
   5  * (at your option):
   6  *  - GNU GPL, version 2 or later.
   7  *  - GNU LGPL, version 2.1 or later.
   8  * See the COPYING file in the top-level directory.
   9  */
  10
  11 #include <stdio.h>
  12 #include <string.h>
  13 #include <errno.h>
  14 #include <dlfcn.h>
  15 #include <zlib.h>
  16
  17 #include "main.h"
  18 #include "menu.h"
  19 #include "config.h"
  20 #include "plugin.h"
  21 #include "plugin_lib.h"
  22 #include "omap.h"
  23 #include "common/plat.h"
  24 #include "../libpcsxcore/misc.h"
  25 #include "../libpcsxcore/cdrom.h"
  26 #include "../libpcsxcore/psemu_plugin_defs.h"
  27 #include "../plugins/dfinput/pad.h"
  28 #include "revision.h"
  29
  30 #define MENU_X2 1
  31 #define array_size(x) (sizeof(x) / sizeof(x[0]))
  32
  33 typedef enum
  34 {
  35         MA_NONE = 1,
  36         MA_MAIN_RESUME_GAME,
  37         MA_MAIN_SAVE_STATE,
  38         MA_MAIN_LOAD_STATE,
  39         MA_MAIN_RESET_GAME,
  40         MA_MAIN_LOAD_ROM,
  41         MA_MAIN_SWAP_CD,
  42         MA_MAIN_RUN_BIOS,
  43         MA_MAIN_CONTROLS,
  44         MA_MAIN_CREDITS,
  45         MA_MAIN_EXIT,
  46         MA_CTRL_PLAYER1,
  47         MA_CTRL_PLAYER2,
  48         MA_CTRL_EMU,
  49         MA_CTRL_DEV_FIRST,
  50         MA_CTRL_DEV_NEXT,
  51         MA_CTRL_DONE,
  52         MA_OPT_SAVECFG,
  53         MA_OPT_SAVECFG_GAME,
  54         MA_OPT_CPU_CLOCKS,
  55         MA_OPT_FILTERING,
  56 } menu_id;
  57
  58 enum {
  59         SCALE_1_1,
  60         SCALE_4_3,
  61         SCALE_FULLSCREEN,
  62         SCALE_CUSTOM,
  63 };
  64
  65 static int last_psx_w, last_psx_h, last_psx_bpp;
  66 static int scaling, filter, cpu_clock, cpu_clock_st;
  67 static char rom_fname_reload[MAXPATHLEN];
  68 static char last_selected_fname[MAXPATHLEN];
  69 static int region, in_type_sel;
  70 int g_opts;
  71
  72 // from softgpu plugin
  73 extern int iUseDither;
  74 extern int UseFrameSkip;
  75 extern uint32_t dwActFixes;
  76 extern float fFrameRateHz;
  77 extern int dwFrameRateTicks;
  78
  79 // sound plugin
  80 extern int iUseReverb;
  81 extern int iUseInterpolation;
  82 extern int iXAPitch;
  83 extern int iSPUIRQWait;
  84 extern int iUseTimer;
  85
  86 static const char *bioses[24];
  87 static const char *gpu_plugins[16];
  88 static const char *spu_plugins[16];
  89 static int bios_sel, gpu_plugsel, spu_plugsel;
  90
  91
  92 static int min(int x, int y) { return x < y ? x : y; }
  93 static int max(int x, int y) { return x > y ? x : y; }
  94
  95 void emu_make_path(char *buff, const char *end, int size)
  96 {
  97         int pos, end_len;
  98
  99         end_len = strlen(end);
 100         pos = plat_get_root_dir(buff, size);
 101         strncpy(buff + pos, end, size - pos);
 102         buff[size - 1] = 0;
 103         if (pos + end_len > size - 1)
 104                 printf("Warning: path truncated: %s\n", buff);
 105 }
 106
 107 static int emu_check_save_file(int slot)
 108 {
 109         int ret = emu_check_state(slot);
 110         return ret == 0 ? 1 : 0;
 111 }
 112
 113 static int emu_save_load_game(int load, int unused)
 114 {
 115         int ret;
 116
 117         if (load) {
 118                 ret = emu_load_state(state_slot);
 119
 120                 // reflect hle/bios mode from savestate
 121                 if (Config.HLE)
 122                         bios_sel = 0;
 123                 else if (bios_sel == 0 && bioses[1] != NULL)
 124                         // XXX: maybe find the right bios instead
 125                         bios_sel = 1;
 126         }
 127         else
 128                 ret = emu_save_state(state_slot);
 129
 130         return ret;
 131 }
 132
 133 // propagate menu settings to the emu vars
 134 static void menu_sync_config(void)
 135 {
 136         Config.PsxAuto = 1;
 137         if (region > 0) {
 138                 Config.PsxAuto = 0;
 139                 Config.PsxType = region - 1;
 140         }
 141         in_type = in_type_sel ? PSE_PAD_TYPE_ANALOGPAD : PSE_PAD_TYPE_STANDARD;
 142
 143         pl_frame_interval = Config.PsxType ? 20000 : 16667;
 144         // used by P.E.Op.S. frameskip code
 145         fFrameRateHz = Config.PsxType ? 50.0f : 59.94f;
 146         dwFrameRateTicks = (100000*100 / (unsigned long)(fFrameRateHz*100));
 147 }
 148
 149 static void menu_set_defconfig(void)
 150 {
 151         g_opts = 0;
 152         scaling = SCALE_4_3;
 153
 154         region = 0;
 155         in_type_sel = 0;
 156         Config.Xa = Config.Cdda = Config.Sio =
 157         Config.SpuIrq = Config.RCntFix = Config.VSyncWA = 0;
 158
 159         iUseDither = 0;
 160         UseFrameSkip = 1;
 161         dwActFixes = 1<<7;
 162
 163         iUseReverb = 2;
 164         iUseInterpolation = 1;
 165         iXAPitch = 0;
 166         iSPUIRQWait = 1;
 167         iUseTimer = 2;
 168
 169         menu_sync_config();
 170 }
 171
 172 #define CE_CONFIG_STR(val) \
 173         { #val, 0, Config.val }
 174
 175 #define CE_CONFIG_VAL(val) \
 176         { #val, sizeof(Config.val), &Config.val }
 177
 178 #define CE_STR(val) \
 179         { #val, 0, val }
 180
 181 #define CE_INTVAL(val) \
 182         { #val, sizeof(val), &val }
 183
 184 // 'versioned' var, used when defaults change
 185 #define CE_INTVAL_V(val, ver) \
 186         { #val #ver, sizeof(val), &val }
 187
 188 static const struct {
 189         const char *name;
 190         size_t len;
 191         void *val;
 192 } config_data[] = {
 193         CE_CONFIG_STR(Bios),
 194         CE_CONFIG_STR(Gpu),
 195         CE_CONFIG_STR(Spu),
 196 //      CE_CONFIG_STR(Cdr),
 197         CE_CONFIG_VAL(Xa),
 198         CE_CONFIG_VAL(Sio),
 199         CE_CONFIG_VAL(Mdec),
 200         CE_CONFIG_VAL(Cdda),
 201         CE_CONFIG_VAL(Debug),
 202         CE_CONFIG_VAL(PsxOut),
 203         CE_CONFIG_VAL(SpuIrq),
 204         CE_CONFIG_VAL(RCntFix),
 205         CE_CONFIG_VAL(VSyncWA),
 206         CE_CONFIG_VAL(Cpu),
 207         CE_INTVAL(region),
 208         CE_INTVAL(scaling),
 209         CE_INTVAL(g_layer_x),
 210         CE_INTVAL(g_layer_y),
 211         CE_INTVAL(g_layer_w),
 212         CE_INTVAL(g_layer_h),
 213         CE_INTVAL(filter),
 214         CE_INTVAL(state_slot),
 215         CE_INTVAL(cpu_clock),
 216         CE_INTVAL(g_opts),
 217         CE_INTVAL(in_type_sel),
 218         CE_INTVAL(iUseDither),
 219         CE_INTVAL(UseFrameSkip),
 220         CE_INTVAL(dwActFixes),
 221         CE_INTVAL(iUseReverb),
 222         CE_INTVAL(iXAPitch),
 223         CE_INTVAL_V(iUseInterpolation, 2),
 224         CE_INTVAL_V(iSPUIRQWait, 2),
 225         CE_INTVAL(iUseTimer),
 226 };
 227
 228 static char *get_cd_label(void)
 229 {
 230         static char trimlabel[33];
 231         int j;
 232
 233         strncpy(trimlabel, CdromLabel, 32);
 234         trimlabel[32] = 0;
 235         for (j = 31; j >= 0; j--)
 236                 if (trimlabel[j] == ' ')
 237                         trimlabel[j] = 0;
 238
 239         return trimlabel;
 240 }
 241
 242 static void make_cfg_fname(char *buf, size_t size, int is_game)
 243 {
 244         if (is_game)
 245                 snprintf(buf, size, "." PCSX_DOT_DIR "cfg/%.32s-%.9s.cfg", get_cd_label(), CdromId);
 246         else
 247                 snprintf(buf, size, "." PCSX_DOT_DIR "%s", cfgfile_basename);
 248 }
 249
 250 static void keys_write_all(FILE *f);
 251
 252 static int menu_write_config(int is_game)
 253 {
 254         char cfgfile[MAXPATHLEN];
 255         FILE *f;
 256         int i;
 257
 258         make_cfg_fname(cfgfile, sizeof(cfgfile), is_game);
 259         f = fopen(cfgfile, "w");
 260         if (f == NULL) {
 261                 printf("menu_write_config: failed to open: %s\n", cfgfile);
 262                 return -1;
 263         }
 264
 265         for (i = 0; i < ARRAY_SIZE(config_data); i++) {
 266                 fprintf(f, "%s = ", config_data[i].name);
 267                 switch (config_data[i].len) {
 268                 case 0:
 269                         fprintf(f, "%s\n", (char *)config_data[i].val);
 270                         break;
 271                 case 1:
 272                         fprintf(f, "%x\n", *(u8 *)config_data[i].val);
 273                         break;
 274                 case 2:
 275                         fprintf(f, "%x\n", *(u16 *)config_data[i].val);
 276                         break;
 277                 case 4:
 278                         fprintf(f, "%x\n", *(u32 *)config_data[i].val);
 279                         break;
 280                 default:
 281                         printf("menu_write_config: unhandled len %d for %s\n",
 282                                  config_data[i].len, config_data[i].name);
 283                         break;
 284                 }
 285         }
 286
 287         if (!is_game)
 288                 fprintf(f, "lastcdimg = %s\n", last_selected_fname);
 289
 290         keys_write_all(f);
 291         fclose(f);
 292
 293         return 0;
 294 }
 295
 296 static void parse_str_val(char *cval, const char *src)
 297 {
 298         char *tmp;
 299         strncpy(cval, src, MAXPATHLEN);
 300         cval[MAXPATHLEN - 1] = 0;
 301         tmp = strchr(cval, '\n');
 302         if (tmp == NULL)
 303                 tmp = strchr(cval, '\r');
 304         if (tmp != NULL)
 305                 *tmp = 0;
 306 }
 307
 308 static void keys_load_all(const char *cfg);
 309
 310 static int menu_load_config(int is_game)
 311 {
 312         char cfgfile[MAXPATHLEN];
 313         int i, ret = -1;
 314         long size;
 315         char *cfg;
 316         FILE *f;
 317
 318         make_cfg_fname(cfgfile, sizeof(cfgfile), is_game);
 319         f = fopen(cfgfile, "r");
 320         if (f == NULL) {
 321                 printf("menu_load_config: failed to open: %s\n", cfgfile);
 322                 return -1;
 323         }
 324
 325         fseek(f, 0, SEEK_END);
 326         size = ftell(f);
 327         if (size <= 0) {
 328                 printf("bad size %ld: %s\n", size, cfgfile);
 329                 goto fail;
 330         }
 331
 332         cfg = malloc(size + 1);
 333         if (cfg == NULL)
 334                 goto fail;
 335
 336         fseek(f, 0, SEEK_SET);
 337         if (fread(cfg, 1, size, f) != size) {
 338                 printf("failed to read: %s\n", cfgfile);
 339                 goto fail_read;
 340         }
 341         cfg[size] = 0;
 342
 343         for (i = 0; i < ARRAY_SIZE(config_data); i++) {
 344                 char *tmp, *tmp2;
 345                 u32 val;
 346
 347                 tmp = strstr(cfg, config_data[i].name);
 348                 if (tmp == NULL)
 349                         continue;
 350                 tmp += strlen(config_data[i].name);
 351                 if (strncmp(tmp, " = ", 3) != 0)
 352                         continue;
 353                 tmp += 3;
 354
 355                 if (config_data[i].len == 0) {
 356                         parse_str_val(config_data[i].val, tmp);
 357                         continue;
 358                 }
 359
 360                 tmp2 = NULL;
 361                 val = strtoul(tmp, &tmp2, 16);
 362                 if (tmp2 == NULL || tmp == tmp2)
 363                         continue; // parse failed
 364
 365                 switch (config_data[i].len) {
 366                 case 1:
 367                         *(u8 *)config_data[i].val = val;
 368                         break;
 369                 case 2:
 370                         *(u16 *)config_data[i].val = val;
 371                         break;
 372                 case 4:
 373                         *(u32 *)config_data[i].val = val;
 374                         break;
 375                 default:
 376                         printf("menu_load_config: unhandled len %d for %s\n",
 377                                  config_data[i].len, config_data[i].name);
 378                         break;
 379                 }
 380         }
 381
 382         if (!is_game) {
 383                 char *tmp = strstr(cfg, "lastcdimg = ");
 384                 if (tmp != NULL) {
 385                         tmp += 12;
 386                         parse_str_val(last_selected_fname, tmp);
 387                 }
 388         }
 389
 390         menu_sync_config();
 391
 392         // sync plugins
 393         for (i = bios_sel = 0; bioses[i] != NULL; i++)
 394                 if (strcmp(Config.Bios, bioses[i]) == 0)
 395                         { bios_sel = i; break; }
 396
 397         for (i = gpu_plugsel = 0; gpu_plugins[i] != NULL; i++)
 398                 if (strcmp(Config.Gpu, gpu_plugins[i]) == 0)
 399                         { gpu_plugsel = i; break; }
 400
 401         for (i = spu_plugsel = 0; spu_plugins[i] != NULL; i++)
 402                 if (strcmp(Config.Spu, spu_plugins[i]) == 0)
 403                         { spu_plugsel = i; break; }
 404
 405         keys_load_all(cfg);
 406         ret = 0;
 407 fail_read:
 408         free(cfg);
 409 fail:
 410         fclose(f);
 411         return ret;
 412 }
 413
 414 // rrrr rggg gggb bbbb
 415 static unsigned short fname2color(const char *fname)
 416 {
 417         static const char *cdimg_exts[] = { ".bin", ".img", ".iso", ".cue", ".z", ".bz", ".znx", ".pbp" };
 418         static const char *other_exts[] = { ".ccd", ".toc", ".mds", ".sub", ".table", ".index" };
 419         const char *ext = strrchr(fname, '.');
 420         int i;
 421
 422         if (ext == NULL)
 423                 return 0xffff;
 424         for (i = 0; i < array_size(cdimg_exts); i++)
 425                 if (strcasecmp(ext, cdimg_exts[i]) == 0)
 426                         return 0x7bff;
 427         for (i = 0; i < array_size(other_exts); i++)
 428                 if (strcasecmp(ext, other_exts[i]) == 0)
 429                         return 0xa514;
 430         return 0xffff;
 431 }
 432
 433 static void draw_savestate_bg(int slot);
 434
 435 #define MENU_ALIGN_LEFT
 436 #define menu_init menu_init_common
 437 #include "common/menu.c"
 438 #undef menu_init
 439
 440 // a bit of black magic here
 441 static void draw_savestate_bg(int slot)
 442 {
 443         extern void bgr555_to_rgb565(void *dst, void *src, int bytes);
 444         static const int psx_widths[8]  = { 256, 368, 320, 384, 512, 512, 640, 640 };
 445         int x, y, w, h;
 446         char fname[MAXPATHLEN];
 447         GPUFreeze_t *gpu;
 448         u16 *s, *d;
 449         gzFile f;
 450         int ret;
 451         u32 tmp;
 452
 453         ret = get_state_filename(fname, sizeof(fname), slot);
 454         if (ret != 0)
 455                 return;
 456
 457         f = gzopen(fname, "rb");
 458         if (f == NULL)
 459                 return;
 460
 461         if (gzseek(f, 0x29933d, SEEK_SET) != 0x29933d) {
 462                 fprintf(stderr, "gzseek failed\n");
 463                 gzclose(f);
 464                 return;
 465         }
 466
 467         gpu = malloc(sizeof(*gpu));
 468         if (gpu == NULL) {
 469                 gzclose(f);
 470                 return;
 471         }
 472
 473         ret = gzread(f, gpu, sizeof(*gpu));
 474         gzclose(f);
 475         if (ret != sizeof(*gpu)) {
 476                 fprintf(stderr, "gzread failed\n");
 477                 goto out;
 478         }
 479
 480         memcpy(g_menubg_ptr, g_menubg_src_ptr, g_menuscreen_w * g_menuscreen_h * 2);
 481
 482         if ((gpu->ulStatus & 0x800000) || (gpu->ulStatus & 0x200000))
 483                 goto out; // disabled || 24bpp (NYET)
 484
 485         x = gpu->ulControl[5] & 0x3ff;
 486         y = (gpu->ulControl[5] >> 10) & 0x1ff;
 487         s = (u16 *)gpu->psxVRam + y * 1024 + (x & ~3);
 488         w = psx_widths[(gpu->ulStatus >> 16) & 7];
 489         tmp = gpu->ulControl[7];
 490         h = ((tmp >> 10) & 0x3ff) - (tmp & 0x3ff);
 491         if (gpu->ulStatus & 0x80000) // doubleheight
 492                 h *= 2;
 493
 494         x = max(0, g_menuscreen_w - w) & ~3;
 495         y = max(0, g_menuscreen_h / 2 - h / 2);
 496         w = min(g_menuscreen_w, w);
 497         h = min(g_menuscreen_h, h);
 498         d = (u16 *)g_menubg_ptr + g_menuscreen_w * y + x;
 499
 500         for (; h > 0; h--, d += g_menuscreen_w, s += 1024)
 501                 bgr555_to_rgb565(d, s, w * 2);
 502
 503 out:
 504         free(gpu);
 505 }
 506
 507 // ---------- pandora specific -----------
 508
 509 static const char pnd_script_base[] = "sudo -n /usr/pandora/scripts";
 510 static char **pnd_filter_list;
 511
 512 static int get_cpu_clock(void)
 513 {
 514         FILE *f;
 515         int ret = 0;
 516         f = fopen("/proc/pandora/cpu_mhz_max", "r");
 517         if (f) {
 518                 fscanf(f, "%d", &ret);
 519                 fclose(f);
 520         }
 521         return ret;
 522 }
 523
 524 static void apply_cpu_clock(void)
 525 {
 526         char buf[128];
 527
 528         if (cpu_clock != 0 && cpu_clock != get_cpu_clock()) {
 529                 snprintf(buf, sizeof(buf), "unset DISPLAY; echo y | %s/op_cpuspeed.sh %d",
 530                          pnd_script_base, cpu_clock);
 531                 system(buf);
 532         }
 533 }
 534
 535 static void apply_filter(int which)
 536 {
 537         static int old = -1;
 538         char buf[128];
 539         int i;
 540
 541         if (pnd_filter_list == NULL || which == old)
 542                 return;
 543
 544         for (i = 0; i < which; i++)
 545                 if (pnd_filter_list[i] == NULL)
 546                         return;
 547
 548         if (pnd_filter_list[i] == NULL)
 549                 return;
 550
 551         snprintf(buf, sizeof(buf), "%s/op_videofir.sh %s", pnd_script_base, pnd_filter_list[i]);
 552         system(buf);
 553         old = which;
 554 }
 555
 556 static menu_entry e_menu_gfx_options[];
 557
 558 static void pnd_menu_init(void)
 559 {
 560         struct dirent *ent;
 561         int i, count = 0;
 562         char **mfilters;
 563         char buff[64];
 564         DIR *dir;
 565
 566         cpu_clock_st = cpu_clock = get_cpu_clock();
 567
 568         dir = opendir("/etc/pandora/conf/dss_fir");
 569         if (dir == NULL) {
 570                 perror("filter opendir");
 571                 return;
 572         }
 573
 574         while (1) {
 575                 errno = 0;
 576                 ent = readdir(dir);
 577                 if (ent == NULL) {
 578                         if (errno != 0)
 579                                 perror("readdir");
 580                         break;
 581                 }
 582
 583                 if (ent->d_type != DT_REG && ent->d_type != DT_LNK)
 584                         continue;
 585
 586                 count++;
 587         }
 588
 589         if (count == 0)
 590                 return;
 591
 592         mfilters = calloc(count + 1, sizeof(mfilters[0]));
 593         if (mfilters == NULL)
 594                 return;
 595
 596         rewinddir(dir);
 597         for (i = 0; (ent = readdir(dir)); ) {
 598                 size_t len;
 599
 600                 if (ent->d_type != DT_REG && ent->d_type != DT_LNK)
 601                         continue;
 602
 603                 len = strlen(ent->d_name);
 604
 605                 // skip pre-HF5 extra files
 606                 if (len >= 3 && strcmp(ent->d_name + len - 3, "_v3") == 0)
 607                         continue;
 608                 if (len >= 3 && strcmp(ent->d_name + len - 3, "_v5") == 0)
 609                         continue;
 610
 611                 // have to cut "_up_h" for pre-HF5
 612                 if (len > 5 && strcmp(ent->d_name + len - 5, "_up_h") == 0)
 613                         len -= 5;
 614
 615                 if (len > sizeof(buff) - 1)
 616                         continue;
 617
 618                 strncpy(buff, ent->d_name, len);
 619                 buff[len] = 0;
 620                 mfilters[i] = strdup(buff);
 621                 if (mfilters[i] != NULL)
 622                         i++;
 623         }
 624         closedir(dir);
 625
 626         i = me_id2offset(e_menu_gfx_options, MA_OPT_FILTERING);
 627         e_menu_gfx_options[i].data = (void *)mfilters;
 628         pnd_filter_list = mfilters;
 629 }
 630
 631 void menu_finish(void)
 632 {
 633         cpu_clock = cpu_clock_st;
 634         apply_cpu_clock();
 635 }
 636
 637 // -------------- key config --------------
 638
 639 me_bind_action me_ctrl_actions[] =
 640 {
 641         { "UP      ", 1 << DKEY_UP},
 642         { "DOWN    ", 1 << DKEY_DOWN },
 643         { "LEFT    ", 1 << DKEY_LEFT },
 644         { "RIGHT   ", 1 << DKEY_RIGHT },
 645         { "TRIANGLE", 1 << DKEY_TRIANGLE },
 646         { "CIRCLE  ", 1 << DKEY_CIRCLE },
 647         { "CROSS   ", 1 << DKEY_CROSS },
 648         { "SQUARE  ", 1 << DKEY_SQUARE },
 649         { "L1      ", 1 << DKEY_L1 },
 650         { "R1      ", 1 << DKEY_R1 },
 651         { "L2      ", 1 << DKEY_L2 },
 652         { "R2      ", 1 << DKEY_R2 },
 653         { "L3      ", 1 << DKEY_L3 },
 654         { "R3      ", 1 << DKEY_R3 },
 655         { "START   ", 1 << DKEY_START },
 656         { "SELECT  ", 1 << DKEY_SELECT },
 657         { NULL,       0 }
 658 };
 659
 660 me_bind_action emuctrl_actions[] =
 661 {
 662         { "Save State       ", 1 << SACTION_SAVE_STATE },
 663         { "Load State       ", 1 << SACTION_LOAD_STATE },
 664         { "Prev Save Slot   ", 1 << SACTION_PREV_SSLOT },
 665         { "Next Save Slot   ", 1 << SACTION_NEXT_SSLOT },
 666         { "Toggle Frameskip ", 1 << SACTION_TOGGLE_FSKIP },
 667         { "Enter Menu       ", 1 << SACTION_ENTER_MENU },
 668         { NULL,                0 }
 669 };
 670
 671 static char *mystrip(char *str)
 672 {
 673         int i, len;
 674
 675         len = strlen(str);
 676         for (i = 0; i < len; i++)
 677                 if (str[i] != ' ') break;
 678         if (i > 0) memmove(str, str + i, len - i + 1);
 679
 680         len = strlen(str);
 681         for (i = len - 1; i >= 0; i--)
 682                 if (str[i] != ' ') break;
 683         str[i+1] = 0;
 684
 685         return str;
 686 }
 687
 688 static void get_line(char *d, size_t size, const char *s)
 689 {
 690         const char *pe;
 691         size_t len;
 692
 693         for (pe = s; *pe != '\r' && *pe != '\n' && *pe != 0; pe++)
 694                 ;
 695         len = pe - s;
 696         if (len > size - 1)
 697                 len = size - 1;
 698         strncpy(d, s, len);
 699         d[len] = 0;
 700
 701         mystrip(d);
 702 }
 703
 704 static void keys_write_all(FILE *f)
 705 {
 706         int d;
 707
 708         for (d = 0; d < IN_MAX_DEVS; d++)
 709         {
 710                 const int *binds = in_get_dev_binds(d);
 711                 const char *name = in_get_dev_name(d, 0, 0);
 712                 int k, count = 0;
 713
 714                 if (binds == NULL || name == NULL)
 715                         continue;
 716
 717                 fprintf(f, "binddev = %s\n", name);
 718                 in_get_config(d, IN_CFG_BIND_COUNT, &count);
 719
 720                 for (k = 0; k < count; k++)
 721                 {
 722                         int i, kbinds, mask;
 723                         char act[32];
 724
 725                         act[0] = act[31] = 0;
 726                         name = in_get_key_name(d, k);
 727
 728                         kbinds = binds[IN_BIND_OFFS(k, IN_BINDTYPE_PLAYER12)];
 729                         for (i = 0; kbinds && i < ARRAY_SIZE(me_ctrl_actions) - 1; i++) {
 730                                 mask = me_ctrl_actions[i].mask;
 731                                 if (mask & kbinds) {
 732                                         strncpy(act, me_ctrl_actions[i].name, 31);
 733                                         fprintf(f, "bind %s = player1 %s\n", name, mystrip(act));
 734                                         kbinds &= ~mask;
 735                                 }
 736                                 mask = me_ctrl_actions[i].mask << 16;
 737                                 if (mask & kbinds) {
 738                                         strncpy(act, me_ctrl_actions[i].name, 31);
 739                                         fprintf(f, "bind %s = player2 %s\n", name, mystrip(act));
 740                                         kbinds &= ~mask;
 741                                 }
 742                         }
 743
 744                         kbinds = binds[IN_BIND_OFFS(k, IN_BINDTYPE_EMU)];
 745                         for (i = 0; kbinds && i < ARRAY_SIZE(emuctrl_actions) - 1; i++) {
 746                                 mask = emuctrl_actions[i].mask;
 747                                 if (mask & kbinds) {
 748                                         strncpy(act, emuctrl_actions[i].name, 31);
 749                                         fprintf(f, "bind %s = %s\n", name, mystrip(act));
 750                                         kbinds &= ~mask;
 751                                 }
 752                         }
 753                 }
 754         }
 755 }
 756
 757 static int parse_bind_val(const char *val, int *type)
 758 {
 759         int i;
 760
 761         *type = IN_BINDTYPE_NONE;
 762         if (val[0] == 0)
 763                 return 0;
 764
 765         if (strncasecmp(val, "player", 6) == 0)
 766         {
 767                 int player, shift = 0;
 768                 player = atoi(val + 6) - 1;
 769
 770                 if ((unsigned int)player > 1)
 771                         return -1;
 772                 if (player == 1)
 773                         shift = 16;
 774
 775                 *type = IN_BINDTYPE_PLAYER12;
 776                 for (i = 0; me_ctrl_actions[i].name != NULL; i++) {
 777                         if (strncasecmp(me_ctrl_actions[i].name, val + 8, strlen(val + 8)) == 0)
 778                                 return me_ctrl_actions[i].mask << shift;
 779                 }
 780         }
 781         for (i = 0; emuctrl_actions[i].name != NULL; i++) {
 782                 if (strncasecmp(emuctrl_actions[i].name, val, strlen(val)) == 0) {
 783                         *type = IN_BINDTYPE_EMU;
 784                         return emuctrl_actions[i].mask;
 785                 }
 786         }
 787
 788         return -1;
 789 }
 790
 791 static void keys_load_all(const char *cfg)
 792 {
 793         char dev[256], key[128], *act;
 794         const char *p;
 795         int bind, bindtype;
 796         int dev_id;
 797
 798         p = cfg;
 799         while (p != NULL && (p = strstr(p, "binddev = ")) != NULL) {
 800                 p += 10;
 801
 802                 get_line(dev, sizeof(dev), p);
 803                 dev_id = in_config_parse_dev(dev);
 804                 if (dev_id < 0) {
 805                         printf("input: can't handle dev: %s\n", dev);
 806                         continue;
 807                 }
 808
 809                 in_unbind_all(dev_id, -1, -1);
 810                 while ((p = strstr(p, "bind"))) {
 811                         if (strncmp(p, "binddev = ", 10) == 0)
 812                                 break;
 813
 814                         p += 4;
 815                         if (*p != ' ') {
 816                                 printf("input: parse error: %16s..\n", p);
 817                                 continue;
 818                         }
 819
 820                         get_line(key, sizeof(key), p);
 821                         act = strchr(key, '=');
 822                         if (act == NULL) {
 823                                 printf("parse failed: %16s..\n", p);
 824                                 continue;
 825                         }
 826                         *act = 0;
 827                         act++;
 828                         mystrip(key);
 829                         mystrip(act);
 830
 831                         bind = parse_bind_val(act, &bindtype);
 832                         if (bind != -1 && bind != 0) {
 833                                 //printf("bind #%d '%s' %08x (%s)\n", dev_id, key, bind, act);
 834                                 in_config_bind_key(dev_id, key, bind, bindtype);
 835                         }
 836                         else
 837                                 lprintf("config: unhandled action \"%s\"\n", act);
 838                 }
 839         }
 840 }
 841
 842 static int key_config_loop_wrap(int id, int keys)
 843 {
 844         switch (id) {
 845                 case MA_CTRL_PLAYER1:
 846                         key_config_loop(me_ctrl_actions, array_size(me_ctrl_actions) - 1, 0);
 847                         break;
 848                 case MA_CTRL_PLAYER2:
 849                         key_config_loop(me_ctrl_actions, array_size(me_ctrl_actions) - 1, 1);
 850                         break;
 851                 case MA_CTRL_EMU:
 852                         key_config_loop(emuctrl_actions, array_size(emuctrl_actions) - 1, -1);
 853                         break;
 854                 default:
 855                         break;
 856         }
 857         return 0;
 858 }
 859
 860 static const char *mgn_dev_name(int id, int *offs)
 861 {
 862         const char *name = NULL;
 863         static int it = 0;
 864
 865         if (id == MA_CTRL_DEV_FIRST)
 866                 it = 0;
 867
 868         for (; it < IN_MAX_DEVS; it++) {
 869                 name = in_get_dev_name(it, 1, 1);
 870                 if (name != NULL)
 871                         break;
 872         }
 873
 874         it++;
 875         return name;
 876 }
 877
 878 static const char *mgn_saveloadcfg(int id, int *offs)
 879 {
 880         return "";
 881 }
 882
 883 static int mh_savecfg(int id, int keys)
 884 {
 885         if (menu_write_config(id == MA_OPT_SAVECFG_GAME ? 1 : 0) == 0)
 886                 me_update_msg("config saved");
 887         else
 888                 me_update_msg("failed to write config");
 889
 890         return 1;
 891 }
 892
 893 static const char *men_in_type_sel[] = { "Standard (SCPH-1080)", "Analog (SCPH-1150)", NULL };
 894
 895 static menu_entry e_menu_keyconfig[] =
 896 {
 897         mee_handler_id("Player 1",          MA_CTRL_PLAYER1,    key_config_loop_wrap),
 898         mee_handler_id("Player 2",          MA_CTRL_PLAYER2,    key_config_loop_wrap),
 899         mee_handler_id("Emulator controls", MA_CTRL_EMU,        key_config_loop_wrap),
 900         mee_label     (""),
 901         mee_enum      ("Controller",        0, in_type_sel,     men_in_type_sel),
 902         mee_cust_nosave("Save global config",       MA_OPT_SAVECFG,      mh_savecfg, mgn_saveloadcfg),
 903         mee_cust_nosave("Save cfg for loaded game", MA_OPT_SAVECFG_GAME, mh_savecfg, mgn_saveloadcfg),
 904         mee_label     (""),
 905         mee_label     ("Input devices:"),
 906         mee_label_mk  (MA_CTRL_DEV_FIRST, mgn_dev_name),
 907         mee_label_mk  (MA_CTRL_DEV_NEXT,  mgn_dev_name),
 908         mee_label_mk  (MA_CTRL_DEV_NEXT,  mgn_dev_name),
 909         mee_label_mk  (MA_CTRL_DEV_NEXT,  mgn_dev_name),
 910         mee_label_mk  (MA_CTRL_DEV_NEXT,  mgn_dev_name),
 911         mee_label_mk  (MA_CTRL_DEV_NEXT,  mgn_dev_name),
 912         mee_label_mk  (MA_CTRL_DEV_NEXT,  mgn_dev_name),
 913         mee_end,
 914 };
 915
 916 static int menu_loop_keyconfig(int id, int keys)
 917 {
 918         static int sel = 0;
 919
 920 //      me_enable(e_menu_keyconfig, MA_OPT_SAVECFG_GAME, ready_to_go && CdromId[0]);
 921         me_loop(e_menu_keyconfig, &sel, NULL);
 922         return 0;
 923 }
 924
 925 // ------------ gfx options menu ------------
 926
 927 static const char *men_scaler[] = { "1x1", "scaled 4:3", "fullscreen", "custom", NULL };
 928 static const char h_cscaler[]   = "Displays the scaler layer, you can resize it\n"
 929                                   "using d-pad or move it using R+d-pad";
 930 static const char *men_dummy[] = { NULL };
 931
 932 static int menu_loop_cscaler(int id, int keys)
 933 {
 934         unsigned int inp;
 935
 936         scaling = SCALE_CUSTOM;
 937
 938         omap_enable_layer(1);
 939
 940         for (;;)
 941         {
 942                 menu_draw_begin(0);
 943                 memset(g_menuscreen_ptr, 4, g_menuscreen_w * g_menuscreen_h * 2);
 944                 text_out16(2, 2, "%d,%d", g_layer_x, g_layer_y);
 945                 text_out16(2, 480 - 18, "%dx%d | d-pad: resize, R+d-pad: move", g_layer_w, g_layer_h);
 946                 menu_draw_end();
 947
 948                 inp = in_menu_wait(PBTN_UP|PBTN_DOWN|PBTN_LEFT|PBTN_RIGHT|PBTN_R|PBTN_MOK|PBTN_MBACK, 40);
 949                 if (inp & PBTN_UP)    g_layer_y--;
 950                 if (inp & PBTN_DOWN)  g_layer_y++;
 951                 if (inp & PBTN_LEFT)  g_layer_x--;
 952                 if (inp & PBTN_RIGHT) g_layer_x++;
 953                 if (!(inp & PBTN_R)) {
 954                         if (inp & PBTN_UP)    g_layer_h += 2;
 955                         if (inp & PBTN_DOWN)  g_layer_h -= 2;
 956                         if (inp & PBTN_LEFT)  g_layer_w += 2;
 957                         if (inp & PBTN_RIGHT) g_layer_w -= 2;
 958                 }
 959                 if (inp & (PBTN_MOK|PBTN_MBACK))
 960                         break;
 961
 962                 if (inp & (PBTN_UP|PBTN_DOWN|PBTN_LEFT|PBTN_RIGHT)) {
 963                         if (g_layer_x < 0)   g_layer_x = 0;
 964                         if (g_layer_x > 640) g_layer_x = 640;
 965                         if (g_layer_y < 0)   g_layer_y = 0;
 966                         if (g_layer_y > 420) g_layer_y = 420;
 967                         if (g_layer_w < 160) g_layer_w = 160;
 968                         if (g_layer_h < 60)  g_layer_h = 60;
 969                         if (g_layer_x + g_layer_w > 800)
 970                                 g_layer_w = 800 - g_layer_x;
 971                         if (g_layer_y + g_layer_h > 480)
 972                                 g_layer_h = 480 - g_layer_y;
 973                         omap_enable_layer(1);
 974                 }
 975         }
 976
 977         omap_enable_layer(0);
 978
 979         return 0;
 980 }
 981
 982 static menu_entry e_menu_gfx_options[] =
 983 {
 984         mee_enum      ("Scaler",                   0, scaling, men_scaler),
 985         mee_enum      ("Filter",                   MA_OPT_FILTERING, filter, men_dummy),
 986 //      mee_onoff     ("Vsync",                    0, vsync, 1),
 987         mee_cust_h    ("Setup custom scaler",      0, menu_loop_cscaler, NULL, h_cscaler),
 988         mee_end,
 989 };
 990
 991 static int menu_loop_gfx_options(int id, int keys)
 992 {
 993         static int sel = 0;
 994
 995         me_loop(e_menu_gfx_options, &sel, NULL);
 996
 997         return 0;
 998 }
 999
1000 // ------------ bios/plugins ------------
1001
1002 static const char *men_gpu_dithering[] = { "None", "Game dependant", "Always", NULL };
1003 static const char h_gpu_0[]            = "Needed for Chrono Cross";
1004 static const char h_gpu_1[]            = "Capcom fighting games";
1005 static const char h_gpu_2[]            = "Black screens in Lunar";
1006 static const char h_gpu_3[]            = "Compatibility mode";
1007 static const char h_gpu_6[]            = "Pandemonium 2";
1008 static const char h_gpu_7[]            = "Skip every second frame";
1009 static const char h_gpu_8[]            = "Needed by Dark Forces";
1010 static const char h_gpu_9[]            = "better g-colors, worse textures";
1011 static const char h_gpu_10[]           = "Toggle busy flags after drawing";
1012
1013 static menu_entry e_menu_plugin_gpu[] =
1014 {
1015         mee_enum      ("Dithering",                  0, iUseDither, men_gpu_dithering),
1016         mee_onoff_h   ("Odd/even bit hack",          0, dwActFixes, 1<<0, h_gpu_0),
1017         mee_onoff_h   ("Expand screen width",        0, dwActFixes, 1<<1, h_gpu_1),
1018         mee_onoff_h   ("Ignore brightness color",    0, dwActFixes, 1<<2, h_gpu_2),
1019         mee_onoff_h   ("Disable coordinate check",   0, dwActFixes, 1<<3, h_gpu_3),
1020         mee_onoff_h   ("Lazy screen update",         0, dwActFixes, 1<<6, h_gpu_6),
1021         mee_onoff_h   ("Old frame skipping",         0, dwActFixes, 1<<7, h_gpu_7),
1022         mee_onoff_h   ("Repeated flat tex triangles ",0,dwActFixes, 1<<8, h_gpu_8),
1023         mee_onoff_h   ("Draw quads with triangles",  0, dwActFixes, 1<<9, h_gpu_9),
1024         mee_onoff_h   ("Fake 'gpu busy' states",     0, dwActFixes, 1<<10, h_gpu_10),
1025         mee_end,
1026 };
1027
1028 static int menu_loop_plugin_gpu(int id, int keys)
1029 {
1030         static int sel = 0;
1031         me_loop(e_menu_plugin_gpu, &sel, NULL);
1032         return 0;
1033 }
1034
1035 static const char *men_spu_reverb[] = { "Off", "Fake", "On", NULL };
1036 static const char *men_spu_interp[] = { "None", "Simple", "Gaussian", "Cubic", NULL };
1037 static const char h_spu_irq_wait[]  = "Wait for CPU (recommended set to ON)";
1038 static const char h_spu_thread[]    = "Run sound emulation in main thread (recommended)";
1039
1040 static menu_entry e_menu_plugin_spu[] =
1041 {
1042         mee_enum      ("Reverb",                    0, iUseReverb, men_spu_reverb),
1043         mee_enum      ("Interpolation",             0, iUseInterpolation, men_spu_interp),
1044         mee_onoff     ("Adjust XA pitch",           0, iXAPitch, 1),
1045         mee_onoff_h   ("SPU IRQ Wait",              0, iSPUIRQWait, 1, h_spu_irq_wait),
1046         mee_onoff_h   ("Sound in main thread",      0, iUseTimer, 2, h_spu_thread),
1047         mee_end,
1048 };
1049
1050 static int menu_loop_plugin_spu(int id, int keys)
1051 {
1052         static int sel = 0;
1053         me_loop(e_menu_plugin_spu, &sel, NULL);
1054         return 0;
1055 }
1056
1057 static const char h_bios[]       = "HLE is simulated BIOS. BIOS is saved in savestates.\n"
1058                                    "Must save config and reload the game\n"
1059                                    "for change to take effect";
1060 static const char h_plugin_xpu[] = "Must save config and reload the game\n"
1061                                    "for plugin change to take effect";
1062 static const char h_gpu[]        = "Configure built-in P.E.Op.S. SoftGL Driver V1.17";
1063 static const char h_spu[]        = "Configure built-in P.E.Op.S. Sound Driver V1.7";
1064
1065 static menu_entry e_menu_plugin_options[] =
1066 {
1067         mee_enum_h    ("BIOS",                          0, bios_sel, bioses, h_bios),
1068         mee_enum_h    ("GPU plugin",                    0, gpu_plugsel, gpu_plugins, h_plugin_xpu),
1069         mee_enum_h    ("SPU plugin",                    0, spu_plugsel, spu_plugins, h_plugin_xpu),
1070         mee_handler_h ("Configure built-in GPU plugin", menu_loop_plugin_gpu, h_gpu),
1071         mee_handler_h ("Configure built-in SPU plugin", menu_loop_plugin_spu, h_spu),
1072         mee_end,
1073 };
1074
1075 static menu_entry e_menu_main[];
1076
1077 static int menu_loop_plugin_options(int id, int keys)
1078 {
1079         static int sel = 0;
1080         me_loop(e_menu_plugin_options, &sel, NULL);
1081
1082         // sync BIOS/plugins
1083         snprintf(Config.Bios, sizeof(Config.Bios), "%s", bioses[bios_sel]);
1084         snprintf(Config.Gpu, sizeof(Config.Gpu), "%s", gpu_plugins[gpu_plugsel]);
1085         snprintf(Config.Spu, sizeof(Config.Spu), "%s", spu_plugins[spu_plugsel]);
1086         me_enable(e_menu_main, MA_MAIN_RUN_BIOS, bios_sel != 0);
1087
1088         return 0;
1089 }
1090
1091 // ------------ adv options menu ------------
1092
1093 static const char h_cfg_cpul[]   = "Shows CPU usage in %";
1094 static const char h_cfg_fl[]     = "Frame Limiter keeps the game from running too fast";
1095 static const char h_cfg_xa[]     = "Disables XA sound, which can sometimes improve performance";
1096 static const char h_cfg_cdda[]   = "Disable CD Audio for a performance boost\n"
1097                                    "(proper .cue/.bin dump is needed otherwise)";
1098 static const char h_cfg_sio[]    = "This should be enabled for certain memcards/gamepads";
1099 static const char h_cfg_spuirq[] = "Compatibility tweak; should probably be left off";
1100 static const char h_cfg_rcnt1[]  = "Parasite Eve 2, Vandal Hearts 1/2 Fix";
1101 static const char h_cfg_rcnt2[]  = "InuYasha Sengoku Battle Fix";
1102 static const char h_cfg_nodrc[]  = "Disable dynamic recompiler and use interpreter\n"
1103                                    "Might be useful to overcome some dynarec bugs";
1104
1105 static menu_entry e_menu_adv_options[] =
1106 {
1107         mee_onoff_h   ("Show CPU load",          0, g_opts, OPT_SHOWCPU, h_cfg_cpul),
1108         mee_onoff_h   ("Disable Frame Limiter",  0, g_opts, OPT_NO_FRAMELIM, h_cfg_fl),
1109         mee_onoff_h   ("Disable XA Decoding",    0, Config.Xa, 1, h_cfg_xa),
1110         mee_onoff_h   ("Disable CD Audio",       0, Config.Cdda, 1, h_cfg_cdda),
1111         mee_onoff_h   ("SIO IRQ Always Enabled", 0, Config.Sio, 1, h_cfg_sio),
1112         mee_onoff_h   ("SPU IRQ Always Enabled", 0, Config.SpuIrq, 1, h_cfg_spuirq),
1113         mee_onoff_h   ("Rootcounter hack",       0, Config.RCntFix, 1, h_cfg_rcnt1),
1114         mee_onoff_h   ("Rootcounter hack 2",     0, Config.VSyncWA, 1, h_cfg_rcnt2),
1115         mee_onoff_h   ("Disable dynarec (slow!)",0, Config.Cpu, 1, h_cfg_nodrc),
1116         mee_end,
1117 };
1118
1119 static int menu_loop_adv_options(int id, int keys)
1120 {
1121         static int sel = 0;
1122         me_loop(e_menu_adv_options, &sel, NULL);
1123         return 0;
1124 }
1125
1126 // ------------ options menu ------------
1127
1128 static int mh_restore_defaults(int id, int keys)
1129 {
1130         menu_set_defconfig();
1131         me_update_msg("defaults restored");
1132         return 1;
1133 }
1134
1135 static const char *men_region[]       = { "Auto", "NTSC", "PAL", NULL };
1136 /*
1137 static const char *men_confirm_save[] = { "OFF", "writes", "loads", "both", NULL };
1138 static const char h_confirm_save[]    = "Ask for confirmation when overwriting save,\n"
1139                                         "loading state or both";
1140 */
1141 static const char h_restore_def[]     = "Switches back to default / recommended\n"
1142                                         "configuration";
1143
1144 static menu_entry e_menu_options[] =
1145 {
1146 //      mee_range     ("Save slot",                0, state_slot, 0, 9),
1147 //      mee_enum_h    ("Confirm savestate",        0, dummy, men_confirm_save, h_confirm_save),
1148         mee_onoff     ("Frameskip",                0, UseFrameSkip, 1),
1149         mee_onoff     ("Show FPS",                 0, g_opts, OPT_SHOWFPS),
1150         mee_enum      ("Region",                   0, region, men_region),
1151         mee_range     ("CPU clock",                MA_OPT_CPU_CLOCKS, cpu_clock, 20, 5000),
1152         mee_handler   ("[Display]",                menu_loop_gfx_options),
1153         mee_handler   ("[BIOS/Plugins]",           menu_loop_plugin_options),
1154         mee_handler   ("[Advanced]",               menu_loop_adv_options),
1155         mee_cust_nosave("Save global config",      MA_OPT_SAVECFG,      mh_savecfg, mgn_saveloadcfg),
1156         mee_cust_nosave("Save cfg for loaded game",MA_OPT_SAVECFG_GAME, mh_savecfg, mgn_saveloadcfg),
1157         mee_handler_h ("Restore default config",   mh_restore_defaults, h_restore_def),
1158         mee_end,
1159 };
1160
1161 static int menu_loop_options(int id, int keys)
1162 {
1163         static int sel = 0;
1164         int i;
1165
1166         i = me_id2offset(e_menu_options, MA_OPT_CPU_CLOCKS);
1167         e_menu_options[i].enabled = cpu_clock != 0 ? 1 : 0;
1168         me_enable(e_menu_options, MA_OPT_SAVECFG_GAME, ready_to_go && CdromId[0]);
1169
1170         me_loop(e_menu_options, &sel, NULL);
1171
1172         return 0;
1173 }
1174
1175 // ------------ debug menu ------------
1176
1177 static void draw_frame_debug(void)
1178 {
1179         smalltext_out16(4, 1, "build: "__DATE__ " " __TIME__ " " REV, 0xe7fc);
1180 }
1181
1182 static void debug_menu_loop(void)
1183 {
1184         int inp;
1185
1186         while (1)
1187         {
1188                 menu_draw_begin(1);
1189                 draw_frame_debug();
1190                 menu_draw_end();
1191
1192                 inp = in_menu_wait(PBTN_MOK|PBTN_MBACK|PBTN_MA2|PBTN_MA3|PBTN_L|PBTN_R |
1193                                         PBTN_UP|PBTN_DOWN|PBTN_LEFT|PBTN_RIGHT, 70);
1194                 if (inp & PBTN_MBACK)
1195                         return;
1196         }
1197 }
1198
1199 // ------------ main menu ------------
1200
1201 void OnFile_Exit();
1202
1203 static void draw_frame_main(void)
1204 {
1205         if (CdromId[0] != 0) {
1206                 char buff[64];
1207                 snprintf(buff, sizeof(buff), "%.32s/%.9s (running as %s)",
1208                          get_cd_label(), CdromId, Config.PsxType ? "PAL" : "NTSC");
1209                 smalltext_out16(4, 1, buff, 0x105f);
1210         }
1211 }
1212
1213 static void draw_frame_credits(void)
1214 {
1215         smalltext_out16(4, 1, "build: "__DATE__ " " __TIME__ " " REV, 0xe7fc);
1216 }
1217
1218 const char *plat_get_credits(void)
1219 {
1220         return  "PCSX-ReARMed\n\n"
1221                 "(C) 1999-2003 PCSX Team\n"
1222                 "(C) 2005-2009 PCSX-df Team\n"
1223                 "(C) 2009-2011 PCSX-Reloaded Team\n\n"
1224                 "GPU and SPU code by Pete Bernert\n"
1225                 "  and the P.E.Op.S. team\n"
1226                 "ARM recompiler (C) 2009-2011 Ari64\n"
1227                 "PCSX4ALL plugins by PCSX4ALL team\n"
1228                 "  Chui, Franxis, Unai\n\n"
1229                 "integration, optimization and\n"
1230                 "  frontend (C) 2010-2011 notaz\n";
1231 }
1232
1233 static int reset_game(void)
1234 {
1235         // sanity check
1236         if (bios_sel == 0 && !Config.HLE)
1237                 return -1;
1238
1239         ClosePlugins();
1240         OpenPlugins();
1241         SysReset();
1242         if (CheckCdrom() != -1) {
1243                 LoadCdrom();
1244         }
1245         return 0;
1246 }
1247
1248 static int run_bios(void)
1249 {
1250         if (bios_sel == 0)
1251                 return -1;
1252
1253         ready_to_go = 0;
1254         pl_fbdev_buf = NULL;
1255
1256         ClosePlugins();
1257         set_cd_image(NULL);
1258         LoadPlugins();
1259         NetOpened = 0;
1260         if (OpenPlugins() == -1) {
1261                 me_update_msg("failed to open plugins");
1262                 return -1;
1263         }
1264         plugin_call_rearmed_cbs();
1265
1266         CdromId[0] = '\0';
1267         CdromLabel[0] = '\0';
1268
1269         SysReset();
1270
1271         ready_to_go = 1;
1272         return 0;
1273 }
1274
1275 static int run_cd_image(const char *fname)
1276 {
1277         ready_to_go = 0;
1278         pl_fbdev_buf = NULL;
1279
1280         ClosePlugins();
1281         set_cd_image(fname);
1282         LoadPlugins();
1283         NetOpened = 0;
1284         if (OpenPlugins() == -1) {
1285                 me_update_msg("failed to open plugins");
1286                 return -1;
1287         }
1288         plugin_call_rearmed_cbs();
1289
1290         if (CheckCdrom() == -1) {
1291                 // Only check the CD if we are starting the console with a CD
1292                 ClosePlugins();
1293                 me_update_msg("unsupported/invalid CD image");
1294                 return -1;
1295         }
1296
1297         SysReset();
1298
1299         // Read main executable directly from CDRom and start it
1300         if (LoadCdrom() == -1) {
1301                 ClosePlugins();
1302                 me_update_msg("failed to load CD image");
1303                 return -1;
1304         }
1305
1306         ready_to_go = 1;
1307         return 0;
1308 }
1309
1310 static int romsel_run(void)
1311 {
1312         int prev_gpu, prev_spu;
1313         char *fname;
1314
1315         fname = menu_loop_romsel(last_selected_fname, sizeof(last_selected_fname));
1316         if (fname == NULL)
1317                 return -1;
1318
1319         printf("selected file: %s\n", fname);
1320
1321         if (run_cd_image(fname) != 0)
1322                 return -1;
1323
1324         prev_gpu = gpu_plugsel;
1325         prev_spu = spu_plugsel;
1326         if (menu_load_config(1) != 0)
1327                 menu_load_config(0);
1328
1329         // check for plugin changes, have to repeat
1330         // loading if game config changed plugins to reload them
1331         if (prev_gpu != gpu_plugsel || prev_spu != spu_plugsel) {
1332                 printf("plugin change detected, reloading plugins..\n");
1333                 if (run_cd_image(fname) != 0)
1334                         return -1;
1335         }
1336
1337         strcpy(last_selected_fname, rom_fname_reload);
1338         return 0;
1339 }
1340
1341 static int swap_cd_image(void)
1342 {
1343         char *fname;
1344
1345         fname = menu_loop_romsel(last_selected_fname, sizeof(last_selected_fname));
1346         if (fname == NULL)
1347                 return -1;
1348
1349         printf("selected file: %s\n", fname);
1350
1351         CdromId[0] = '\0';
1352         CdromLabel[0] = '\0';
1353
1354         set_cd_image(fname);
1355         if (ReloadCdromPlugin() < 0) {
1356                 me_update_msg("failed to load cdr plugin");
1357                 return -1;
1358         }
1359         if (CDR_open() < 0) {
1360                 me_update_msg("failed to open cdr plugin");
1361                 return -1;
1362         }
1363
1364         SetCdOpenCaseTime(time(NULL) + 2);
1365         LidInterrupt();
1366
1367         strcpy(last_selected_fname, rom_fname_reload);
1368         return 0;
1369 }
1370
1371 static int main_menu_handler(int id, int keys)
1372 {
1373         switch (id)
1374         {
1375         case MA_MAIN_RESUME_GAME:
1376                 if (ready_to_go)
1377                         return 1;
1378                 break;
1379         case MA_MAIN_SAVE_STATE:
1380                 if (ready_to_go)
1381                         return menu_loop_savestate(0);
1382                 break;
1383         case MA_MAIN_LOAD_STATE:
1384                 if (ready_to_go)
1385                         return menu_loop_savestate(1);
1386                 break;
1387         case MA_MAIN_RESET_GAME:
1388                 if (ready_to_go && reset_game() == 0)
1389                         return 1;
1390                 break;
1391         case MA_MAIN_LOAD_ROM:
1392                 if (romsel_run() == 0)
1393                         return 1;
1394                 break;
1395         case MA_MAIN_SWAP_CD:
1396                 if (swap_cd_image() == 0)
1397                         return 1;
1398                 break;
1399         case MA_MAIN_RUN_BIOS:
1400                 if (run_bios() == 0)
1401                         return 1;
1402                 break;
1403         case MA_MAIN_CREDITS:
1404                 draw_menu_credits(draw_frame_credits);
1405                 in_menu_wait(PBTN_MOK|PBTN_MBACK, 70);
1406                 break;
1407         case MA_MAIN_EXIT:
1408                 OnFile_Exit();
1409                 break;
1410         default:
1411                 lprintf("%s: something unknown selected\n", __FUNCTION__);
1412                 break;
1413         }
1414
1415         return 0;
1416 }
1417
1418 static menu_entry e_menu_main[] =
1419 {
1420         mee_label     (""),
1421         mee_label     (""),
1422         mee_handler_id("Resume game",        MA_MAIN_RESUME_GAME, main_menu_handler),
1423         mee_handler_id("Save State",         MA_MAIN_SAVE_STATE,  main_menu_handler),
1424         mee_handler_id("Load State",         MA_MAIN_LOAD_STATE,  main_menu_handler),
1425         mee_handler_id("Reset game",         MA_MAIN_RESET_GAME,  main_menu_handler),
1426         mee_handler_id("Load CD image",      MA_MAIN_LOAD_ROM,    main_menu_handler),
1427         mee_handler_id("Change CD image",    MA_MAIN_SWAP_CD,     main_menu_handler),
1428         mee_handler_id("Run BIOS",           MA_MAIN_RUN_BIOS,    main_menu_handler),
1429         mee_handler   ("Options",            menu_loop_options),
1430         mee_handler   ("Controls",           menu_loop_keyconfig),
1431         mee_handler_id("Credits",            MA_MAIN_CREDITS,     main_menu_handler),
1432         mee_handler_id("Exit",               MA_MAIN_EXIT,        main_menu_handler),
1433         mee_end,
1434 };
1435
1436 // ----------------------------
1437
1438 static void menu_leave_emu(void);
1439
1440 void menu_loop(void)
1441 {
1442         static int sel = 0;
1443
1444         menu_leave_emu();
1445
1446         me_enable(e_menu_main, MA_MAIN_RESUME_GAME, ready_to_go);
1447         me_enable(e_menu_main, MA_MAIN_SAVE_STATE,  ready_to_go && CdromId[0]);
1448         me_enable(e_menu_main, MA_MAIN_LOAD_STATE,  ready_to_go && CdromId[0]);
1449         me_enable(e_menu_main, MA_MAIN_RESET_GAME,  ready_to_go);
1450         me_enable(e_menu_main, MA_MAIN_SWAP_CD,  ready_to_go);
1451         me_enable(e_menu_main, MA_MAIN_RUN_BIOS, bios_sel != 0);
1452
1453         in_set_config_int(0, IN_CFG_BLOCKING, 1);
1454
1455         do {
1456                 me_loop(e_menu_main, &sel, draw_frame_main);
1457         } while (!ready_to_go);
1458
1459         /* wait until menu, ok, back is released */
1460         while (in_menu_wait_any(50) & (PBTN_MENU|PBTN_MOK|PBTN_MBACK))
1461                 ;
1462
1463         in_set_config_int(0, IN_CFG_BLOCKING, 0);
1464
1465         menu_prepare_emu();
1466 }
1467
1468 static void scan_bios_plugins(void)
1469 {
1470         char fname[MAXPATHLEN];
1471         struct dirent *ent;
1472         int bios_i, gpu_i, spu_i;
1473         char *p;
1474         DIR *dir;
1475
1476         bioses[0] = "HLE";
1477         gpu_plugins[0] = "builtin_gpu";
1478         spu_plugins[0] = "builtin_spu";
1479         bios_i = gpu_i = spu_i = 1;
1480
1481         snprintf(fname, sizeof(fname), "%s/", Config.BiosDir);
1482         dir = opendir(fname);
1483         if (dir == NULL) {
1484                 perror("scan_bios_plugins bios opendir");
1485                 goto do_plugins;
1486         }
1487
1488         while (1) {
1489                 struct stat st;
1490
1491                 errno = 0;
1492                 ent = readdir(dir);
1493                 if (ent == NULL) {
1494                         if (errno != 0)
1495                                 perror("readdir");
1496                         break;
1497                 }
1498
1499                 if (ent->d_type != DT_REG && ent->d_type != DT_LNK)
1500                         continue;
1501
1502                 snprintf(fname, sizeof(fname), "%s/%s", Config.BiosDir, ent->d_name);
1503                 if (stat(fname, &st) != 0 || st.st_size != 512*1024) {
1504                         printf("bad BIOS file: %s\n", ent->d_name);
1505                         continue;
1506                 }
1507
1508                 if (bios_i < ARRAY_SIZE(bioses) - 1) {
1509                         bioses[bios_i++] = strdup(ent->d_name);
1510                         continue;
1511                 }
1512
1513                 printf("too many BIOSes, dropping \"%s\"\n", ent->d_name);
1514         }
1515
1516         closedir(dir);
1517
1518 do_plugins:
1519         snprintf(fname, sizeof(fname), "%s/", Config.PluginsDir);
1520         dir = opendir(fname);
1521         if (dir == NULL) {
1522                 perror("scan_bios_plugins opendir");
1523                 return;
1524         }
1525
1526         while (1) {
1527                 void *h, *tmp;
1528
1529                 errno = 0;
1530                 ent = readdir(dir);
1531                 if (ent == NULL) {
1532                         if (errno != 0)
1533                                 perror("readdir");
1534                         break;
1535                 }
1536                 p = strstr(ent->d_name, ".so");
1537                 if (p == NULL)
1538                         continue;
1539
1540                 snprintf(fname, sizeof(fname), "%s/%s", Config.PluginsDir, ent->d_name);
1541                 h = dlopen(fname, RTLD_LAZY | RTLD_LOCAL);
1542                 if (h == NULL) {
1543                         fprintf(stderr, "%s\n", dlerror());
1544                         continue;
1545                 }
1546
1547                 // now what do we have here?
1548                 tmp = dlsym(h, "GPUinit");
1549                 if (tmp) {
1550                         dlclose(h);
1551                         if (gpu_i < ARRAY_SIZE(gpu_plugins) - 1)
1552                                 gpu_plugins[gpu_i++] = strdup(ent->d_name);
1553                         continue;
1554                 }
1555
1556                 tmp = dlsym(h, "SPUinit");
1557                 if (tmp) {
1558                         dlclose(h);
1559                         if (spu_i < ARRAY_SIZE(spu_plugins) - 1)
1560                                 spu_plugins[spu_i++] = strdup(ent->d_name);
1561                         continue;
1562                 }
1563
1564                 fprintf(stderr, "ignoring unidentified plugin: %s\n", fname);
1565                 dlclose(h);
1566         }
1567
1568         closedir(dir);
1569 }
1570
1571 void menu_init(void)
1572 {
1573         char buff[MAXPATHLEN];
1574
1575         strcpy(last_selected_fname, "/media");
1576
1577         scan_bios_plugins();
1578         pnd_menu_init();
1579         menu_init_common();
1580
1581         menu_set_defconfig();
1582         menu_load_config(0);
1583         last_psx_w = 320;
1584         last_psx_h = 240;
1585         last_psx_bpp = 16;
1586
1587         g_menubg_src_ptr = calloc(g_menuscreen_w * g_menuscreen_h * 2, 1);
1588         if (g_menubg_src_ptr == NULL)
1589                 exit(1);
1590         emu_make_path(buff, "skin/background.png", sizeof(buff));
1591         readpng(g_menubg_src_ptr, buff, READPNG_BG, g_menuscreen_w, g_menuscreen_h);
1592 }
1593
1594 void menu_notify_mode_change(int w, int h, int bpp)
1595 {
1596         last_psx_w = w;
1597         last_psx_h = h;
1598         last_psx_bpp = bpp;
1599
1600         if (scaling == SCALE_1_1) {
1601                 g_layer_x = 800/2 - w/2;  g_layer_y = 480/2 - h/2;
1602                 g_layer_w = w; g_layer_h = h;
1603         }
1604 }
1605
1606 static void menu_leave_emu(void)
1607 {
1608         if (GPU_close != NULL) {
1609                 int ret = GPU_close();
1610                 if (ret)
1611                         fprintf(stderr, "Warning: GPU_close returned %d\n", ret);
1612         }
1613
1614         memcpy(g_menubg_ptr, g_menubg_src_ptr, g_menuscreen_w * g_menuscreen_h * 2);
1615         if (pl_fbdev_buf != NULL && ready_to_go && last_psx_bpp == 16) {
1616                 int x = max(0, g_menuscreen_w - last_psx_w);
1617                 int y = max(0, g_menuscreen_h / 2 - last_psx_h / 2);
1618                 int w = min(g_menuscreen_w, last_psx_w);
1619                 int h = min(g_menuscreen_h, last_psx_h);
1620                 u16 *d = (u16 *)g_menubg_ptr + g_menuscreen_w * y + x;
1621                 u16 *s = pl_fbdev_buf;
1622
1623                 for (; h > 0; h--, d += g_menuscreen_w, s += last_psx_w)
1624                         menu_darken_bg(d, s, w, 0);
1625         }
1626
1627         if (ready_to_go)
1628                 cpu_clock = get_cpu_clock();
1629
1630         plat_video_menu_enter(ready_to_go);
1631 }
1632
1633 void menu_prepare_emu(void)
1634 {
1635         R3000Acpu *prev_cpu = psxCpu;
1636
1637         plat_video_menu_leave();
1638
1639         switch (scaling) {
1640         case SCALE_1_1:
1641                 menu_notify_mode_change(last_psx_w, last_psx_h, last_psx_bpp);
1642                 break;
1643         case SCALE_4_3:
1644                 g_layer_x = 80;  g_layer_y = 0;
1645                 g_layer_w = 640; g_layer_h = 480;
1646                 break;
1647         case SCALE_FULLSCREEN:
1648                 g_layer_x = 0;   g_layer_y = 0;
1649                 g_layer_w = 800; g_layer_h = 480;
1650                 break;
1651         case SCALE_CUSTOM:
1652                 break;
1653         }
1654         apply_filter(filter);
1655         apply_cpu_clock();
1656
1657         psxCpu = (Config.Cpu == CPU_INTERPRETER) ? &psxInt : &psxRec;
1658         if (psxCpu != prev_cpu)
1659                 // note that this does not really reset, just clears drc caches
1660                 psxCpu->Reset();
1661
1662         // core doesn't care about Config.Cdda changes,
1663         // so handle them manually here
1664         if (Config.Cdda)
1665                 CDR_stop();
1666
1667         menu_sync_config();
1668
1669         if (GPU_open != NULL) {
1670                 int ret = GPU_open(&gpuDisp, "PCSX", NULL);
1671                 if (ret)
1672                         fprintf(stderr, "Warning: GPU_open returned %d\n", ret);
1673         }
1674
1675         dfinput_activate(in_type == PSE_PAD_TYPE_ANALOGPAD);
1676 }
1677
1678 void me_update_msg(const char *msg)
1679 {
1680         strncpy(menu_error_msg, msg, sizeof(menu_error_msg));
1681         menu_error_msg[sizeof(menu_error_msg) - 1] = 0;
1682
1683         menu_error_time = plat_get_ticks_ms();
1684         lprintf("msg: %s\n", menu_error_msg);
1685 }
1686