/*
 * UltraStar Deluxe - Karaoke Game
 *
 * UltraStar Deluxe is the legal property of its developers, whose names
 * are too numerous to list here. Please refer to the COPYRIGHT
 * file distributed with this source distribution.
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * as published by the Free Software Foundation; either version 2
 * of the License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; see the file COPYING. If not, write to
 * the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
 * Boston, MA 02110-1301, USA.
 *
 */

#include <cstddef>

#include <GL/gl.h>

#include "drawable_control.hpp"
#include "container.hpp"
#include "clipping_helper.hpp"
#include "static_rectangle.hpp"
#include "application.hpp"
#include "modelview_matrix_cache.hpp"

namespace usdx
{
	log4cpp::Category& DrawableControl::log =
		log4cpp::Category::getInstance("usdx.menu.drawable_control");

	DrawableControl::DrawableControl(Container* parent)
		: Control(parent), position(0, 0), size(0, 0),
		  clipping_required(false), focusable(true), background(NULL),
		  debug_box(NULL), parent(parent)
	{
		ContainerHelper(this).add(parent);
	}

	DrawableControl::DrawableControl(Container* parent,
									 const ContainerHelper& helper)
		: Control(parent), position(0, 0), size(0, 0),
		  clipping_required(false), focusable(true), background(NULL),
		  debug_box(NULL), parent(parent)
	{
		helper.add(parent);
	}

	DrawableControl::~DrawableControl()
	{
		remove_parent();

		if (background) {
			delete background;
			background = NULL;
		}

		if (debug_box) {
			delete debug_box;
			debug_box = NULL;
		}
	}

	bool DrawableControl::is_clipping_required(void) const
	{
		boost::shared_lock<boost::shared_mutex> lock(clipping_required_mutex);
		return clipping_required;
	}

	void DrawableControl::set_clipping_required(const bool value)
	{
		boost::unique_lock<boost::shared_mutex> lock(clipping_required_mutex);
		clipping_required = value;
	}

	bool DrawableControl::is_focusable(void) const
	{
		return focusable;
	}

	void DrawableControl::set_focusable(const bool value)
	{
		focusable = value;
	}

	void DrawableControl::draw(void)
	{
		boost::shared_lock<boost::shared_mutex> lock(background_mutex);
		if (background) {
			background->repaint();
		}
	}

	void DrawableControl::repaint(void)
	{
		{
			boost::shared_lock<boost::shared_mutex> lock(position_mutex);
			glTranslatef(position.get_x(), position.get_y(), 0.0f);
		}

		{
			ModelviewMatrixCache c;

			boost::shared_lock<boost::shared_mutex> clipping_lock(clipping_required_mutex);
			if (clipping_required) {
				clipping_lock.unlock();

				boost::shared_lock<boost::shared_mutex> size_lock(size_mutex);
				boost::shared_lock<boost::shared_mutex> position_lock(position_mutex);
				ClippingHelper clipping(parent, Rectangle<int>(position, size));
				Drawable::repaint();
			}
			else {
				clipping_lock.unlock();
				Drawable::repaint();
			}
		}

		if (Application::get_config()->get_debug_boxes())
		{
			if (debug_box == NULL) {
				boost::shared_lock<boost::shared_mutex> lock(size_mutex);

				debug_box = new StaticRectangle(RgbColor(255, 0, 0), size);
				debug_box->set_stroke_width(2.0f);
			}

			debug_box->repaint();
		}
	}

	void DrawableControl::set_position(const Point<int>& position)
	{
		boost::unique_lock<boost::shared_mutex> lock(position_mutex);
		this->position = position;
	}

	void DrawableControl::set_position(int left, int top)
	{
		boost::unique_lock<boost::shared_mutex> lock(position_mutex);
		this->position = Point<int>(left, top);
	}


	const Point<int>& DrawableControl::get_position(void) const
	{
		boost::shared_lock<boost::shared_mutex> lock(position_mutex);
		return position;
	}

	int DrawableControl::get_left(void) const
	{
		boost::shared_lock<boost::shared_mutex> lock(position_mutex);
		return position.get_x();
	}

	int DrawableControl::get_top(void) const
	{
		boost::shared_lock<boost::shared_mutex> lock(position_mutex);
		return position.get_y();
	}


	void DrawableControl::set_size(const Dimension<int> &size)
	{
		boost::unique_lock<boost::shared_mutex> lock(size_mutex);
		this->size = size;
	}

	void DrawableControl::set_size(int width, int height)
	{
		boost::unique_lock<boost::shared_mutex> lock(size_mutex);
		this->size = Dimension<int>(width, height);
	}


	const Dimension<int>& DrawableControl::get_size(void) const
	{
		boost::shared_lock<boost::shared_mutex> lock(size_mutex);
		return size;
	}

	int DrawableControl::get_width(void) const
	{
		boost::shared_lock<boost::shared_mutex> lock(size_mutex);
		return size.get_width();
	}

	int DrawableControl::get_height(void) const
	{
		boost::shared_lock<boost::shared_mutex> lock(size_mutex);
		return size.get_height();
	}

	Container* DrawableControl::get_parent(void) const
	{
		return parent;
	}

	void DrawableControl::remove_parent(void)
	{
		if (parent) {
			parent->remove(this);
			parent = NULL;
		}
	}

	DrawableControl::ContainerHelper::ContainerHelper(DrawableControl* self) :
		self(self)
	{
	}

	void DrawableControl::ContainerHelper::add(Container* c) const
	{
		if (c) {
			c->add(self);
		}
	}

	void DrawableControl::set_background(Background* background)
	{
		boost::unique_lock<boost::shared_mutex> lock(background_mutex);
		if (this->background) {
			delete this->background;
		}

		this->background = background;
	}

	const Background* DrawableControl::get_background(void) const
	{
		boost::shared_lock<boost::shared_mutex> lock(background_mutex);
		return background;
	}

	const Rectangle<int> DrawableControl::get_absolut_rect(void) const
	{
		Rectangle<int> rect(get_position(), get_size());

		if (parent) {
			Rectangle<int> parent_rect = parent->get_absolut_rect();
			rect += Point<int>(parent_rect.get_left(),
							   parent_rect.get_top());
			rect = parent_rect.intersect(rect);
		}

		return rect;
	}

	DrawableControl* DrawableControl::get_component_at(const Point<int>& p)
	{
		if (focusable && get_absolut_rect().is_in(p)) {
				return this;
		}

		return NULL;
	}

	void DrawableControl::mouse_move(const Point<int>& p)
	{
		on_mouse_move(p);
	}

	void DrawableControl::mouse_down(uint8_t button, const Point<int>& p)
	{
		on_mouse_down(button, p);
	}

	void DrawableControl::mouse_up(uint8_t button, const Point<int>& p)
	{
		on_mouse_up(button, p);
	}

	void DrawableControl::mouse_enter(void)
	{
		on_mouse_enter();
	}

	void DrawableControl::mouse_leave(void)
	{
		on_mouse_leave();
	}

	void DrawableControl::mouse_click(uint8_t button, const Point<int>& p)
	{
		on_mouse_click(button, p);
	}

	void DrawableControl::mouse_dbl_click(uint8_t button, const Point<int>& p)
	{
		on_mouse_dbl_click(button, p);
	}
};