[pcsx_rearmed.git] / frontend / main.c

/*
 * (C) notaz, 2010-2011
 *
 * This work is licensed under the terms of the GNU GPLv2 or later.
 * See the COPYING file in the top-level directory.
 */

#include <stdio.h>
#include <string.h>
#include <stdarg.h>
#include <dlfcn.h>
#include <sys/stat.h>
#include <sys/types.h>
#include <unistd.h>
#include <signal.h>
#include <time.h>

#include "main.h"
#include "plugin.h"
#include "plugin_lib.h"
#include "pcnt.h"
#include "menu.h"
#include "../libpcsxcore/misc.h"
#include "../libpcsxcore/new_dynarec/new_dynarec.h"
#include "../plugins/cdrcimg/cdrcimg.h"
#include "common/plat.h"
#include "common/input.h"
#include "common/readpng.h"

int ready_to_go;
unsigned long gpuDisp;
char cfgfile_basename[MAXPATHLEN];
static char *(*real_getenv)(const char *name);
int state_slot;
enum sched_action emu_action, emu_action_old;
char hud_msg[64];
int hud_new_msg;

static void make_path(char *buf, size_t size, const char *dir, const char *fname)
{
	if (fname)
		snprintf(buf, size, ".%s%s", dir, fname);
	else
		snprintf(buf, size, ".%s", dir);
}
#define MAKE_PATH(buf, dir, fname) \
	make_path(buf, sizeof(buf), dir, fname)

static void create_profile_dir(const char *directory) {
	char path[MAXPATHLEN];

	MAKE_PATH(path, directory, NULL);
	mkdir(path, S_IRWXU | S_IRWXG);
}

static void CheckSubDir() {
	// make sure that ~/.pcsx exists
	create_profile_dir(PCSX_DOT_DIR);

	create_profile_dir(BIOS_DIR);
	create_profile_dir(MEMCARD_DIR);
	create_profile_dir(STATES_DIR);
	create_profile_dir(PLUGINS_DIR);
	create_profile_dir(PLUGINS_CFG_DIR);
	create_profile_dir(CHEATS_DIR);
	create_profile_dir(PATCHES_DIR);
	create_profile_dir(PCSX_DOT_DIR "cfg");
	create_profile_dir("/screenshots/");
}

static int get_gameid_filename(char *buf, int size, const char *fmt, int i) {
	char trimlabel[33];
	int j;

	strncpy(trimlabel, CdromLabel, 32);
	trimlabel[32] = 0;
	for (j = 31; j >= 0; j--)
		if (trimlabel[j] == ' ')
			trimlabel[j] = 0;
		else
			continue;

	snprintf(buf, size, fmt, trimlabel, CdromId, i);

	return 0;
}

void set_cd_image(const char *fname)
{
	const char *ext = NULL;
	
	if (fname != NULL)
		ext = strrchr(fname, '.');

	if (ext && (
	    strcasecmp(ext, ".z") == 0 || strcasecmp(ext, ".bz") == 0 ||
	    strcasecmp(ext, ".znx") == 0 /*|| strcasecmp(ext, ".pbp") == 0*/)) {
		SetIsoFile(NULL);
		cdrcimg_set_fname(fname);
		strcpy(Config.Cdr, "builtin_cdrcimg");
	} else {
		SetIsoFile(fname);
		strcpy(Config.Cdr, "builtin_cdr");
	}
}

static void set_default_paths(void)
{
	MAKE_PATH(Config.Mcd1, MEMCARD_DIR, "card1.mcd");
	MAKE_PATH(Config.Mcd2, MEMCARD_DIR, "card2.mcd");
	strcpy(Config.BiosDir, "bios");

	strcpy(Config.PluginsDir, "plugins");
	strcpy(Config.Gpu, "builtin_gpu");
	strcpy(Config.Spu, "builtin_spu");
	strcpy(Config.Cdr, "builtin_cdr");
	strcpy(Config.Pad1, "builtin_pad");
	strcpy(Config.Pad2, "builtin_pad");
	strcpy(Config.Net, "Disabled");
	Config.PsxAuto = 1;

	snprintf(Config.PatchesDir, sizeof(Config.PatchesDir), "." PATCHES_DIR);
}

static void check_memcards(void)
{
	char buf[MAXPATHLEN];
	FILE *f;
	int i;

	for (i = 1; i <= 9; i++) {
		snprintf(buf, sizeof(buf), ".%scard%d.mcd", MEMCARD_DIR, i);

		f = fopen(buf, "rb");
		if (f == NULL) {
			printf("Creating memcard: %s\n", buf);
			CreateMcd(buf);
		}
		else
			fclose(f);
	}
}

void do_emu_action(void)
{
	char buf[MAXPATHLEN];
	int ret;

	emu_action_old = emu_action;

	switch (emu_action) {
	case SACTION_NONE:
		return;
	case SACTION_ENTER_MENU:
		menu_loop();
		return;
	case SACTION_LOAD_STATE:
		ret = emu_load_state(state_slot);
		snprintf(hud_msg, sizeof(hud_msg), ret == 0 ? "LOADED" : "FAIL!");
		break;
	case SACTION_SAVE_STATE:
		ret = emu_save_state(state_slot);
		snprintf(hud_msg, sizeof(hud_msg), ret == 0 ? "SAVED" : "FAIL!");
		break;
	case SACTION_NEXT_SSLOT:
		state_slot++;
		if (state_slot > 9)
			state_slot = 0;
		goto do_state_slot;
	case SACTION_PREV_SSLOT:
		state_slot--;
		if (state_slot < 0)
			state_slot = 9;
		goto do_state_slot;
	case SACTION_TOGGLE_FSKIP:
		pl_rearmed_cbs.frameskip ^= 1;
		snprintf(hud_msg, sizeof(hud_msg), "FRAMESKIP %s",
			pl_rearmed_cbs.frameskip ? "ON" : "OFF");
		break;
	case SACTION_SCREENSHOT:
		{
			void *scrbuf;
			int w, h, bpp;
			time_t t = time(NULL);
			struct tm *tb = localtime(&t);
			int ti = tb->tm_yday * 1000000 + tb->tm_hour * 10000 +
				tb->tm_min * 100 + tb->tm_sec;

			scrbuf = pl_prepare_screenshot(&w, &h, &bpp);
			get_gameid_filename(buf, sizeof(buf),
				"screenshots/%.32s-%.9s.%d.png", ti);
			ret = -1;
			if (scrbuf != 0 && bpp == 16)
				ret = writepng(buf, scrbuf, w, h);
			if (ret == 0)
				snprintf(hud_msg, sizeof(hud_msg), "SCREENSHOT TAKEN");
			break;
		}
	}
	hud_new_msg = 3;
	return;

do_state_slot:
	snprintf(hud_msg, sizeof(hud_msg), "STATE SLOT %d [%s]", state_slot,
		emu_check_state(state_slot) == 0 ? "USED" : "FREE");
	hud_new_msg = 3;
}

