// File: fwindow.cpp
// Provides: class FWindow

#include "fapp.h"
#include "fmenubar.h"
#include "fstatusbar.h"
#include "fwindow.h"

// static attributes
FWindow* FWindow::previous_widget = 0;

//----------------------------------------------------------------------
// class FWindow
//----------------------------------------------------------------------

// constructors and destructor
//----------------------------------------------------------------------
FWindow::FWindow(FWidget* parent)
  : FWidget(parent)
  , window_active(false)
  , zoomed(false)
  , win_focus_widget(0)
  , normalGeometry()
{
  setWindowWidget();
}

//----------------------------------------------------------------------
FWindow::~FWindow()  // destructor
{
  if ( previous_widget == this )
    previous_widget = 0;

  if ( isAlwaysOnTop() )
    deleteFromAlwaysOnTopList (this);
}


// private methods of FWindow
//----------------------------------------------------------------------
void FWindow::deleteFromAlwaysOnTopList (FWidget* obj)
{
  // delete the window object obj from the always-on-top list
  if ( always_on_top_list && ! always_on_top_list->empty() )
  {
    widgetList::iterator iter;
    iter = always_on_top_list->begin();

    while ( iter != always_on_top_list->end() )
    {
      if ( *iter == obj )
      {
        always_on_top_list->erase (iter);
        return;
      }

      ++iter;
    }
  }
}


// protected methods of FWindow
//----------------------------------------------------------------------
bool FWindow::event (FEvent* ev)
{
  switch ( ev->type() )
  {
    case fc::WindowActive_Event:
      onWindowActive (ev);
      break;

    case fc::WindowInactive_Event:
      onWindowInactive (ev);
      break;

    case fc::WindowRaised_Event:
      onWindowRaised (ev);
      break;

    case fc::WindowLowered_Event:
      onWindowLowered (ev);
      break;

    default:
      return FWidget::event(ev);
  }

  return true;
}

//----------------------------------------------------------------------
void FWindow::onWindowActive (FEvent*)
{ }

//----------------------------------------------------------------------
void FWindow::onWindowInactive (FEvent*)
{ }

//----------------------------------------------------------------------
void FWindow::onWindowRaised (FEvent*)
{ }

//----------------------------------------------------------------------
void FWindow::onWindowLowered (FEvent*)
{ }

//----------------------------------------------------------------------
void FWindow::adjustSize()
{
  FWidget::adjustSize();

  if ( zoomed )
    setGeometry (1, 1, getMaxWidth(), getMaxHeight(), false);
}


// public methods of FWindow
//----------------------------------------------------------------------
void FWindow::show()
{
  term_area* area = getVWin();

  if ( area )
    area->visible = true;

  FWidget::show();
}

//----------------------------------------------------------------------
void FWindow::hide()
{
  term_area* area = getVWin();

  if ( area )
    area->visible = false;

  FWidget::hide();
}

//----------------------------------------------------------------------
void FWindow::setWidth (int w, bool adjust)
{
  int old_width = getWidth();
  FWidget::setWidth (w, adjust);

  if ( vwin && getWidth() != old_width )
    resizeArea (vwin);
}

//----------------------------------------------------------------------
void FWindow::setHeight (int h, bool adjust)
{
  int old_height = getHeight();
  FWidget::setHeight (h, adjust);

  if ( vwin && getHeight() != old_height )
    resizeArea (vwin);
}

//----------------------------------------------------------------------
void FWindow::setSize (int w, int h, bool adjust)
{
  int old_width = getWidth();
  int old_height = getHeight();
  FWidget::setSize (w, h, adjust);

  if ( vwin && (getWidth() != old_width || getHeight() != old_height) )
    resizeArea (vwin);
}

//----------------------------------------------------------------------
void FWindow::setGeometry (int x, int y, int w, int h, bool adjust)
{
  int old_width = getWidth();
  int old_height = getHeight();
  FWidget::setGeometry (x, y, w, h, adjust);

  if ( vwin && (getWidth() != old_width || getHeight() != old_height) )
    resizeArea (vwin);
}

//----------------------------------------------------------------------
FWindow* FWindow::getWindowWidgetAt (int x, int y)
{
  // returns the window object to the corresponding coordinates
  if ( statusBar() && statusBar()->getTermGeometry().contains(x,y) )
    return statusBar();

  if ( menuBar() && menuBar()->getTermGeometry().contains(x,y) )
    return menuBar();

  if ( window_list && ! window_list->empty() )
  {
    widgetList::const_iterator iter, begin;
    iter  = window_list->end();
    begin = window_list->begin();

    do
    {
      --iter;
      if ( *iter )
      {
        FWindow* w = static_cast<FWindow*>(*iter);

        if ( ! w->isHiddenWindow()
           && w->getTermGeometry().contains(x,y) )
          return w;
      }
    }
    while ( iter != begin );

  }

  return 0;
}

