/*****************************************************************************************
 *                                                                                       *
 * OpenSpace                                                                             *
 *                                                                                       *
 * Copyright (c) 2014-2016                                                               *
 *                                                                                       *
 * Permission is hereby granted, free of charge, to any person obtaining a copy of this  *
 * software and associated documentation files (the "Software"), to deal in the Software *
 * without restriction, including without limitation the rights to use, copy, modify,    *
 * merge, publish, distribute, sublicense, and/or sell copies of the Software, and to    *
 * permit persons to whom the Software is furnished to do so, subject to the following   *
 * conditions:                                                                           *
 *                                                                                       *
 * The above copyright notice and this permission notice shall be included in all copies *
 * or substantial portions of the Software.                                              *
 *                                                                                       *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED,   *
 * INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A         *
 * PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT    *
 * HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF  *
 * CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE  *
 * OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.                                         *
 ****************************************************************************************/

#include <modules/datasurface/rendering/renderabledataplane.h>
#include <openspace/engine/openspaceengine.h>
#include <openspace/rendering/renderengine.h>
#include <ghoul/filesystem/filesystem>
#include <ghoul/io/texture/texturereader.h>
#include <ghoul/opengl/programobject.h>
#include <ghoul/opengl/texture.h>
#include <ghoul/opengl/textureunit.h>
#include <modules/kameleon/include/kameleonwrapper.h>
#include <openspace/scene/scene.h>
#include <openspace/scene/scenegraphnode.h>


