b05893c963ac3771e75a507f0c869c6b8a571bd5
[pcsx_rearmed.git] / frontend / main.c
1 /*
2  * (C) notaz, 2010
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 <dlfcn.h>
12 #include <sys/stat.h>
13 #include <sys/types.h>
14 #include <unistd.h>
15
16 #include "plugin.h"
17 #include "pcnt.h"
18 #include "menu.h"
19 #include "../gui/Linux.h"
20 #include "../libpcsxcore/misc.h"
21 #include "common/plat.h"
22 #include "common/input.h"
23
24 int ready_to_go;
25 int UseGui;
26 static char *(*real_getenv)(const char *name);
27
28 static void make_path(char *buf, size_t size, const char *dir, const char *fname)
29 {
30         if (fname)
31                 snprintf(buf, size, ".%s%s", dir, fname);
32         else
33                 snprintf(buf, size, ".%s", dir);
34 }
35 #define MAKE_PATH(buf, dir, fname) \
36         make_path(buf, sizeof(buf), dir, fname)
37
38 static void create_profile_dir(const char *directory) {
39         char path[MAXPATHLEN];
40
41         MAKE_PATH(path, directory, NULL);
42         mkdir(path, S_IRWXU | S_IRWXG);
43 }
44
45 static void CheckSubDir() {
46         // make sure that ~/.pcsx exists
47         create_profile_dir(PCSX_DOT_DIR);
48
49         create_profile_dir(BIOS_DIR);
50         create_profile_dir(MEMCARD_DIR);
51         create_profile_dir(STATES_DIR);
52         create_profile_dir(PLUGINS_DIR);
53         create_profile_dir(PLUGINS_CFG_DIR);
54         create_profile_dir(CHEATS_DIR);
55         create_profile_dir(PATCHES_DIR);
56 }
57
58 static void CreateMemcard(char *filename, char *conf_mcd) {
59         struct stat buf;
60
61         make_path(conf_mcd, MAXPATHLEN, MEMCARD_DIR, filename);
62
63         /* Only create a memory card if an existing one does not exist */
64         if (stat(conf_mcd, &buf) == -1) {
65                 SysPrintf(_("Creating memory card: %s\n"), conf_mcd);
66                 CreateMcd(conf_mcd);
67         }
68 }
69
70 int main(int argc, char *argv[])
71 {
72         char file[MAXPATHLEN] = "";
73         char path[MAXPATHLEN];
74         int runcd = 0;
75         int loadst = 0;
76         void *tmp;
77         int i;
78
79         tmp = dlopen("/lib/libdl.so.2", RTLD_LAZY);
80         if (tmp == NULL)
81                 tmp = dlopen("/lib32/libdl.so.2", RTLD_LAZY);
82         if (tmp != NULL)
83                 real_getenv = dlsym(tmp, "getenv");
84         if (real_getenv == NULL) {
85                 fprintf(stderr, "%s\n", dlerror());
86                 return 1;
87         }
88         dlclose(tmp);
89
90         // what is the name of the config file?
91         // it may be redefined by -cfg on the command line
92         strcpy(cfgfile_basename, "pcsx.cfg");
93
94         emuLog = stdout;
95         SetIsoFile(NULL);
96
97         // read command line options
98         for (i = 1; i < argc; i++) {
99                      if (!strcmp(argv[i], "-psxout")) Config.PsxOut = 1;
100                 else if (!strcmp(argv[i], "-load")) loadst = atol(argv[++i]);
101                 else if (!strcmp(argv[i], "-cfg")) {
102                         if (i+1 >= argc) break;
103                         strncpy(cfgfile_basename, argv[++i], MAXPATHLEN-100);   /* TODO buffer overruns */
104                         printf("Using config file %s.\n", cfgfile_basename);
105                 }
106                 else if (!strcmp(argv[i], "-cdfile")) {
107                         char isofilename[MAXPATHLEN];
108
109                         if (i+1 >= argc) break;
110                         strncpy(isofilename, argv[++i], MAXPATHLEN);
111                         if (isofilename[0] != '/') {
112                                 getcwd(path, MAXPATHLEN);
113                                 if (strlen(path) + strlen(isofilename) + 1 < MAXPATHLEN) {
114                                         strcat(path, "/");
115                                         strcat(path, isofilename);
116                                         strcpy(isofilename, path);
117                                 } else
118                                         isofilename[0] = 0;
119                         }
120
121                         SetIsoFile(isofilename);
122                         runcd = 1;
123                 }
124                 else if (!strcmp(argv[i], "-h") ||
125                          !strcmp(argv[i], "-help") ||
126                          !strcmp(argv[i], "--help")) {
127                          printf(PACKAGE_NAME " " PACKAGE_VERSION "\n");
128                          printf("%s\n", _(
129                                                         " pcsx [options] [file]\n"
130                                                         "\toptions:\n"
131                                                         "\t-cdfile FILE\tRuns a CD image file\n"
132                                                         "\t-nogui\t\tDon't open the GTK GUI\n"
133                                                         "\t-cfg FILE\tLoads desired configuration file (default: ~/.pcsx/pcsx.cfg)\n"
134                                                         "\t-psxout\t\tEnable PSX output\n"
135                                                         "\t-load STATENUM\tLoads savestate STATENUM (1-5)\n"
136                                                         "\t-h -help\tDisplay this message\n"
137                                                         "\tfile\t\tLoads file\n"));
138                          return 0;
139                 } else {
140                         strncpy(file, argv[i], MAXPATHLEN);
141                         if (file[0] != '/') {
142                                 getcwd(path, MAXPATHLEN);
143                                 if (strlen(path) + strlen(file) + 1 < MAXPATHLEN) {
144                                         strcat(path, "/");
145                                         strcat(path, file);
146                                         strcpy(file, path);
147                                 } else
148                                         file[0] = 0;
149                         }
150                 }
151         }
152
153         memset(&Config, 0, sizeof(PcsxConfig));
154         strcpy(Config.Net, "Disabled");
155
156         CheckSubDir();
157 //      ScanAllPlugins();
158
159         strcpy(Config.Bios, "HLE");
160         strcpy(Config.BiosDir, "./");
161
162         strcpy(Config.PluginsDir, "plugins");
163         strcpy(Config.Gpu, "builtin_gpu");
164         strcpy(Config.Spu, "builtin_spu");
165         strcpy(Config.Cdr, "builtin_cdr");
166         strcpy(Config.Pad1, "builtin_pad");
167         strcpy(Config.Pad2, "builtin_pad");
168
169         // try to load config
170         // if the config file doesn't exist
171         if (LoadConfig() == -1) {
172                 // Uh oh, no config file found, use some defaults
173                 Config.PsxAuto = 1;
174
175                 // create & load default memcards if they don't exist
176                 CreateMemcard("card1.mcd", Config.Mcd1);
177                 CreateMemcard("card2.mcd", Config.Mcd2);
178
179                 LoadMcds(Config.Mcd1, Config.Mcd2);
180
181                 SaveConfig();
182         }
183
184         snprintf(Config.PatchesDir, sizeof(Config.PatchesDir), "." PATCHES_DIR);
185 /*
186         // switch to plugin dotdir
187         // this lets plugins work without modification!
188         gchar *plugin_default_dir = g_build_filename(getenv("HOME"), PLUGINS_DIR, NULL);
189         chdir(plugin_default_dir);
190         g_free(plugin_default_dir);
191 */
192         if (SysInit() == -1)
193                 return 1;
194
195         // frontend stuff
196         in_init();
197         in_probe();
198         plat_init();
199         menu_init();
200
201         if (LoadPlugins() == -1) {
202                 SysMessage("Failed loading plugins!");
203                 return 1;
204         }
205         pcnt_hook_plugins();
206
207         if (OpenPlugins() == -1) {
208                 return 1;
209         }
210
211         SysReset();
212         CheckCdrom();
213
214         if (file[0] != '\0') {
215                 if (Load(file) != -1)
216                         ready_to_go = 1;
217         } else {
218                 if (runcd) {
219                         if (LoadCdrom() == -1) {
220                                 ClosePlugins();
221                                 printf(_("Could not load CD-ROM!\n"));
222                                 return -1;
223                         }
224                         ready_to_go = 1;
225                 }
226         }
227
228         // If a state has been specified, then load that
229         if (loadst) {
230                 StatesC = loadst - 1;
231                 char *state_filename = get_state_filename(StatesC);
232                 int ret = LoadState(state_filename);
233                 printf("%s state %s\n", ret ? "failed to load" : "loaded", state_filename);
234                 free(state_filename);
235         }
236
237         if (ready_to_go)
238                 menu_prepare_emu();
239         else
240                 menu_loop();
241
242         while (1)
243         {
244                 psxCpu->Execute();
245                 menu_loop();
246         }
247
248         return 0;
249 }
250
251 int SysInit() {
252         if (EmuInit() == -1) {
253                 printf("PSX emulator couldn't be initialized.\n");
254                 return -1;
255         }
256
257         LoadMcds(Config.Mcd1, Config.Mcd2);     /* TODO Do we need to have this here, or in the calling main() function?? */
258
259         if (Config.Debug) {
260                 StartDebugger();
261         }
262
263         return 0;
264 }
265
266 void SysRunGui() {
267         printf("SysRunGui\n");
268 }
269
270 void StartGui() {
271         printf("StartGui\n");
272 }
273
274 void SysReset() {
275         EmuReset();
276 }
277
278 void SysClose() {
279         EmuShutdown();
280         ReleasePlugins();
281
282         StopDebugger();
283
284         if (emuLog != NULL) fclose(emuLog);
285 }
286
287 void SysUpdate() {
288         PADhandleKey(PAD1_keypressed());
289         PADhandleKey(PAD2_keypressed());
290 }
291
292 void UpdateMenuSlots() {
293 }
294
295 void OnFile_Exit() {
296         printf("OnFile_Exit\n");
297         exit(0);
298 }
299
300 void state_save(gchar *state_filename) {
301         char Text[MAXPATHLEN + 20];
302
303         GPU_updateLace();
304
305         if (SaveState(state_filename) == 0)
306                 sprintf(Text, _("Saved state %s."), state_filename);
307         else
308                 sprintf(Text, _("Error saving state %s!"), state_filename);
309
310         GPU_displayText(Text);
311 }
312
313 void state_load(gchar *state_filename) {
314         int ret;
315         char Text[MAXPATHLEN + 20];
316         FILE *fp;
317
318         // check if the state file actually exists
319         fp = fopen(state_filename, "rb");
320         if (fp == NULL) {
321                 // file does not exist
322                 return;
323         }
324
325         fclose(fp);
326
327         ret = CheckState(state_filename);
328
329         if (ret == 0) {
330                 SysReset();
331                 ret = LoadState(state_filename);
332         }
333
334         if (ret == 0) {
335                 // Check the CD-ROM is valid
336                 if (CheckCdrom() == -1) {
337                         ClosePlugins();
338                         SysRunGui();
339                         return;
340                 }
341
342                 sprintf(Text, _("Loaded state %s."), state_filename);
343         } else {
344                 sprintf(Text, _("Error loading state %s!"), state_filename);
345         }
346         GPU_displayText(Text);
347 }
348
349 char *get_state_filename(int i) {
350         char SStateFile[256];
351         char trimlabel[33];
352         int j;
353
354         strncpy(trimlabel, CdromLabel, 32);
355         trimlabel[32] = 0;
356         for (j = 31; j >= 0; j--)
357                 if (trimlabel[j] == ' ')
358                         trimlabel[j] = 0;
359                 else
360                         continue;
361
362         snprintf(SStateFile, sizeof(SStateFile), "." STATES_DIR "%.32s-%.9s.%3.3d",
363                 trimlabel, CdromId, i);
364
365         return strdup(SStateFile);
366 }
367
368 void SysPrintf(const char *fmt, ...) {
369         va_list list;
370         char msg[512];
371
372         va_start(list, fmt);
373         vsprintf(msg, fmt, list);
374         va_end(list);
375
376         fprintf(emuLog, "%s", msg);
377 }
378
379 void SysMessage(const char *fmt, ...) {
380         va_list list;
381         char msg[512];
382
383         va_start(list, fmt);
384         vsprintf(msg, fmt, list);
385         va_end(list);
386
387         if (msg[strlen(msg) - 1] == '\n')
388                 msg[strlen(msg) - 1] = 0;
389
390         fprintf(stderr, "%s\n", msg);
391 }
392
393 #if 1
394 /* this is to avoid having to hack every plugin to stop using $HOME */
395 char *getenv(const char *name)
396 {
397         static char ret[8] = ".";
398
399         if (name && strcmp(name, "HOME") == 0 &&
400                         ((int)name >> 28) == 0) // HACK: let libs find home
401                 return ret;
402
403         return real_getenv(name);
404 }
405 #endif
406
407 /* we hook statically linked plugins here */
408 static const char *builtin_plugins[] = {
409         "builtin_gpu", "builtin_spu", "builtin_cdr", "builtin_pad"
410 };
411
412 static const int builtin_plugin_ids[] = {
413         PLUGIN_GPU, PLUGIN_SPU, PLUGIN_CDR, PLUGIN_PAD,
414 };
415
416 void *SysLoadLibrary(const char *lib) {
417         const char *tmp = strrchr(lib, '/');
418         int i;
419
420         printf("dlopen %s\n", lib);
421         if (tmp != NULL) {
422                 tmp++;
423                 for (i = 0; i < ARRAY_SIZE(builtin_plugins); i++)
424                         if (strcmp(tmp, builtin_plugins[i]) == 0)
425                                 return (void *)(long)(PLUGIN_DL_BASE + builtin_plugin_ids[i]);
426         }
427
428         return dlopen(lib, RTLD_NOW);
429 }
430
431 void *SysLoadSym(void *lib, const char *sym) {
432         unsigned int plugid = (unsigned int)(long)lib;
433
434         if (PLUGIN_DL_BASE <= plugid && plugid < PLUGIN_DL_BASE + ARRAY_SIZE(builtin_plugins))
435                 return plugin_link(plugid - PLUGIN_DL_BASE, sym);
436
437         return dlsym(lib, sym);
438 }
439
440 const char *SysLibError() {
441         return dlerror();
442 }
443
444 void SysCloseLibrary(void *lib) {
445         unsigned int plugid = (unsigned int)(long)lib;
446
447         if (PLUGIN_DL_BASE <= plugid && plugid < PLUGIN_DL_BASE + ARRAY_SIZE(builtin_plugins))
448                 return;
449
450         dlclose(lib);
451 }
452
453