/*
 *  Abuse - dark 2D side-scrolling platform game
 *  Copyright (c) 1995 Crack dot Com
 *  Copyright (c) 2005-2011 Sam Hocevar <sam@hocevar.net>
 *
 *  This software was released into the Public Domain. As with most public
 *  domain software, no warranty is made or implied by Crack dot Com, by
 *  Jonathan Clark, or by Sam Hocevar.
 */

#if defined HAVE_CONFIG_H
#   include "config.h"
#endif

#include <string.h>

#include "common.h"

#include "input.h"
#include "status.h"
#include "timing.h"
#include "guistat.h"

class gui_status_node
{
  public :
  char *name;
  gui_status_node *next;
  visual_object *show;
  Jwindow *stat_win;
  int last_update;
  time_marker last_time;
  gui_status_node(char const *Name, visual_object *Show, gui_status_node *Next)
  { name = strdup(Name);
    show=Show;
    next=Next;
    last_update=0;
    stat_win=NULL;
  }
  ~gui_status_node();
} ;


gui_status_node::~gui_status_node()
{
  free(name);
  if (show)
    delete show;
  if (stat_win)
  {
    wm->close_window(stat_win);
    wm->flush_screen();
  }
}

void gui_status_manager::draw_bar(gui_status_node *whom, int perc)
{
    long l = whom->stat_win->x2() - whom->stat_win->x1() - 6;
    long h = wm->font()->Size().y;

    whom->stat_win->m_surf->Bar(ivec2(whom->stat_win->x1() + 1,
                                      whom->stat_win->y2() - h - 1),
                                ivec2(whom->stat_win->x2() - 1,
                                      whom->stat_win->y2() - 1),
                                wm->black());
    whom->stat_win->m_surf->Bar(ivec2(whom->stat_win->x1() + 2,
                                      whom->stat_win->y2() - h),
                                ivec2(whom->stat_win->x2() - 2,
                                      whom->stat_win->y2() - 2),
                                wm->dark_color());
    if (perc)
        whom->stat_win->m_surf->Bar(ivec2(whom->stat_win->x1() + 3,
                                          whom->stat_win->y2() - h + 1),
                                    ivec2(whom->stat_win->x1() + l * perc / 100,
                                          whom->stat_win->y2() - 3),
                                    wm->bright_color());
}

void gui_status_manager::push(char const *name, visual_object *show)
{
  first=new gui_status_node(name,show,first);
}

gui_status_manager::gui_status_manager()
{
  first=NULL;
  strcpy(title,"STATUS");
  last_perc=0;
}

void gui_status_manager::update(int percentage)
{
  last_perc=percentage;
  if (first)
  {
    if (!first->stat_win)
    {
      time_marker now;
      if (now.diff_time(&first->last_time)>1)
      {
    long wx=xres/2,wy=10,len1=strlen(first->name)*wm->font()->Size().x+10,len2=0,len3,
      h1=wm->font()->Size().y+5,h2=first->show ? first->show->height() : 0;

    if (first->show) len2=first->show->width()/2;
    if (len2>len1) len3=len2; else len3=len1;
    wx-=len3/2;


    gui_status_node *p=first->next;
    while (p && !p->stat_win) p=p->next;
    if (p) wy=p->stat_win->m_pos.y+p->stat_win->y2()+5;

    int mx = first->stat_win->x1() + 1;
    int my = first->stat_win->y1() + wm->font()->Size().y / 2;
    first->stat_win=wm->CreateWindow(ivec2(wx, wy), ivec2(len3, h1*2+h2), NULL, "status");
    wm->font()->PutString(first->stat_win->m_surf, ivec2(mx, my), first->name, wm->black());
    wm->font()->PutString(first->stat_win->m_surf, ivec2(mx, my), first->name, wm->bright_color());
    if (first->show)
      first->show->draw(first->stat_win->m_surf, (first->stat_win->x2()-first->stat_win->x1())/2-
                first->show->width()/2, my+h1, NULL);

    draw_bar(first,percentage);
    wm->flush_screen();
      }
    } else
    {
      if (percentage>first->last_update)
      {
    first->last_update=percentage;
    draw_bar(first,percentage);
    wm->flush_screen();
      }
    }
  }
}

void gui_status_manager::force_display()
{
  update(last_perc);
}

void gui_status_manager::pop()
{
  CONDITION(first,"No status's to pop!");
  gui_status_node *p=first;
  first=first->next;
  delete p;
}