ce94a3cf3f5234bbca3bd6dcecaa9dfb4891ed0b
[supertux.git] / src / object / tilemap.cpp
1 //  $Id$
2 //
3 //  SuperTux
4 //  Copyright (C) 2006 Matthias Braun <matze@braunis.de>
5 //
6 //  This program is free software; you can redistribute it and/or
7 //  modify it under the terms of the GNU General Public License
8 //  as published by the Free Software Foundation; either version 2
9 //  of the License, or (at your option) any later version.
10 //
11 //  This program is distributed in the hope that it will be useful,
12 //  but WITHOUT ANY WARRANTY; without even the implied warranty of
13 //  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14 //  GNU General Public License for more details.
15 //
16 //  You should have received a copy of the GNU General Public License
17 //  along with this program; if not, write to the Free Software
18 //  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
19
20 #include <config.h>
21
22 #include <cassert>
23 #include <algorithm>
24 #include <iostream>
25 #include <stdexcept>
26 #include <cmath>
27
28 #include "tilemap.hpp"
29 #include "video/drawing_context.hpp"
30 #include "level.hpp"
31 #include "tile.hpp"
32 #include "resources.hpp"
33 #include "tile_manager.hpp"
34 #include "lisp/lisp.hpp"
35 #include "lisp/writer.hpp"
36 #include "object_factory.hpp"
37 #include "main.hpp"
38 #include "log.hpp"
39
40 TileMap::TileMap()
41   : solid(false), speed(1), width(0), height(0), z_pos(0), x_offset(0), y_offset(0),
42     drawing_effect(NO_EFFECT), alpha(1.0), current_alpha(1.0), remaining_fade_time(0)
43 {
44   tilemanager = tile_manager;
45 }
46
47 TileMap::TileMap(const lisp::Lisp& reader, TileManager* new_tile_manager)
48   : solid(false), speed(1), width(-1), height(-1), z_pos(0),
49     x_offset(0), y_offset(0),
50     drawing_effect(NO_EFFECT), alpha(1.0), current_alpha(1.0),
51     remaining_fade_time(0)
52 {
53   tilemanager = new_tile_manager;
54   if(tilemanager == 0)
55     tilemanager = tile_manager;
56
57   reader.get("name", name);
58   reader.get("z-pos", z_pos);
59   reader.get("solid", solid);
60   reader.get("speed", speed);
61
62   if(solid && speed != 1) {
63     log_warning << "Speed of solid tilemap is not 1. fixing" << std::endl;
64     speed = 1;
65   }
66
67   reader.get("width", width);
68   reader.get("height", height);
69   if(width < 0 || height < 0)
70     throw std::runtime_error("Invalid/No width/height specified in tilemap.");
71
72   if(!reader.get_vector("tiles", tiles))
73     throw std::runtime_error("No tiles in tilemap.");
74
75   if(int(tiles.size()) != width*height) {
76     throw std::runtime_error("wrong number of tiles in tilemap.");
77   }
78
79   // make sure all tiles are loaded
80   for(Tiles::iterator i = tiles.begin(); i != tiles.end(); ++i)
81     tilemanager->get(*i);
82 }
83
84 TileMap::TileMap(std::string name, int z_pos, bool solid, size_t width, size_t height)
85   : solid(solid), speed(1), width(0), height(0), z_pos(z_pos),
86     x_offset(0), y_offset(0), drawing_effect(NO_EFFECT), alpha(1.0),
87     current_alpha(1.0), remaining_fade_time(0)
88 {
89   this->name = name;
90   tilemanager = tile_manager;
91
92   resize(width, height);
93 }
94
95 TileMap::~TileMap()
96 {
97 }
98
99 void
100 TileMap::write(lisp::Writer& writer)
101 {
102   writer.start_list("tilemap");
103
104   writer.write_int("z-pos", z_pos);
105
106   writer.write_bool("solid", solid);
107   writer.write_float("speed", speed);
108   writer.write_int("width", width);
109   writer.write_int("height", height);
110   writer.write_int_vector("tiles", tiles);
111
112   writer.end_list("tilemap");
113 }
114
115 void
116 TileMap::update(float elapsed_time)
117 {
118   // handle tilemap fading
119   if (current_alpha != alpha) {
120     remaining_fade_time = std::max(0.0f, remaining_fade_time - elapsed_time);
121     if (remaining_fade_time == 0.0f) {
122       current_alpha = alpha;
123     } else {
124       float amt = (alpha - current_alpha) / (remaining_fade_time / elapsed_time);
125       if (amt > 0) current_alpha = std::min(current_alpha + amt, alpha);
126       if (amt < 0) current_alpha = std::max(current_alpha + amt, alpha);
127     }
128   }
129
130   // FIXME: testing only
131   static int step = 0;
132   if (step++ > 10) {
133     step = 0;
134     if (name == "risinglava") set_y_offset(get_y_offset() - 1);
135   }
136 }
137
138 void
139 TileMap::draw(DrawingContext& context)
140 {
141   context.push_transform();
142
143   if(drawing_effect != 0) context.set_drawing_effect(drawing_effect);
144   if(current_alpha != 1.0) context.set_alpha(current_alpha);
145
146   float trans_x = roundf(context.get_translation().x);
147   float trans_y = roundf(context.get_translation().y);
148   context.set_translation(Vector(trans_x * speed, trans_y * speed));
149
150   /** if we don't round here, we'll have a 1 pixel gap on screen sometimes.
151    * I have no idea why */
152   float start_x = ((int)((roundf(context.get_translation().x) - x_offset) / 32)) * 32 + x_offset;
153   float start_y = ((int)((roundf(context.get_translation().y) - y_offset) / 32)) * 32 + y_offset;
154   float end_x = std::min(start_x + SCREEN_WIDTH + 32, float(width * 32 + x_offset));
155   float end_y = std::min(start_y + SCREEN_HEIGHT + 32, float(height * 32 + y_offset));
156   int tsx = int((start_x - x_offset) / 32); // tilestartindex x
157   int tsy = int((start_y - y_offset) / 32); // tilestartindex y
158
159   Vector pos;
160   int tx, ty;
161   for(pos.x = start_x, tx = tsx; pos.x < end_x; pos.x += 32, ++tx) {
162     for(pos.y = start_y, ty = tsy; pos.y < end_y; pos.y += 32, ++ty) {
163       if ((tx < 0) || (ty < 0)) continue;
164       const Tile* tile = tilemanager->get(tiles[ty*width + tx]);
165       assert(tile != 0);
166       tile->draw(context, pos, z_pos);
167     }
168   }
169
170   context.pop_transform();
171 }
172
173 void
174 TileMap::set(int newwidth, int newheight, const std::vector<unsigned int>&newt,
175     int new_z_pos, bool newsolid)
176 {
177   if(int(newt.size()) != newwidth * newheight)
178     throw std::runtime_error("Wrong tilecount count.");
179
180   width  = newwidth;
181   height = newheight;
182
183   tiles.resize(newt.size());
184   tiles = newt;
185
186   z_pos  = new_z_pos;
187   solid  = newsolid;
188
189   // make sure all tiles are loaded
190   for(Tiles::iterator i = tiles.begin(); i != tiles.end(); ++i)
191     tilemanager->get(*i);
192 }
193
194 void
195 TileMap::resize(int new_width, int new_height)
196 {
197   if(new_width < width) {
198     // remap tiles for new width
199     for(int y = 0; y < height && y < new_height; ++y) {
200       for(int x = 0; x < new_width; ++x) {
201         tiles[y * new_width + x] = tiles[y * width + x];
202       }
203     }
204   }
205
206   tiles.resize(new_width * new_height);
207
208   if(new_width > width) {
209     // remap tiles
210     for(int y = std::min(height, new_height)-1; y >= 0; --y) {
211       for(int x = new_width-1; x >= 0; --x) {
212         if(x >= width) {
213           tiles[y * new_width + x] = 0;
214           continue;
215         }
216
217         tiles[y * new_width + x] = tiles[y * width + x];
218       }
219     }
220   }
221
222   height = new_height;
223   width = new_width;
224 }
225
226 const Tile*
227 TileMap::get_tile(int x, int y) const
228 {
229   if(x < 0 || x >= width || y < 0 || y >= height) {
230     //log_warning << "tile outside tilemap requested" << std::endl;
231     return tilemanager->get(0);
232   }
233
234   return tilemanager->get(tiles[y*width + x]);
235 }
236
237 const Tile*
238 TileMap::get_tile_at(const Vector& pos) const
239 {
240   return get_tile(int(pos.x - x_offset)/32, int(pos.y - y_offset)/32);
241 }
242
243 void
244 TileMap::change(int x, int y, uint32_t newtile)
245 {
246   assert(x >= 0 && x < width && y >= 0 && y < height);
247   tiles[y*width + x] = newtile;
248 }
249
250 void
251 TileMap::change_at(const Vector& pos, uint32_t newtile)
252 {
253   change(int(pos.x - x_offset)/32, int(pos.y - y_offset)/32, newtile);
254 }
255
256 void
257 TileMap::change_all(uint32_t oldtile, uint32_t newtile)
258 {
259   for (size_t x = 0; x < get_width(); x++)
260     for (size_t y = 0; y < get_height(); y++) {
261       if (get_tile(x,y)->getID() == oldtile) change(x,y,newtile);
262     }
263 }
264
265 void 
266 TileMap::fade(float alpha, float seconds)
267 {
268   this->alpha = alpha;
269   this->remaining_fade_time = seconds;
270 }
271
272 IMPLEMENT_FACTORY(TileMap, "tilemap");