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