#include <fcntl.h>

#include "menu.hpp"
#include "types.h"
#include "booter/external_booter.hpp"
#include "channel/channel_launcher.h"
#include "channel/channels.h"
#include "channel/nand.hpp"
#include "channel/identify.h"
#include "devicemounter/DeviceHandler.hpp"
#include "devicemounter/sdhc.h"
#include "devicemounter/usbstorage.h"
#include "gc/gc.hpp"
#include "homebrew/homebrew.h"
#include "loader/alt_ios.h"
#include "loader/wdvd.h"
#include "loader/playlog.h"
#include "loader/wbfs.h"
#include "loader/wip.h"
#include "loader/frag.h"
#include "loader/fst.h"
#include "loader/cios.h"
#include "loader/nk.h"
#include "memory/memory.h"
#include "network/gcard.h"

static void setLanguage(int l)
{
	if (l > 0 && l <= 10)
		configbytes[0] = l - 1;
	else
		configbytes[0] = 0xCD;
}

static u8 GetRequestedGameIOS(dir_discHdr *hdr)
{
	u8 IOS = 0;

	DeviceHandle.OpenWBFS(currentPartition);
	wbfs_disc_t *disc = WBFS_OpenDisc((u8*)&hdr->id, hdr->path);
	if(disc != NULL)
	{
		void *titleTMD = NULL;
		u32 tmd_size = wbfs_extract_file(disc, (char*)"TMD", &titleTMD);
		if(titleTMD != NULL)
		{
			if(tmd_size > 0x18B)
				IOS = *((u8*)titleTMD + 0x18B);
			MEM2_free(titleTMD);
		}
		WBFS_CloseDisc(disc);
	}
	WBFS_Close();
	return IOS;
}

void CMenu::directlaunch(const char *GameID)// from boot arg for wii game only
{
	m_directLaunch = true;
	for(currentPartition = SD; currentPartition < USB8; currentPartition++)
	{
		if(!DeviceHandle.IsInserted(currentPartition))
			continue;
		DeviceHandle.OpenWBFS(currentPartition);
		string gameDir(fmt(wii_games_dir, DeviceName[currentPartition]));
		string cacheDir(fmt("%s/%s_wii.db", m_listCacheDir.c_str(), DeviceName[currentPartition]));
		m_cacheList.CreateList(COVERFLOW_WII, currentPartition, gameDir,
				stringToVector(".wbfs|.iso", '|'), cacheDir, false);
		WBFS_Close();
		for(u32 i = 0; i < m_cacheList.size(); i++)
		{
			if(strncasecmp(GameID, m_cacheList[i].id, 6) == 0)
			{
				_launchWii(&m_cacheList[i], false); // Launch will exit wiiflow
				break;
			}
		}
	}
	error(wfmt(_fmt("errgame1", L"Cannot find the game with ID: %s"), GameID));
}

void CMenu::_launchShutdown()
{
	CoverFlow.clear();
	_showWaitMessage();
	exitHandler(PRIILOADER_DEF); //Making wiiflow ready to boot something
}

void CMenu::_launch(const dir_discHdr *hdr)
{
	dir_discHdr launchHdr;
	memcpy(&launchHdr, hdr, sizeof(dir_discHdr));
	/* Lets boot that shit */
	if(launchHdr.type == TYPE_WII_GAME)
		_launchWii(&launchHdr, false);
	else if(launchHdr.type == TYPE_GC_GAME)
		_launchGC(&launchHdr, false);
	else if(launchHdr.type == TYPE_CHANNEL || launchHdr.type == TYPE_EMUCHANNEL)
		_launchChannel(&launchHdr);
	else if(launchHdr.type == TYPE_PLUGIN)
		_launchPlugin(&launchHdr);
	else if(launchHdr.type == TYPE_HOMEBREW)
	{
		const char *bootpath = fmt("%s/boot.dol", launchHdr.path);
		if(!fsop_FileExist(bootpath))
			bootpath = fmt("%s/boot.elf", launchHdr.path);
		if(fsop_FileExist(bootpath))
		{
			m_cfg.setString(HOMEBREW_DOMAIN, "current_item", strrchr(launchHdr.path, '/') + 1);
			vector<string> arguments = _getMetaXML(bootpath);
			gprintf("launching homebrew app\n");
			_launchHomebrew(bootpath, arguments);
		}
	}
}