int main(int argc, char *argv[])
{
	void *tmp;

	tmp = dlopen("/lib/libdl.so.2", RTLD_LAZY);
	if (tmp == NULL)
		tmp = dlopen("/lib32/libdl.so.2", RTLD_LAZY);
	if (tmp != NULL)
		real_getenv = dlsym(tmp, "getenv");
	if (real_getenv == NULL) {
		fprintf(stderr, "%s\n", dlerror());
		return 1;
	}
	dlclose(tmp);

	// what is the name of the config file?
	// it may be redefined by -cfg on the command line
	strcpy(cfgfile_basename, "pcsx.cfg");

	emuLog = stdout;
	SetIsoFile(NULL);

	memset(&Config, 0, sizeof(Config));

	CheckSubDir();
	set_default_paths();
	check_memcards();
	strcpy(Config.Bios, "HLE");

#ifdef MAEMO
	extern int maemo_main(int argc, char **argv);
	return maemo_main(argc, argv);
#else
	char file[MAXPATHLEN] = "";
	char path[MAXPATHLEN];
	const char *cdfile = NULL;
	const char *loadst_f = NULL;
	int psxout = 0;
	int loadst = 0;
	int i;

	// read command line options
	for (i = 1; i < argc; i++) {
		     if (!strcmp(argv[i], "-psxout")) psxout = 1;
		else if (!strcmp(argv[i], "-load")) loadst = atol(argv[++i]);
		else if (!strcmp(argv[i], "-cfg")) {
			if (i+1 >= argc) break;
			strncpy(cfgfile_basename, argv[++i], MAXPATHLEN-100);	/* TODO buffer overruns */
			printf("Using config file %s.\n", cfgfile_basename);
		}
		else if (!strcmp(argv[i], "-cdfile")) {
			char isofilename[MAXPATHLEN];

			if (i+1 >= argc) break;
			strncpy(isofilename, argv[++i], MAXPATHLEN);
			if (isofilename[0] != '/') {
				getcwd(path, MAXPATHLEN);
				if (strlen(path) + strlen(isofilename) + 1 < MAXPATHLEN) {
					strcat(path, "/");
					strcat(path, isofilename);
					strcpy(isofilename, path);
				} else
					isofilename[0] = 0;
			}

			cdfile = isofilename;
		}
		else if (!strcmp(argv[i], "-loadf")) {
			if (i+1 >= argc) break;
			loadst_f = argv[++i];
		}
		else if (!strcmp(argv[i], "-h") ||
			 !strcmp(argv[i], "-help") ||
			 !strcmp(argv[i], "--help")) {
			 printf(PACKAGE_NAME " " PACKAGE_VERSION "\n");
			 printf("%s\n", _(
							" pcsx [options] [file]\n"
							"\toptions:\n"
							"\t-cdfile FILE\tRuns a CD image file\n"
							"\t-nogui\t\tDon't open the GTK GUI\n"
							"\t-cfg FILE\tLoads desired configuration file (default: ~/.pcsx/pcsx.cfg)\n"
							"\t-psxout\t\tEnable PSX output\n"
							"\t-load STATENUM\tLoads savestate STATENUM (1-5)\n"
							"\t-h -help\tDisplay this message\n"
							"\tfile\t\tLoads file\n"));
			 return 0;
		} else {
			strncpy(file, argv[i], MAXPATHLEN);
			if (file[0] != '/') {
				getcwd(path, MAXPATHLEN);
				if (strlen(path) + strlen(file) + 1 < MAXPATHLEN) {
					strcat(path, "/");
					strcat(path, file);
					strcpy(file, path);
				} else
					file[0] = 0;
			}
		}
	}

	if (cdfile)
		set_cd_image(cdfile);

	if (SysInit() == -1)
		return 1;

	// frontend stuff
	in_init();
	//in_probe();
	plat_init();
	menu_init(); // loads config

	if (psxout)
		Config.PsxOut = 1;

	if (LoadPlugins() == -1) {
		// FIXME: this recovery doesn't work, just delete bad config and bail out
		// SysMessage("could not load plugins, retrying with defaults\n");
		set_default_paths();
		snprintf(path, sizeof(path), "." PCSX_DOT_DIR "%s", cfgfile_basename);
		remove(path);
		SysMessage("Failed loading plugins!");
		return 1;
	}
	pcnt_hook_plugins();

	if (OpenPlugins() == -1) {
		return 1;
	}
	plugin_call_rearmed_cbs();

	CheckCdrom();
	SysReset();

	if (file[0] != '\0') {
		if (Load(file) != -1)
			ready_to_go = 1;
	} else {
		if (cdfile) {
			if (LoadCdrom() == -1) {
				ClosePlugins();
				printf(_("Could not load CD-ROM!\n"));
				return -1;
			}
			ready_to_go = 1;
		}
	}

	if (ready_to_go) {
		menu_prepare_emu();

		// If a state has been specified, then load that
		if (loadst) {
			int ret = emu_load_state(loadst - 1);
			printf("%s state %d\n", ret ? "failed to load" : "loaded", loadst);
		}
		if (loadst_f) {
			int ret = LoadState(loadst_f);
			printf("%s state file: %s\n", ret ? "failed to load" : "loaded", loadst_f);
		}
	}
	else
		menu_loop();

	pl_start_watchdog();

	while (1)
	{
		stop = 0;
		emu_action = SACTION_NONE;

		psxCpu->Execute();
		if (emu_action != SACTION_NONE)
			do_emu_action();
	}

	return 0;
#endif
}

int SysInit() {
	if (EmuInit() == -1) {
		printf("PSX emulator couldn't be initialized.\n");
		return -1;
	}

	LoadMcds(Config.Mcd1, Config.Mcd2);

	if (Config.Debug) {
		StartDebugger();
	}

	return 0;
}

