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