void CMenu::_launchPlugin(dir_discHdr *hdr)
{
	/* get dol name and name length for music plugin */
	const char *plugin_dol_name = m_plugin.GetDolName(hdr->settings[0]);
	u8 plugin_dol_len = strlen(plugin_dol_name);
	
	/* check if music player plugin, if so set wiiflow's bckgrnd music player to play this song or playlist */
	if(plugin_dol_len == 5 && strcasecmp(plugin_dol_name, "music") == 0)
	{
		if(strstr(hdr->path, ".pls") == NULL && strstr(hdr->path, ".m3u") == NULL)
			MusicPlayer.LoadFile(hdr->path, false);
		else
			MusicPlayer.InitPlaylist(m_cfg, hdr->path, currentPartition);// maybe error msg if trouble loading playlist
		return;
	}
	
	/* get title from hdr */
	u32 title_len_no_ext = 0;
	const char *title = CoverFlow.getFilenameId(hdr);// with extension
	
	/* get path from hdr */
	// example rom path - dev:/roms/super mario bros.zip
	// example scummvm path - kq1-coco3		
	const char *path = NULL;
	if(strchr(hdr->path, ':') != NULL)//it's a rom path
	{
		// if there's extension get length of title without extension
		if(strchr(hdr->path, '.') != NULL)
			title_len_no_ext = strlen(title) - strlen(strrchr(title, '.'));
		// get path
		*strrchr(hdr->path, '/') = '\0'; //cut title off end of path
		path = strchr(hdr->path, '/') + 1; //cut dev:/ off of path
	}
	else // it's a scummvm game
		path = hdr->path;// kq1-coco3

	/* get device */
	const char *device = (currentPartition == 0 ? "sd" : (DeviceHandle.GetFSType(currentPartition) == PART_FS_NTFS ? "ntfs" : "usb"));
	
	/* get loader */
	// the loader arg was used and added to plugin mods that fix94 made.
	// it was used because postloader 4 also used the wiiflow plugins and the emus needed to know which loader to return to.
	// the wiimednafen plugin mod still requires this loader arg. most others don't use it.
	const char *loader = fmt("%s:/%s/WiiFlowLoader.dol", device, strchr(m_pluginsDir.c_str(), '/') + 1);

	/* set arguments */
	vector<string> arguments = m_plugin.CreateArgs(device, path, title, loader, title_len_no_ext, hdr->settings[0]);
	
	/* find plugin dol - it does not have to be in dev:/wiiflow/plugins */
	const char *plugin_file = plugin_dol_name; // try full path
	if(strchr(plugin_file, ':') == NULL || !fsop_FileExist(plugin_file)) // if not found try wiiflow plugin folder
	{
		plugin_file = fmt("%s/%s", m_pluginsDir.c_str(), plugin_dol_name);
		if(!fsop_FileExist(plugin_file)) // not found - try device search
		{
			for(u8 i = SD; i < MAXDEVICES; ++i)
			{
				plugin_file = fmt("%s:/%s", DeviceName[i], plugin_dol_name);
				if(fsop_FileExist(plugin_file))
					break;
			}
		}
	}
	
	/* launch plugin with args */
	gprintf("launching plugin app\n");
	_launchHomebrew(plugin_file, arguments);
}

void CMenu::_launchHomebrew(const char *filepath, vector<string> arguments)
{
	/* clear coverflow, start wiiflow wait animation, set exit handler */	
	_launchShutdown();
	m_gcfg1.save(true);
	m_gcfg2.save(true);
	m_cat.save(true);
	m_cfg.save(true);

	Playlog_Delete();

	/* load boot.dol into memory and load app_booter.bin into memory */
	bool ret = (LoadHomebrew(filepath) && LoadAppBooter(fmt("%s/app_booter.bin", m_binsDir.c_str())));
	if(ret == false)
	{
		error(_t("errgame14", L"app_booter.bin not found!"));
		_exitWiiflow();
	}
	/* no more error msgs - remove btns and sounds */
	cleanup(); 

	AddBootArgument(filepath);
	for(u32 i = 0; i < arguments.size(); ++i)
	{
		gprintf("app argument: %s\n", arguments[i].c_str());
		AddBootArgument(arguments[i].c_str());
	}

	loadIOS(58, false);
	ShutdownBeforeExit();// wifi and sd gecko doesnt work anymore after
	BootHomebrew();
	Sys_Exit();
}

vector<string> CMenu::_getMetaXML(const char *bootpath)
{
	char *meta_buf = NULL;
	vector<string> args;
	char meta_path[200];
	char *p;
	char *e, *end;
	struct stat st;
	
	/* load meta.xml */
	
	p = strrchr(bootpath, '/');
	snprintf(meta_path, sizeof(meta_path), "%.*smeta.xml", p ? p-bootpath+1 : 0, bootpath);

	if (stat(meta_path, &st) != 0)
		return args;
	if (st.st_size > 64*1024)
		return args;

	meta_buf = (char *) calloc(st.st_size + 1, 1);// +1 so that the buf is 0 terminated
	if (!meta_buf)
		return args;

	int fd = open(meta_path, O_RDONLY);
	if (fd < 0)
	{
		free(meta_buf); 
		meta_buf = NULL; 
		return args;
	}
	read(fd, meta_buf, st.st_size);
	close(fd);

	/* strip comments */

	p = meta_buf;
	int len;
	while (p && *p) 
	{
		p = strstr(p, "<!--");
		if (!p) 
			break;
		e = strstr(p, "-->");
		if (!e) 
		{
			*p = 0; // terminate
			break;
		}
		e += 3;
		len = strlen(e);
		memmove(p, e, len + 1); // +1 for 0 termination
	}
	
	/* parse meta */

	if (strstr(meta_buf, "<app") && strstr(meta_buf, "</app>") && strstr(meta_buf, "<arguments>") && strstr(meta_buf, "</arguments>"))
	{
		p = strstr(meta_buf, "<arguments>");
		end = strstr(meta_buf, "</arguments>");

		do 
		{
			p = strstr(p, "<arg>");
			if (!p) 
				break;
				
			p += 5; //strlen("<arg>");
			e = strstr(p, "</arg>");
			if (!e) 
				break;

			string arg(p, e-p);
			args.push_back(arg);
			p = e + 6;
		} 
		while (p < end);
	}

	free(meta_buf); 
	meta_buf = NULL; 
	return args;
}

