/*
   $Id: win_scroll.cc,v 1.5 2002/12/02 14:31:55 ksterker Exp $
   
   (C) Copyright 2000 Joel Vennin
   Part of the Adonthell Project http://adonthell.linuxgames.com

   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License.
   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY.

   See the COPYING file for more details
*/

#include "win_scroll.h"


win_scroll::win_scroll():win_scrollbar(this)
{
  
  cursor_y_=0;
  
  max_amplitude_=0;
  
  cur_amplitude_=0;
  
  index_pad_=PAD_DEFAULT;

  set_auto_scrollbar(false);
  
  set_auto_refresh(false);

}


bool win_scroll::down()
{
  
  if( max_amplitude_ == 0 ) return false;
  
  if( cur_amplitude_ + index_pad_ > max_amplitude_ ) cur_amplitude_ = max_amplitude_;  
  else cur_amplitude_ += index_pad_;
  
  update_amplitude();
  
  on_down();
  
  return true;

}


void win_scroll::resize(u_int16 tl,u_int16 th)
{
  win_container::resize(tl,th);
  
  find_amplitude();
  
  win_scrollbar::update_back();
  
  win_scrollbar::update_bar();
}


bool win_scroll::up()
{
  if( max_amplitude_==0 ) return false ;
  
  if( cur_amplitude_-index_pad_ < 0) cur_amplitude_ = 0;
  else cur_amplitude_ -= index_pad_;
  
  update_amplitude();
  
  on_up();
  
  return true;
}

void win_scroll::set_pos (const u_int8 pos) 
{
    cur_amplitude_ = (max_amplitude_ * pos) / 255; 
    if (max_amplitude_ != 0) update_amplitude (); 
}

void win_scroll::update_amplitude()
{
  for(lwb::iterator i=list_wb_.begin() ; i!=list_wb_.end() ; i++) 
    {  
      (*i)->pad_y() = -cur_amplitude_ ;  
      (*i)->update_position();
    }
  
  cursor_y_= ((height() - win_scrollbar::height_bar()) * cur_amplitude_) / max_amplitude_;
}


void win_scroll::set_space_between_border(u_int16 tmp)
{
  
  win_container::set_space_with_border(tmp);
  
  find_amplitude();
  
  win_scrollbar::update_bar();

}


void win_scroll::set_space_between_object(u_int16 tmp)
{
  win_container::set_space_with_object(tmp);
  
  find_amplitude();
  
  win_scrollbar::update_bar();
}


void win_scroll::add(win_base *wb)
{
  win_container::add(wb);
  
  find_amplitude();
  
  win_scrollbar::update_bar();
}


void win_scroll::remove(win_base *wb)
{
  win_container::remove(wb);
  
  find_amplitude();
  
  win_scrollbar::update_bar();
}


void win_scroll::remove_all()
{
  win_container::remove_all();
  
  max_amplitude_=0;
  
  cur_amplitude_=0;
  
  win_scrollbar::update_bar();
}


void win_scroll::destroy()
{
  win_container::destroy();
  
  max_amplitude_=0;
  
  cur_amplitude_=0;
  
  win_scrollbar::update_bar();
}


bool win_scroll::draw()
{
  if(win_base::draw())
    {
      assign_drawing_area(wb_father_); 
      
      win_background::draw(this);   
      
      for(lwb::iterator i=list_wb_.begin();i!=list_wb_.end();i++)
	(*i)->draw();
      
      win_scrollbar::draw(wb_father_);

      win_border::draw(wb_father_);
      
      detach_drawing_area();
      
      return true;
    }
  return false;
}


bool win_scroll::update()
{
  if(win_container::update())
    {
      if(auto_scrollbar_)
	{
	  u_int16 old = amplitude();
          find_amplitude(); 
	  if(old != amplitude())
	    {
	      win_scrollbar::set_visible_scrollbar(amplitude()!=0);
	      win_scrollbar::update_bar();
	    }
	}
      else if(auto_refresh_) 
	{
	  u_int16 old = amplitude(); find_amplitude(); 
	  if(old != amplitude())
	    win_scrollbar::update_bar();
	} 
      return true;
    }
  return false;
}


bool win_scroll::input_update()
{
  if(win_container::input_update())
    {
      if(focus_object_) return true;
      if(input::is_pushed(win_keys::KEY_UP)) up();
      if(input::is_pushed(win_keys::KEY_DOWN)) down();
      return true;
    }
  return false;
}


void win_scroll::find_amplitude()
{
  //search the max y object to calcul the amplitude
  max_amplitude_ = cursor_y_ = cur_amplitude_ = 0;
  
  //   max_amplitude_ = 0;

  for(lwb::iterator i=list_wb_.begin() ; i!=list_wb_.end() ; i++) 
    if((*i)->y() + (*i)->height() > height() - space_with_border() && (*i)->y() + (*i)->height() - height() + space_with_border() > max_amplitude_ )
      max_amplitude_ = (*i)->y() + (*i)->height() - height() + space_with_border(); 
}