/****************************************************************************
 * FCE Ultra 0.98.12
 * Nintendo Wii/Gamecube Port
 *
 * Tantric 2008-2009
 *
 * fceload.c
 *
 * NES Memory Load Game
 *
 * This performs the functions of LoadGame and iNESLoad from a single module
 * Helper function for GameCube injected ROMS
 ****************************************************************************/

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <malloc.h>

extern "C" {
#include "types.h"
#include "git.h"
#include "driver.h"
#include "palette.h"
#include "fceu.h"
#include "sound.h"
#include "file.h"

extern int FDSLoad(const char *name, FCEUFILE *fp);
extern int iNESLoad(const char *name, FCEUFILE *fp);
extern int UNIFLoad(const char *name, FCEUFILE *fp);
extern int NSFLoad(FCEUFILE *fp);
extern uint8 FDSBIOS[8192];
}

#include "fceugx.h"
#include "gcaudio.h"
#include "common.h"
#include "pad.h"
#include "menu.h"
#include "fileop.h"
#include "filebrowser.h"

bool romLoaded = false;

extern FCEUGI *FCEUGameInfo;

#define SAMPLERATE 48000

FCEUFILE *fceufp = NULL;
MEMWRAP *fceumem = NULL;
unsigned char * fceuFileData = NULL;

static void MakeFCEUFile(char * membuffer, int length)
{
	if(fceufp != NULL)
	{
		free(fceuFileData);
		free(fceumem);
		free(fceufp);
		fceuFileData = NULL;
		fceumem = NULL;
		fceufp = NULL;
	}

	fceufp =(FCEUFILE *)memalign(32,sizeof(FCEUFILE));
	fceufp->type=3;
	fceumem = (MEMWRAP *)memalign(32,sizeof(MEMWRAP));
	fceumem->location=0;
	fceumem->size=length;
	fceuFileData = (unsigned char *)memalign(32,length);
	memcpy(fceuFileData, membuffer, length);
	fceumem->data=fceuFileData;
	fceufp->fp = fceumem;
}

int GCMemROM(int method, int size)
{
	ResetGameLoaded();

	/*** Allocate and clear GameInfo ***/

	FCEUGameInfo = (FCEUGI *) memalign(32, sizeof(FCEUGI));
	memset(FCEUGameInfo, 0, sizeof(FCEUGI));

	/*** Set some default values ***/
	FCEUGameInfo->soundchan = 1;
	FCEUGameInfo->soundrate = SAMPLERATE;
	FCEUGameInfo->name = 0;
	FCEUGameInfo->type = GIT_CART;
	FCEUGameInfo->vidsys = GIV_USER;
	FCEUGameInfo->input[0] = FCEUGameInfo->input[1] = -1;
	FCEUGameInfo->inputfc = -1;
	FCEUGameInfo->cspecial = 0;

	/*** Set internal sound information ***/
	FCEUI_Sound(SAMPLERATE);
	FCEUI_SetSoundVolume(100); // 0-100
	FCEUI_SetLowPass(0);

	MakeFCEUFile((char *) nesrom, size);

	nesGameType = 0;

	if (iNESLoad(NULL, fceufp))
		nesGameType = 1;
	else if (UNIFLoad(NULL, fceufp))
		nesGameType = 2;
	else if (NSFLoad(fceufp))
		nesGameType = 3;
	else
	{
		// read FDS BIOS into FDSBIOS - should be 8192 bytes
		if (FDSBIOS[1] == 0)
		{
			int biosSize = 0;
			char * tmpbuffer = (char *) memalign(32, 64 * 1024);

			char filepath[1024];

			if (MakeFilePath(filepath, FILE_FDSBIOS, method))
			{
				biosSize = LoadFile(tmpbuffer, filepath, 0, method, SILENT);
			}

			if (biosSize == 8192)
			{
				memcpy(FDSBIOS, tmpbuffer, 8192);
			}
			else
			{
				if (biosSize > 0)
					ErrorPrompt("FDS BIOS file is invalid!");

				return 0; // BIOS not loaded, do not load game
			}
			free(tmpbuffer);
		}
		// load game
		if (FDSLoad(NULL, fceufp))
			nesGameType = 4;
	}

	if (nesGameType > 0)
	{
		FCEU_ResetVidSys();
		PowerNES();
		FCEU_ResetPalette();
		FCEU_ResetMessages(); // Save state, status messages, etc.
		SetSoundVariables();
		ResetAudio();
		romLoaded = true;
		return 1;
	}
	else
	{
		ErrorPrompt("Invalid game file!");
		romLoaded = false;
		return 0;
	}
}