- Reworked Surface class and drawing stuff:
[supertux.git] / src / tile.cpp
index 2f3916e..f2ec18a 100644 (file)
+//  $Id$
+// 
+//  SuperTux
+//  Copyright (C) 2004 Tobias Glaesser <tobi.web@gmx.de>
 //
-// C++ Implementation: tile
+//  This program is free software; you can redistribute it and/or
+//  modify it under the terms of the GNU General Public License
+//  as published by the Free Software Foundation; either version 2
+//  of the License, or (at your option) any later version.
 //
-// Description: 
-//
-//
-// Author: Tobias Glaesser <tobi.web@gmx.de>, (C) 2004
-//
-// Copyright: See COPYING file that comes with this distribution
-//
-//
-#include "tile.h"
-#include "assert.h"
+//  This program is distributed in the hope that it will be useful,
+//  but WITHOUT ANY WARRANTY; without even the implied warranty of
+//  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+//  GNU General Public License for more details.
+// 
+//  You should have received a copy of the GNU General Public License
+//  along with this program; if not, write to the Free Software
+//  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+//  02111-1307, USA.
+#include <config.h>
+
+#include <cmath>
+#include <cassert>
+#include <iostream>
+#include <stdexcept>
 
-TileManager* TileManager::instance_  = 0;
+#include "lisp/lisp.hpp"
+#include "tile.hpp"
+#include "resources.hpp"
+#include "timer.hpp"
+#include "math/vector.hpp"
+#include "video/drawing_context.hpp"
 
-TileManager::TileManager()
+Tile::Tile()
+  : id(0), editor_image(0), attributes(0), data(0), anim_fps(1)
 {
-  std::string filename = datadir +  "images/tilesets/supertux.stgt"; 
-  load_tileset(filename);
 }
 
