386cd3f1179cb340c9d22dcece08475452be28a4
[supertux.git] / src / supertux / level.cpp
1 //  SuperTux
2 //  Copyright (C) 2006 Matthias Braun <matze@braunis.de>
3 //
4 //  This program is free software: you can redistribute it and/or modify
5 //  it under the terms of the GNU General Public License as published by
6 //  the Free Software Foundation, either version 3 of the License, or
7 //  (at your option) any later version.
8 //
9 //  This program is distributed in the hope that it will be useful,
10 //  but WITHOUT ANY WARRANTY; without even the implied warranty of
11 //  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12 //  GNU General Public License for more details.
13 //
14 //  You should have received a copy of the GNU General Public License
15 //  along with this program.  If not, see <http://www.gnu.org/licenses/>.
16
17 #include "supertux/level.hpp"
18
19 #include "badguy/goldbomb.hpp"
20 #include "lisp/list_iterator.hpp"
21 #include "lisp/parser.hpp"
22 #include "object/bonus_block.hpp"
23 #include "object/coin.hpp"
24 #include "supertux/sector.hpp"
25 #include "supertux/tile_manager.hpp"
26 #include "supertux/tile_set.hpp"
27 #include "trigger/secretarea_trigger.hpp"
28
29 #include <sstream>
30 #include <stdexcept>
31
32 using namespace std;
33
34 Level::Level() :
35   name("noname"),
36   author("Mr. X"),
37   contact(),
38   license(),
39   filename(),
40   on_menukey_script(),
41   sectors(),
42   stats(),
43   target_time(),
44   tileset(NULL),
45   free_tileset(false)
46 {
47 }
48
49 Level::~Level()
50 {
51   for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
52     delete *i;
53   if(free_tileset)
54     delete tileset;
55 }
56
57 void
58 Level::load(const std::string& filepath)
59 {
60   try {
61     filename = filepath;
62     lisp::Parser parser;
63     const lisp::Lisp* root = parser.parse(filepath);
64
65     const lisp::Lisp* level = root->get_lisp("supertux-level");
66     if(!level)
67       throw std::runtime_error("file is not a supertux-level file.");
68
69     int version = 1;
70     level->get("version", version);
71     if(version == 1) {
72       log_info << "[" <<  filepath << "] level uses old format: version 1" << std::endl;
73       tileset = TileManager::current()->get_tileset("images/tiles.strf");
74       load_old_format(*level);
75       return;
76     }
77
78     const lisp::Lisp* tilesets_lisp = level->get_lisp("tilesets");
79     if(tilesets_lisp != NULL) {
80       tileset      = TileManager::current()->parse_tileset_definition(*tilesets_lisp).release();
81       free_tileset = true;
82     }
83     std::string tileset_name;
84     if(level->get("tileset", tileset_name)) {
85       if(tileset != NULL) {
86         log_warning << "[" <<  filepath << "] multiple tilesets specified in level" << std::endl;
87       } else {
88         tileset = TileManager::current()->get_tileset(tileset_name);
89       }
90     }
91     /* load default tileset */
92     if(tileset == NULL) {
93       tileset = TileManager::current()->get_tileset("images/tiles.strf");
94     }
95     current_tileset = tileset;
96
97     contact = "";
98     license = "";
99
100     lisp::ListIterator iter(level);
101     while(iter.next()) {
102       const std::string& token = iter.item();
103       if(token == "version") {
104         iter.value()->get(version);
105         if(version > 2) {
106           log_warning << "[" <<  filepath << "] level format newer than application" << std::endl;
107         }
108       } else if(token == "tileset" || token == "tilesets") {
109         continue;
110       } else if(token == "name") {
111         iter.value()->get(name);
112       } else if(token == "author") {
113         iter.value()->get(author);
114       } else if(token == "contact") {
115         iter.value()->get(contact);
116       } else if(token == "license") {
117         iter.value()->get(license);
118       } else if(token == "on-menukey-script") {
119         iter.value()->get(on_menukey_script);
120       } else if(token == "sector") {
121         Sector* sector = new Sector(this);
122         sector->parse(*(iter.lisp()));
123         add_sector(sector);
124       } else if(token == "target-time") {
125         iter.value()->get(target_time);
126       } else {
127         log_warning << "[" <<  filepath << "] Unknown token '" << token << "' in level file" << std::endl;
128       }
129     }
130
131     if (license == "") {
132       log_warning << "[" <<  filepath << "] The level author \"" << author << "\" did not specify a license for this level \"" << name << "\". You might not be allowed to share it." << std::endl;
133     }
134   } catch(std::exception& e) {
135     std::stringstream msg;
136     msg << "Problem when reading level '" << filepath << "': " << e.what();
137     throw std::runtime_error(msg.str());
138   }
139
140   current_tileset = NULL;
141 }
142
143 void
144 Level::load_old_format(const Reader& reader)
145 {
146   reader.get("name", name);
147   reader.get("author", author);
148
149   Sector* sector = new Sector(this);
150   sector->parse_old_format(reader);
151   add_sector(sector);
152 }
153
154 void
155 Level::add_sector(Sector* sector)
156 {
157   Sector* test = get_sector(sector->get_name());
158   if(test != 0) {
159     throw std::runtime_error("Trying to add 2 sectors with same name");
160   }
161   sectors.push_back(sector);
162 }
163
164 Sector*
165 Level::get_sector(const std::string& name_)
166 {
167   for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i) {
168     Sector* sector = *i;
169     if(sector->get_name() == name_)
170       return sector;
171   }
172
173   return 0;
174 }
175
176 size_t
177 Level::get_sector_count()
178 {
179   return sectors.size();
180 }
181
182 Sector*
183 Level::get_sector(size_t num)
184 {
185   return sectors.at(num);
186 }
187
188 int
189 Level::get_total_coins()
190 {
191   int total_coins = 0;
192   for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i) {
193     Sector* sector = *i;
194     for(auto o = sector->gameobjects.begin(); o != sector->gameobjects.end(); ++o) {
195       Coin* coin = dynamic_cast<Coin*>(o->get());
196       if(coin)
197       {
198         total_coins++;
199         continue;
200       }
201       BonusBlock *block = dynamic_cast<BonusBlock*>(o->get());
202       if(block)
203       {
204         if (block->contents == BonusBlock::CONTENT_COIN)
205         {
206           total_coins += block->hit_counter;
207           continue;
208         } else if (block->contents == BonusBlock::CONTENT_RAIN) {
209           total_coins += 10;
210           continue;
211         } else if (block->contents == BonusBlock::CONTENT_EXPLODE) {
212           total_coins += 10;
213           continue;
214         }
215       }
216       GoldBomb *goldbomb = dynamic_cast<GoldBomb*>(o->get());
217       if(goldbomb)
218         total_coins += 10;
219     }
220   }
221   return total_coins;
222 }
223
224 int
225 Level::get_total_badguys()
226 {
227   int total_badguys = 0;
228   for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
229     total_badguys += (*i)->get_total_badguys();
230   return total_badguys;
231 }
232
233 int
234 Level::get_total_secrets()
235 {
236   int total_secrets = 0;
237   for(auto i = sectors.begin(); i != sectors.end(); ++i)
238     total_secrets += (*i)->get_total_count<SecretAreaTrigger>();
239   return total_secrets;
240 }
241
242 /* EOF */