// Copyright (C) 2015 Jérôme Leclercq
// This file is part of the "Nazara Engine - Renderer module"
// For conditions of distribution and use, see copyright notice in Config.hpp

#include <Nazara/Renderer/RenderWindow.hpp>
#include <Nazara/Core/Error.hpp>
#include <Nazara/Core/ErrorFlags.hpp>
#include <Nazara/Core/Thread.hpp>
#include <Nazara/Renderer/Context.hpp>
#include <Nazara/Renderer/OpenGL.hpp>
#include <Nazara/Renderer/Renderer.hpp>
#include <Nazara/Renderer/Texture.hpp>
#include <stdexcept>
#include <Nazara/Renderer/Debug.hpp>

NzRenderWindow::NzRenderWindow(NzVideoMode mode, const NzString& title, nzUInt32 style, const NzContextParameters& parameters)
{
	NzErrorFlags flags(nzErrorFlag_ThrowException, true);
	Create(mode, title, style, parameters);
}

NzRenderWindow::NzRenderWindow(NzWindowHandle handle, const NzContextParameters& parameters)
{
	NzErrorFlags flags(nzErrorFlag_ThrowException, true);
	Create(handle, parameters);
}

NzRenderWindow::~NzRenderWindow()
{
	// Nécessaire si NzWindow::Destroy est appelé par son destructeur
	OnWindowDestroy();
}

bool NzRenderWindow::CopyToImage(NzAbstractImage* image, const NzVector3ui& dstPos) const
{
	#if NAZARA_RENDERER_SAFE
	if (!m_context)
	{
		NazaraError("Window has not been created");
		return false;
	}
	#endif

	return CopyToImage(image, NzRectui(NzVector2ui(0U), GetSize()));
}

bool NzRenderWindow::CopyToImage(NzAbstractImage* image, const NzRectui& rect, const NzVector3ui& dstPos) const
{
	#if NAZARA_RENDERER_SAFE
	if (!m_context)
	{
		NazaraError("Window has not been created");
		return false;
	}
	#endif

	NzVector2ui windowSize = GetSize();

	#if NAZARA_RENDERER_SAFE
	if (!image)
	{
		NazaraError("Image must be valid");
		return false;
	}

	if (image->GetFormat() != nzPixelFormat_RGBA8)
	{
		// Pour plus de facilité, évidemment on peut faire sauter cette règle avec un peu de gestion
		NazaraError("Image must be RGBA8-formatted");
		return false;
	}

	if (rect.x + rect.width > windowSize.x || rect.y + rect.height > windowSize.y)
	{
		NazaraError("Rectangle dimensions are out of window's bounds");
		return false;
	}

	NzVector3ui imageSize = image->GetSize();
	if (dstPos.x + rect.width > imageSize.x || dstPos.y + rect.height > imageSize.y || dstPos.z > imageSize.z)
	{
		NazaraError("Cube dimensions are out of image's bounds");
		return false;
	}
	#endif

	const NzContext* currentContext = NzContext::GetCurrent();
	if (m_context != currentContext)
	{
		if (!m_context->SetActive(true))
		{
			NazaraError("Failed to activate context");
			return false;
		}
	}

	///TODO: Fast-path pour les images en cas de copie du buffer entier

	m_buffer.resize(rect.width*rect.height*4);
	glReadPixels(rect.x, windowSize.y - rect.height - rect.y, rect.width, rect.height, GL_RGBA, GL_UNSIGNED_BYTE, m_buffer.data());

	// Les pixels sont retournés, nous devons envoyer les pixels par rangée
	for (unsigned int i = 0; i < rect.height; ++i)
		image->Update(&m_buffer[rect.width*4*i], NzBoxui(dstPos.x, rect.height - i - 1, dstPos.z, rect.width, 1, 1), rect.width);

	if (m_context != currentContext)
	{
		if (currentContext)
		{
			if (!currentContext->SetActive(true))
				NazaraWarning("Failed to reset old context");
		}
		else
			m_context->SetActive(false);
	}

	return true;
}


bool NzRenderWindow::Create(NzVideoMode mode, const NzString& title, nzUInt32 style, const NzContextParameters& parameters)
{
	m_parameters = parameters;
	return NzWindow::Create(mode, title, style);
}