-void TileManager::load_tileset(std::string filename)
+Tile::~Tile()
 {
-  lisp_object_t* root_obj = lisp_read_from_file(filename);
+  for(std::vector<Surface*>::iterator i = images.begin(); i != images.end();
+      ++i) {
+    delete *i;
+  }
+  delete editor_image;
+}
+
+void
+Tile::parse(const lisp::Lisp& reader)
+{
+  if(!reader.get("id", id)) {
+    throw std::runtime_error("Missing tile-id.");
+  }
   
-  if (!root_obj)
-    st_abort("Couldn't load file", filename);
+  bool value;
+  if(reader.get("solid", value) && value)
+    attributes |= SOLID;
+  if(reader.get("unisolid", value) && value)
+    attributes |= UNISOLID | SOLID;
+  if(reader.get("brick", value) && value)
+    attributes |= BRICK;
+  if(reader.get("ice", value) && value)
+    attributes |= ICE;
+  if(reader.get("water", value) && value)
+    attributes |= WATER;
+  if(reader.get("spike", value) && value)
+    attributes |= SPIKE;
+  if(reader.get("fullbox", value) && value)
+    attributes |= FULLBOX;
+  if(reader.get("coin", value) && value)
+    attributes |= COIN;
+  if(reader.get("goal", value) && value)
+    attributes |= GOAL;
 
-  if (strcmp(lisp_symbol(lisp_car(root_obj)), "supertux-tiles") == 0)
-    {
-      lisp_object_t* cur = lisp_cdr(root_obj);
-      int tileset_id = 0;
+  if(reader.get("north", value) && value)
+    data |= WORLDMAP_NORTH;
+  if(reader.get("south", value) && value)
+    data |= WORLDMAP_SOUTH;
+  if(reader.get("west", value) && value)
+    data |= WORLDMAP_WEST;
+  if(reader.get("east", value) && value) 
+    data |= WORLDMAP_EAST;
+  if(reader.get("stop", value) && value)
+    data |= WORLDMAP_STOP;                      
 
-      while(!lisp_nil_p(cur))
-        {
-          lisp_object_t* element = lisp_car(cur);
+  reader.get("data", data);
+  reader.get("anim-fps", anim_fps);
 
-          if (strcmp(lisp_symbol(lisp_car(element)), "tile") == 0)
-            {
-              Tile* tile = new Tile;
-              tile->id      = -1;
-              tile->solid   = false;
-             tile->brick   = false;
-             tile->ice     = false;      
-             tile->fullbox = false;          
-              tile->distro  = false;
-              tile->data    = 0;
-              tile->alpha   = 0;
-              tile->next_tile  = 0;
-              tile->anim_speed = 25;
+  if(reader.get("slope-type", data)) {
+    attributes |= SOLID | SLOPE;
+  }
   
-              LispReader reader(lisp_cdr(element));
-              assert(reader.read_int("id",  &tile->id));
-              reader.read_bool("solid",     &tile->solid);
-              reader.read_bool("brick",     &tile->brick);
-              reader.read_bool("ice",       &tile->ice);          
-              reader.read_bool("fullbox",   &tile->fullbox);
-              reader.read_bool("distro",    &tile->distro);
-              reader.read_int("data",       (int*)&tile->data);
-              reader.read_int("alpha",      (int*)&tile->alpha);
-              reader.read_int("anim-speed", &tile->anim_speed);
-              reader.read_int("next-tile",  &tile->next_tile);
-              reader.read_string_vector("images",  &tile->filenames);
-
-             for(std::vector<std::string>::iterator it = tile->filenames.begin();
-                  it != tile->filenames.end();
-                  ++it)
-                {
-                  texture_type cur_image;
-                  tile->images.push_back(cur_image);
-                  texture_load(&tile->images[tile->images.size()-1], 
-                               datadir +  "images/tilesets/" + (*it), 
-                               USE_ALPHA);
-                }
-
-              if (tile->id + tileset_id >= int(tiles.size()))
-                tiles.resize(tile->id + tileset_id+1);
+  const lisp::Lisp* images = reader.get_lisp("images");
+  if(images)
+    parse_images(*images);
+  reader.get("editor-images", editor_imagefile);
+}
 
-              tiles[tile->id + tileset_id] = tile;
-            }
-         else if (strcmp(lisp_symbol(lisp_car(element)), "tileset") == 0)
-            {
-             LispReader reader(lisp_cdr(element));
-             std::string filename;
-              reader.read_string("file",  &filename);
-             filename = datadir + "images/tilesets/" + filename; 
-             load_tileset(filename);
-           }
-         else if (strcmp(lisp_symbol(lisp_car(element)), "properties") == 0)
-            {
-             LispReader reader(lisp_cdr(element));
-              reader.read_int("id",  &tileset_id);
-             tileset_id *= 1000;
-           }
-          else
-            {
-              puts("Unhandled symbol");
-            }
+void
+Tile::parse_images(const lisp::Lisp& images_lisp)
+{
+  const lisp::Lisp* list = &images_lisp;
+  while(list) {
+    const lisp::Lisp* cur = list->get_car();
+    if(cur->get_type() == lisp::Lisp::TYPE_STRING) {
+      std::string file;
+      cur->get(file);
+      imagespecs.push_back(ImageSpec(file, Rect(0, 0, 0, 0)));
+    } else if(cur->get_type() == lisp::Lisp::TYPE_CONS && 
+        cur->get_car()->get_type() == lisp::Lisp::TYPE_SYMBOL) {
+      const lisp::Lisp* ptr = cur->get_cdr();
 
-          cur = lisp_cdr(cur);
-        }
+      std::string file;
+      float x, y, w, h;
+      ptr->get_car()->get(file); ptr = ptr->get_cdr();
+      ptr->get_car()->get(x); ptr = ptr->get_cdr();
+      ptr->get_car()->get(y); ptr = ptr->get_cdr();
+      ptr->get_car()->get(w); ptr = ptr->get_cdr();
+      ptr->get_car()->get(h);
+      imagespecs.push_back(ImageSpec(file, Rect(x, y, x+w, y+h)));
+    } else {
+      std::cerr << "Expected string or list in images tag.\n";
+      continue;
     }
-  else
-    {
-      assert(0);
+    
+    list = list->get_cdr();
+  }
+}
+
+void
+Tile::load_images(const std::string& tilesetpath)
+{
+  assert(images.size() == 0);
+  for(std::vector<ImageSpec>::iterator i = imagespecs.begin(); i !=
+      imagespecs.end(); ++i) {
+    const ImageSpec& spec = *i;
+    Surface* surface;
+    std::string file = tilesetpath + spec.file;
+    if(spec.rect.get_width() <= 0) {
+      surface = new Surface(file);
+    } else {
+      surface = new Surface(file,
+          (int) spec.rect.p1.x,
+          (int) spec.rect.p1.y,
+          (int) spec.rect.get_width(),
+          (int) spec.rect.get_height());
     }
+    images.push_back(surface);
+  }
+  if(editor_imagefile != "") {
+    editor_image = new Surface(tilesetpath + editor_imagefile);
+  }
 }
 
-// EOF //
+Surface*
+Tile::get_editor_image() const
+{
+  if(editor_image)
+    return editor_image;
+  if(images.size() > 0)
+    return images[0];
+
+  return 0;
+}
+
+void
+Tile::draw(DrawingContext& context, const Vector& pos, int layer) const
+{
+  if(images.size() > 1) {
+    size_t frame = size_t(game_time * anim_fps) % images.size();
+    context.draw_surface(images[frame], pos, layer);
+  } else if (images.size() == 1) {
+    context.draw_surface(images[0], pos, layer);
+  }
+}