void SysRunGui() {
        printf("SysRunGui\n");
}

void StartGui() {
        printf("StartGui\n");
}

static void dummy_lace()
{
}

void SysReset() {
	// rearmed hack: EmuReset() runs some code when real BIOS is used,
	// but we usually do reset from menu while GPU is not open yet,
	// so we need to prevent updateLace() call..
	void *real_lace = GPU_updateLace;
	GPU_updateLace = dummy_lace;

	EmuReset();

	// hmh core forgets this
	CDR_stop();

	GPU_updateLace = real_lace;
}

void SysClose() {
	EmuShutdown();
	ReleasePlugins();

	StopDebugger();

	if (emuLog != NULL) fclose(emuLog);
}

void SysUpdate() {
}

void OnFile_Exit() {
	printf("OnFile_Exit\n");
#ifndef MAEMO
	menu_finish();
#endif
	SysClose();
	plat_finish();
	exit(0);
}

int get_state_filename(char *buf, int size, int i) {
	return get_gameid_filename(buf, size,
		"." STATES_DIR "%.32s-%.9s.%3.3d", i);
}

int emu_check_state(int slot)
{
	char fname[MAXPATHLEN];
	int ret;

	ret = get_state_filename(fname, sizeof(fname), slot);
	if (ret != 0)
		return ret;

	return CheckState(fname);
}

int emu_save_state(int slot)
{
	char fname[MAXPATHLEN];
	int ret;

	ret = get_state_filename(fname, sizeof(fname), slot);
	if (ret != 0)
		return ret;

	ret = SaveState(fname);
	printf("* %s \"%s\" [%d]\n", ret == 0 ? "saved" : "failed to save", fname, slot);
	return ret;
}

int emu_load_state(int slot)
{
	char fname[MAXPATHLEN];
	int ret;

	ret = get_state_filename(fname, sizeof(fname), slot);
	if (ret != 0)
		return ret;

	return LoadState(fname);
}

void SysPrintf(const char *fmt, ...) {
	va_list list;
	char msg[512];

	va_start(list, fmt);
	vsprintf(msg, fmt, list);
	va_end(list);

	fprintf(emuLog, "%s", msg);
}

void SysMessage(const char *fmt, ...) {
        va_list list;
        char msg[512];

        va_start(list, fmt);
        vsprintf(msg, fmt, list);
        va_end(list);

        if (msg[strlen(msg) - 1] == '\n')
                msg[strlen(msg) - 1] = 0;

	fprintf(stderr, "%s\n", msg);
}

static void SignalExit(int sig) {
	ClosePlugins();
	OnFile_Exit();
}

#define PARSEPATH(dst, src) \
	ptr = src + strlen(src); \
	while (*ptr != '\\' && ptr != src) ptr--; \
	if (ptr != src) { \
		strcpy(dst, ptr+1); \
	}

static int _OpenPlugins(void) {
	int ret;

	signal(SIGINT, SignalExit);
	signal(SIGPIPE, SignalExit);

	GPU_clearDynarec(clearDynarec);

	ret = CDR_open();
	if (ret < 0) { SysMessage(_("Error opening CD-ROM plugin!")); return -1; }
	ret = SPU_open();
	if (ret < 0) { SysMessage(_("Error opening SPU plugin!")); return -1; }
	SPU_registerCallback(SPUirq);
	// pcsx-rearmed: we handle gpu elsewhere
	//ret = GPU_open(&gpuDisp, "PCSX", NULL);
	//if (ret < 0) { SysMessage(_("Error opening GPU plugin!")); return -1; }
	ret = PAD1_open(&gpuDisp);
	if (ret < 0) { SysMessage(_("Error opening Controller 1 plugin!")); return -1; }
	ret = PAD2_open(&gpuDisp);
	if (ret < 0) { SysMessage(_("Error opening Controller 2 plugin!")); return -1; }

	if (Config.UseNet && !NetOpened) {
		netInfo info;
		char path[MAXPATHLEN];
		char dotdir[MAXPATHLEN];

		MAKE_PATH(dotdir, "/.pcsx/plugins/", NULL);

		strcpy(info.EmuName, "PCSX " PACKAGE_VERSION);
		strncpy(info.CdromID, CdromId, 9);
		strncpy(info.CdromLabel, CdromLabel, 9);
		info.psxMem = psxM;
		info.GPU_showScreenPic = GPU_showScreenPic;
		info.GPU_displayText = GPU_displayText;
		info.GPU_showScreenPic = GPU_showScreenPic;
		info.PAD_setSensitive = PAD1_setSensitive;
		sprintf(path, "%s%s", Config.BiosDir, Config.Bios);
		strcpy(info.BIOSpath, path);
		strcpy(info.MCD1path, Config.Mcd1);
		strcpy(info.MCD2path, Config.Mcd2);
		sprintf(path, "%s%s", dotdir, Config.Gpu);
		strcpy(info.GPUpath, path);
		sprintf(path, "%s%s", dotdir, Config.Spu);
		strcpy(info.SPUpath, path);
		sprintf(path, "%s%s", dotdir, Config.Cdr);
		strcpy(info.CDRpath, path);
		NET_setInfo(&info);

		ret = NET_open(&gpuDisp);
		if (ret < 0) {
			if (ret == -2) {
				// -2 is returned when something in the info
				// changed and needs to be synced
				char *ptr;

				PARSEPATH(Config.Bios, info.BIOSpath);
				PARSEPATH(Config.Gpu,  info.GPUpath);
				PARSEPATH(Config.Spu,  info.SPUpath);
				PARSEPATH(Config.Cdr,  info.CDRpath);

				strcpy(Config.Mcd1, info.MCD1path);
				strcpy(Config.Mcd2, info.MCD2path);
				return -2;
			} else {
				Config.UseNet = FALSE;
			}
		} else {
			if (NET_queryPlayer() == 1) {
				if (SendPcsxInfo() == -1) Config.UseNet = FALSE;
			} else {
				if (RecvPcsxInfo() == -1) Config.UseNet = FALSE;
			}
		}
		NetOpened = TRUE;
	} else if (Config.UseNet) {
		NET_resume();
	}

	return 0;
}

