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