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