frontend/main.c

   1 /*
   2  * (C) notaz, 2010-2012
   3  *
   4  * This work is licensed under the terms of the GNU GPLv2 or later.
   5  * See the COPYING file in the top-level directory.
   6  */
   7
   8 #include <stdio.h>
   9 #include <string.h>
  10 #include <stdarg.h>
  11 #include <unistd.h>
  12 #include <signal.h>
  13 #include <time.h>
  14 #if !defined(_WIN32) && !defined(NO_DYLIB)
  15 #include <dlfcn.h>
  16 #endif
  17 #ifdef HAVE_RTHREADS
  18 #include "../frontend/libretro-rthreads.h"
  19 #endif
  20
  21 #include "main.h"
  22 #include "plugin.h"
  23 #include "plugin_lib.h"
  24 #include "pcnt.h"
  25 #include "menu.h"
  26 #include "plat.h"
  27 #include "../libpcsxcore/misc.h"
  28 #include "../libpcsxcore/cheat.h"
  29 #include "../libpcsxcore/sio.h"
  30 #include "../libpcsxcore/database.h"
  31 #include "../libpcsxcore/cdrom-async.h"
  32 #include "../libpcsxcore/new_dynarec/new_dynarec.h"
  33 #include "../plugins/cdrcimg/cdrcimg.h"
  34 #include "../plugins/dfsound/spu_config.h"
  35 #include "arm_features.h"
  36 #include "revision.h"
  37
  38 #if defined(__EMSCRIPTEN__)
  39 #define DO_CPU_CHECKS 0
  40 #elif defined(__has_builtin)
  41 #define DO_CPU_CHECKS __has_builtin(__builtin_cpu_init)
  42 #elif defined(__x86_64__) || defined(__i386__)
  43 #define DO_CPU_CHECKS 1
  44 #else
  45 #define DO_CPU_CHECKS 0
  46 #endif
  47
  48 #ifndef NO_FRONTEND
  49 #include <sys/stat.h>
  50 #include "libpicofe/input.h"
  51 #include "libpicofe/plat.h"
  52 #include "libpicofe/readpng.h"
  53
  54 static void toggle_fast_forward(int force_off);
  55 static void check_profile(void);
  56 static void check_memcards(void);
  57 static int get_gameid_filename(char *buf, int size, const char *fmt, int i);
  58 static const char *get_home_dir(void);
  59 #define MAKE_PATH(buf, dir, fname) \
  60         emu_make_path(buf, sizeof(buf), dir, fname)
  61
  62 #endif
  63 #ifndef BOOT_MSG
  64 #define BOOT_MSG "Booting up..."
  65 #endif
  66
  67 // don't include debug.h - it breaks ARM build (R1 redefined)
  68 static void StartDebugger() {}
  69 static void StopDebugger() {}
  70
  71 int ready_to_go, g_emu_want_quit, g_emu_resetting;
  72 unsigned long gpuDisp;
  73 char cfgfile_basename[MAXPATHLEN];
  74 int state_slot;
  75 enum sched_action emu_action, emu_action_old;
  76 char hud_msg[64];
  77 int hud_new_msg;
  78
  79 void set_cd_image(const char *fname)
  80 {
  81         SetIsoFile(fname);
  82 }
  83
  84 static void set_default_paths(void)
  85 {
  86 #ifndef NO_FRONTEND
  87         const char *home = get_home_dir();
  88         struct stat st;
  89         MAKE_PATH(Config.PatchesDir, PATCHES_DIR, NULL);
  90         MAKE_PATH(Config.Mcd1, MEMCARD_DIR, "card1.mcd");
  91         MAKE_PATH(Config.Mcd2, MEMCARD_DIR, "card2.mcd");
  92         MAKE_PATH(Config.BiosDir, BIOS_DIR, NULL);
  93
  94         emu_make_data_path(Config.PluginsDir, "plugins", sizeof(Config.PluginsDir));
  95
  96         // prefer bios in working dir for compatibility
  97         if (!strcmp(home, ".") && !stat("bios", &st))
  98                 strcpy(Config.BiosDir, "bios");
  99
 100         SysPrintf("dirs: profile=%s" PCSX_DOT_DIR ", bios=%s, plugins=%s\n",
 101                 home, Config.BiosDir, Config.PluginsDir);
 102 #endif
 103
 104         strcpy(Config.Gpu, "builtin_gpu");
 105         strcpy(Config.Spu, "builtin_spu");
 106 }
 107
 108 void emu_set_default_config(void)
 109 {
 110         // try to set sane config on which most games work
 111         Config.Xa = Config.Cdda = 0;
 112         Config.icache_emulation = 0;
 113         Config.PsxAuto = 1;
 114         Config.cycle_multiplier = CYCLE_MULT_DEFAULT;
 115         Config.GpuListWalking = -1;
 116         Config.FractionalFramerate = -1;
 117
 118         pl_rearmed_cbs.dithering = 1;
 119         pl_rearmed_cbs.gpu_neon.allow_interlace = 2; // auto
 120         pl_rearmed_cbs.gpu_neon.enhancement_enable =
 121         pl_rearmed_cbs.gpu_neon.enhancement_no_main = 0;
 122         pl_rearmed_cbs.gpu_neon.enhancement_tex_adj = 1;
 123         pl_rearmed_cbs.gpu_peops.dwActFixes = 1<<7;
 124         pl_rearmed_cbs.gpu_unai.old_renderer = 0;
 125         pl_rearmed_cbs.gpu_unai.ilace_force = 0;
 126         pl_rearmed_cbs.gpu_unai.lighting = 1;
 127         pl_rearmed_cbs.gpu_unai.fast_lighting = 0;
 128         pl_rearmed_cbs.gpu_unai.blending = 1;
 129         memset(&pl_rearmed_cbs.gpu_peopsgl, 0, sizeof(pl_rearmed_cbs.gpu_peopsgl));
 130         pl_rearmed_cbs.gpu_peopsgl.iVRamSize = 64;
 131         pl_rearmed_cbs.gpu_peopsgl.iTexGarbageCollection = 1;
 132
 133         spu_config.iUseReverb = 1;
 134         spu_config.iUseInterpolation = 1;
 135         spu_config.iXAPitch = 0;
 136         spu_config.iVolume = 768;
 137         spu_config.iTempo = 0;
 138         // may cause issues, no effect if only 1 core is detected
 139         spu_config.iUseThread = 0;
 140 #if defined(HAVE_PRE_ARMV7) && !defined(_3DS) /* XXX GPH hack */
 141         spu_config.iUseReverb = 0;
 142         spu_config.iUseInterpolation = 0;
 143 #ifndef HAVE_LIBRETRO
 144         spu_config.iTempo = 1;
 145 #endif
 146 #endif
 147         ndrc_g.hacks = 0;
 148
 149         in_type[0] = PSE_PAD_TYPE_STANDARD;
 150         in_type[1] = PSE_PAD_TYPE_STANDARD;
 151 }
 152
 153 #ifndef NO_FRONTEND
 154
 155 void do_emu_action(void)
 156 {
 157         int ret;
 158
 159         emu_action_old = emu_action;
 160
 161         switch (emu_action) {
 162         case SACTION_LOAD_STATE:
 163                 ret = emu_load_state(state_slot);
 164                 snprintf(hud_msg, sizeof(hud_msg), ret == 0 ? "LOADED" : "FAIL!");
 165                 break;
 166         case SACTION_SAVE_STATE:
 167                 ret = emu_save_state(state_slot);
 168                 snprintf(hud_msg, sizeof(hud_msg), ret == 0 ? "SAVED" : "FAIL!");
 169                 break;
 170         case SACTION_ENTER_MENU:
 171                 toggle_fast_forward(1);
 172                 menu_loop();
 173                 return;
 174         case SACTION_NEXT_SSLOT:
 175                 state_slot++;
 176                 if (state_slot > 9)
 177                         state_slot = 0;
 178                 goto do_state_slot;
 179         case SACTION_PREV_SSLOT:
 180                 state_slot--;
 181                 if (state_slot < 0)
 182                         state_slot = 9;
 183 do_state_slot:
 184                 snprintf(hud_msg, sizeof(hud_msg), "STATE SLOT %d [%s]", state_slot,
 185                         emu_check_state(state_slot) == 0 ? "USED" : "FREE");
 186                 hud_new_msg = 3;
 187                 SysPrintf("* %s\n", hud_msg);
 188                 break;
 189         case SACTION_TOGGLE_FSKIP:
 190                 pl_rearmed_cbs.fskip_advice = 0;
 191                 pl_rearmed_cbs.frameskip++;
 192                 if (pl_rearmed_cbs.frameskip > 1)
 193                         pl_rearmed_cbs.frameskip = -1;
 194                 snprintf(hud_msg, sizeof(hud_msg), "FRAMESKIP: %s",
 195                         pl_rearmed_cbs.frameskip == -1 ? "AUTO" :
 196                         pl_rearmed_cbs.frameskip == 0 ? "OFF" : "1" );
 197                 plugin_call_rearmed_cbs();
 198                 break;
 199         case SACTION_SWITCH_DISPMODE:
 200                 pl_switch_dispmode();
 201                 plugin_call_rearmed_cbs();
 202                 if (GPU_open != NULL && GPU_close != NULL) {
 203                         GPU_close();
 204                         GPU_open(&gpuDisp, "PCSX", NULL);
 205                 }
 206                 break;
 207         case SACTION_FAST_FORWARD:
 208                 toggle_fast_forward(0);
 209                 plugin_call_rearmed_cbs();
 210                 break;
 211         case SACTION_TOGGLE_FPS:
 212                 if ((g_opts & (OPT_SHOWFPS|OPT_SHOWCPU))
 213                     == (OPT_SHOWFPS|OPT_SHOWCPU))
 214                         g_opts &= ~(OPT_SHOWFPS|OPT_SHOWCPU);
 215                 else if (g_opts & OPT_SHOWFPS)
 216                         g_opts |= OPT_SHOWCPU;
 217                 else
 218                         g_opts |= OPT_SHOWFPS;
 219                 break;
 220         case SACTION_TOGGLE_FULLSCREEN:
 221                 plat_target.vout_fullscreen = !plat_target.vout_fullscreen;
 222                 if (GPU_open != NULL && GPU_close != NULL) {
 223                         GPU_close();
 224                         GPU_open(&gpuDisp, "PCSX", NULL);
 225                 }
 226                 break;
 227         case SACTION_SCREENSHOT:
 228                 {
 229                         char buf[MAXPATHLEN];
 230                         void *scrbuf;
 231                         int w, h, bpp;
 232                         time_t t = time(NULL);
 233                         struct tm *tb = localtime(&t);
 234                         int ti = tb->tm_yday * 1000000 + tb->tm_hour * 10000 +
 235                                 tb->tm_min * 100 + tb->tm_sec;
 236
 237                         scrbuf = pl_prepare_screenshot(&w, &h, &bpp);
 238                         get_gameid_filename(buf, sizeof(buf),
 239                                 "%s" SCREENSHOTS_DIR "%.32s-%.9s.%d.png", ti);
 240                         ret = -2;
 241                         if (scrbuf != 0 && bpp == 16)
 242                                 ret = writepng(buf, scrbuf, w, h);
 243                         if (ret == 0)
 244                                 snprintf(hud_msg, sizeof(hud_msg), "SCREENSHOT TAKEN");
 245                         else
 246                                 SysPrintf("writepng %s: %d\n", buf, ret);
 247                         break;
 248                 }
 249         case SACTION_VOLUME_UP:
 250         case SACTION_VOLUME_DOWN:
 251                 {
 252                         static int volume;
 253                         plat_target_step_volume(&volume,
 254                                 emu_action == SACTION_VOLUME_UP ? 1 : -1);
 255                 }
 256                 return;
 257         case SACTION_MINIMIZE:
 258                 if (GPU_close != NULL)
 259                         GPU_close();
 260
 261                 plat_minimize();
 262
 263                 if (GPU_open != NULL) {
 264                         ret = GPU_open(&gpuDisp, "PCSX", NULL);
 265                         if (ret)
 266                                 SysMessage("GPU_open returned %d", ret);
 267                 }
 268                 return;
 269         case SACTION_ANALOG_TOGGLE:
 270                 ret = padToggleAnalog(0);
 271                 snprintf(hud_msg, sizeof(hud_msg), "ANALOG %s", ret ? "ON" : "OFF");
 272                 break;
 273         default:
 274                 return;
 275         }
 276
 277         hud_new_msg = 3;
 278 }
 279
 280 #endif
 281
 282 static char basic_lcase(char c)
 283 {
 284         if ('A' <= c && c <= 'Z')
 285                 return c - 'A' + 'a';
 286         return c;
 287 }
 288
 289 static int cdidcmp(const char *id1, const char *id2)
 290 {
 291         while (*id1 != 0 && *id2 != 0) {
 292                 if (*id1 == '_') { id1++; continue; }
 293                 if (*id2 == '_') { id2++; continue; }
 294                 if (basic_lcase(*id1) != basic_lcase(*id2))
 295                         break;
 296                 id1++;
 297                 id2++;
 298         }
 299
 300         return *id1 - *id2;
 301 }
 302
 303 static void parse_cwcheat(void)
 304 {
 305         char line[256], buf[256], name[256], *p;
 306         int newcheat = 1;
 307         u32 a, v;
 308         FILE *f;
 309
 310         f = fopen("cheatpops.db", "r");
 311         if (f == NULL)
 312                 return;
 313
 314         /* find the game */
 315         while (fgets(line, sizeof(line), f)) {
 316                 if (sscanf(line, "_S %63s", buf) != 1)
 317                         continue;
 318                 if (cdidcmp(buf, CdromId) == 0)
 319                         break;
 320         }
 321
 322         if (feof(f))
 323                 goto out;
 324
 325         SysPrintf("cwcheat section found for %s\n", CdromId);
 326         while (fgets(line, sizeof(line), f))
 327         {
 328                 p = line + strlen(line);
 329                 for (p--; p >= line && (*p == '\r' || *p == '\n' || *p == ' '); p--)
 330                         *p = 0;
 331                 if (*p == 0 || *p == '#' || *p == ';')
 332                         continue;
 333
 334                 if (strncmp(line, "_S", 2) == 0)
 335                         break;
 336                 if (strncmp(line, "_G", 2) == 0) {
 337                         SysPrintf("  cwcheat game name: '%s'\n", line + 3);
 338                         continue;
 339                 }
 340                 if (strncmp(line, "_C0", 3) == 0) {
 341                         if (!newcheat && Cheats[NumCheats - 1].n == 0) {
 342                                 SysPrintf("cheat '%s' failed to parse\n", name);
 343                                 free(Cheats[NumCheats - 1].Descr);
 344                                 NumCheats--;
 345                         }
 346                         snprintf(name, sizeof(name), "%s", line + 4);
 347                         newcheat = 1;
 348                         continue;
 349                 }
 350                 if (sscanf(line, "_L %x %x", &a, &v) != 2) {
 351                         SysPrintf("line failed to parse: '%s'\n", line);
 352                         continue;
 353                 }
 354
 355                 if (newcheat) {
 356                         if (NumCheats >= NumCheatsAllocated) {
 357                                 NumCheatsAllocated += 16;
 358                                 Cheats = realloc(Cheats, sizeof(Cheat) *
 359                                                 NumCheatsAllocated);
 360                                 if (Cheats == NULL)
 361                                         break;
 362                         }
 363                         Cheats[NumCheats].Descr = strdup(name);
 364                         Cheats[NumCheats].Enabled = 0;
 365                         Cheats[NumCheats].WasEnabled = 0;
 366                         Cheats[NumCheats].First = NumCodes;
 367                         Cheats[NumCheats].n = 0;
 368                         NumCheats++;
 369                         newcheat = 0;
 370                 }
 371
 372                 if (NumCodes >= NumCodesAllocated) {
 373                         NumCodesAllocated += 16;
 374                         CheatCodes = realloc(CheatCodes, sizeof(CheatCode) *
 375                                 NumCodesAllocated);
 376                         if (CheatCodes == NULL)
 377                                 break;
 378                 }
 379                 CheatCodes[NumCodes].Addr = a;
 380                 CheatCodes[NumCodes].Val = v;
 381                 NumCodes++;
 382                 Cheats[NumCheats - 1].n++;
 383         }
 384
 385 out:
 386         fclose(f);
 387 }
 388
 389 void emu_on_new_cd(int show_hud_msg)
 390 {
 391         ClearAllCheats();
 392         parse_cwcheat();
 393
 394         if (Config.HLE) {
 395                 SysPrintf("note: running with HLE BIOS, expect compatibility problems\n");
 396                 SysPrintf("----------------------------------------------------------\n");
 397         }
 398         if (Config.TurboCD)
 399                 SysPrintf("note: TurboCD is enabled, this breaks games\n");
 400
 401         if (show_hud_msg) {
 402                 if (check_unsatisfied_libcrypt())
 403                         snprintf(hud_msg, sizeof(hud_msg),
 404                                 "LibCrypt protected game with missing SBI detected");
 405                 else
 406                         snprintf(hud_msg, sizeof(hud_msg), BOOT_MSG);
 407                 hud_new_msg = 3;
 408         }
 409 }
 410
 411 static void log_wrong_cpu(void)
 412 {
 413 #if DO_CPU_CHECKS
 414         __builtin_cpu_init();
 415         #define CHECK_CPU(name) if (!__builtin_cpu_supports(name)) \
 416                 SysPrintf("ERROR: compiled for " name ", which is unsupported by the CPU\n")
 417 #ifdef __SSE2__
 418         CHECK_CPU("sse2");
 419 #endif
 420 #ifdef __SSSE3__
 421         CHECK_CPU("ssse3");
 422 #endif
 423 #ifdef __SSE4_1__
 424         CHECK_CPU("sse4.1");
 425 #endif
 426 #endif // DO_CPU_CHECKS
 427 }
 428
 429 int emu_core_preinit(void)
 430 {
 431         // what is the name of the config file?
 432         // it may be redefined by -cfg on the command line
 433         strcpy(cfgfile_basename, "pcsx.cfg");
 434
 435 #ifdef IOS
 436         emuLog = fopen("/User/Documents/pcsxr.log", "w");
 437         if (emuLog == NULL)
 438                 emuLog = fopen("pcsxr.log", "w");
 439         if (emuLog == NULL)
 440 #endif
 441         emuLog = stdout;
 442
 443         log_wrong_cpu();
 444
 445         SetIsoFile(NULL);
 446
 447         memset(&Config, 0, sizeof(Config));
 448
 449         set_default_paths();
 450         emu_set_default_config();
 451         strcpy(Config.Bios, "HLE");
 452
 453         return 0;
 454 }
 455
 456 int emu_core_init(void)
 457 {
 458         SysPrintf("Starting PCSX-ReARMed " REV " (%s)\n", get_build_info());
 459         SysPrintf("build time: " __DATE__ " " __TIME__ "\n");
 460
 461 #if defined(__arm__) && defined(__ARM_FP)
 462         // RunFast mode
 463         u32 fpscr = ~0;
 464         __asm__ volatile("vmrs %0, fpscr" : "=r"(fpscr));
 465         SysPrintf("old fpscr = %08x\n", fpscr);
 466         fpscr &= ~0x00009f9f;
 467         fpscr |=  0x03000000; // DN | FZ
 468         __asm__ volatile("vmsr fpscr, %0" :: "r"(fpscr));
 469 #endif
 470
 471 #ifdef HAVE_RTHREADS
 472         pcsxr_sthread_init();
 473 #endif
 474 #ifndef NO_FRONTEND
 475         check_profile();
 476         check_memcards();
 477 #endif
 478
 479         if (EmuInit() == -1) {
 480                 SysPrintf("PSX emulator couldn't be initialized.\n");
 481                 return -1;
 482         }
 483
 484         LoadMcds(Config.Mcd1, Config.Mcd2);
 485
 486         if (Config.Debug) {
 487                 StartDebugger();
 488         }
 489
 490         return 0;
 491 }
 492
 493 void emu_core_ask_exit(void)
 494 {
 495         psxRegs.stop++;
 496         g_emu_want_quit = 1;
 497 }
 498
 499 #ifndef NO_FRONTEND
 500
 501 #include <sys/stat.h>
 502 #include <sys/types.h>
 503
 504 static const char *get_home_dir(void)
 505 {
 506 #if defined(PANDORA) || !defined(__unix__)
 507         return ".";
 508 #else
 509         static const char *home = NULL;
 510         struct stat st;
 511         if (home)
 512                 return home;
 513         // for compatibility with older versions, look for .pcsx in the working dir
 514         if (stat(PCSX_DOT_DIR + 1, &st) != 0)
 515                 home = getenv("HOME");
 516         if (home == NULL)
 517                 home = ".";
 518         return home;
 519 #endif
 520 }
 521
 522 void emu_make_path(char *buf, size_t size, const char *dir, const char *fname)
 523 {
 524         const char *home = get_home_dir();
 525         if (fname)
 526                 snprintf(buf, size, "%s%s%s", home, dir, fname);
 527         else
 528                 snprintf(buf, size, "%s%s", home, dir);
 529 }
 530
 531 void emu_make_data_path(char *buff, const char *end, int size)
 532 {
 533         int pos, end_len;
 534
 535         end_len = strlen(end);
 536         pos = plat_get_root_dir(buff, size);
 537         strncpy(buff + pos, end, size - pos);
 538         buff[size - 1] = 0;
 539         if (pos + end_len > size - 1)
 540                 printf("Warning: path truncated: %s\n", buff);
 541 }
 542
 543 static void create_profile_dir(const char *directory) {
 544         char path[MAXPATHLEN];
 545
 546         MAKE_PATH(path, directory, NULL);
 547         mkdir(path, S_IRWXU | S_IRWXG);
 548 }
 549
 550 static void check_profile(void) {
 551         // make sure that ~/.pcsx exists
 552         create_profile_dir(PCSX_DOT_DIR);
 553
 554         create_profile_dir(BIOS_DIR);
 555         create_profile_dir(MEMCARD_DIR);
 556         create_profile_dir(STATES_DIR);
 557         create_profile_dir(CHEATS_DIR);
 558         create_profile_dir(PATCHES_DIR);
 559         create_profile_dir(CFG_DIR);
 560         create_profile_dir(SCREENSHOTS_DIR);
 561 }
 562
 563 static void check_memcards(void)
 564 {
 565         char buf[MAXPATHLEN];
 566         FILE *f;
 567         int i;
 568
 569         for (i = 1; i <= 9; i++) {
 570                 snprintf(buf, sizeof(buf), "%s%scard%d.mcd",
 571                         get_home_dir(), MEMCARD_DIR, i);
 572
 573                 f = fopen(buf, "rb");
 574                 if (f == NULL) {
 575                         SysPrintf("Creating memcard: %s\n", buf);
 576                         CreateMcd(buf);
 577                 }
 578                 else
 579                         fclose(f);
 580         }
 581 }
 582
 583 int main(int argc, char *argv[])
 584 {
 585         char file[MAXPATHLEN] = "";
 586         char path[MAXPATHLEN];
 587         char isofilename[MAXPATHLEN];
 588         const char *cdfile = NULL;
 589         const char *loadst_f = NULL;
 590         int psxout = 0;
 591         int loadst = 0;
 592         int i;
 593
 594         emu_core_preinit();
 595
 596         // read command line options
 597         for (i = 1; i < argc; i++) {
 598                      if (!strcmp(argv[i], "-psxout")) psxout = 1;
 599                 else if (!strcmp(argv[i], "-load")) loadst = atol(argv[++i]);
 600                 else if (!strcmp(argv[i], "-cfg")) {
 601                         if (i+1 >= argc) break;
 602                         strncpy(cfgfile_basename, argv[++i], MAXPATHLEN-100);   /* TODO buffer overruns */
 603                         SysPrintf("Using config file %s.\n", cfgfile_basename);
 604                 }
 605                 else if (!strcmp(argv[i], "-cdfile")) {
 606                         if (i+1 >= argc) break;
 607                         strncpy(isofilename, argv[++i], MAXPATHLEN);
 608                         if (isofilename[0] != '/') {
 609                                 getcwd(path, MAXPATHLEN);
 610                                 if (strlen(path) + strlen(isofilename) + 1 < MAXPATHLEN) {
 611                                         strcat(path, "/");
 612                                         strcat(path, isofilename);
 613                                         strcpy(isofilename, path);
 614                                 } else
 615                                         isofilename[0] = 0;
 616                         }
 617
 618                         cdfile = isofilename;
 619                 }
 620                 else if (!strcmp(argv[i], "-loadf")) {
 621                         if (i+1 >= argc) break;
 622                         loadst_f = argv[++i];
 623                 }
 624                 else if (!strcmp(argv[i], "-h") ||
 625                          !strcmp(argv[i], "-help") ||
 626                          !strcmp(argv[i], "--help")) {
 627                          printf("PCSX-ReARMed " REV "\n");
 628                          printf("%s\n", _(
 629                                                         " pcsx [options] [file]\n"
 630                                                         "\toptions:\n"
 631                                                         "\t-cdfile FILE\tRuns a CD image file\n"
 632                                                         "\t-cfg FILE\tLoads desired configuration file (default: ~/.pcsx/pcsx.cfg)\n"
 633                                                         "\t-psxout\t\tEnable PSX output\n"
 634                                                         "\t-load STATENUM\tLoads savestate STATENUM (1-5)\n"
 635                                                         "\t-h -help\tDisplay this message\n"
 636                                                         "\tfile\t\tLoads a PSX EXE file\n"));
 637                          return 0;
 638                 } else {
 639                         strncpy(file, argv[i], MAXPATHLEN);
 640                         if (file[0] != '/') {
 641                                 getcwd(path, MAXPATHLEN);
 642                                 if (strlen(path) + strlen(file) + 1 < MAXPATHLEN) {
 643                                         strcat(path, "/");
 644                                         strcat(path, file);
 645                                         strcpy(file, path);
 646                                 } else
 647                                         file[0] = 0;
 648                         }
 649                 }
 650         }
 651
 652         if (cdfile)
 653                 set_cd_image(cdfile);
 654
 655         // frontend stuff
 656         // init input but leave probing to platform code,
 657         // they add input drivers and may need to modify them after probe
 658         in_init();
 659         pl_init();
 660         plat_init();
 661         menu_init(); // loads config
 662
 663         if (emu_core_init() != 0)
 664                 return 1;
 665
 666         if (psxout)
 667                 Config.PsxOut = 1;
 668
 669         if (LoadPlugins() == -1) {
 670                 // FIXME: this recovery doesn't work, just delete bad config and bail out
 671                 // SysMessage("could not load plugins, retrying with defaults\n");
 672                 set_default_paths();
 673                 snprintf(path, sizeof(path), "%s" PCSX_DOT_DIR "%s",
 674                         get_home_dir(), cfgfile_basename);
 675                 remove(path);
 676                 SysMessage("Failed loading plugins!");
 677                 return 1;
 678         }
 679         pcnt_hook_plugins();
 680
 681         if (OpenPlugins() == -1) {
 682                 return 1;
 683         }
 684
 685         CheckCdrom();
 686         plugin_call_rearmed_cbs();
 687         SysReset();
 688
 689         if (file[0] != '\0') {
 690                 if (Load(file) != -1)
 691                         ready_to_go = 1;
 692         } else {
 693                 if (cdfile) {
 694                         if (LoadCdrom() == -1) {
 695                                 ClosePlugins();
 696                                 SysPrintf(_("Could not load CD-ROM!\n"));
 697                                 return -1;
 698                         }
 699                         emu_on_new_cd(!loadst);
 700                         ready_to_go = 1;
 701                 }
 702         }
 703
 704         if (loadst_f) {
 705                 int ret = LoadState(loadst_f);
 706                 SysPrintf("%s state file: %s\n",
 707                         ret ? "failed to load" : "loaded", loadst_f);
 708                 ready_to_go |= ret == 0;
 709         }
 710
 711         if (ready_to_go) {
 712                 if (menu_load_config(1) != 0)
 713                         menu_load_config(0);
 714                 menu_prepare_emu();
 715
 716                 // If a state has been specified, then load that
 717                 if (loadst) {
 718                         int ret = emu_load_state(loadst - 1);
 719                         SysPrintf("%s state %d\n",
 720                                 ret ? "failed to load" : "loaded", loadst);
 721                 }
 722         }
 723         else
 724                 menu_loop();
 725
 726 #ifndef LIGHTREC_DEBUG
 727         pl_start_watchdog();
 728 #endif
 729
 730         while (!g_emu_want_quit)
 731         {
 732                 psxRegs.stop = 0;
 733                 emu_action = SACTION_NONE;
 734
 735                 psxCpu->Execute(&psxRegs);
 736                 if (emu_action != SACTION_NONE)
 737                         do_emu_action();
 738         }
 739
 740         printf("Exit..\n");
 741         ClosePlugins();
 742         SysClose();
 743         menu_finish();
 744         plat_finish();
 745
 746         return 0;
 747 }
 748
 749 static void toggle_fast_forward(int force_off)
 750 {
 751         static int fast_forward;
 752         static int normal_g_opts;
 753         static int normal_enhancement_enable;
 754         //static int normal_frameskip;
 755
 756         if (force_off && !fast_forward)
 757                 return;
 758
 759         fast_forward = !fast_forward;
 760         if (fast_forward) {
 761                 normal_g_opts = g_opts;
 762                 //normal_frameskip = pl_rearmed_cbs.frameskip;
 763                 normal_enhancement_enable =
 764                         pl_rearmed_cbs.gpu_neon.enhancement_enable;
 765
 766                 g_opts |= OPT_NO_FRAMELIM;
 767                 // pl_rearmed_cbs.frameskip = 3; // too broken
 768                 pl_rearmed_cbs.gpu_neon.enhancement_enable = 0;
 769         } else {
 770                 g_opts = normal_g_opts;
 771                 //pl_rearmed_cbs.frameskip = normal_frameskip;
 772                 pl_rearmed_cbs.gpu_neon.enhancement_enable =
 773                         normal_enhancement_enable;
 774
 775                 pl_timing_prepare(Config.PsxType);
 776         }
 777
 778         if (!force_off)
 779                 snprintf(hud_msg, sizeof(hud_msg), "FAST FORWARD %s",
 780                         fast_forward ? "ON" : "OFF");
 781 }
 782
 783 static void SignalExit(int sig) {
 784         SysPrintf("got signal %d\n", sig);
 785         // only to restore framebuffer/resolution on some devices
 786         plat_finish();
 787         _exit(1);
 788 }
 789
 790 static int get_gameid_filename(char *buf, int size, const char *fmt, int i) {
 791         char trimlabel[33];
 792         int j;
 793
 794         strncpy(trimlabel, CdromLabel, 32);
 795         trimlabel[32] = 0;
 796         for (j = 31; j >= 0; j--)
 797                 if (trimlabel[j] == ' ')
 798                         trimlabel[j] = 0;
 799                 else
 800                         continue;
 801
 802         snprintf(buf, size, fmt, get_home_dir(), trimlabel, CdromId, i);
 803
 804         return 0;
 805 }
 806
 807 int get_state_filename(char *buf, int size, int i) {
 808         return get_gameid_filename(buf, size,
 809                 "%s" STATES_DIR "%.32s-%.9s.%3.3d", i);
 810 }
 811
 812 int emu_check_state(int slot)
 813 {
 814         char fname[MAXPATHLEN];
 815         int ret;
 816
 817         ret = get_state_filename(fname, sizeof(fname), slot);
 818         if (ret != 0)
 819                 return ret;
 820
 821         return CheckState(fname);
 822 }
 823
 824 int emu_save_state(int slot)
 825 {
 826         char fname[MAXPATHLEN];
 827         int ret;
 828
 829         ret = get_state_filename(fname, sizeof(fname), slot);
 830         if (ret != 0)
 831                 return ret;
 832
 833         ret = SaveState(fname);
 834 #if defined(HAVE_PRE_ARMV7) && !defined(_3DS) && !defined(__SWITCH__) /* XXX GPH hack */
 835         sync();
 836 #endif
 837         SysPrintf("* %s \"%s\" [%d]\n",
 838                 ret == 0 ? "saved" : "failed to save", fname, slot);
 839         return ret;
 840 }
 841
 842 int emu_load_state(int slot)
 843 {
 844         char fname[MAXPATHLEN];
 845         int ret;
 846
 847         hud_msg[0] = 0;
 848
 849         ret = get_state_filename(fname, sizeof(fname), slot);
 850         if (ret != 0)
 851                 return ret;
 852
 853         return LoadState(fname);
 854 }
 855
 856 #endif // NO_FRONTEND
 857
 858 static void CALLBACK dummy_lace(void)
 859 {
 860 }
 861
 862 void SysReset() {
 863         // rearmed hack: EmuReset() runs some code when real BIOS is used,
 864         // but we usually do reset from menu while GPU is not open yet,
 865         // so we need to prevent updateLace() call..
 866         void *real_lace = GPU_updateLace;
 867         GPU_updateLace = dummy_lace;
 868         g_emu_resetting = 1;
 869
 870         // reset can run code, timing must be set
 871         pl_timing_prepare(Config.PsxType);
 872
 873         EmuReset();
 874
 875         GPU_updateLace = real_lace;
 876         g_emu_resetting = 0;
 877 }
 878
 879 void SysClose() {
 880         EmuShutdown();
 881         ReleasePlugins();
 882
 883         StopDebugger();
 884
 885         if (emuLog != NULL && emuLog != stdout && emuLog != stderr) {
 886                 fclose(emuLog);
 887                 emuLog = NULL;
 888         }
 889 }
 890
 891 #ifndef HAVE_LIBRETRO
 892 #ifndef ANDROID
 893
 894 void SysPrintf(const char *fmt, ...) {
 895         va_list list;
 896
 897         va_start(list, fmt);
 898         vfprintf(emuLog, fmt, list);
 899         va_end(list);
 900         fflush(emuLog);
 901 }
 902
 903 #else
 904
 905 #include <android/log.h>
 906
 907 void SysPrintf(const char *fmt, ...) {
 908         va_list list;
 909
 910         va_start(list, fmt);
 911         __android_log_vprint(ANDROID_LOG_INFO, "PCSX", fmt, list);
 912         va_end(list);
 913 }
 914
 915 #endif
 916 #endif /* HAVE_LIBRETRO */
 917
 918 void SysMessage(const char *fmt, ...) {
 919         va_list list;
 920         char msg[512];
 921         int ret;
 922
 923         va_start(list, fmt);
 924         ret = vsnprintf(msg, sizeof(msg), fmt, list);
 925         va_end(list);
 926
 927         if (ret < sizeof(msg) && msg[ret - 1] == '\n')
 928                 msg[ret - 1] = 0;
 929
 930         SysPrintf("%s\n", msg);
 931 }
 932
 933 #define PARSEPATH(dst, src) \
 934         ptr = src + strlen(src); \
 935         while (*ptr != '\\' && ptr != src) ptr--; \
 936         if (ptr != src) { \
 937                 strcpy(dst, ptr+1); \
 938         }
 939
 940 static int _OpenPlugins(void) {
 941         int ret;
 942
 943 #ifndef NO_FRONTEND
 944         signal(SIGINT, SignalExit);
 945         signal(SIGPIPE, SignalExit);
 946 #endif
 947
 948         ret = cdra_open();
 949         if (UsingIso() && ret < 0) { SysMessage(_("Error opening CD-ROM plugin!")); return -1; }
 950         ret = SPU_open();
 951         if (ret < 0) { SysMessage(_("Error opening SPU plugin!")); return -1; }
 952         SPU_registerCallback(SPUirq);
 953         SPU_registerScheduleCb(SPUschedule);
 954         // pcsx-rearmed: we handle gpu elsewhere
 955         //ret = GPU_open(&gpuDisp, "PCSX", NULL);
 956         //if (ret < 0) { SysMessage(_("Error opening GPU plugin!")); return -1; }
 957
 958         return 0;
 959 }
 960
 961 int OpenPlugins() {
 962         int ret;
 963
 964         while ((ret = _OpenPlugins()) == -2) {
 965                 ReleasePlugins();
 966                 LoadMcds(Config.Mcd1, Config.Mcd2);
 967                 if (LoadPlugins() == -1) return -1;
 968         }
 969         return ret;
 970 }
 971
 972 void ClosePlugins() {
 973         int ret;
 974
 975 #ifndef NO_FRONTEND
 976         signal(SIGINT, SIG_DFL);
 977         signal(SIGPIPE, SIG_DFL);
 978 #endif
 979
 980         cdra_close();
 981         ret = SPU_close();
 982         if (ret < 0) { SysMessage(_("Error closing SPU plugin!")); }
 983         // pcsx-rearmed: we handle gpu elsewhere
 984         //ret = GPU_close();
 985         //if (ret < 0) { SysMessage(_("Error closing GPU plugin!")); return; }
 986 }
 987
 988 /* we hook statically linked plugins here */
 989 static const char *builtin_plugins[] = {
 990         "builtin_gpu", "builtin_spu"
 991 };
 992
 993 static const int builtin_plugin_ids[] = {
 994         PLUGIN_GPU, PLUGIN_SPU
 995 };
 996
 997 void *SysLoadLibrary(const char *lib) {
 998         const char *tmp = strrchr(lib, '/');
 999         void *ret = NULL;
1000         int i;
1001
1002         SysPrintf("plugin: %s\n", lib);
1003
1004         if (tmp != NULL) {
1005                 tmp++;
1006                 for (i = 0; i < ARRAY_SIZE(builtin_plugins); i++)
1007                         if (strcmp(tmp, builtin_plugins[i]) == 0)
1008                                 return (void *)(uintptr_t)(PLUGIN_DL_BASE + builtin_plugin_ids[i]);
1009         }
1010
1011 #if !defined(_WIN32) && !defined(NO_DYLIB)
1012         ret = dlopen(lib, RTLD_NOW);
1013         if (ret == NULL)
1014                 SysMessage("dlopen: %s", dlerror());
1015 #else
1016         /* no external plugin support, abi is no longer
1017          * compatible with psemu/pcsx anyway */
1018 #endif
1019         return ret;
1020 }
1021
1022 void *SysLoadSym(void *lib, const char *sym) {
1023         unsigned int plugid = (unsigned int)(uintptr_t)lib;
1024
1025         if (PLUGIN_DL_BASE <= plugid && plugid < PLUGIN_DL_BASE + ARRAY_SIZE(builtin_plugins))
1026                 return plugin_link(plugid - PLUGIN_DL_BASE, sym);
1027
1028 #if !defined(_WIN32) && !defined(NO_DYLIB)
1029         return dlsym(lib, sym);
1030 #else
1031         return NULL;
1032 #endif
1033 }
1034
1035 const char *SysLibError() {
1036 #if defined(NO_DYLIB)
1037         return NULL;
1038 #elif !defined(_WIN32)
1039         return dlerror();
1040 #else
1041         return "not supported";
1042 #endif
1043 }
1044
1045 void SysCloseLibrary(void *lib) {
1046         unsigned int plugid = (unsigned int)(uintptr_t)lib;
1047
1048         if (PLUGIN_DL_BASE <= plugid && plugid < PLUGIN_DL_BASE + ARRAY_SIZE(builtin_plugins))
1049                 return;
1050
1051 #if !defined(_WIN32) && !defined(NO_DYLIB)
1052         dlclose(lib);
1053 #endif
1054 }