// ASE gui library
// Copyright (C) 2001-2011  David Capello
//
// This source file is ditributed under a BSD-like license, please
// read LICENSE.txt for more information.

#include "config.h"

#include <allegro.h>

#include "gfx/size.h"
#include "gui/graphics.h"
#include "gui/gui.h"
#include "gui/intern.h"
#include "gui/paint_event.h"
#include "gui/preferred_size_event.h"

using namespace gfx;

PopupFrame::PopupFrame(const char* text, bool close_on_buttonpressed)
  : Frame(false, text)
{
  m_close_on_buttonpressed = close_on_buttonpressed;
  m_hot_region = NULL;
  m_filtering = false;

  set_sizeable(false);
  set_moveable(false);
  set_wantfocus(false);
  setAlign(JI_LEFT | JI_TOP);

  // remove decorative widgets
  JLink link, next;
  JI_LIST_FOR_EACH_SAFE(this->children, link, next)
    jwidget_free(reinterpret_cast<JWidget>(link->data));

  initTheme();
  jwidget_noborders(this);
}

PopupFrame::~PopupFrame()
{
  stopFilteringMessages();

  if (m_hot_region != NULL)
    jregion_free(m_hot_region);
}

/**
 * @param region The new hot-region. This pointer is holded by the @a widget.
 * So you cannot destroy it after calling this routine.
 */
void PopupFrame::setHotRegion(JRegion region)
{
  ASSERT(region != NULL);

  if (m_hot_region != NULL)
    jregion_free(m_hot_region);

  startFilteringMessages();

  m_hot_region = region;
}

void PopupFrame::makeFloating()
{
  stopFilteringMessages();
  set_moveable(true);
}

void PopupFrame::makeFixed()
{
  startFilteringMessages();
  set_moveable(false);
}

bool PopupFrame::onProcessMessage(Message* msg)
{
  switch (msg->type) {

    case JM_CLOSE:
      stopFilteringMessages();
      break;

    case JM_SIGNAL:
      if (msg->signal.num == JI_SIGNAL_INIT_THEME) {
	this->border_width.l = 3 * jguiscale();
	this->border_width.t = 3 * jguiscale();
	this->border_width.r = 3 * jguiscale();
	this->border_width.b = 3 * jguiscale();
	return true;
      }
      break;

    case JM_MOUSELEAVE:
      if (m_hot_region == NULL && !is_moveable())
	closeWindow(NULL);
      break;

    case JM_KEYPRESSED:
      if (m_filtering &&
	  (msg->key.scancode == KEY_ESC ||
	   msg->key.scancode == KEY_ENTER ||
	   msg->key.scancode == KEY_ENTER_PAD)) {
	closeWindow(NULL);
	return false;
      }
      break;

    case JM_BUTTONPRESSED:
      // If the user click outside the window, we have to close the
      // tooltip window.
      if (m_filtering) {
	Widget* picked = this->pick(msg->mouse.x, msg->mouse.y);
	if (!picked || picked->getRoot() != this) {
	  closeWindow(NULL);
	}
      }

      // This is used when the user click inside a small text tooltip.
      if (m_close_on_buttonpressed)
	closeWindow(NULL);
      break;

    case JM_MOTION:
      if (!is_moveable() &&
	  m_hot_region != NULL &&
	  jmanager_get_capture() == NULL) {
	struct jrect box;

	// If the mouse is outside the hot-region we have to close the
	// window.
	if (!jregion_point_in(m_hot_region, msg->mouse.x, msg->mouse.y, &box))
	  closeWindow(NULL);
      }
      break;

  }

  return Frame::onProcessMessage(msg);
}

void PopupFrame::onPreferredSize(PreferredSizeEvent& ev)
{
  ScreenGraphics g;
  g.setFont(getFont());
  Size resultSize(0, 0);

  if (hasText())
    resultSize = g.fitString(getText(),
			     (getClientBounds() - getBorder()).w,
			     getAlign());

  resultSize.w += border_width.l + border_width.r;
  resultSize.h += border_width.t + border_width.b;

  if (!jlist_empty(this->children)) {
    Size maxSize(0, 0);
    Size reqSize;
    JWidget child;
    JLink link;

    JI_LIST_FOR_EACH(this->children, link) {
      child = (JWidget)link->data;

      reqSize = child->getPreferredSize();

      maxSize.w = MAX(maxSize.w, reqSize.w);
      maxSize.h = MAX(maxSize.h, reqSize.h);
    }

    resultSize.w = MAX(resultSize.w, border_width.l + maxSize.w + border_width.r);
    resultSize.h += maxSize.h;
  }

  ev.setPreferredSize(resultSize);
}

void PopupFrame::onPaint(PaintEvent& ev)
{
  Graphics* g = ev.getGraphics();
  gfx::Rect pos = getClientBounds();

  g->drawRect(makecol(0, 0, 0), pos);
  pos.shrink(1);

  g->fillRect(this->getBgColor(), pos);
  pos.shrink(getBorder());

  g->drawString(getText(), ji_color_foreground(), this->getBgColor(), pos, getAlign());
}

void PopupFrame::startFilteringMessages()
{
  if (!m_filtering) {
    m_filtering = true;
    jmanager_add_msg_filter(JM_MOTION, this);
    jmanager_add_msg_filter(JM_BUTTONPRESSED, this);
    jmanager_add_msg_filter(JM_KEYPRESSED, this);
  }
}

void PopupFrame::stopFilteringMessages()
{
  if (m_filtering) {
    m_filtering = false;
    jmanager_remove_msg_filter(JM_MOTION, this);
    jmanager_remove_msg_filter(JM_BUTTONPRESSED, this);
    jmanager_remove_msg_filter(JM_KEYPRESSED, this);
  }
}