int OpenPlugins() {
	int ret;

	while ((ret = _OpenPlugins()) == -2) {
		ReleasePlugins();
		LoadMcds(Config.Mcd1, Config.Mcd2);
		if (LoadPlugins() == -1) return -1;
	}
	return ret;
}

void ClosePlugins() {
	int ret;

	signal(SIGINT, SIG_DFL);
	signal(SIGPIPE, SIG_DFL);
	ret = CDR_close();
	if (ret < 0) { SysMessage(_("Error closing CD-ROM plugin!")); return; }
	ret = SPU_close();
	if (ret < 0) { SysMessage(_("Error closing SPU plugin!")); return; }
	ret = PAD1_close();
	if (ret < 0) { SysMessage(_("Error closing Controller 1 Plugin!")); return; }
	ret = PAD2_close();
	if (ret < 0) { SysMessage(_("Error closing Controller 2 plugin!")); return; }
	// pcsx-rearmed: we handle gpu elsewhere
	//ret = GPU_close();
	//if (ret < 0) { SysMessage(_("Error closing GPU plugin!")); return; }

	if (Config.UseNet) {
		NET_pause();
	}
}

#if 1
/* this is to avoid having to hack every plugin to stop using $HOME */
char *getenv(const char *name)
{
	static char ret[8] = ".";

	if (name && strcmp(name, "HOME") == 0 &&
			((int)name >> 28) == 0) // HACK: let libs find home
		return ret;

	return real_getenv(name);
}
#endif

/* we hook statically linked plugins here */
static const char *builtin_plugins[] = {
	"builtin_gpu", "builtin_spu", "builtin_cdr", "builtin_pad",
	"builtin_cdrcimg",
};

static const int builtin_plugin_ids[] = {
	PLUGIN_GPU, PLUGIN_SPU, PLUGIN_CDR, PLUGIN_PAD,
	PLUGIN_CDRCIMG,
};

void *SysLoadLibrary(const char *lib) {
	const char *tmp = strrchr(lib, '/');
	void *ret;
	int i;

	printf("plugin: %s\n", lib);

	if (tmp != NULL) {
		tmp++;
		for (i = 0; i < ARRAY_SIZE(builtin_plugins); i++)
			if (strcmp(tmp, builtin_plugins[i]) == 0)
				return (void *)(long)(PLUGIN_DL_BASE + builtin_plugin_ids[i]);
	}

#if defined(__x86_64__) || defined(__i386__)
	// convenience hack
	char name[MAXPATHLEN];
	snprintf(name, sizeof(name), "%s.x86", lib);
	lib = name;
#endif

	ret = dlopen(lib, RTLD_NOW);
	if (ret == NULL)
		fprintf(stderr, "dlopen: %s\n", dlerror());
	return ret;
}

void *SysLoadSym(void *lib, const char *sym) {
	unsigned int plugid = (unsigned int)(long)lib;

	if (PLUGIN_DL_BASE <= plugid && plugid < PLUGIN_DL_BASE + ARRAY_SIZE(builtin_plugins))
		return plugin_link(plugid - PLUGIN_DL_BASE, sym);

	return dlsym(lib, sym);
}

const char *SysLibError() {
	return dlerror();
}

