#include "dclient/widgets/map.h"
#include "dclient/render_glyph.h"

#include "deliantra/data/glyph.h"
#include "deliantra/data/map.h"

#include <ndk++/application.hh>
#include <ndk++/color.hh>
#include <ndk++/pen.hh>

map_widget::map_widget (ndk::panel *parent)
  : frame ("", parent)
  , map (nullptr)
{
}

void
map_widget::update (data::map const &map)
{
  this->map = &map;
}


static u16
select_face (u16 const (&face)[3], int layer)
{
  if (layer == -1)
    return face[2]
           ? face[2]
           : face[1]
             ? face[1]
             : face[0]
             ;
  return face[layer];
}


void
map_widget::draw ()
{
  frame::draw ();

  if (!map)
    return;

  static int const layer = -1;

  int const W = this->width  () - 2;
  int const H = this->height () - 2;
  ndk::pen pen (*this);

  static data::glyph const space  = { 0, 0, L' ' };
#if 1
  static data::glyph const player = { 0, 0, L'@' };
#endif

  int const zerox = -(W - map->w) / 2;
  int const zeroy = -(H - map->h) / 2;
 
#if 1
  int const playerx = (W + 1 + (zerox > 0)) / 2;
  int const playery = (H + 1 + (zeroy > 0)) / 2;
#endif

  for (int y = zeroy; y < H + zeroy; y++)
    {
      int const mapy = y + map->y;
      if (!map->rows.has (mapy))
        continue;
      auto const &row = map->rows.at (mapy);
      for (int x = zerox; x < W + zerox; x++)
        {
          int const mapx = x + map->x;
          if (!row.has (mapx))
            continue;
          data::map::cell const &cell = row.at (mapx);
          u32 const face = select_face (cell.face, layer);

          data::glyph const *glyph;

          int const winy = y - zeroy + 1;
          int const winx = x - zerox + 1;

#if 1
          if (winx == playerx && winy == playery)
            glyph = &player;
#else
          if (0)
            ;
#endif
          else if (face && face < data::glyphs.size ()) // TODO: warn about face >= size
            glyph = &data::glyphs[face];
          else
            glyph = &space;

          return_unless (pen.move (winx, winy));
          write (pen, *glyph, cell.darkness);
        }
    }

#if 1
  // 19:15 < n0nsense> pippijn: kannst du nethack-mäßig noch den cursor auf den player setzen?
  pen.move (playerx, playery);
  ndk::app->cursor_on ();
#endif

  if (getenv ("DCLIENT_ONESHOT"))
    {
      delete ndk::app;
      exit (0);
    }
}