bool NzRenderWindow::Create(NzWindowHandle handle, const NzContextParameters& parameters)
{
	m_parameters = parameters;
	return NzWindow::Create(handle);
}

void NzRenderWindow::Display()
{
	if (m_framerateLimit > 0)
	{
		int remainingTime = 1000/static_cast<int>(m_framerateLimit) - static_cast<int>(m_clock.GetMilliseconds());
		if (remainingTime > 0)
			NzThread::Sleep(remainingTime);

		m_clock.Restart();
	}

	if (m_context && m_parameters.doubleBuffered)
		m_context->SwapBuffers();
}

void NzRenderWindow::EnableVerticalSync(bool enabled)
{
	if (m_context)
	{
		#if defined(NAZARA_PLATFORM_WINDOWS)
		if (!m_context->SetActive(true))
		{
			NazaraError("Failed to activate context");
			return;
		}

		if (wglSwapInterval)
			wglSwapInterval(enabled ? 1 : 0);
		else
		#elif defined(NAZARA_PLATFORM_LINUX)
		if (!m_context->SetActive(true))
		{
			NazaraError("Failed to activate context");
			return;
		}

		if (glXSwapInterval)
			glXSwapInterval(enabled ? 1 : 0);
		else
		#else
			#error Vertical Sync is not supported on this platform
		#endif
			NazaraError("Vertical Sync is not supported on this platform");
	}
	else
		NazaraError("No context");
}

unsigned int NzRenderWindow::GetHeight() const
{
	return NzWindow::GetHeight();
}

NzRenderTargetParameters NzRenderWindow::GetParameters() const
{
	if (m_context)
	{
		const NzContextParameters& parameters = m_context->GetParameters();
		return NzRenderTargetParameters(parameters.antialiasingLevel, parameters.depthBits, parameters.stencilBits);
	}
	else
	{
		NazaraError("Window not created/context not initialized");
		return NzRenderTargetParameters();
	}
}

unsigned int NzRenderWindow::GetWidth() const
{
	return NzWindow::GetWidth();
}

bool NzRenderWindow::IsRenderable() const
{
	return m_impl != nullptr; // Si m_impl est valide, alors m_context l'est aussi
}

bool NzRenderWindow::IsValid() const
{
	return m_impl != nullptr;
}

void NzRenderWindow::SetFramerateLimit(unsigned int limit)
{
	m_framerateLimit = limit;
}

NzContextParameters NzRenderWindow::GetContextParameters() const
{
	if (m_context)
		return m_context->GetParameters();
	else
	{
		NazaraError("Window not created/context not initialized");
		return NzContextParameters();
	}
}

bool NzRenderWindow::HasContext() const
{
	return true;
}

bool NzRenderWindow::Activate() const
{
	if (m_context->SetActive(true))
	{
		glDrawBuffer((m_parameters.doubleBuffered) ? GL_BACK : GL_FRONT);
		return true;
	}
	else
	{
		NazaraError("Failed to activate window's context");
		return false;
	}
}

void NzRenderWindow::EnsureTargetUpdated() const
{
	// Rien à faire
}

bool NzRenderWindow::OnWindowCreated()
{
	m_parameters.doubleBuffered = true;
	m_parameters.window = GetHandle();

	std::unique_ptr<NzContext> context(new NzContext);
	if (!context->Create(m_parameters))
	{
		NazaraError("Failed to create context");
		return false;
	}

	m_context = context.release();

	if (!SetActive(true)) // Les fenêtres s'activent à la création
		NazaraWarning("Failed to activate window");

	EnableVerticalSync(false);

	NzVector2ui size = GetSize();

	// Le scissorBox/viewport (à la création) est de la taille de la fenêtre
	// https://www.opengl.org/sdk/docs/man/xhtml/glGet.xml
	NzOpenGL::SetScissorBox(NzRecti(0, 0, size.x, size.y));
	NzOpenGL::SetViewport(NzRecti(0, 0, size.x, size.y));

	NotifyParametersChange();
	NotifySizeChange();

	m_clock.Restart();

	return true;
}

void NzRenderWindow::OnWindowDestroy()
{
	if (m_context)
	{
		if (IsActive())
			NzRenderer::SetTarget(nullptr);

		delete m_context;
		m_context = nullptr;
	}
}

void NzRenderWindow::OnWindowResized()
{
	NotifySizeChange();
}