void SysCloseLibrary(void *lib) {
	unsigned int plugid = (unsigned int)(long)lib;

	if (PLUGIN_DL_BASE <= plugid && plugid < PLUGIN_DL_BASE + ARRAY_SIZE(builtin_plugins))
		return;

	dlclose(lib);
}
Commit	Line	Data
e906c010	1	/*
201c21e2	2	* (C) notaz, 2010-2011
e906c010	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
80c2304e	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>
c5061935	15	#include <signal.h>
29a8c4f3	16	#include <time.h>
80c2304e	17
c5061935	18	#include "main.h"
e906c010	19	#include "plugin.h"
7c0f51de	20	#include "plugin_lib.h"
14dffdb7	21	#include "pcnt.h"
3c70c47b	22	#include "menu.h"
80c2304e	23	#include "../libpcsxcore/misc.h"
799b0b87	24	#include "../libpcsxcore/new_dynarec/new_dynarec.h"
47bf65ab	25	#include "../plugins/cdrcimg/cdrcimg.h"
69af03a2	26	#include "common/plat.h"
69af03a2	27	#include "common/input.h"
29a8c4f3	28	#include "common/readpng.h"
80c2304e	29
69af03a2	30	int ready_to_go;
c5061935	31	unsigned long gpuDisp;
c5061935	32	char cfgfile_basename[MAXPATHLEN];
b60f2812	33	static char (real_getenv)(const char *name);
8f892648	34	int state_slot;
	35	enum sched_action emu_action, emu_action_old;
	36	char hud_msg[64];
	37	int hud_new_msg;
	38
80c2304e	39	static void make_path(char buf, size_t size, const char dir, const char *fname)
	40	{
	41	if (fname)
	42	snprintf(buf, size, ".%s%s", dir, fname);
	43	else
	44	snprintf(buf, size, ".%s", dir);
	45	}
	46	#define MAKE_PATH(buf, dir, fname) \
	47	make_path(buf, sizeof(buf), dir, fname)
	48
	49	static void create_profile_dir(const char *directory) {
	50	char path[MAXPATHLEN];
	51
	52	MAKE_PATH(path, directory, NULL);
	53	mkdir(path, S_IRWXU \| S_IRWXG);
	54	}
	55
	56	static void CheckSubDir() {
	57	// make sure that ~/.pcsx exists
	58	create_profile_dir(PCSX_DOT_DIR);
	59
	60	create_profile_dir(BIOS_DIR);
	61	create_profile_dir(MEMCARD_DIR);
	62	create_profile_dir(STATES_DIR);
	63	create_profile_dir(PLUGINS_DIR);
	64	create_profile_dir(PLUGINS_CFG_DIR);
	65	create_profile_dir(CHEATS_DIR);
	66	create_profile_dir(PATCHES_DIR);
cd6e8d0f	67	create_profile_dir(PCSX_DOT_DIR "cfg");
29a8c4f3	68	create_profile_dir("/screenshots/");
	69	}
	70
	71	static int get_gameid_filename(char buf, int size, const char fmt, int i) {
	72	char trimlabel[33];
	73	int j;
	74
	75	strncpy(trimlabel, CdromLabel, 32);
	76	trimlabel[32] = 0;
	77	for (j = 31; j >= 0; j--)
	78	if (trimlabel[j] == ' ')
	79	trimlabel[j] = 0;
	80	else
	81	continue;
	82
	83	snprintf(buf, size, fmt, trimlabel, CdromId, i);
	84
	85	return 0;
80c2304e	86	}
80c2304e	87
47bf65ab	88	void set_cd_image(const char *fname)
47bf65ab	89	{
e16a7e51	90	const char *ext = NULL;
47bf65ab	91
33716956	92	if (fname != NULL)
33716956	93	ext = strrchr(fname, '.');
47bf65ab	94
33716956	95	if (ext && (
33716956	96	strcasecmp(ext, ".z") == 0 \|\| strcasecmp(ext, ".bz") == 0 \|\|
9a92bffb	97	strcasecmp(ext, ".znx") == 0 /\|\| strcasecmp(ext, ".pbp") == 0/)) {
47bf65ab	98	SetIsoFile(NULL);
	99	cdrcimg_set_fname(fname);
	100	strcpy(Config.Cdr, "builtin_cdrcimg");
	101	} else {
	102	SetIsoFile(fname);
	103	strcpy(Config.Cdr, "builtin_cdr");
	104	}
	105	}
	106
6fe1f056	107	static void set_default_paths(void)
	108	{
	109	MAKE_PATH(Config.Mcd1, MEMCARD_DIR, "card1.mcd");
	110	MAKE_PATH(Config.Mcd2, MEMCARD_DIR, "card2.mcd");
	111	strcpy(Config.BiosDir, "bios");
	112
	113	strcpy(Config.PluginsDir, "plugins");
	114	strcpy(Config.Gpu, "builtin_gpu");
	115	strcpy(Config.Spu, "builtin_spu");
	116	strcpy(Config.Cdr, "builtin_cdr");
	117	strcpy(Config.Pad1, "builtin_pad");
	118	strcpy(Config.Pad2, "builtin_pad");
	119	strcpy(Config.Net, "Disabled");
	120	Config.PsxAuto = 1;
	121
	122	snprintf(Config.PatchesDir, sizeof(Config.PatchesDir), "." PATCHES_DIR);
	123	}
	124
51f77282	125	static void check_memcards(void)
	126	{
	127	char buf[MAXPATHLEN];
	128	FILE *f;
	129	int i;
	130
	131	for (i = 1; i <= 9; i++) {
	132	snprintf(buf, sizeof(buf), ".%scard%d.mcd", MEMCARD_DIR, i);
	133
	134	f = fopen(buf, "rb");
	135	if (f == NULL) {
	136	printf("Creating memcard: %s\n", buf);
	137	CreateMcd(buf);
	138	}
	139	else
	140	fclose(f);
	141	}
	142	}
	143
8f892648	144	void do_emu_action(void)
8f892648	145	{
29a8c4f3	146	char buf[MAXPATHLEN];
8f892648	147	int ret;
	148
	149	emu_action_old = emu_action;
	150
	151	switch (emu_action) {
	152	case SACTION_NONE:
	153	return;
	154	case SACTION_ENTER_MENU:
	155	menu_loop();
	156	return;
	157	case SACTION_LOAD_STATE:
	158	ret = emu_load_state(state_slot);
	159	snprintf(hud_msg, sizeof(hud_msg), ret == 0 ? "LOADED" : "FAIL!");
	160	break;
	161	case SACTION_SAVE_STATE:
	162	ret = emu_save_state(state_slot);
	163	snprintf(hud_msg, sizeof(hud_msg), ret == 0 ? "SAVED" : "FAIL!");
	164	break;
	165	case SACTION_NEXT_SSLOT:
	166	state_slot++;
	167	if (state_slot > 9)
	168	state_slot = 0;
	169	goto do_state_slot;
	170	case SACTION_PREV_SSLOT:
	171	state_slot--;
	172	if (state_slot < 0)
	173	state_slot = 9;
	174	goto do_state_slot;
	175	case SACTION_TOGGLE_FSKIP:
e64dc4c5	176	pl_rearmed_cbs.frameskip ^= 1;
8f892648	177	snprintf(hud_msg, sizeof(hud_msg), "FRAMESKIP %s",
e64dc4c5	178	pl_rearmed_cbs.frameskip ? "ON" : "OFF");
8f892648	179	break;
29a8c4f3	180	case SACTION_SCREENSHOT:
	181	{
	182	void *scrbuf;
	183	int w, h, bpp;
	184	time_t t = time(NULL);
	185	struct tm *tb = localtime(&t);
	186	int ti = tb->tm_yday * 1000000 + tb->tm_hour * 10000 +
	187	tb->tm_min * 100 + tb->tm_sec;
	188
	189	scrbuf = pl_prepare_screenshot(&w, &h, &bpp);
	190	get_gameid_filename(buf, sizeof(buf),
	191	"screenshots/%.32s-%.9s.%d.png", ti);
	192	ret = -1;
	193	if (scrbuf != 0 && bpp == 16)
	194	ret = writepng(buf, scrbuf, w, h);
	195	if (ret == 0)
	196	snprintf(hud_msg, sizeof(hud_msg), "SCREENSHOT TAKEN");
	197	break;
	198	}
8f892648	199	}
	200	hud_new_msg = 3;
	201	return;
	202
	203	do_state_slot:
	204	snprintf(hud_msg, sizeof(hud_msg), "STATE SLOT %d [%s]", state_slot,
	205	emu_check_state(state_slot) == 0 ? "USED" : "FREE");
	206	hud_new_msg = 3;
	207	}
	208
80c2304e	209	int main(int argc, char *argv[])
80c2304e	210	{
b60f2812	211	void *tmp;
80c2304e	212
b60f2812	213	tmp = dlopen("/lib/libdl.so.2", RTLD_LAZY);
fa9cfe0a	214	if (tmp == NULL)
fa9cfe0a	215	tmp = dlopen("/lib32/libdl.so.2", RTLD_LAZY);
b60f2812	216	if (tmp != NULL)
	217	real_getenv = dlsym(tmp, "getenv");
	218	if (real_getenv == NULL) {
	219	fprintf(stderr, "%s\n", dlerror());
	220	return 1;
	221	}
	222	dlclose(tmp);
	223
80c2304e	224	// what is the name of the config file?
	225	// it may be redefined by -cfg on the command line
	226	strcpy(cfgfile_basename, "pcsx.cfg");
	227
e906c010	228	emuLog = stdout;
80c2304e	229	SetIsoFile(NULL);
80c2304e	230
e0c692d9	231	memset(&Config, 0, sizeof(Config));
	232
	233	CheckSubDir();
	234	set_default_paths();
51f77282	235	check_memcards();
e0c692d9	236	strcpy(Config.Bios, "HLE");
	237
	238	#ifdef MAEMO
	239	extern int maemo_main(int argc, char **argv);
	240	return maemo_main(argc, argv);
	241	#else
	242	char file[MAXPATHLEN] = "";
	243	char path[MAXPATHLEN];
	244	const char *cdfile = NULL;
de910c6b	245	const char *loadst_f = NULL;
0a151868	246	int psxout = 0;
e0c692d9	247	int loadst = 0;
	248	int i;
	249
80c2304e	250	// read command line options
80c2304e	251	for (i = 1; i < argc; i++) {
0a151868	252	if (!strcmp(argv[i], "-psxout")) psxout = 1;
80c2304e	253	else if (!strcmp(argv[i], "-load")) loadst = atol(argv[++i]);
	254	else if (!strcmp(argv[i], "-cfg")) {
	255	if (i+1 >= argc) break;
	256	strncpy(cfgfile_basename, argv[++i], MAXPATHLEN-100); /* TODO buffer overruns */
	257	printf("Using config file %s.\n", cfgfile_basename);
	258	}
	259	else if (!strcmp(argv[i], "-cdfile")) {
	260	char isofilename[MAXPATHLEN];
	261
	262	if (i+1 >= argc) break;
	263	strncpy(isofilename, argv[++i], MAXPATHLEN);
	264	if (isofilename[0] != '/') {
	265	getcwd(path, MAXPATHLEN);
	266	if (strlen(path) + strlen(isofilename) + 1 < MAXPATHLEN) {
	267	strcat(path, "/");
	268	strcat(path, isofilename);
	269	strcpy(isofilename, path);
	270	} else
	271	isofilename[0] = 0;
	272	}
	273
47bf65ab	274	cdfile = isofilename;
80c2304e	275	}
de910c6b	276	else if (!strcmp(argv[i], "-loadf")) {
	277	if (i+1 >= argc) break;
	278	loadst_f = argv[++i];
	279	}
