some fixes after my latest changes
[supertux.git] / src / sector.cpp
index 2230eca..ceb80a3 100644 (file)
@@ -25,6 +25,7 @@
 #include <fstream>
 #include <sstream>
 #include <stdexcept>
+#include <float.h>
 
 #include "sector.hpp"
 #include "player_status.hpp"
@@ -63,8 +64,6 @@
 #include "scripting/scripted_object.hpp"
 #include "scripting/text.hpp"
 
-//#define USE_GRID
-
 Sector* Sector::_current = 0;
 
 Sector::Sector()
@@ -72,7 +71,7 @@ Sector::Sector()
     currentmusic(LEVEL_MUSIC)
 {
   song_title = "chipdisko.ogg";
-  player = new Player(&player_status);
+  player = new Player(player_status);
   add_object(player);
 
 #ifdef USE_GRID
@@ -170,14 +169,16 @@ Sector::parse(const lisp::Lisp& sector)
   }
 
   update_game_objects();
+
+  if(!solids)
+    throw std::runtime_error("sector does not contain a solid tile layer.");
+
   fix_old_tiles();
   if(!camera) {
     std::cerr << "sector '" << name << "' does not contain a camera.\n";
     update_game_objects();
     add_object(new Camera(this));
   }
-  if(!solids)
-    throw std::runtime_error("sector does not contain a solid tile layer.");
 
   update_game_objects();
 }
@@ -201,16 +202,16 @@ Sector::parse_old_format(const lisp::Lisp& reader)
   reader.get("bkgd_red_top", r);
   reader.get("bkgd_green_top",  g);
   reader.get("bkgd_blue_top",  b);
-  bkgd_top.red = r;
-  bkgd_top.green = g;
-  bkgd_top.blue = b;
+  bkgd_top.red = static_cast<float> (r) / 255.0f;
+  bkgd_top.green = static_cast<float> (g) / 255.0f;
+  bkgd_top.blue = static_cast<float> (b) / 255.0f;
   
   reader.get("bkgd_red_bottom",  r);
   reader.get("bkgd_green_bottom", g);
   reader.get("bkgd_blue_bottom", b);
-  bkgd_bottom.red = r;
-  bkgd_bottom.green = g;
-  bkgd_bottom.blue = b;
+  bkgd_bottom.red = static_cast<float> (r) / 255.0f;
+  bkgd_bottom.green = static_cast<float> (g) / 255.0f;
+  bkgd_bottom.blue = static_cast<float> (b) / 255.0f;
   
   if(backgroundimage != "") {
     Background* background = new Background;
@@ -243,7 +244,7 @@ Sector::parse_old_format(const lisp::Lisp& reader)
   song_title = "chipdisko.ogg";
   reader.get("music", song_title);
 
-  int width, height = 15;
+  int width = 30, height = 15;
   reader.get("width", width);
   reader.get("height", height);
   
@@ -306,10 +307,12 @@ Sector::parse_old_format(const lisp::Lisp& reader)
   add_object(camera);
 
   update_game_objects();
+
+  if(solids == 0)
+    throw std::runtime_error("sector does not contain a solid tile layer.");
+
   fix_old_tiles();
   update_game_objects();
-  if(solids == 0)
-    throw std::runtime_error("sector does not contain a solid tile layer.");  
 }
 
 void
@@ -338,7 +341,7 @@ Sector::fix_old_tiles()
         add_object(new SequenceTrigger(pos, sequence));
         solids->change(x, y, 0);
       }
-    }                                                   
+    }
   }
 }
 
@@ -463,7 +466,7 @@ Sector::update(float elapsed_time)
 #endif
   
   /* Handle all possible collisions. */
-  collision_handler();                                                                              
+  handle_collisions();
   update_game_objects();
 }
 