//----------------------------------------------------------------------
void FWindow::addWindow (FWidget* obj)
{
  // add the window object obj to the window list
  if ( window_list )
    window_list->push_back(obj);
}

//----------------------------------------------------------------------
void FWindow::delWindow (FWidget* obj)
{
  // delete the window object obj from the window list
  if ( ! window_list || window_list->empty() )
    return;

  widgetList::iterator iter;
  iter = window_list->begin();

  while ( iter != window_list->end() )
  {
    if ( (*iter) == obj )
    {
      window_list->erase (iter);
      return;
    }

    ++iter;
  }
}

//----------------------------------------------------------------------
FWindow* FWindow::getWindowWidget (FWidget* obj)
{
  // returns the window object to the given widget obj
  FWidget* p_obj = obj->getParentWidget();

  while ( ! obj->isWindowWidget() && p_obj )
  {
    obj = p_obj;
    p_obj = p_obj->getParentWidget();
  }

  if ( obj->isWindowWidget() )
    return static_cast<FWindow*>(obj);
  else
    return 0;
}

//----------------------------------------------------------------------
int FWindow::getWindowLayer (FWidget* obj)
{
  // returns the window layer from the widget obj
  widgetList::iterator iter, end;
  FWidget* window;

  if ( ! window_list )
    return -1;

  if ( window_list->empty() )
    return -1;

  if ( ! obj->isWindowWidget() )
  {
    if ( (window = getWindowWidget(obj)) == 0 )
      return -1;
  }
  else
    window = obj;

  iter = window_list->begin();
  end  = window_list->end();

  while ( iter != end )
  {
    if ( *iter == window )
      break;

    ++iter;
  }

  return int(std::distance(window_list->begin(), iter) + 1);
}

//----------------------------------------------------------------------
void FWindow::swapWindow (FWidget* obj1, FWidget* obj2)
{
  // swaps the window layer between obj1 and obj2
  widgetList::iterator iter, iter1, iter2, end;

  if ( ! window_list )
    return;

  if ( window_list->empty() )
    return;

  if ( (obj1->getFlags() & fc::modal) != 0 )
    return;

  if ( (obj2->getFlags() & fc::modal) != 0 )
    return;

  iter  = window_list->begin();
  end   = window_list->end();
  iter1 = end;
  iter2 = end;

  while ( iter != end )
  {
    if ( (*iter) == obj1 )
      iter1 = iter;
    else if ( (*iter) == obj2 )
      iter2 = iter;

    ++iter;
  }

  if ( iter1 != end && iter2 != end )
    std::swap (iter1, iter2);
}

//----------------------------------------------------------------------
bool FWindow::raiseWindow (FWidget* obj)
{
  // raises the window widget obj to the top
  widgetList::iterator iter;

  if ( ! window_list )
    return false;

  if ( window_list->empty() )
    return false;

  if ( ! obj->isWindowWidget() )
    return false;

  if ( window_list->back() == obj )
    return false;

  if ( (window_list->back()->getFlags() & fc::modal) != 0
     && ! obj->isMenuWidget() )
    return false;

  iter = window_list->begin();

  while ( iter != window_list->end() )
  {
    if ( *iter == obj )
    {
      window_list->erase (iter);
      window_list->push_back (obj);
      FEvent ev(fc::WindowRaised_Event);
      FApplication::sendEvent(obj, &ev);
      alwaysOnTop();
      return true;
    }

    ++iter;
  }

  return false;
}

//----------------------------------------------------------------------
bool FWindow::lowerWindow (FWidget* obj)
{
  // lowers the window widget obj to the bottom
  widgetList::iterator iter;

  if ( ! window_list )
    return false;

  if ( window_list->empty() )
    return false;

  if ( ! obj->isWindowWidget() )
    return false;

  if ( window_list->front() == obj )
    return false;

  if ( (obj->getFlags() & fc::modal) != 0 )
    return false;

  iter = window_list->begin();

  while ( iter != window_list->end() )
  {
    if ( *iter == obj )
    {
      window_list->erase (iter);
      window_list->insert (window_list->begin(), obj);
      FEvent ev(fc::WindowLowered_Event);
      FApplication::sendEvent(obj, &ev);
      return true;
    }

    ++iter;
  }

  return false;
}

//----------------------------------------------------------------------
void FWindow::alwaysOnTop()
{
  // Raise all always-on-top windows
  if ( always_on_top_list && ! always_on_top_list->empty() )
  {
    widgetList::iterator iter;
    iter = always_on_top_list->begin();

    while ( iter != always_on_top_list->end() )
    {
      delWindow (*iter);
      addWindow (*iter);
      ++iter;
    }
  }
}