80c2304e	280	else if (!strcmp(argv[i], "-h") \|\|
	281	!strcmp(argv[i], "-help") \|\|
	282	!strcmp(argv[i], "--help")) {
	283	printf(PACKAGE_NAME " " PACKAGE_VERSION "\n");
	284	printf("%s\n", _(
	285	" pcsx [options] [file]\n"
	286	"\toptions:\n"
	287	"\t-cdfile FILE\tRuns a CD image file\n"
	288	"\t-nogui\t\tDon't open the GTK GUI\n"
	289	"\t-cfg FILE\tLoads desired configuration file (default: ~/.pcsx/pcsx.cfg)\n"
	290	"\t-psxout\t\tEnable PSX output\n"
	291	"\t-load STATENUM\tLoads savestate STATENUM (1-5)\n"
	292	"\t-h -help\tDisplay this message\n"
	293	"\tfile\t\tLoads file\n"));
	294	return 0;
	295	} else {
	296	strncpy(file, argv[i], MAXPATHLEN);
	297	if (file[0] != '/') {
	298	getcwd(path, MAXPATHLEN);
	299	if (strlen(path) + strlen(file) + 1 < MAXPATHLEN) {
	300	strcat(path, "/");
	301	strcat(path, file);
	302	strcpy(file, path);
	303	} else
	304	file[0] = 0;
	305	}
	306	}
	307	}
	308
47bf65ab	309	if (cdfile)
	310	set_cd_image(cdfile);
	311
69af03a2	312	if (SysInit() == -1)
69af03a2	313	return 1;
80c2304e	314
69af03a2	315	// frontend stuff
69af03a2	316	in_init();
ef94866c	317	//in_probe();
69af03a2	318	plat_init();
0a151868	319	menu_init(); // loads config
	320
	321	if (psxout)
	322	Config.PsxOut = 1;
80c2304e	323
69af03a2	324	if (LoadPlugins() == -1) {
6fe1f056	325	// FIXME: this recovery doesn't work, just delete bad config and bail out
	326	// SysMessage("could not load plugins, retrying with defaults\n");
	327	set_default_paths();
	328	snprintf(path, sizeof(path), "." PCSX_DOT_DIR "%s", cfgfile_basename);
	329	remove(path);
69af03a2	330	SysMessage("Failed loading plugins!");
	331	return 1;
	332	}
	333	pcnt_hook_plugins();
80c2304e	334
69af03a2	335	if (OpenPlugins() == -1) {
	336	return 1;
	337	}
201c21e2	338	plugin_call_rearmed_cbs();
80c2304e	339
69af03a2	340	CheckCdrom();
bbd837c6	341	SysReset();
69af03a2	342
	343	if (file[0] != '\0') {
	344	if (Load(file) != -1)
	345	ready_to_go = 1;
	346	} else {
47bf65ab	347	if (cdfile) {
69af03a2	348	if (LoadCdrom() == -1) {
	349	ClosePlugins();
	350	printf(_("Could not load CD-ROM!\n"));
	351	return -1;
80c2304e	352	}
69af03a2	353	ready_to_go = 1;
80c2304e	354	}
69af03a2	355	}
80c2304e	356
45d45c1e	357	if (ready_to_go) {
3c70c47b	358	menu_prepare_emu();
45d45c1e	359
	360	// If a state has been specified, then load that
	361	if (loadst) {
	362	int ret = emu_load_state(loadst - 1);
	363	printf("%s state %d\n", ret ? "failed to load" : "loaded", loadst);
	364	}
de910c6b	365	if (loadst_f) {
	366	int ret = LoadState(loadst_f);
	367	printf("%s state file: %s\n", ret ? "failed to load" : "loaded", loadst_f);
	368	}
45d45c1e	369	}
3c70c47b	370	else
69af03a2	371	menu_loop();
69af03a2	372
7c0f51de	373	pl_start_watchdog();
7c0f51de	374
69af03a2	375	while (1)
69af03a2	376	{
799b0b87	377	stop = 0;
8f892648	378	emu_action = SACTION_NONE;
8f892648	379
80c2304e	380	psxCpu->Execute();
8f892648	381	if (emu_action != SACTION_NONE)
8f892648	382	do_emu_action();
80c2304e	383	}
	384
	385	return 0;