@@ -471,6 +474,30 @@ void
 Sector::update_game_objects()
 {
   /** cleanup marked objects */
+  for(std::vector<Bullet*>::iterator i = bullets.begin();
+      i != bullets.end(); /* nothing */) {
+    Bullet* bullet = *i;
+    if(bullet->is_valid()) {
+      ++i;
+      continue;
+    }
+
+    i = bullets.erase(i);
+  }
+  for(MovingObjects::iterator i = moving_objects.begin();
+      i != moving_objects.end(); /* nothing */) {
+    MovingObject* moving_object = *i;
+    if(moving_object->is_valid()) {
+      ++i;
+      continue;
+    }
+
+#ifdef USE_GRID
+    grid->remove_object(moving_object);
+#endif
+    
+    i = moving_objects.erase(i);
+  }
   for(std::vector<GameObject*>::iterator i = gameobjects.begin();
       i != gameobjects.end(); /* nothing */) {
     GameObject* object = *i;
@@ -480,18 +507,6 @@ Sector::update_game_objects()
       continue;
     }
     
-    Bullet* bullet = dynamic_cast<Bullet*> (object);
-    if(bullet) {
-      bullets.erase(
-          std::remove(bullets.begin(), bullets.end(), bullet),
-          bullets.end());
-    }
-#ifdef USE_GRID
-    MovingObject* movingobject = dynamic_cast<MovingObject*> (object);
-    if(movingobject) {
-      grid->remove_object(movingobject);
-    }
-#endif
     delete *i;
     i = gameobjects.erase(i);
   }
@@ -506,11 +521,13 @@ Sector::update_game_objects()
     if(bullet)
       bullets.push_back(bullet);
 
-#ifdef USE_GRID
     MovingObject* movingobject = dynamic_cast<MovingObject*> (object);
-    if(movingobject)
+    if(movingobject) {
+      moving_objects.push_back(movingobject);
+ #ifdef USE_GRID
       grid->add_object(movingobject);
 #endif
+    }
     
     TileMap* tilemap = dynamic_cast<TileMap*> (object);
     if(tilemap && tilemap->is_solid()) {
@@ -541,15 +558,6 @@ Sector::draw(DrawingContext& context)
   context.push_transform();
   context.set_translation(camera->get_translation());
 
-#if 0
-  CollisionGridIterator iter(*grid, get_active_region());
-  while(MovingObject* object = iter.next()) {
-    if(!object->is_valid())
-      continue;
-
-    object->draw(context);
-  }
-#else
   for(GameObjects::iterator i = gameobjects.begin();
       i != gameobjects.end(); ++i) {
     GameObject* object = *i; 
@@ -558,7 +566,6 @@ Sector::draw(DrawingContext& context)
     
     object->draw(context);
   }
-#endif
 
   context.pop_transform();
 }
@@ -566,45 +573,36 @@ Sector::draw(DrawingContext& context)
 static const float DELTA = .001;
 
 void