void CMenu::_launchGC(dir_discHdr *hdr, bool disc)
{
	/* note for a disc boot hdr->id is set to the disc id before _launchGC is called */
	const char *id = hdr->id;
	
	/* Get loader choice*/
	u8 loader = min(m_gcfg2.getUInt(id, "gc_loader", 0), ARRAY_SIZE(CMenu::_GCLoader) - 1u);
	loader = (loader == 0) ? min(m_cfg.getUInt(GC_DOMAIN, "default_loader", 1), ARRAY_SIZE(CMenu::_GlobalGCLoaders) - 1u) : loader-1;
	
	if(disc)
		loader = NINTENDONT;

	/* Check if loader installed */
	if((loader == NINTENDONT && !m_nintendont_installed) || (loader == DEVOLUTION && !m_devo_installed))
	{
		error(_t("errgame11", L"GameCube Loader not found! Can't launch game."));
		return;
	}
	
	/* clear coverflow, start wiiflow wait animation, set exit handler */	
	_launchShutdown();
	
	m_gcfg1.setInt("PLAYCOUNT", id, m_gcfg1.getInt("PLAYCOUNT", id, 0) + 1);
	m_gcfg1.setUInt("LASTPLAYED", id, time(NULL));

	if(has_enabled_providers() && _initNetwork() == 0)
		add_game_to_card(id);

	/* Get game settings */
	const char *path = NULL;
	if(disc)
		path = "di";
	else
		path = hdr->path;
		
	u8 GClanguage = min(m_gcfg2.getUInt(id, "language", 0), ARRAY_SIZE(CMenu::_GClanguages) - 1u);
	GClanguage = (GClanguage == 0) ? min(m_cfg.getUInt(GC_DOMAIN, "game_language", 0), ARRAY_SIZE(CMenu::_GlobalGClanguages) - 1u) : GClanguage-1;
	// language selection only works for PAL games. E and J are always set to english.
	if(id[3] == 'E' || id[3] == 'J')
		GClanguage = 1; //=english
		
	u8 videoMode = min(m_gcfg2.getUInt(id, "video_mode", 0), ARRAY_SIZE(CMenu::_GCvideoModes) - 1u);
	videoMode = (videoMode == 0) ? min(m_cfg.getUInt(GC_DOMAIN, "video_mode", 0), ARRAY_SIZE(CMenu::_GlobalGCvideoModes) - 1u) : videoMode-1;

	bool widescreen = m_gcfg2.getBool(id, "widescreen", false);
	bool activity_led = m_gcfg2.getBool(id, "led", false);
	
	if(loader == NINTENDONT)
	{
		/* might add here - if not a disc use path to check for disc2.iso - if so then we need to prompt disc 1 or disc 2? */
		u8 emuMC = min(m_gcfg2.getUInt(id, "emu_memcard", 0), ARRAY_SIZE(CMenu::_NinEmuCard) - 1u);
		emuMC = (emuMC == 0) ? m_cfg.getUInt(GC_DOMAIN, "emu_memcard", 1) : emuMC - 1;
		
		// these 3 settings have global defaults in wfl main config
		bool cc_rumble = m_gcfg2.testOptBool(id, "cc_rumble", m_cfg.getBool(GC_DOMAIN, "cc_rumble", false));
		bool native_ctl = m_gcfg2.testOptBool(id, "native_ctl", m_cfg.getBool(GC_DOMAIN, "native_ctl", false));
		bool wiiu_widescreen = m_gcfg2.testOptBool(id, "wiiu_widescreen", m_cfg.getBool(GC_DOMAIN, "wiiu_widescreen", false));

		bool deflicker = m_gcfg2.getBool(id, "deflicker", false);
		bool tri_arcade = m_gcfg2.getBool(id, "triforce_arcade", false);
		bool ipl = m_gcfg2.getBool(id, "skip_ipl", false);
		bool bba = m_gcfg2.getBool(id, "bba_emu", false);
		bool patch_pal50 = m_gcfg2.getBool(id, "patch_pal50", false);
		bool NIN_Debugger = (m_gcfg2.getInt(id, "debugger", 0) == 2);
		bool cheats = m_gcfg2.getBool(id, "cheat", false);
		
		s8 vidscale = m_gcfg2.getInt(id, "nin_width", 127);
		if(vidscale == 127)
			vidscale = m_cfg.getInt(GC_DOMAIN, "nin_width", 0);
		s8 vidoffset = m_gcfg2.getInt(id, "nin_pos", 127);
		if(vidoffset == 127)
			vidoffset = m_cfg.getInt(GC_DOMAIN, "nin_pos", 0);
		u8 netprofile = 0;
		if(!IsOnWiiU())
			netprofile = m_gcfg2.getUInt(id, "net_profile", 0);

		/* configs no longer needed */
		m_gcfg1.save(true);
		m_gcfg2.save(true);
		m_cat.save(true);
		m_cfg.save(true);

		bool ret = (Nintendont_GetLoader() && LoadAppBooter(fmt("%s/app_booter.bin", m_binsDir.c_str())));
		if(ret == false)
		{
			error(_t("errgame14", L"app_booter.bin not found!"));
			_exitWiiflow();
		}
		
		/* no more error msgs - remove btns and sounds */
		cleanup();
		
		//GameID for Video mode when booting a Disc
		memcpy((u8*)Disc_ID, id, 6);
		DCFlushRange((u8*)Disc_ID, 32);
		
		/* set nintendont conifg options */
		u32 n_config = 0;
		n_config |= NIN_CFG_AUTO_BOOT;

		if(DeviceHandle.PathToDriveType(path) != SD)
			n_config |= NIN_CFG_USB;

		char CheatPath[256];
		CheatPath[0] = '\0';// set NULL in case cheats are off
		if(cheats)
		{
			n_config |= NIN_CFG_CHEAT_PATH;
			n_config |= NIN_CFG_CHEATS;
			
			/* Generate Game Cheat path - usb1:/games/title [id]/ */
			char GC_Path[256];
			GC_Path[255] = '\0';
			if(!disc)
			{
				strncpy(GC_Path, path, 255);
				if(strcasestr(path, "boot.bin") != NULL)//usb1:/games/title [id]/sys/boot.bin
				{
					*strrchr(GC_Path, '/') = '\0'; //erase /boot.bin
					*(strrchr(GC_Path, '/')+1) = '\0'; //erase sys folder
				}
				else //usb1:/games/title [id]/game.iso
					*(strrchr(GC_Path, '/')+1) = '\0'; //erase game.iso
			}
			
			//use wiiflow cheat folder if is a disc or is on same partition as game folder
			if(disc || strncasecmp(m_cheatDir.c_str(), DeviceName[currentPartition], strlen(DeviceName[currentPartition])) == 0)
				snprintf(CheatPath, sizeof(CheatPath), "%s/%s", m_cheatDir.c_str(), fmt("%s.gct", id));
			else
			{
				// otherwise copy cheat file from wiiflow cheat folder to Game folder
				char GC_game_dir[strlen(GC_Path) + 11];
				snprintf(GC_game_dir, sizeof(GC_game_dir), "%s%s.gct", GC_Path, id);
				fsop_CopyFile(fmt("%s/%s.gct", m_cheatDir.c_str(), id), GC_game_dir, NULL, NULL);
				//might add err msg here if copy error
			}
		}

		if(NIN_Debugger && IsOnWiiU() == false) //wii only
			n_config |= NIN_CFG_OSREPORT;

		if(native_ctl && IsOnWiiU() == false) //wii only
			n_config |= NIN_CFG_NATIVE_SI;

		if(wiiu_widescreen && IsOnWiiU() == true) //wii u vwii only
			n_config |= NIN_CFG_WIIU_WIDE;

		if(widescreen)
			n_config |= NIN_CFG_FORCE_WIDE;

		if(activity_led && IsOnWiiU() == false) //wii only
			n_config |= NIN_CFG_LED;

		if(tri_arcade)
			n_config |= NIN_CFG_ARCADE_MODE;

		if(cc_rumble)
			n_config |= NIN_CFG_BIT_CC_RUMBLE;

		if(ipl)
			n_config |= NIN_CFG_SKIP_IPL;

		if(bba)
			n_config |= NIN_CFG_BBA_EMU;

		/* set memcard options */
		if(emuMC > 0 || IsOnWiiU() == true) //force memcardemu for wii u vwii
			n_config |= NIN_CFG_MEMCARDEMU;

		if(emuMC > 1)
			n_config |= NIN_CFG_MC_MULTI;
			
		/* set nintendont video options */
		u32 n_videomode = 0;
		
		/* if video is not already forced and patch pal50 or deflicker are on then force to game video mode */
		if(videoMode == 0 && (patch_pal50 || deflicker))
		{
			if(id[3] == 'E' || id[3] == 'J')
				videoMode = 2; //NTSC 480i
			else if (CONF_GetEuRGB60() > 0)
				videoMode = 3; //PAL 480i
			else
				videoMode = 1; //PAL 576i
		}
		
		/* auto or forced */
		if(videoMode == 0)
			n_videomode |= NIN_VID_AUTO;
		else
			n_videomode |= NIN_VID_FORCE;

		// patch_pal50 only works on pal50 games forced to mpal, NTSC, or progressive.
		if(patch_pal50)
			n_videomode |= NIN_VID_PATCH_PAL50;

		// videomode must be forced to set deflicker
		if(deflicker)
			n_videomode |= NIN_VID_FORCE_DF;
			
		// progressive only works with NTSC - Nintendont auto forces to NTSC if progressive on
		if(videoMode == 5)
		{
			n_config |= NIN_CFG_FORCE_PROG;
			n_videomode |= NIN_VID_PROG;
		}

		// rmode and rmode_reg are set by Nintendont
		switch (videoMode)//if 0 nothing is forced
		{
			case 1:// PAL50
				n_videomode |= NIN_VID_FORCE_PAL50;
				break;
			case 2:// PAL60 480i
				n_videomode |= NIN_VID_FORCE_PAL60;
				break;
			case 3:// NTSC 480i
				n_videomode |= NIN_VID_FORCE_NTSC;
				break;
			case 4:// MPAL
				n_videomode |= NIN_VID_FORCE_MPAL;
				break;
		}

		Nintendont_SetOptions(path, id, CheatPath, GClanguage, n_config, n_videomode, vidscale, vidoffset, netprofile);
		
		loadIOS(58, false); //nintendont NEEDS ios58 and AHBPROT disabled
		/* should be a check for error loading IOS58 and AHBPROT disabled */
		ShutdownBeforeExit();
		BootHomebrew(); //regular dol
	}
	else // loader == DEVOLUTION
	{
		// devolution does not allow force video and progressive mode
		// ignore video setting choice and use game region always
		if(id[3] =='E' || id[3] =='J')
		{
			// if game is NTSC then video is based on console video
			if(CONF_GetVideo() == CONF_VIDEO_PAL)
				videoMode = 2; //PAL 480i
			else
				videoMode = 3; //NTSC 480i
		}
		else
			videoMode = 1; //PAL 576i 50hz
			
		bool memcard_emu = m_gcfg2.testOptBool(id, "devo_memcard_emu", m_cfg.getBool(GC_DOMAIN, "devo_memcard_emu", false));
		
		/* configs no longer needed */
		m_gcfg1.save(true);
		m_gcfg2.save(true);
		m_cat.save(true);
		m_cfg.save(true);

		/* remove btns and sounds */
		cleanup();

		DEVO_GetLoader(m_dataDir.c_str());
		DEVO_SetOptions(path, id, videoMode, GClanguage, memcard_emu, widescreen, activity_led, m_use_wifi_gecko);
		
		if(AHBPROT_Patched())
			loadIOS(58, false);
		else //use cIOS instead to make sure Devolution works anyways
			loadIOS(mainIOS, false);
		ShutdownBeforeExit();
		DEVO_Boot();
	}
	Sys_Exit();
}

