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