e0c692d9	386	#endif
80c2304e	387	}
	388
	389	int SysInit() {
80c2304e	390	if (EmuInit() == -1) {
	391	printf("PSX emulator couldn't be initialized.\n");
	392	return -1;
	393	}
	394
51f77282	395	LoadMcds(Config.Mcd1, Config.Mcd2);
80c2304e	396
	397	if (Config.Debug) {
	398	StartDebugger();
	399	}
	400
	401	return 0;
	402	}
	403
	404	void SysRunGui() {
	405	printf("SysRunGui\n");
	406	}
	407
	408	void StartGui() {
	409	printf("StartGui\n");
	410	}
	411
e6eb2066	412	static void dummy_lace()
	413	{
	414	}
	415
80c2304e	416	void SysReset() {
e6eb2066	417	// rearmed hack: EmuReset() runs some code when real BIOS is used,
	418	// but we usually do reset from menu while GPU is not open yet,
	419	// so we need to prevent updateLace() call..
	420	void *real_lace = GPU_updateLace;
	421	GPU_updateLace = dummy_lace;
	422
80c2304e	423	EmuReset();
bd6267e6	424
	425	// hmh core forgets this
	426	CDR_stop();
e6eb2066	427
e6eb2066	428	GPU_updateLace = real_lace;
80c2304e	429	}
	430
	431	void SysClose() {
	432	EmuShutdown();
	433	ReleasePlugins();
	434
	435	StopDebugger();
	436
	437	if (emuLog != NULL) fclose(emuLog);
	438	}
	439
	440	void SysUpdate() {
80c2304e	441	}
	442
	443	void OnFile_Exit() {
bd6267e6	444	printf("OnFile_Exit\n");
e0c692d9	445	#ifndef MAEMO
201c21e2	446	menu_finish();
e0c692d9	447	#endif
bd6267e6	448	SysClose();
2c886904	449	plat_finish();
80c2304e	450	exit(0);
	451	}
	452
c5061935	453	int get_state_filename(char *buf, int size, int i) {
29a8c4f3	454	return get_gameid_filename(buf, size,
29a8c4f3	455	"." STATES_DIR "%.32s-%.9s.%3.3d", i);
80c2304e	456	}
80c2304e	457
8f892648	458	int emu_check_state(int slot)
	459	{
	460	char fname[MAXPATHLEN];
	461	int ret;
	462
	463	ret = get_state_filename(fname, sizeof(fname), slot);
	464	if (ret != 0)
	465	return ret;
	466
	467	return CheckState(fname);
	468	}
	469
	470	int emu_save_state(int slot)
	471	{
	472	char fname[MAXPATHLEN];
	473	int ret;
	474
	475	ret = get_state_filename(fname, sizeof(fname), slot);
	476	if (ret != 0)
	477	return ret;
	478
90f1d26c	479	ret = SaveState(fname);
	480	printf("* %s \"%s\" [%d]\n", ret == 0 ? "saved" : "failed to save", fname, slot);
	481	return ret;
8f892648	482	}
	483
	484	int emu_load_state(int slot)
	485	{
	486	char fname[MAXPATHLEN];
	487	int ret;
	488
	489	ret = get_state_filename(fname, sizeof(fname), slot);
	490	if (ret != 0)
	491	return ret;
	492
	493	return LoadState(fname);
	494	}
	495
80c2304e	496	void SysPrintf(const char *fmt, ...) {
	497	va_list list;
	498	char msg[512];
	499
	500	va_start(list, fmt);
	501	vsprintf(msg, fmt, list);
	502	va_end(list);
	503
80c2304e	504	fprintf(emuLog, "%s", msg);
	505	}
	506
	507	void SysMessage(const char *fmt, ...) {
	508	va_list list;
	509	char msg[512];
	510
	511	va_start(list, fmt);
	512	vsprintf(msg, fmt, list);
	513	va_end(list);
	514
	515	if (msg[strlen(msg) - 1] == '\n')
	516	msg[strlen(msg) - 1] = 0;
	517
	518	fprintf(stderr, "%s\n", msg);
	519	}
	520
