#include "gui.h"
#include "glfreetype.h"

namespace Gui {
  
FontFace* Screen::font;
bool Screen::init = false;
int Screen::width;
int Screen::height;
int Screen::realWidth;
int Screen::realHeight;
float Screen::invRealWidth;
float Screen::invRealHeight;
std::list<Widget*> Screen::kbshortcut_widgets;
float Screen::font_xsize;
float Screen::font_ysize;
std::vector<Screen::LabelPos> Screen::labelPositions;
Gui::Fixed* Screen::baseContainer;

void Screen::Init(int real_width, int real_height, int ui_width, int ui_height) {
  Screen::width         = ui_width;
  Screen::height        = ui_height;
  Screen::realWidth     = real_width;
  Screen::realHeight    = real_height;
  Screen::invRealWidth  = 1.0f/real_width;
  Screen::invRealHeight = 1.0f/real_height;
  Screen::init          = true;
  Screen::font          = new FontFace("font.ttf");
  Screen::font_xsize    = 16*0.8;
  Screen::font_ysize    = 16;
  Screen::baseContainer = new Gui::Fixed(Screen::width, Screen::height);
  Screen::baseContainer->SetPosition(0,0);
}

GLint Screen::Project(GLdouble objX, GLdouble objY, GLdouble objZ, const GLdouble* model,
                      const GLdouble* proj, const GLint* view,
                      GLdouble* winX, GLdouble* winY, GLdouble* winZ) {
  
  GLint o = gluProject(objX, objY, objZ, model, proj, view, winX, winY, winZ);
  *winX = (*winX) * width * invRealWidth;
  *winY = (*winY) * height * invRealHeight;
  return o;
}

void Screen::EnterOrtho(void) {
  glDisable(GL_DEPTH_TEST);
  glDisable(GL_LIGHTING);
  glMatrixMode(GL_PROJECTION);
  glPushMatrix();
  glLoadIdentity();
  glOrtho(0, width, 0, height, -1, 1);
  glMatrixMode(GL_MODELVIEW);
  glPushMatrix();
  glLoadIdentity();
}

void Screen::LeaveOrtho(void) {
  glMatrixMode(GL_PROJECTION);
  glPopMatrix();
  glMatrixMode(GL_MODELVIEW);
  glPopMatrix();
  glEnable(GL_LIGHTING);
  glEnable(GL_DEPTH_TEST);
}

void Screen::Draw(void) {
  assert(Screen::init);
  labelPositions.clear();
  EnterOrtho();

  baseContainer->Draw();
  LeaveOrtho();
}

void Screen::AddBaseWidget(Widget* w, int x, int y) {
  baseContainer->Add(w, x, y);
}

void Screen::RemoveBaseWidget(Widget* w) {
  baseContainer->Remove(w);
}

void Screen::SDLEventCoordToScreenCoord(int sdlev_x, int sdlev_y, float* x, float* y) {
  *y = height-(sdlev_y*height*invRealHeight);
  *x = sdlev_x*width*invRealWidth;
}

void Screen::OnMouseMotion(SDL_MouseMotionEvent* e) {
  MouseMotionEvent ev;
  float x, y;
  Screen::SDLEventCoordToScreenCoord(e->x, e->y, &x, &y);
  ev.screenX = ev.x = x;
  ev.screenY = ev.y = y;
  baseContainer->OnMouseMotion(&ev);
}

void Screen::OnClick(SDL_MouseButtonEvent* e) {
  MouseButtonEvent ev;
  float x, y;
  Screen::SDLEventCoordToScreenCoord(e->x, e->y, &x, &y);
  ev.button = e->button;
  ev.isdown = (e->type == SDL_MOUSEBUTTONDOWN);
  ev.screenX = ev.x = x;
  ev.screenY = ev.y = y;
  OnClickTestLabels(ev);
  if(ev.isdown) baseContainer->OnMouseDown(&ev);
  else baseContainer->OnMouseUp(&ev);
}

void Screen::OnClickTestLabels(const Gui::MouseButtonEvent& ev) {
  /* Hm, shame the UI is fixed size for this purpose.. */
  for(std::vector<LabelPos>::iterator l = labelPositions.begin(); l != labelPositions.end(); ++l) {
    float dx = abs((*l).x - ev.x);
    float dy = abs((*l).y - ev.y);

    if((dx < 5) && (dy < 5)) {
      (*l).onClick.emit(&ev);
    }
  }
}

void Screen::OnKeyDown(const SDL_keysym* sym) {
  for(std::list<Widget*>::iterator i = kbshortcut_widgets.begin(); i != kbshortcut_widgets.end(); ++i) {
    if(!(*i)->IsVisible()) continue;
    (*i)->OnPreShortcut(sym);
  }
}

void Screen::MeasureString(const std::string& s, float& w, float& h) {
  font->MeasureString(s.c_str(), w, h);
  w *= Screen::font_xsize;
  h *= Screen::font_ysize;
}

void Screen::RenderString(const std::string& s) {
  glPushMatrix();
  glScalef(Screen::font_xsize, Screen::font_ysize, 1);
  font->RenderString(s.c_str());
  glPopMatrix();
}

void Screen::RenderMarkup(const std::string& s) {
  glPushMatrix();
  glScalef(Screen::font_xsize, Screen::font_ysize, 1);
  font->RenderMarkup(s.c_str());
  glPopMatrix();
}

bool Screen::CanPutLabel(float x, float y) {
  for(std::vector<LabelPos>::iterator i = labelPositions.begin(); i != labelPositions.end(); ++i) {
    if((fabs(x-(*i).x) < 5) &&
       (fabs(y-(*i).y) < 5)) return false;
  }
  return true;
}

void Screen::RenderLabel(const std::string& s, float x, float y) {
  if(CanPutLabel(x, y)) {
    labelPositions.push_back(LabelPos(x, y));
    glPushMatrix();
    glTranslatef(x, y, 0);
    glScalef(Screen::font_xsize, Screen::font_ysize, 1);
    glTranslatef(0.5*font->GetWidth(), -0.4*font->GetHeight(), 0);
    font->RenderString(s.c_str());
    glPopMatrix();
  }
}

void Screen::PutClickableLabel(const std::string& s, float x, float y,
                               sigc::slot<void, const Gui::MouseButtonEvent*> slot) {
  
  if(CanPutLabel(x, y)) {
    LabelPos p = LabelPos(x, y);
    p.onClick.connect(slot);
    labelPositions.push_back(p);
    glPushMatrix();
    glTranslatef(x, y, 0);
    glScalef(Screen::font_xsize, Screen::font_ysize, 1);
    glTranslatef(0.5*font->GetWidth(), -0.4*font->GetHeight(), 0);
    font->RenderString(s.c_str());
    glPopMatrix();
  }
}

void Screen::AddShortcutWidget(Widget* w) {
  kbshortcut_widgets.push_back(w);
}

}