/* used by wii and channel games to load the cIOS to use for the game */
/* plugins, apps, and gamecube games don't use cIOS */
int CMenu::_loadGameIOS(u8 gameIOS, int userIOS, string id, bool RealNAND_Channels)
{
	gprintf("Game ID %s requested IOS %d.\nUser selected %d\n", id.c_str(), gameIOS, userIOS);
	if(RealNAND_Channels && IOS_GetType(mainIOS) == IOS_TYPE_STUB)
	{
		/* doesn't use cIOS so we don't check userIOS */
		bool ret = loadIOS(gameIOS, false);//load game requested IOS and patch nothing
		_netInit();// needed after IOS change
		if(ret == false)
		{
			error(wfmt(_fmt("errgame4", L"Couldn't load IOS %i"), gameIOS));
			return LOAD_IOS_FAILED;
		}
		return LOAD_IOS_SUCCEEDED;
	}	
	
	if(userIOS)// if IOS is not 'auto' and set to a specific cIOS then set gameIOS to that cIOS if it's installed
	{
		for(CIOSItr itr = _installed_cios.begin(); itr != _installed_cios.end(); itr++)
		{
			if(itr->second == userIOS || itr->first == userIOS)
			{
				gameIOS = itr->first;
				break;
			}
		}
	}
	else if(gameIOS != 57)// if IOS is 'auto' but gameIOS is not IOS57 then set gameIOS to wiiflow's mainIOS
		gameIOS = mainIOS;// mainIOS is usually 249 unless changed by boot args or changed on startup settings menu
	gprintf("Changed requested IOS to %d.\n", gameIOS);

	// remap a gameIOS of IOS57 to a cIOS base 57 or if the specific cIOS selected is not installed then
	// remap game IOS to a CIOS with the same base IOS
	if(gameIOS < 0x64)// < 100
	{
		if(_installed_cios.size() <= 0)
		{
			error(_t("errgame2", L"No cIOS found!"));
			Sys_Exit();
		}
		u8 IOS[3];
		IOS[0] = gameIOS;
		IOS[1] = 56;
		IOS[2] = 57;
		bool found = false;
		// compare the base of each cios to the game ios
		// if no match then find the first cios with base 56
		// if no match then find the first cios with base 57
		for(u8 num = 0; num < 3; num++)
		{
			if(found)
				break;
			if(IOS[num] == 0)
				continue;
			for(CIOSItr itr = _installed_cios.begin(); itr != _installed_cios.end(); itr++)
			{
				if(itr->second == IOS[num] || itr->first == IOS[num])
				{
					gameIOS = itr->first;
					found = true;
					break;
				}
			}
		}
		if(!found)
			return LOAD_IOS_FAILED;
	}
	/* at this point gameIOS is a cIOS */
	if(gameIOS != CurrentIOS.Version)
	{
		gprintf("Reloading IOS into %d\n", gameIOS);
		bool ret = loadIOS(gameIOS, true);// cIOS patch everything
		_netInit();// always seem to do netinit after changing IOS
		if(ret == false)
		{
			error(wfmt(_fmt("errgame4", L"Couldn't load IOS %i"), gameIOS));
			return LOAD_IOS_FAILED;
		}
		return LOAD_IOS_SUCCEEDED;
	}
	return LOAD_IOS_NOT_NEEDED;
}

