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