-Sector::collision_tilemap(MovingObject* object, int depth)
+Sector::collision_tilemap(MovingObject* object, CollisionHit& hit) const
 {
-  if(depth >= 4) {
-#ifdef DEBUG
-    std::cout << "Max collision depth reached.\n";
-#endif
-    object->movement = Vector(0, 0);
-    return;
-  }
-
   // calculate rectangle where the object will move
   float x1, x2;
   if(object->get_movement().x >= 0) {
-    x1 = object->get_pos().x;
+    x1 = object->get_bbox().p1.x;
     x2 = object->get_bbox().p2.x + object->get_movement().x;
   } else {
-    x1 = object->get_pos().x + object->get_movement().x;
+    x1 = object->get_bbox().p1.x + object->get_movement().x;
     x2 = object->get_bbox().p2.x;
   }
   float y1, y2;
   if(object->get_movement().y >= 0) {
-    y1 = object->get_pos().y;
+    y1 = object->get_bbox().p1.y;
     y2 = object->get_bbox().p2.y + object->get_movement().y;
   } else {
-    y1 = object->get_pos().y + object->get_movement().y;
+    y1 = object->get_bbox().p1.y + object->get_movement().y;
     y2 = object->get_bbox().p2.y;
   }
 
   // test with all tiles in this rectangle
-  int starttilex = int(x1-1) / 32;
-  int starttiley = int(y1-1) / 32;
-  int max_x = int(x2+1);
+  int starttilex = int(x1) / 32;
+  int starttiley = int(y1) / 32;
+  int max_x = int(x2);
+  // the +1 is somehow needed to make characters stay on the floor
   int max_y = int(y2+1);
 
-  TilemapCollisionHit temphit, hit;
+  CollisionHit temphit;
   Rect dest = object->get_bbox();
   dest.move(object->movement);
-  hit.tileflags = 0;
-  hit.time = -1; // represents an invalid value
   for(int x = starttilex; x*32 < max_x; ++x) {
     for(int y = starttiley; y*32 < max_y; ++y) {
       const Tile* tile = solids->get_tile(x, y);
@@ -628,9 +626,7 @@ Sector::collision_tilemap(MovingObject* object, int depth)
 
         if(Collision::rectangle_aatriangle(temphit, dest, object->movement,
               triangle)) {
-          hit.tileflags |= tile->getAttributes();
           if(temphit.time > hit.time && (tile->getAttributes() & Tile::SOLID)) {
-            temphit.tileflags = hit.tileflags;
             hit = temphit;
           }
         }
@@ -638,36 +634,63 @@ Sector::collision_tilemap(MovingObject* object, int depth)
         Rect rect(x*32, y*32, (x+1)*32, (y+1)*32);
         if(Collision::rectangle_rectangle(temphit, dest,
               object->movement, rect)) {
-          hit.tileflags |= tile->getAttributes();
           if(temphit.time > hit.time && (tile->getAttributes() & Tile::SOLID)) {
-            temphit.tileflags = hit.tileflags;
             hit = temphit;
           }
         }
       }
     }
   }
+}
 