void CMenu::_launchChannel(dir_discHdr *hdr)
{
	NANDemuView = hdr->type == TYPE_EMUCHANNEL;
	
	/* clear coverflow, start wiiflow wait animation, set exit handler */	
	_launchShutdown();
	string id = string(hdr->id);

	/* WII_Launch is used for launching real nand channels */
	bool WII_Launch = (m_gcfg2.getBool(id, "custom", false) && !NANDemuView);
	/* use_dol = true to use the channels dol or false to use the old apploader method to boot channel */
	bool use_dol = !m_gcfg2.getBool(id, "apploader", false);

	bool vipatch = m_gcfg2.getBool(id, "vipatch", false);
	bool cheat = m_gcfg2.getBool(id, "cheat", false);
	bool countryPatch = m_gcfg2.getBool(id, "country_patch", false);

	u8 videoMode = min(m_gcfg2.getUInt(id, "video_mode", 0), ARRAY_SIZE(CMenu::_VideoModes) - 1u);
	videoMode = (videoMode == 0) ? min(m_cfg.getUInt("GENERAL", "video_mode", 0), ARRAY_SIZE(CMenu::_GlobalVideoModes) - 1u) : videoMode - 1;

	int language = min(m_gcfg2.getUInt(id, "language", 0), ARRAY_SIZE(CMenu::_languages) - 1u);
	language = (language == 0) ? min(m_cfg.getUInt("GENERAL", "game_language", 0), ARRAY_SIZE(CMenu::_languages) - 1u) : language;

	u8 patchVidMode = min(m_gcfg2.getUInt(id, "patch_video_modes", 0), ARRAY_SIZE(CMenu::_vidModePatch) - 1u);
	int aspectRatio = min(m_gcfg2.getUInt(id, "aspect_ratio", 0), ARRAY_SIZE(CMenu::_AspectRatio) - 1) - 1;// -1,0,1
	
	u32 returnTo = 0;
	const char *rtrn = m_cfg.getString("GENERAL", "returnto").c_str();
	if(strlen(rtrn) == 4)
		returnTo = rtrn[0] << 24 | rtrn[1] << 16 | rtrn[2] << 8 | rtrn[3];

	u8 *cheatFile = NULL;
	u32 cheatSize = 0;
	if(!WII_Launch)
	{
		hooktype = (u32) m_gcfg2.getInt(id, "hooktype", 0);
		debuggerselect = m_gcfg2.getInt(id, "debugger", 0);
		if((cheat || debuggerselect == 1) && hooktype == 0)
			hooktype = 1;
		else if(!cheat && debuggerselect != 1)
			hooktype = 0;

		if(cheat)
			_loadFile(cheatFile, cheatSize, m_cheatDir.c_str(), fmt("%s.gct", id.c_str()));
		if(has_enabled_providers() && _initNetwork() == 0)
			add_game_to_card(id.c_str());
	}
	m_gcfg1.setInt("PLAYCOUNT", id, m_gcfg1.getInt("PLAYCOUNT", id, 0) + 1); 
	m_gcfg1.setUInt("LASTPLAYED", id, time(NULL));

	//interesting - there is only a global option for nand emulation - no per game choice
	int emulate_mode = min(max(0, m_cfg.getInt(CHANNEL_DOMAIN, "emulation", 1)), (int)ARRAY_SIZE(CMenu::_NandEmu) - 1);
	
	int userIOS = m_gcfg2.getInt(id, "ios", 0);
	u64 gameTitle = TITLE_ID(hdr->settings[0],hdr->settings[1]);
	bool useNK2o = m_gcfg2.getBool(id, "useneek", false);//if not in neek2o and use neek is set
	bool use_led = m_gcfg2.getBool(id, "led", false);
	u32 gameIOS = ChannelHandle.GetRequestedIOS(gameTitle);

	if(NANDemuView)
	{
		/* copy real NAND sysconf, settings.txt, & RFL_DB.dat if you want to, they are replaced if they already exist */
		NandHandle.PreNandCfg(m_cfg.getBool(CHANNEL_DOMAIN, "real_nand_miis", false), 
								m_cfg.getBool(CHANNEL_DOMAIN, "real_nand_config", false));
		//m_cfg.setBool(CHANNEL_DOMAIN, "real_nand_miis", false); 
		//m_cfg.setBool(CHANNEL_DOMAIN, "real_nand_config", false);
	}

	/* configs no longer needed */
	m_gcfg1.save(true);
	m_gcfg2.save(true);
	m_cat.save(true);
	m_cfg.save(true);

	if(NANDemuView)
	{
		if(useNK2o)
		{
			if(!Load_Neek2o_Kernel())
			{
				error(_t("errneek1", L"Cannot launch neek2o. Verify your neek2o setup"));//kernal.bin not found
				_exitWiiflow();
			}
			else 
			{
				const char *nkrtrn = NULL;
				if(IsOnWiiU())
					nkrtrn = "HCVA";// Return to WiiU system channel
				else
					nkrtrn = "NK2O";
				u32 nkreturnTo = nkrtrn[0] << 24 | nkrtrn[1] << 16 | nkrtrn[2] << 8 | nkrtrn[3];
				cleanup();
				ShutdownBeforeExit();
				if(IsOnWiiU())
					Launch_nk(gameTitle, NandHandle.Get_NandPath(), ((u64)(0x00010002) << 32) | (nkreturnTo & 0xFFFFFFFF));
				else
					Launch_nk(gameTitle, NandHandle.Get_NandPath(), ((u64)(0x00010001) << 32) | (nkreturnTo & 0xFFFFFFFF));
				while(1) usleep(500);
			}
		}
	}
	if(WII_Launch == false && ExternalBooter_LoadBins(m_binsDir.c_str()) == false)
	{
		error(_t("errgame15", L"Missing ext_loader.bin or ext_booter.bin!"));
		_exitWiiflow();
	}
	if(_loadGameIOS(gameIOS, userIOS, id, !NANDemuView) == LOAD_IOS_FAILED)//in neek2o this will only load the game IOS not a cIOS
	{
		/* error message already shown */
		_exitWiiflow();
	}

	if(CurrentIOS.Type == IOS_TYPE_D2X && returnTo != 0)
	{
		if(D2X_PatchReturnTo(returnTo) >= 0)
			memset(&returnTo, 0, sizeof(u32));// not needed - always set to 0 in external booter below
	}
	if(NANDemuView)
	{
		/* Enable our Emu NAND */
		DeviceHandle.UnMountAll();
		if(emulate_mode == 1)
			NandHandle.Set_FullMode(true);
		else
			NandHandle.Set_FullMode(false);
		if(NandHandle.Enable_Emu() < 0)
		{
			NandHandle.Disable_Emu();
			error(_t("errgame5", L"Enabling emu failed!"));
			_exitWiiflow();
		}
		DeviceHandle.MountAll();
	}
	
	cleanup();//no more error messages we can now cleanup
	
	if(WII_Launch)
	{
		ShutdownBeforeExit();
		WII_Initialize();
		WII_LaunchTitle(gameTitle);
	}
	else
	{
		setLanguage(language);
		ocarina_load_code(cheatFile, cheatSize);
		NandHandle.Patch_AHB(); /* Identify maybe uses it so keep AHBPROT disabled */
		PatchIOS(true,  isWiiVC); /* Patch for everything */
		Identify(gameTitle);

		ExternalBooter_ChannelSetup(gameTitle, use_dol);
		WiiFlow_ExternalBooter(videoMode, vipatch, countryPatch, patchVidMode, aspectRatio, 0, TYPE_CHANNEL, use_led);
	}
	Sys_Exit();
}