namespace openspace {

RenderableDataPlane::RenderableDataPlane(const ghoul::Dictionary& dictionary) 
	: Renderable(dictionary)
	,_texturePath("texture", "Texture", "${OPENSPACE_DATA}/test.png")
	,_roatation("rotation", "Roatation", glm::vec3(0), glm::vec3(0), glm::vec3(2*M_PI))
	, _shader(nullptr)
	, _texture(nullptr)
	, _quad(0)
	, _vertexPositionBuffer(0)
{

	addProperty(_texturePath);
	addProperty(_roatation);

	_texturePath.onChange(std::bind(&RenderableDataPlane::loadTexture, this));

}


RenderableDataPlane::~RenderableDataPlane(){
}

bool RenderableDataPlane::initialize() {
	KameleonWrapper kw(absPath("${OPENSPACE_DATA}/OpenGGCM.cdf"));
	_modelScale = kw.getModelScaleScaled();
	_pscOffset  = kw.getModelBarycenterOffsetScaled();

	std::cout << "Scale:  " << _modelScale.x << ", " << _modelScale.y << ", " << _modelScale.z << ", " << _modelScale.w << std::endl;
	std::cout << "Offset: " << _pscOffset.x << ", " << _pscOffset.y << ", " << _pscOffset.z << ", " << _pscOffset.w << std::endl;



	glGenVertexArrays(1, &_quad); // generate array
    glGenBuffers(1, &_vertexPositionBuffer); // generate buffer
    createPlane();

	if (_shader == nullptr) {
        // Plane Program

        RenderEngine& renderEngine = OsEng.renderEngine();
        _shader = renderEngine.buildRenderProgram("PlaneProgram",
            "${MODULE_DATASURFACE}/shaders/dataplane_vs.glsl",
            "${MODULE_DATASURFACE}/shaders/dataplane_fs.glsl"
            );
        if (!_shader)
            return false;
    }

    loadTexture();

	return isReady();
};
bool RenderableDataPlane::deinitialize() {
	glDeleteVertexArrays(1, &_quad);
	_quad = 0;

	glDeleteBuffers(1, &_vertexPositionBuffer);
	_vertexPositionBuffer = 0;

    RenderEngine& renderEngine = OsEng.renderEngine();
    if (_shader) {
        renderEngine.removeRenderProgram(_shader);
        _shader = nullptr;
    }

	return true;
};

bool RenderableDataPlane::isReady() const {
	bool ready = true;
	if (!_shader)
		ready &= false;
	if(!_texture)
		ready &= false;
	return ready;
};

void RenderableDataPlane::render(const RenderData& data)
{

	auto parent = OsEng.renderEngine().scene()->sceneGraphNode("Earth");
	psc _parentPos = parent->worldPosition();
	glm::dvec4 pos = _parentPos.dvec4();
	// std::cout << pos.x << ", " <<   pos.y << ", " <<  pos.z << ", " <<   pos.w << std::endl;
	// std::cout << parent->name() << std::endl;

	float w = (float)_texture->width();
	float h = (float)_texture->height();
	float textureRatio = h/w;

	glm::mat4 transform = glm::mat4(1.0);
	transform = glm::rotate(transform, _roatation.value()[0], glm::vec3(1,0,0));
	transform = glm::rotate(transform, _roatation.value()[1], glm::vec3(0,1,0));
	transform = glm::rotate(transform, _roatation.value()[2], glm::vec3(0,0,1));

	// Activate shader
	_shader->activate();

	auto psc = _parentPos;
	glm::dvec4 dpc = psc.dvec4();
	psc += glm::vec4(_pscOffset); 

	_shader->setUniform("ViewProjection", data.camera.viewProjectionMatrix());
	_shader->setUniform("ModelTransform", transform);
	setPscUniforms(_shader.get(), &data.camera, psc);

	ghoul::opengl::TextureUnit unit;
	unit.activate();
	_texture->bind();
	_shader->setUniform("texture1", unit);

	glBindVertexArray(_quad);
	glDrawArrays(GL_TRIANGLES, 0, 6);

	_shader->deactivate();
};
void RenderableDataPlane::update(const UpdateData& data){
	if (_planeIsDirty)
       createPlane();
};


void RenderableDataPlane::loadTexture() {
	if (_texturePath.value() != "") {
        std::unique_ptr<ghoul::opengl::Texture> texture = ghoul::io::TextureReader::ref().loadTexture(absPath(_texturePath));
		if (texture) {
			std::cout << "texture path: " << absPath(_texturePath) << std::endl;
			// LDEBUG("Loaded texture from '" << absPath(_texturePath) << "'");
			texture->uploadTexture();

			// Textures of planets looks much smoother with AnisotropicMipMap rather than linear
			texture->setFilter(ghoul::opengl::Texture::FilterMode::Linear);

            _texture = std::move(texture);
		}
	}
}

void RenderableDataPlane::createPlane() {
    // ============================
    // 		GEOMETRY (quad)
    // ============================
    const GLfloat x = _modelScale.x;
    const GLfloat y = _modelScale.y;
    const GLfloat w = _modelScale.w;
    const GLfloat vertex_data[] = { // square of two triangles (sigh)
        //	  x      y     z     w     s     t
        -x, -y, 0.0f, w, 0, 1,
        x, y, 0.0f, w, 1, 0,
        -x, y, 0.0f, w, 0, 0,
        -x, -y, 0.0f, w, 0, 1,
        x, -y, 0.0f, w, 1, 1,
        x, y, 0.0f, w, 1, 0,
    };

    glBindVertexArray(_quad); // bind array
    glBindBuffer(GL_ARRAY_BUFFER, _vertexPositionBuffer); // bind buffer
    glBufferData(GL_ARRAY_BUFFER, sizeof(vertex_data), vertex_data, GL_STATIC_DRAW);
    glEnableVertexAttribArray(0);
    glVertexAttribPointer(0, 4, GL_FLOAT, GL_FALSE, sizeof(GLfloat) * 6, reinterpret_cast<void*>(0));
    glEnableVertexAttribArray(1);
    glVertexAttribPointer(1, 2, GL_FLOAT, GL_FALSE, sizeof(GLfloat) * 6, reinterpret_cast<void*>(sizeof(GLfloat) * 4));
    _planeIsDirty = false;
}
}// namespace openspace