//----------------------------------------------------------------------
bool FWindow::zoomWindow()
{
  if ( zoomed )
  {
    zoomed = false;
    FRect oldGeometry = getTermGeometryWithShadow();
    setGeometry (normalGeometry);
    restoreVTerm (oldGeometry);
    redraw();
  }
  else
  {
    zoomed = true;
    // save the current geometry
    normalGeometry = getGeometry();
    FRect oldGeometry = getTermGeometryWithShadow();
    setGeometry (1, 1, getMaxWidth(), getMaxHeight());
    restoreVTerm (oldGeometry);
    redraw();
  }

  return zoomed;
}

//----------------------------------------------------------------------
bool FWindow::setWindowWidget (bool on)
{
  if ( isWindowWidget() == on )
    return true;

  if ( on )
  {
    flags |= fc::window_widget;
    setTermOffset();
  }
  else
  {
    flags &= ~fc::window_widget;
    setParentOffset();
  }

  return on;
}

//----------------------------------------------------------------------
FWindow* FWindow::getActiveWindow()
{
  // returns the active FWindow object
  FWindow* active_window = static_cast<FWindow*>(FApplication::active_window);
  return active_window;
}

//----------------------------------------------------------------------
void FWindow::setActiveWindow (FWindow* window)
{
  // activate FWindow object window
  widgetList::const_iterator iter, end;

  if ( ! window_list )
    return;

  if ( window_list->empty() )
    return;

  iter = window_list->begin();
  end  = window_list->end();

  while ( iter != end )
  {
    if ( *iter == window )
    {
      if ( ! window->isActiveWindow() )
      {
        window->activateWindow();
        FEvent ev(fc::WindowActive_Event);
        FApplication::sendEvent(window, &ev);
      }
    }
    else
    {
      FWindow* w = static_cast<FWindow*>(*iter);

      if ( w->isActiveWindow() )
      {
        w->deactivateWindow();
        FEvent ev(fc::WindowInactive_Event);
        FApplication::sendEvent(*iter, &ev);
      }
    }

    ++iter;
  }
}

//----------------------------------------------------------------------
FWidget* FWindow::getWindowFocusWidget() const
{
  // returns the focused widget of this window
  return win_focus_widget;
}

//----------------------------------------------------------------------
void FWindow::setWindowFocusWidget (FWidget* obj)
{
  // set focus widget of this window
  win_focus_widget = obj;
}

//----------------------------------------------------------------------
void FWindow::switchToPrevWindow()
{
  // switch to previous window
  bool is_activated = activatePrevWindow();
  FWindow* active_window = getActiveWindow();

  if ( ! is_activated )
  {
    // no previous window -> looking for another window
    if ( window_list && window_list->size() > 1 )
    {
      widgetList::const_iterator iter, begin;
      iter  = window_list->end();
      begin = window_list->begin();

      do
      {
        --iter;
        FWindow* w = static_cast<FWindow*>(*iter);

        if ( w && w != active_window
           && ! (w->isHiddenWindow() || w->isActiveWindow()) )
        {
          setActiveWindow(w);
          break;
        }
      }
       while ( iter != begin );
    }
  }

  if ( active_window )
  {
    FWidget* focus_widget = active_window->getWindowFocusWidget();

    if ( ! active_window->isActiveWindow() )
      setActiveWindow(active_window);

    if ( focus_widget )
    {
      focus_widget->setFocus();

      if ( ! focus_widget->isWindowWidget() )
        focus_widget->redraw();
    }
  }
}

//----------------------------------------------------------------------
bool FWindow::activatePrevWindow()
{
  // activate the previous window
  FWindow* w = previous_widget;

  if ( w && ! (w->isHiddenWindow() || w->isActiveWindow()) )
  {
    setActiveWindow(w);
    return true;
  }
  else
    return false;
}

//----------------------------------------------------------------------
bool FWindow::activateWindow (bool on)
{
  // activate/deactivate this window
  if ( on )
    FApplication::active_window = this;

  return window_active = (on) ? true : false;
}

//----------------------------------------------------------------------
bool FWindow::isHiddenWindow() const
{
  // returns the window hidden state
  term_area* area = getVWin();

  if ( area )
    return ! area->visible;
  else
    return false;
}

//----------------------------------------------------------------------
bool FWindow::setAlwaysOnTop (bool on)
{
  if ( isAlwaysOnTop() == on )
    return true;

  if ( on )
  {
    flags |= fc::always_on_top;

    if ( always_on_top_list )
    {
      deleteFromAlwaysOnTopList (this);
      always_on_top_list->push_back (this);
    }
  }
  else
  {
    flags &= ~fc::always_on_top;
    deleteFromAlwaysOnTopList (this);
  }

  return on;
}