/***************************************************************************
 *   Copyright (C) 2005 by Jeff Ferr                                       *
 *   root@sat                                                              *
 *                                                                         *
 *   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; if not, write to the                         *
 *   Free Software Foundation, Inc.,                                       *
 *   59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.             *
 ***************************************************************************/
#include "Stdafx.h"
#include "jframe.h"
#include "jwindowmanager.h"

#define SIZE_TO_RESIZE	8

namespace jgui {

Frame::Frame(std::string title, int x, int y, int width, int height, int scale_width, int scale_height):
	Window(x, y, width, height, scale_width, scale_height)
{
	jcommon::Object::SetClassName("jgui::Frame");

	_icon = _DATA_PREFIX"/images/small-gnu.png";

	_relative_mouse_x = 0;
	_relative_mouse_y = 0;
	_relative_mouse_w = 0;
	_relative_mouse_h = 0;
	
	_internal_state = 0;
	_release_enabled = true;
	_is_maximized = false;
	_title = title;
	_is_visible = false;
	_is_undecorated = false;
	_last_key_code = JKS_UNKNOWN;
	_input_enabled = true;
	_background_visible = true;
	_move_enabled = true;
	_resize_enabled = false;
	_frame_buttons = (jframe_button_t)(JFB_CLOSE);
	
	_old_x = _location.x;
	_old_y = _location.y;
	_old_width = _size.width;
	_old_height = _size.height;
}

Frame::~Frame() 
{
	InputManager::GetInstance()->RemoveKeyListener(this);
	InputManager::GetInstance()->RemoveMouseListener(this);

	while (_paint_mutex.TryLock() == false) {
		jthread::Thread::MSleep(100);
	}

	while (_input_mutex.TryLock() == false) {
		jthread::Thread::MSleep(100);
	}
}

std::string Frame::GetIcon()
{
	return _icon;
}

void Frame::SetIcon(std::string icon)
{
	_icon = icon;

	Repaint();
}

jframe_button_t Frame::GetFrameButtons()
{
	return _frame_buttons;
}

void Frame::SetFrameButtons(jframe_button_t buttons)
{
	_frame_buttons = buttons;
}

void Frame::SetMoveEnabled(bool b)
{
	_move_enabled = b;
}

void Frame::SetResizeEnabled(bool b)
{
	_resize_enabled = b;
}

bool Frame::IsMoveEnabled()
{
	return _move_enabled;
}

bool Frame::IsResizeEnabled()
{
	return _resize_enabled;
}

void Frame::SetDefaultExitEnabled(bool b)
{
	_release_enabled = b;
}

void Frame::SetTitle(std::string title)
{
	_title = title;

	Repaint();
}

std::string Frame::GetTitle()
{
	return _title;
}

void Frame::SetInputEnabled(bool b)
{
	_input_enabled = b;

	if (_input_enabled == true) {
		InputManager::GetInstance()->RegisterKeyListener(this);
		InputManager::GetInstance()->RegisterMouseListener(this);
	} else {
		InputManager::GetInstance()->RemoveKeyListener(this);
		InputManager::GetInstance()->RemoveKeyListener(this);
	}
}

void Frame::Pack(bool fit)
{
	jthread::AutoLock lock(&_container_mutex);

	Component *c;
	int min_x = _insets.left,
			min_y = _insets.top;
	int max_width = 0,
			max_height = 0;

	if (fit == true) {
		for (std::vector<jgui::Component *>::iterator i=_components.begin(); i!=_components.end(); i++) {
			c = (*i);

			if (c->GetX() < min_x) {
				min_x = c->GetX();
			}

			if (c->GetY() < min_y) {
				min_y = c->GetY();
			}
		}

		min_x = _insets.left-min_x;
		min_y = _insets.top-min_y;

		for (std::vector<jgui::Component *>::iterator i=_components.begin(); i!=_components.end(); i++) {
			c = (*i);

			c->SetLocation(c->GetX()+min_x, c->GetY()+min_y);
		}
	}

	for (std::vector<jgui::Component *>::iterator i=_components.begin(); i!=_components.end(); i++) {
		c = (*i);

		if (max_width < (c->GetX()+c->GetWidth())) {
			max_width = (c->GetX()+c->GetWidth());
		}

		if (max_height < (c->GetY()+c->GetHeight())) {
			max_height = (c->GetY()+c->GetHeight());
		}
	}

	if (_subtitles.size() == 0) {
		SetSize(max_width+_insets.right, max_height+_insets.bottom);
	} else {
		SetSize(max_width+_insets.right, max_height+_insets.bottom+40);
	}
}

bool Frame::Show(bool modal)
{
	jthread::AutoLock lock(&_input_mutex);

	_is_visible = true;

	DoLayout();

	Window::Show();

	if (_input_enabled == true) {
		InputManager::GetInstance()->RegisterKeyListener(this);
		InputManager::GetInstance()->RegisterMouseListener(this);
	}

	if (modal == true) {
		_frame_sem.Wait(&_input_mutex);
	}

	return true;
}

bool Frame::Hide()
{
	Window::Hide();

	{
		jthread::AutoLock lock(&_input_mutex);

		InputManager::GetInstance()->RemoveKeyListener(this);
		InputManager::GetInstance()->RemoveMouseListener(this);
	}

	return true;
}

jkeyevent_symbol_t Frame::GetLastKeyCode()
{
	return _last_key_code;
}

void Frame::SetLastKeyCode(jkeyevent_symbol_t key)
{
	_last_key_code = key;
}

jinsets_t Frame::GetInsets()
{
	if (_subtitles.size() == 0) {
		return _insets;
	}

	jinsets_t t = _insets;

	t.bottom += _font->GetHeight()+10;

	return t;
}

void Frame::AddSubtitle(std::string image, std::string label)
{
	struct Frame::frame_subtitle_t t;

	t.image = image;
	t.subtitle = label;

	_subtitles.push_back(t);

	Repaint();
}

void Frame::RemoveAllSubtitles()
{
	_subtitles.clear();

	Repaint();
}

void Frame::Maximize()
{
	_is_maximized = true;

	_old_x = _location.x;
	_old_y = _location.y;
	_old_width = _size.width;
	_old_height = _size.height;

	SetBounds(0, 0, _scale.width, _scale.height);
}

void Frame::Restore()
{
	_is_maximized = false;

	SetBounds(_old_x, _old_y, _old_width, _old_height);
}

void Frame::KeyPressed(KeyEvent *event)
{
	// JDEBUG(JINFO, "antes\n");
	
	if (_is_enabled == false) {
		return;
	}

	if (event->GetType() == JKT_PRESSED) {
		jthread::AutoLock lock(&_input_mutex);

		if (_is_visible == false) {
			return;
		}

		_last_key_code = event->GetSymbol();

		if ((event->GetSymbol() == JKS_ESCAPE || event->GetSymbol() == JKS_EXIT) && _release_enabled == true) {
			_last_key_code = JKS_EXIT;

			Release();

			return;
		}

		Component *current = _focus;

		if (current != NULL) {
			current->ProcessEvent(event);
		}
	}

	jthread::AutoLock lock(&_input_mutex);
	
	ProcessEvent(event);
}

void Frame::MousePressed(MouseEvent *event)
{
	if (_is_enabled == false) {
		return;
	}
	
	if (_internal_state != 0) {
		GFXHandler::GetInstance()->SetCursor(GetCursor());

		_internal_state = 0;
	}

	int mousex = event->GetX()-_location.x,
			mousey = event->GetY()-_location.y;

	if (event->GetButton() == JMB_BUTTON1) {
		int lwidth = _size.width - SIZE_TO_RESIZE, // pixels to horizontal scroll
				lheight = _size.height - SIZE_TO_RESIZE; // pixels to vertical scroll
		int btn = (_insets.top-30)+10,
				gap = ((_frame_buttons & JFB_MAXIMIZE) != 0)? 2 : ((_frame_buttons & JFB_CLOSE) != 0)? 1 : 0;

		if (mousey > 0) {
			if (mousey < _insets.top && _is_undecorated == false) {
				if (mousex < (lwidth-gap*btn)) {
					if (_move_enabled == true && _is_maximized == false) {
						GFXHandler::GetInstance()->SetCursor(JCS_MOVE);

						_internal_state = 1; // move
						_relative_mouse_x = mousex;
						_relative_mouse_y = mousey;

						return;
					}
				} else if (mousex < (lwidth-1*btn)) {
					if (_resize_enabled == true && gap == 2) {
						if (_is_maximized == true) {
							Restore();
						} else {
							Maximize();
						}

						return;
					}
				} else if (mousex < (lwidth-0*btn)) {
					if ((_frame_buttons & JFB_CLOSE) != 0 && _release_enabled == true) {
						Release();
					}

					return;
				}
			} else {
				if (_resize_enabled == true && _is_maximized == false) {
					if (mousex > _size.width && mousey > _size.height) {
						return;
					}

					_relative_mouse_x = mousex;
					_relative_mouse_y = mousey;
					_relative_mouse_w = _size.width;
					_relative_mouse_h = _size.height;

					if (mousex > lwidth && mousey > lheight) {
						_internal_state = 2; // both resize

						GFXHandler::GetInstance()->SetCursor(JCS_SE_CORNER);

						return;
					} else if (mousex > lwidth) {
						// horizontal resize
						_internal_state = 3;

						GFXHandler::GetInstance()->SetCursor(JCS_WE);

						return;
					} else if (mousey > lheight) {
						// vertical resize
						_internal_state = 4;

						GFXHandler::GetInstance()->SetCursor(JCS_NS);

						return;
					}
				}
			}
		}
	}

	event->SetX(mousex);
	event->SetY(mousey);

	ProcessEvent(event);
}

void Frame::MouseReleased(MouseEvent *event)
{
	if (_is_enabled == false) {
		return;
	}

	if (_internal_state > 0) {
		if (event->GetButton() == JMB_BUTTON1) {
			GFXHandler::GetInstance()->SetCursor(GetCursor());

			_internal_state = 0;
			_relative_mouse_x = 0;
			_relative_mouse_y = 0;

			return;
		}
	}
	
	event->SetX(event->GetX()-_location.x);
	event->SetY(event->GetY()-_location.y);

	ProcessEvent(event);
}

void Frame::MouseMoved(MouseEvent *event)
{
	if (_is_enabled == false) {
		return;
	}
	
	int mousex = event->GetX()-_location.x,
			mousey = event->GetY()-_location.y;

	if (_internal_state == 0 && _resize_enabled == true) {
		int lwidth = _size.width - SIZE_TO_RESIZE,
				lheight = _size.height - SIZE_TO_RESIZE; 

		if (mousex > lwidth && mousey > lheight) {
			GFXHandler::GetInstance()->SetCursor(JCS_SE_CORNER);
		} else if (mousex > lwidth && mousex < _size.width) {
			GFXHandler::GetInstance()->SetCursor(JCS_WE);
		} else if (mousey > lheight && mousey < _size.height) {
			GFXHandler::GetInstance()->SetCursor(JCS_NS);
		} else {
			GFXHandler::GetInstance()->SetCursor(GetCursor());
		}
	} else if (_internal_state == 1 && _move_enabled == true) {
		Move(mousex-_relative_mouse_x, mousey-_relative_mouse_y);
	} else if (_internal_state == 2 && _resize_enabled == true) {
		SetSize(_relative_mouse_w+mousex-_relative_mouse_x, _relative_mouse_h+mousey-_relative_mouse_y);
	} else if (_internal_state == 3 && _resize_enabled == true) {
		SetSize(_relative_mouse_w+mousex-_relative_mouse_x, _relative_mouse_h);
	} else if (_internal_state == 4 && _resize_enabled == true) {
		SetSize(_relative_mouse_w, _relative_mouse_h+mousey-_relative_mouse_y);
	}
	
	event->SetX(mousex);
	event->SetY(mousey);

	ProcessEvent(event);
}

void Frame::MouseWheel(MouseEvent *event)
{
	if (_is_enabled == false) {
		return;
	}
	
	event->SetX(event->GetX()-_location.x);
	event->SetY(event->GetY()-_location.y);

	ProcessEvent(event);
}

void Frame::Release()
{
	// WARNNING:: agora o frame estah sendo removido do WindowManager no metodo Release()
	WindowManager::GetInstance()->Remove(this);

	_is_enabled = false;

	InputManager::GetInstance()->RemoveKeyListener(this);
	InputManager::GetInstance()->RemoveMouseListener(this);

	SetVisible(false);
	
	_frame_sem.Notify();
}

void Frame::Paint(Graphics *g)
{
	jthread::AutoLock lock(&_paint_mutex);

	Window::Paint(g);
}

void Frame::PaintGlassPane(Graphics *g)
{
	if (_is_undecorated == true) {
		return;
	}

	if (_title != "") {
		g->FillVerticalGradient(_border_size, _border_size, _size.width-2*_border_size, _insets.top-2*_border_size, _bgcolor, _scrollbar_color);

		if (IsFontSet() == true) {
			int y = _insets.top-_font->GetHeight()-15;

			if (y < 0) {
				y = 0;
			}

			std::string text = _title;
			
			// if (_wrap == false) {
				text = _font->TruncateString(text, "...", (_size.width-_insets.left-_insets.right));
			// }

			g->SetColor(_fgcolor);
		
			g->DrawString(text, _insets.left+(_size.width-_insets.left-_insets.right-_font->GetStringWidth(text))/2, y);
		}
	}

	if (_icon != "") {
		int h = (_insets.top-20);

		if (h > 0) {
			g->DrawImage(_icon, _insets.left, 10, h, h);
		}
	}

	if (_subtitles.size() > 0) {
		int count = 35;

		for (std::vector<frame_subtitle_t>::iterator i=_subtitles.begin(); i!=_subtitles.end(); i++) {
			if (IsFontSet() == true) {
				count += _font->GetStringWidth((*i).subtitle.c_str());

				g->SetColor(_fgcolor);
				g->DrawString((*i).subtitle, _size.width-count, _size.height-_insets.bottom-_border_size-_font->GetHeight()/2);
			}

			count += 10;

			if ((*i).image != "") {
				count += 40;

				g->DrawImage((char *)(*i).image.c_str(), _size.width-count, _size.height-_insets.bottom-_border_size-20, 45, 40);
			}

			count += 20;
		}
	}

	int s = _insets.top-30;

	if (s > 4) { 
		g->SetBlittingFlags(JBF_ALPHACHANNEL);

		if (_release_enabled == true && (_frame_buttons & JFB_CLOSE) != 0) {
			g->DrawImage(_DATA_PREFIX"/images/close.png", _size.width-_insets.right-s, 15, s, s);
		}

		if ((_frame_buttons & JFB_MAXIMIZE) != 0) { 
			if (_is_maximized == false) {
				g->DrawImage(_DATA_PREFIX"/images/maximize.png", _size.width-_insets.right-2*s-10, 15, s, s);
			} else {
				g->DrawImage(_DATA_PREFIX"/images/restore.png", _size.width-_insets.right-2*s-10, 15, s, s);
			}
		}
	}
}

}