4 // Copyright (C) 2006 Matthias Braun <matze@braunis.de>
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.
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.
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
35 #include "lisp/parser.hpp"
36 #include "lisp/lisp.hpp"
37 #include "lisp/list_iterator.hpp"
38 #include "lisp/writer.hpp"
40 #include "tile_set.hpp"
41 #include "tile_manager.hpp"
42 #include "object/coin.hpp"
43 #include "object/block.hpp"
44 #include "trigger/secretarea_trigger.hpp"
49 : name("noname"), author("Mr. X"), tileset(NULL), free_tileset(false)
55 for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
62 Level::load(const std::string& filepath)
67 const lisp::Lisp* root = parser.parse(filepath);
69 const lisp::Lisp* level = root->get_lisp("supertux-level");
71 throw std::runtime_error("file is not a supertux-level file.");
74 level->get("version", version);
76 log_info << "level uses old format: version 1" << std::endl;
77 tileset = tile_manager->get_tileset("images/tiles.strf");
78 load_old_format(*level);
82 const lisp::Lisp* tilesets_lisp = level->get_lisp("tilesets");
83 if(tilesets_lisp != NULL) {
84 tileset = tile_manager->parse_tileset_definition(*tilesets_lisp);
87 std::string tileset_name;
88 if(level->get("tileset", tileset_name)) {
90 log_warning << "multiple tilesets specified in level" << std::endl;
92 tileset = tile_manager->get_tileset(tileset_name);
95 /* load default tileset */
97 tileset = tile_manager->get_tileset("images/tiles.strf");
99 current_tileset = tileset;
104 lisp::ListIterator iter(level);
106 const std::string& token = iter.item();
107 if(token == "version") {
108 iter.value()->get(version);
110 log_warning << "level format newer than application" << std::endl;
112 } else if(token == "tileset" || token == "tilesets") {
114 } else if(token == "name") {
115 iter.value()->get(name);
116 } else if(token == "author") {
117 iter.value()->get(author);
118 } else if(token == "contact") {
119 iter.value()->get(contact);
120 } else if(token == "license") {
121 iter.value()->get(license);
122 } else if(token == "on-menukey-script") {
123 iter.value()->get(on_menukey_script);
124 } else if(token == "sector") {
125 Sector* sector = new Sector(this);
126 sector->parse(*(iter.lisp()));
129 log_warning << "Unknown token '" << token << "' in level file" << std::endl;
134 log_warning << "The level author did not specify a license for this level. You might not be allowed to share it." << std::endl;
137 } catch(std::exception& e) {
138 std::stringstream msg;
139 msg << "Problem when reading level '" << filepath << "': " << e.what();
140 throw std::runtime_error(msg.str());
143 current_tileset = NULL;
147 Level::load_old_format(const lisp::Lisp& reader)
149 reader.get("name", name);
150 reader.get("author", author);
152 Sector* sector = new Sector(this);
153 sector->parse_old_format(reader);
158 Level::save(const std::string& filename)
160 lisp::Writer* writer = new lisp::Writer(filename);
162 writer->write_comment("Level made using SuperTux's built-in Level Editor");
164 writer->start_list("supertux-level");
167 writer->write("version", version);
169 writer->write("name", name, true);
170 writer->write("author", author);
171 if(on_menukey_script != "")
172 writer->write("on-menukey-script", on_menukey_script);
174 for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i) {
176 writer->start_list("sector");
177 sector->write(*writer);
178 writer->end_list("sector");
181 writer->end_list("supertux-level");
187 Level::add_sector(Sector* sector)
189 Sector* test = get_sector(sector->get_name());
191 throw std::runtime_error("Trying to add 2 sectors with same name");
193 sectors.push_back(sector);
197 Level::get_sector(const std::string& name)
199 for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i) {
201 if(sector->get_name() == name)
209 Level::get_sector_count()
211 return sectors.size();
215 Level::get_sector(size_t num)
217 return sectors.at(num);
221 Level::get_total_coins()
224 for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i) {
226 for(Sector::GameObjects::iterator o = sector->gameobjects.begin();
227 o != sector->gameobjects.end(); ++o) {
228 Coin* coin = dynamic_cast<Coin*> (*o);
234 BonusBlock *block = dynamic_cast<BonusBlock*> (*o);
237 if (block->contents == BonusBlock::CONTENT_COIN)
243 // FIXME: do we want this? q.v. src/object/oneup.cpp
244 else if (block->contents == BonusBlock::CONTENT_1UP)
257 Level::get_total_badguys()
259 int total_badguys = 0;
260 for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
261 total_badguys += (*i)->get_total_badguys();
262 return total_badguys;
266 Level::get_total_secrets()
268 int total_secrets = 0;
269 for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
270 total_secrets += (*i)->get_total_count<SecretAreaTrigger>();
271 return total_secrets;