void CMenu::_launchWii(dir_discHdr *hdr, bool dvd, bool disc_cfg)
{
	string id(hdr->id);
	string path(hdr->path);

	if(dvd)
	{
		TempLoadIOS();// switch to cIOS if using IOS58 and not in neek2o
		/* Open Disc */
		if(Disc_Open(true) < 0)
		{
			error(_t("wbfsoperr2", L"Disc_Open failed"));
			Sys_Exit();
		}
		/* Check disc */
		if(Disc_IsWii() < 0)
		{
			if(Disc_IsGC() < 0) 
			{
				error(_t("errgame9", L"This is not a Wii or GC disc"));
				Sys_Exit();
			}
			else
			{
				if(!m_nintendont_installed)
				{
					error(_t("errgame12", L"Nintendont not found! Can't launch GC Disc."));
					return;
				}
				/* Read GC disc header */
				Disc_ReadGCHeader(&gc_hdr);
				memcpy(hdr->id, gc_hdr.id, 6);
				hdr->type = TYPE_GC_GAME;
				
				/* Launching GC Game */
				if(disc_cfg)
					_gameSettings(hdr, dvd);
				MusicPlayer.Stop();
				m_cfg.setInt("GENERAL", "cat_startpage", m_catStartPage);
				if(!disc_cfg)
					m_gcfg2.load(fmt("%s/" GAME_SETTINGS2_FILENAME, m_settingsDir.c_str()));
				currentPartition = m_cfg.getInt(GC_DOMAIN, "partition", 1);
				_launchGC(hdr, dvd);
				return;
			}
		}
		else
		{
			/* Read header */
			Disc_ReadHeader(&wii_hdr);
			memcpy(hdr->id, wii_hdr.id, 6);
			id = string((const char*)wii_hdr.id, 6);
			hdr->type = TYPE_WII_GAME;
			if(disc_cfg)
				_gameSettings(hdr, dvd);
			MusicPlayer.Stop();
			m_cfg.setInt("GENERAL", "cat_startpage", m_catStartPage);
			if(!disc_cfg)
				m_gcfg2.load(fmt("%s/" GAME_SETTINGS2_FILENAME, m_settingsDir.c_str()));
			currentPartition = m_cfg.getInt(WII_DOMAIN, "partition", 1);
		}
		gprintf("Game ID: %s\n", id.c_str());
	}
	
	/* clear coverflow, start wiiflow wait animation, set exit handler */	
	_launchShutdown();
	bool vipatch = m_gcfg2.getBool(id, "vipatch", false);
	bool countryPatch = m_gcfg2.getBool(id, "country_patch", false);
	bool private_server = m_gcfg2.getBool(id, "private_server", false);
	int fix480pVal = m_gcfg2.getOptBool(id, "fix480p", 2);
	bool fix480p = fix480pVal == 0 ? false : (fix480pVal == 1 ? true : m_cfg.getBool(WII_DOMAIN, "fix480p", false));

	u8 videoMode = min(m_gcfg2.getUInt(id, "video_mode", 0), ARRAY_SIZE(CMenu::_VideoModes) - 1u);
	videoMode = (videoMode == 0) ? min(m_cfg.getUInt("GENERAL", "video_mode", 0), ARRAY_SIZE(CMenu::_GlobalVideoModes) - 1u) : videoMode-1;

	int language = min(m_gcfg2.getUInt(id, "language", 0), ARRAY_SIZE(CMenu::_languages) - 1u);
	language = (language == 0) ? min(m_cfg.getUInt("GENERAL", "game_language", 0), ARRAY_SIZE(CMenu::_languages) - 1u) : language;

	u32 returnTo = 0;
	const char *rtrn = m_cfg.getString("GENERAL", "returnto").c_str();
	/* this if is done in case "returnto" is set to disabled in which case rtrn would point to nothing */
	if(strlen(rtrn) == 4)
		returnTo = rtrn[0] << 24 | rtrn[1] << 16 | rtrn[2] << 8 | rtrn[3];
	
	int aspectRatio = min(m_gcfg2.getUInt(id, "aspect_ratio", 0), ARRAY_SIZE(CMenu::_AspectRatio) - 1u) - 1;
	u8 patchVidMode = min(m_gcfg2.getUInt(id, "patch_video_modes", 0), ARRAY_SIZE(CMenu::_vidModePatch) - 1u);

	u8 emulate_mode = min(m_gcfg2.getUInt(id, "emulate_save", 0), ARRAY_SIZE(CMenu::_SaveEmu) - 1u);
	u8 gameEmuMode = emulate_mode;
	if(emulate_mode == 0)// default then use global
		emulate_mode = min(max(0, m_cfg.getInt(WII_DOMAIN, "save_emulation", 0)), (int)ARRAY_SIZE(CMenu::_GlobalSaveEmu) - 1);
	else
		emulate_mode--;
		
	if(emulate_mode && !dvd)
	{
		int emuPart = _FindEmuPart(SAVES_NAND, true);
		if(emuPart == -1)//if savepartition is unusable
		{
			_hideWaitMessage();
			error(_t("errgame13", L"EmuNAND for gamesave not found! Using real NAND."));
			emulate_mode = 0;
			_showWaitMessage();
		}
		else // partition is good so now check if save exists on savesnand
		{
			bool need_config = false;
			bool need_miis = false;
			const char *emuPath = NandHandle.Get_NandPath();
			
			char basepath[MAX_FAT_PATH];
			snprintf(basepath, sizeof(basepath), "%s:%s", DeviceName[emuPart], emuPath);
			
			char testpath[strlen(basepath) + 42];
			
			// does not check to see if actual tmd exist just if the folder exist
			if(!_checkSave(id, SAVES_NAND))//if save is not on saves emunand
			{
				/* still use savesnand to create a new save on the savesnand */
				/* make savesnand folders in case they don't already exist */
				NandHandle.CreatePath("%s/import", basepath);
				NandHandle.CreatePath("%s/meta", basepath);
				NandHandle.CreatePath("%s/shared1", basepath);
				NandHandle.CreatePath("%s/shared2", basepath);
				NandHandle.CreatePath("%s/sys", basepath);
				NandHandle.CreatePath("%s/title", basepath);
				NandHandle.CreatePath("%s/ticket", basepath);
				NandHandle.CreatePath("%s/tmp", basepath);
				NandHandle.CreateTitleTMD(hdr);//setup emunand for wii gamesave
			}
			/* check if saves emulation is set to full per this game in case the global defualt is not full */
			if(gameEmuMode == 3)// if is then we need to make sure the savesnand contains mii's and config files
			{
				//check config files
				snprintf(testpath, sizeof(testpath), "%s/shared2/sys/SYSCONF", basepath);
				if(!fsop_FileExist(testpath))
					need_config = true;
				snprintf(testpath, sizeof(testpath), "%s/title/00000001/00000002/data/setting.txt", basepath);
				if(!fsop_FileExist(testpath))
					need_config = true;
				// Check Mii's
				snprintf(testpath, sizeof(testpath), "%s/shared2/menu/FaceLib/RFL_DB.dat", basepath);
				if(!fsop_FileExist(testpath))
					need_miis = true;
					
				NandHandle.PreNandCfg(need_miis, need_config);//copy to emunand if needed
			}
		}
	}
	else
		emulate_mode = 0;//sets to off if we are using neek2o or launching a DVD game

	bool use_led = m_gcfg2.getBool(id, "led", false);
	bool cheat = m_gcfg2.getBool(id, "cheat", false);
	debuggerselect = m_gcfg2.getInt(id, "debugger", 0); // debuggerselect is defined in fst.h
	if((id == "RPWE41" || id == "RPWZ41" || id == "SPXP41") && debuggerselect == 1) // Prince of Persia, Rival Swords
		debuggerselect = 0;
	hooktype = (u32)m_gcfg2.getInt(id, "hooktype", 0); // hooktype is defined in patchcode.h
	if((cheat || debuggerselect == 1) && hooktype == 0)
		hooktype = 1;
	else if(!cheat && debuggerselect != 1)
		hooktype = 0;

	u8 *cheatFile = NULL;
	u8 *gameconfig = NULL;
	u32 cheatSize = 0, gameconfigSize = 0;

	m_gcfg1.setInt("PLAYCOUNT", id, m_gcfg1.getInt("PLAYCOUNT", id, 0) + 1);
	m_gcfg1.setUInt("LASTPLAYED", id, time(NULL));

	if(has_enabled_providers() && _initNetwork() == 0)
		add_game_to_card(id.c_str());

	setLanguage(language);

	load_wip_patches((u8 *)m_wipDir.c_str(), (u8 *) &id);
	if(cheat)
		_loadFile(cheatFile, cheatSize, m_cheatDir.c_str(), fmt("%s.gct", id.c_str()));
	_loadFile(gameconfig, gameconfigSize, m_txtCheatDir.c_str(), "gameconfig.txt");

	int userIOS = m_gcfg2.getInt(id, "ios", 0);
	int gameIOS = dvd ? userIOS : GetRequestedGameIOS(hdr);

	m_gcfg1.save(true);
	m_gcfg2.save(true);
	m_cat.save(true);
	m_cfg.save(true);

	//this is a temp region change of real nand(rn) for gamesave or off or DVD if tempregionrn is set true
	bool patchregion = false;
	if(emulate_mode <= 1 && m_cfg.getBool("GENERAL", "tempregionrn", false))
	{
		gprintf("Temp region change applied\n");
		// change real nand region to game ID[3] region. is reset when you turn wii off.
		patchregion = NandHandle.Do_Region_Change(id, true);
	}
	//load external booter bin file
	if(ExternalBooter_LoadBins(m_binsDir.c_str()) == false)
	{
		error(_t("errgame15", L"Missing ext_loader.bin or ext_booter.bin!"));
		_exitWiiflow();
	}
	if(!dvd)
	{
		if(_loadGameIOS(gameIOS, userIOS, id) == LOAD_IOS_FAILED)
		{
			/* error message already shown */
			_exitWiiflow();
		}
	}

	if(CurrentIOS.Type == IOS_TYPE_D2X)
	{
		if(returnTo != 0 && !m_directLaunch && D2X_PatchReturnTo(returnTo) >= 0)
			memset(&returnTo, 0, sizeof(u32));//set to null to keep external booter from setting it again if using d2x 
		if(emulate_mode)
		{
			/* Enable our Emu NAND */
			DeviceHandle.UnMountAll();
			if(emulate_mode == 2)
				NandHandle.Set_FullMode(true);
			else
				NandHandle.Set_FullMode(false);
			if(NandHandle.Enable_Emu() < 0)
			{
				NandHandle.Disable_Emu();
				error(_t("errgame6", L"Enabling emu after reload failed!"));
				Sys_Exit();
			}
			DeviceHandle.MountAll();
		}
	}
	
	/* no more error msgs - clear btns and snds */
	cleanup();

	bool wbfs_partition = false;
	if(!dvd)
	{
		DeviceHandle.OpenWBFS(currentPartition);
		wbfs_partition = (DeviceHandle.GetFSType(currentPartition) == PART_FS_WBFS);
		if(!wbfs_partition && get_frag_list((u8 *)id.c_str(), (char*)path.c_str(), currentPartition == 0 ? 0x200 : USBStorage2_GetSectorSize()) < 0)
			Sys_Exit();
		WBFS_Close();
	}
	if(cheatFile != NULL)
	{
		ocarina_load_code(cheatFile, cheatSize);
		free(cheatFile);
	}
	if(gameconfig != NULL)
	{
		app_gameconfig_load(id.c_str(), gameconfig, gameconfigSize);
		free(gameconfig);
	}

	ExternalBooter_WiiGameSetup(wbfs_partition, dvd, patchregion, private_server, fix480p, id.c_str());
	WiiFlow_ExternalBooter(videoMode, vipatch, countryPatch, patchVidMode, aspectRatio, returnTo, TYPE_WII_GAME, use_led);

	Sys_Exit();
}

void CMenu::_exitWiiflow()
{
	//Exit WiiFlow, no game booted...
	cleanup();// cleanup and clear memory
	ShutdownBeforeExit();// unmount devices and close inputs
	Sys_Exit();
}