#include "precompiled.h"

#include "GameLoop.h"

#include "MessagePasserImpl.h"
#include "Messages.h"
#include "Brushes.h"
#include "Handlers/MessageHandler.h"

#include "InputProcessor.h"

#include "lib/sdl.h"
#include "lib/ogl.h"
#include "lib/timer.h"
#include "lib/res/file/vfs.h"
#include "ps/CLogger.h"

#include "ps/GameSetup/GameSetup.h"	// Render()

using namespace AtlasMessage;


void AtlasRender()
{
	Render();
	g_CurrentBrush.Render();
}


// Loaded from DLL:
void (*Atlas_StartWindow)(wchar_t* type);
void (*Atlas_SetMessagePasser)(MessagePasser<mCommand>*, MessagePasser<mInput>*);
void (*Atlas_GLSetCurrent)(void* context);
void (*Atlas_GLSwapBuffers)(void* context);
void (*Atlas_NotifyEndOfFrame)();


static MessagePasserImpl<mCommand> msgPasser_Command;
static MessagePasserImpl<mInput>   msgPasser_Input;

MessagePasser<mCommand>* AtlasMessage::g_MessagePasser_Command = &msgPasser_Command;
MessagePasser<mInput>*   AtlasMessage::g_MessagePasser_Input = &msgPasser_Input;


static InputProcessor g_Input;

static GameLoopState state;
GameLoopState* g_GameLoop = &state;


static void* LaunchWindow(void*)
{
	debug_set_thread_name("atlas_window");
	Atlas_StartWindow(L"ScenarioEditor");
	return NULL;
}


bool BeginAtlas(int argc, char* argv[], void* dll) 
{
	// Load required symbols from the DLL
#define GET(x) *(void**)&x = dlsym(dll, #x); debug_assert(x); if (! x) return false;
	GET(Atlas_StartWindow);
	GET(Atlas_SetMessagePasser);
	GET(Atlas_GLSetCurrent);
	GET(Atlas_GLSwapBuffers);
	GET(Atlas_NotifyEndOfFrame);
#undef GET

	// Pass our message handler to Atlas
	Atlas_SetMessagePasser(&msgPasser_Command, &msgPasser_Input);

	// Create a new thread, and launch the Atlas window inside that thread
	pthread_t gameThread;
	pthread_create(&gameThread, NULL, LaunchWindow, NULL);

	state.argc = argc;
	state.argv = argv;
	state.running = true;
	state.rendering = false;
	state.glContext = NULL;

	double last_activity = get_time();

	while (state.running)
	{
		bool recent_activity = false;

		//////////////////////////////////////////////////////////////////////////
		// (TODO: Work out why these things have to be in this order (to avoid
		// jumps when starting to move, etc)

		// Calculate frame length
		{
			const double time = get_time();
			static double last_time = time;
			const float length = (float)(time-last_time);
			last_time = time;
			debug_assert(length >= 0.0f);
			// TODO: filter out big jumps, e.g. when having done a lot of slow
			// processing in the last frame
			state.frameLength = length;
		}

		// Process the input that was received in the past
		if (g_Input.ProcessInput(&state))
			recent_activity = true;

		//////////////////////////////////////////////////////////////////////////
		
		{
			mCommand* msg;
			while ((msg = msgPasser_Command.Retrieve()) != NULL)
			{
				recent_activity = true;

				std::string name (msg->GetType());

				if (name == "CommandString")
				{
					// Allow some laziness: For commands that don't need any data other
					// than their name, we just use CommandString (and then need to
					// construct a reference to the appropriate handler for the
					// given string)
					name += "_";
					name += static_cast<mCommandString*>(msg)->name;
						// use 'static_cast' when casting messages, to make it clear
						// that it's slightly dangerous - we have to just assume that
						// GetType is correct, since we can't use proper RTTI
				}
				msgHandlers::const_iterator it = GetMsgHandlers().find(name);
				if (it != GetMsgHandlers().end())
				{
					it->second(msg);
				}
				else
				{
					debug_warn("Unrecognised message");
					// TODO: CLogger might not be initialised
					LOG(ERROR, "atlas", "Unrecognised message (%s)", name.c_str());
				}

				delete msg;
			}
		}

		// Exit, if desired
		if (! state.running)
			break;

		// Now do the same (roughly), for input events:
		{
			mInput* msg;
			while ((msg = msgPasser_Input.Retrieve()) != NULL)
			{
				recent_activity = true;

				std::string name (msg->GetType());
				msgHandlers::const_iterator it = GetMsgHandlers().find(name);
				if (it != GetMsgHandlers().end())
				{
					it->second(msg);
				}
				else
				{
					debug_warn("Unrecognised message");
					// TODO: CLogger might not be initialised
					LOG(ERROR, "atlas", "Unrecognised message (%s)", name.c_str());
				}

				delete msg;
			}
		}

		//////////////////////////////////////////////////////////////////////////

		vfs_reload_changed_files();

		if (state.rendering)
		{
			AtlasRender();
			Atlas_GLSwapBuffers((void*)state.glContext);
		}

		double time = get_time();
		if (recent_activity)
			last_activity = time;

		// Be nice to the processor (by sleeping lots) if we're not doing anything
		// useful, and nice to the user (by just yielding to other threads) if we are
		
		if (time - last_activity > 0.5) // if there was no recent activity...
		{
			double sleepUntil = time + 0.5; // only redraw at 2fps
			while (time < sleepUntil)
			{
				// To minimise latency when the user starts doing stuff, only
				// sleep for a short while, then check if anything's happened,
				// then go back to sleep
				// (TODO: This should probably be done with something like semaphores)
				Atlas_NotifyEndOfFrame(); // (TODO: rename to NotifyEndOfQuiteShortProcessingPeriodSoPleaseSendMeNewMessages or something)
				SDL_Delay(50);
				if (!msgPasser_Input.IsEmpty() || !msgPasser_Command.IsEmpty())
					break;
				time = get_time();
			}
		}
		else
		{
			Atlas_NotifyEndOfFrame();
			SDL_Delay(0);
		}
	}

	// TODO: delete all remaining messages, to avoid memory leak warnings

	pthread_join(gameThread, NULL);

	exit(0);
}