-  // did we collide at all?
-  if(hit.tileflags == 0)
-    return;
-  // call collision function
-  HitResponse response = object->collision(*solids, hit);
-  if(response == ABORT_MOVE) {
-    object->movement = Vector(0, 0);
-    return;
+uint32_t
+Sector::collision_tile_attributes(MovingObject* object) const
+{
+  /** XXX This function doesn't work correctly as it will check all tiles
+   * in the bounding box of the object movement, this might include tiles
+   * that have actually never been touched by the object
+   * (though this only occures for very fast objects...)
+   */
+  
+  // calculate rectangle where the object will move
+  float x1, x2;
+  if(object->get_movement().x >= 0) {
+    x1 = object->get_bbox().p1.x;
+    x2 = object->get_bbox().p2.x + object->get_movement().x;
+  } else {
+    x1 = object->get_bbox().p1.x + object->get_movement().x;
+    x2 = object->get_bbox().p2.x;
   }
-  if(response == FORCE_MOVE) {
-      return;
+  float y1, y2;
+  if(object->get_movement().y >= 0) {
+    y1 = object->get_bbox().p1.y;
+    y2 = object->get_bbox().p2.y + object->get_movement().y;
+  } else {
+    y1 = object->get_bbox().p1.y + object->get_movement().y;
+    y2 = object->get_bbox().p2.y;
   }
-  // move out of collision and try again
-  object->movement += hit.normal * (hit.depth + DELTA);
-  collision_tilemap(object, depth+1);
+
+  // test with all tiles in this rectangle
+  int starttilex = int(x1-1) / 32;
+  int starttiley = int(y1-1) / 32;
+  int max_x = int(x2+1);
+  int max_y = int(y2+1);
+
+  uint32_t result = 0;
+  for(int x = starttilex; x*32 < max_x; ++x) {
+    for(int y = starttiley; y*32 < max_y; ++y) {
+      const Tile* tile = solids->get_tile(x, y);
+      if(!tile)
+        continue;
+      result |= tile->getAttributes();
+    }
+  }
+
+  return result;
 }
 
 void
-Sector::collision_object(MovingObject* object1, MovingObject* object2)
+Sector::collision_object(MovingObject* object1, MovingObject* object2) const
 {
   CollisionHit hit;
   Rect dest1 = object1->get_bbox();
@@ -699,47 +722,138 @@ Sector::collision_object(MovingObject* object1, MovingObject* object2)
 }
 
 void
-Sector::collision_handler()
+Sector::handle_collisions()
 {
-#ifdef USE_GRID
-  grid->check_collisions();
-#else
-  for(std::vector<GameObject*>::iterator i = gameobjects.begin();
-      i != gameobjects.end(); ++i) {
-    GameObject* gameobject = *i;
-    if(!gameobject->is_valid())
-      continue;
-    MovingObject* movingobject = dynamic_cast<MovingObject*> (gameobject);
-    if(!movingobject)
+  // part1: COLGROUP_MOVING vs COLGROUP_STATIC and tilemap
+  //   we do this up to 4 times and have to sort all results for the smallest
+  //   one before we can continue here
+  for(MovingObjects::iterator i = moving_objects.begin();
+      i != moving_objects.end(); ++i) {
+    MovingObject* moving_object = *i;
+    if((moving_object->get_group() != COLGROUP_MOVING
+          && moving_object->get_group() != COLGROUP_MOVING_ONLY_STATIC)
+        || !moving_object->is_valid())
       continue;
-    if(movingobject->get_flags() & GameObject::FLAG_NO_COLLDET) {
-      movingobject->bbox.move(movingobject->movement);
-      movingobject->movement = Vector(0, 0);
+
+    // up to 4 tries
+    for(int t = 0; t < 4; ++t) {
+      CollisionHit hit;
+      hit.time = -1;
+      MovingObject* collided_with = NULL; 
+      
+      // collision with tilemap
+      collision_tilemap(moving_object, hit);
+    
+      // collision with other objects
+      Rect dest1 = moving_object->get_bbox();
+      dest1.move(moving_object->get_movement());
+      CollisionHit temphit;
+      
+      for(MovingObjects::iterator i2 = moving_objects.begin();
+          i2 != moving_objects.end(); ++i2) {
+        MovingObject* moving_object_2 = *i2;
+        if(moving_object_2->get_group() != COLGROUP_STATIC
+           || !moving_object_2->is_valid())
+          continue;
+        
+        Rect dest2 = moving_object_2->get_bbox();
+        dest2.move(moving_object_2->get_movement());
+        Vector movement 
+          = moving_object->get_movement() - moving_object_2->get_movement();
+        if(Collision::rectangle_rectangle(temphit, dest1, movement, dest2)
+            && temphit.time > hit.time) {
+          hit = temphit;
+          collided_with = moving_object_2;
+        }
+      }
+
+      if(hit.time < 0)
+        break;
+
+      // call collision callbacks
+      HitResponse response;
+      if(collided_with != 0) {
+        response = moving_object->collision(*collided_with, hit);
+        hit.normal *= -1;
+        collided_with->collision(*moving_object, hit);
+      } else {
+        response = moving_object->collision(*solids, hit);
+        hit.normal *= -1;
+      }
+   
+      if(response == CONTINUE) {
+        moving_object->movement += -hit.normal * (hit.depth + DELTA);
+      } else if(response == ABORT_MOVE) {
+        moving_object->movement = Vector(0, 0);
+        break;
+      } else { // force move
+        break;
+      }
+    }
+  }
+
+  // part2: COLGROUP_MOVING vs tile attributes
+  for(MovingObjects::iterator i = moving_objects.begin();
+      i != moving_objects.end(); ++i) {
+    MovingObject* moving_object = *i;
+    if((moving_object->get_group() != COLGROUP_MOVING
+          && moving_object->get_group() != COLGROUP_MOVING_ONLY_STATIC)
+        || !moving_object->is_valid())
       continue;
+
+    uint32_t tile_attributes = collision_tile_attributes(moving_object);
+    if(tile_attributes > Tile::FIRST_INTERESTING_FLAG) {
+      moving_object->collision_tile(tile_attributes);
     }
+  }
 
-    // collision with tilemap
-    if(! (movingobject->movement == Vector(0, 0)))
-      collision_tilemap(movingobject, 0);
+  // part2.5: COLGROUP_MOVING vs COLGROUP_TOUCHABLE
+  for(MovingObjects::iterator i = moving_objects.begin();
+      i != moving_objects.end(); ++i) {
+    MovingObject* moving_object = *i;
+    if(moving_object->get_group() != COLGROUP_MOVING
+        || !moving_object->is_valid())
+      continue;
 
-    // collision with other objects
-    for(std::vector<GameObject*>::iterator i2 = i+1;
-        i2 != gameobjects.end(); ++i2) {
-      GameObject* other_object = *i2;
-      if(!other_object->is_valid() 
-          || other_object->get_flags() & GameObject::FLAG_NO_COLLDET)
+    for(MovingObjects::iterator i2 = moving_objects.begin();
+        i2 != moving_objects.end(); ++i2) {
+      MovingObject* moving_object_2 = *i2;
+      if(moving_object_2->get_group() != COLGROUP_TOUCHABLE
+         || !moving_object_2->is_valid())
         continue;
-      MovingObject* movingobject2 = dynamic_cast<MovingObject*> (other_object);
-      if(!movingobject2)
+
+      collision_object(moving_object, moving_object_2);
+    } 
+  }
+
+  // part3: COLGROUP_MOVING vs COLGROUP_MOVING
+  for(MovingObjects::iterator i = moving_objects.begin();
+      i != moving_objects.end(); ++i) {
+    MovingObject* moving_object = *i;
+
+    if(moving_object->get_group() != COLGROUP_MOVING
+        || !moving_object->is_valid())
+      continue;
+
+    for(MovingObjects::iterator i2 = i+1;
+        i2 != moving_objects.end(); ++i2) {
+      MovingObject* moving_object_2 = *i2;
+      if(moving_object_2->get_group() != COLGROUP_MOVING
+         || !moving_object_2->is_valid())
         continue;
 
-      collision_object(movingobject, movingobject2);
-    }
+      collision_object(moving_object, moving_object_2);
+    }    
+  }
+
+  // apply object movement
+  for(MovingObjects::iterator i = moving_objects.begin();
+      i != moving_objects.end(); ++i) {
+    MovingObject* moving_object = *i;
 
-    movingobject->bbox.move(movingobject->get_movement());
-    movingobject->movement = Vector(0, 0);
+    moving_object->bbox.move(moving_object->get_movement());
+    moving_object->movement = Vector(0, 0);
   }
-#endif
 }
 
 bool
@@ -750,11 +864,11 @@ Sector::add_bullet(const Vector& pos, float xm, Direction dir)
   static const size_t MAX_ICE_BULLETS = 1;
 
   Bullet* new_bullet = 0;
-  if(player_status.bonus == FIRE_BONUS) {
+  if(player_status->bonus == FIRE_BONUS) {
     if(bullets.size() > MAX_FIRE_BULLETS-1)
       return false;
     new_bullet = new Bullet(pos, xm, dir, FIRE_BULLET);
-  } else if(player_status.bonus == ICE_BONUS) {
+  } else if(player_status->bonus == ICE_BONUS) {
     if(bullets.size() > MAX_ICE_BULLETS-1)
       return false;
     new_bullet = new Bullet(pos, xm, dir, ICE_BULLET);