c5061935	521	static void SignalExit(int sig) {
	522	ClosePlugins();
	523	OnFile_Exit();
	524	}
	525
	526	#define PARSEPATH(dst, src) \
	527	ptr = src + strlen(src); \
	528	while (*ptr != '\\' && ptr != src) ptr--; \
	529	if (ptr != src) { \
	530	strcpy(dst, ptr+1); \
	531	}
	532
	533	static int _OpenPlugins(void) {
	534	int ret;
	535
	536	signal(SIGINT, SignalExit);
	537	signal(SIGPIPE, SignalExit);
	538
	539	GPU_clearDynarec(clearDynarec);
	540
	541	ret = CDR_open();
	542	if (ret < 0) { SysMessage(_("Error opening CD-ROM plugin!")); return -1; }
	543	ret = SPU_open();
	544	if (ret < 0) { SysMessage(_("Error opening SPU plugin!")); return -1; }
	545	SPU_registerCallback(SPUirq);
	546	// pcsx-rearmed: we handle gpu elsewhere
	547	//ret = GPU_open(&gpuDisp, "PCSX", NULL);
	548	//if (ret < 0) { SysMessage(_("Error opening GPU plugin!")); return -1; }
	549	ret = PAD1_open(&gpuDisp);
	550	if (ret < 0) { SysMessage(_("Error opening Controller 1 plugin!")); return -1; }
	551	ret = PAD2_open(&gpuDisp);
	552	if (ret < 0) { SysMessage(_("Error opening Controller 2 plugin!")); return -1; }
	553
	554	if (Config.UseNet && !NetOpened) {
	555	netInfo info;
	556	char path[MAXPATHLEN];
	557	char dotdir[MAXPATHLEN];
	558
	559	MAKE_PATH(dotdir, "/.pcsx/plugins/", NULL);
	560
	561	strcpy(info.EmuName, "PCSX " PACKAGE_VERSION);
	562	strncpy(info.CdromID, CdromId, 9);
	563	strncpy(info.CdromLabel, CdromLabel, 9);
	564	info.psxMem = psxM;
	565	info.GPU_showScreenPic = GPU_showScreenPic;
	566	info.GPU_displayText = GPU_displayText;
	567	info.GPU_showScreenPic = GPU_showScreenPic;
	568	info.PAD_setSensitive = PAD1_setSensitive;
	569	sprintf(path, "%s%s", Config.BiosDir, Config.Bios);
	570	strcpy(info.BIOSpath, path);
	571	strcpy(info.MCD1path, Config.Mcd1);
	572	strcpy(info.MCD2path, Config.Mcd2);
	573	sprintf(path, "%s%s", dotdir, Config.Gpu);
	574	strcpy(info.GPUpath, path);
	575	sprintf(path, "%s%s", dotdir, Config.Spu);
	576	strcpy(info.SPUpath, path);
	577	sprintf(path, "%s%s", dotdir, Config.Cdr);
	578	strcpy(info.CDRpath, path);
	579	NET_setInfo(&info);
	580
	581	ret = NET_open(&gpuDisp);
	582	if (ret < 0) {
	583	if (ret == -2) {
	584	// -2 is returned when something in the info
585	// changed and needs to be synced
586	char *ptr;
587
588	PARSEPATH(Config.Bios, info.BIOSpath);
589	PARSEPATH(Config.Gpu, info.GPUpath);
590	PARSEPATH(Config.Spu, info.SPUpath);
591	PARSEPATH(Config.Cdr, info.CDRpath);
592
593	strcpy(Config.Mcd1, info.MCD1path);
594	strcpy(Config.Mcd2, info.MCD2path);
595	return -2;
596	} else {
597	Config.UseNet = FALSE;
598	}
599	} else {
600	if (NET_queryPlayer() == 1) {
601	if (SendPcsxInfo() == -1) Config.UseNet = FALSE;
602	} else {
603	if (RecvPcsxInfo() == -1) Config.UseNet = FALSE;
604	}
605	}
606	NetOpened = TRUE;
607	} else if (Config.UseNet) {
608	NET_resume();
609	}
610
611	return 0;
612	}
613
614	int OpenPlugins() {
615	int ret;
616
617	while ((ret = _OpenPlugins()) == -2) {
618	ReleasePlugins();
619	LoadMcds(Config.Mcd1, Config.Mcd2);
620	if (LoadPlugins() == -1) return -1;
621	}
622	return ret;
623	}
624
625	void ClosePlugins() {
626	int ret;
627
628	signal(SIGINT, SIG_DFL);
629	signal(SIGPIPE, SIG_DFL);
630	ret = CDR_close();
631	if (ret < 0) { SysMessage(_("Error closing CD-ROM plugin!")); return; }
632	ret = SPU_close();
633	if (ret < 0) { SysMessage(_("Error closing SPU plugin!")); return; }
634	ret = PAD1_close();
635	if (ret < 0) { SysMessage(_("Error closing Controller 1 Plugin!")); return; }
636	ret = PAD2_close();
637	if (ret < 0) { SysMessage(_("Error closing Controller 2 plugin!")); return; }
638	// pcsx-rearmed: we handle gpu elsewhere
639	//ret = GPU_close();
640	//if (ret < 0) { SysMessage(_("Error closing GPU plugin!")); return; }
641
642	if (Config.UseNet) {
643	NET_pause();
644	}
645	}
646
e906c010	647	#if 1
	648	/* this is to avoid having to hack every plugin to stop using $HOME */
	649	char getenv(const char name)
	650	{
	651	static char ret[8] = ".";
	652
69af03a2	653	if (name && strcmp(name, "HOME") == 0 &&
69af03a2	654	((int)name >> 28) == 0) // HACK: let libs find home
b60f2812	655	return ret;
e906c010	656
b60f2812	657	return real_getenv(name);
e906c010	658	}
	659	#endif
	660
	661	/* we hook statically linked plugins here */
	662	static const char *builtin_plugins[] = {
47bf65ab	663	"builtin_gpu", "builtin_spu", "builtin_cdr", "builtin_pad",
47bf65ab	664	"builtin_cdrcimg",
e906c010	665	};
	666
	667	static const int builtin_plugin_ids[] = {
	668	PLUGIN_GPU, PLUGIN_SPU, PLUGIN_CDR, PLUGIN_PAD,
47bf65ab	669	PLUGIN_CDRCIMG,
e906c010	670	};
e906c010	671
80c2304e	672	void SysLoadLibrary(const char lib) {
e906c010	673	const char *tmp = strrchr(lib, '/');
bbd837c6	674	void *ret;
e906c010	675	int i;
e906c010	676
bbd837c6	677	printf("plugin: %s\n", lib);
bbd837c6	678
e906c010	679	if (tmp != NULL) {
	680	tmp++;
	681	for (i = 0; i < ARRAY_SIZE(builtin_plugins); i++)
	682	if (strcmp(tmp, builtin_plugins[i]) == 0)
	683	return (void *)(long)(PLUGIN_DL_BASE + builtin_plugin_ids[i]);
	684	}
	685
2185e39b	686	#if defined(__x86_64__) \|\| defined(__i386__)
	687	// convenience hack
	688	char name[MAXPATHLEN];
	689	snprintf(name, sizeof(name), "%s.x86", lib);
	690	lib = name;
	691	#endif
	692
bbd837c6	693	ret = dlopen(lib, RTLD_NOW);
	694	if (ret == NULL)
	695	fprintf(stderr, "dlopen: %s\n", dlerror());
	696	return ret;
80c2304e	697	}
	698
	699	void SysLoadSym(void lib, const char *sym) {
e906c010	700	unsigned int plugid = (unsigned int)(long)lib;
	701
	702	if (PLUGIN_DL_BASE <= plugid && plugid < PLUGIN_DL_BASE + ARRAY_SIZE(builtin_plugins))
	703	return plugin_link(plugid - PLUGIN_DL_BASE, sym);
	704
80c2304e	705	return dlsym(lib, sym);
	706	}
	707
	708	const char *SysLibError() {
	709	return dlerror();
	710	}
	711
	712	void SysCloseLibrary(void *lib) {
e906c010	713	unsigned int plugid = (unsigned int)(long)lib;
	714
	715	if (PLUGIN_DL_BASE <= plugid && plugid < PLUGIN_DL_BASE + ARRAY_SIZE(builtin_plugins))
	716	return;
	717
80c2304e	718	dlclose(lib);
	719	}
	720