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   tileset(NULL),
  44   free_tileset(false)
  45 {
  46 }
  47
  48 Level::~Level()
  49 {
  50   for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
  51     delete *i;
  52   if(free_tileset)
  53     delete tileset;
  54 }
  55
  56 void
  57 Level::load(const std::string& filepath)
  58 {
  59   try {
  60     filename = filepath;
  61     lisp::Parser parser;
  62     const lisp::Lisp* root = parser.parse(filepath);
  63
  64     const lisp::Lisp* level = root->get_lisp("supertux-level");
  65     if(!level)
  66       throw std::runtime_error("file is not a supertux-level file.");
  67
  68     int version = 1;
  69     level->get("version", version);
  70     if(version == 1) {
  71       log_info << "level uses old format: version 1" << std::endl;
  72       tileset = tile_manager->get_tileset("images/tiles.strf");
  73       load_old_format(*level);
  74       return;
  75     }
  76
  77     const lisp::Lisp* tilesets_lisp = level->get_lisp("tilesets");
  78     if(tilesets_lisp != NULL) {
  79       tileset      = tile_manager->parse_tileset_definition(*tilesets_lisp);
  80       free_tileset = true;
  81     }
  82     std::string tileset_name;
  83     if(level->get("tileset", tileset_name)) {
  84       if(tileset != NULL) {
  85         log_warning << "multiple tilesets specified in level" << std::endl;
  86       } else {
  87         tileset = tile_manager->get_tileset(tileset_name);
  88       }
  89     }
  90     /* load default tileset */
  91     if(tileset == NULL) {
  92       tileset = tile_manager->get_tileset("images/tiles.strf");
  93     }
  94     current_tileset = tileset;
  95
  96     contact = "";
  97     license = "";
  98
  99     lisp::ListIterator iter(level);
 100     while(iter.next()) {
 101       const std::string& token = iter.item();
 102       if(token == "version") {
 103         iter.value()->get(version);
 104         if(version > 2) {
 105           log_warning << "level format newer than application" << std::endl;
 106         }
 107       } else if(token == "tileset" || token == "tilesets") {
 108         continue;
 109       } else if(token == "name") {
 110         iter.value()->get(name);
 111       } else if(token == "author") {
 112         iter.value()->get(author);
 113       } else if(token == "contact") {
 114         iter.value()->get(contact);
 115       } else if(token == "license") {
 116         iter.value()->get(license);
 117       } else if(token == "on-menukey-script") {
 118         iter.value()->get(on_menukey_script);
 119       } else if(token == "sector") {
 120         Sector* sector = new Sector(this);
 121         sector->parse(*(iter.lisp()));
 122         add_sector(sector);
 123       } else {
 124         log_warning << "Unknown token '" << token << "' in level file" << std::endl;
 125       }
 126     }
 127
 128     if (license == "") {
 129       log_warning << "The level author did not specify a license for this level. You might not be allowed to share it." << std::endl;
 130
 131     }
 132   } catch(std::exception& e) {
 133     std::stringstream msg;
 134     msg << "Problem when reading level '" << filepath << "': " << e.what();
 135     throw std::runtime_error(msg.str());
 136   }
 137
 138   current_tileset = NULL;
 139 }
 140
 141 void
 142 Level::load_old_format(const Reader& reader)
 143 {
 144   reader.get("name", name);
 145   reader.get("author", author);
 146
 147   Sector* sector = new Sector(this);
 148   sector->parse_old_format(reader);
 149   add_sector(sector);
 150 }
 151
 152 void
 153 Level::add_sector(Sector* sector)
 154 {
 155   Sector* test = get_sector(sector->get_name());
 156   if(test != 0) {
 157     throw std::runtime_error("Trying to add 2 sectors with same name");
 158   }
 159   sectors.push_back(sector);
 160 }
 161
 162 Sector*
 163 Level::get_sector(const std::string& name)
 164 {
 165   for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i) {
 166     Sector* sector = *i;
 167     if(sector->get_name() == name)
 168       return sector;
 169   }
 170
 171   return 0;
 172 }
 173
 174 size_t
 175 Level::get_sector_count()
 176 {
 177   return sectors.size();
 178 }
 179
 180 Sector*
 181 Level::get_sector(size_t num)
 182 {
 183   return sectors.at(num);
 184 }
 185
 186 int
 187 Level::get_total_coins()
 188 {
 189   int total_coins = 0;
 190   for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i) {
 191     Sector* sector = *i;
 192     for(Sector::GameObjects::iterator o = sector->gameobjects.begin();
 193         o != sector->gameobjects.end(); ++o) {
 194       Coin* coin = dynamic_cast<Coin*> (*o);
 195       if(coin)
 196       {
 197         total_coins++;
 198         continue;
 199       }
 200       BonusBlock *block = dynamic_cast<BonusBlock*> (*o);
 201       if(block)
 202       {
 203         if (block->contents == BonusBlock::CONTENT_COIN)
 204         {
 205           total_coins += block->hit_counter;
 206           continue;
 207         } else if (block->contents == BonusBlock::CONTENT_RAIN) {
 208           total_coins += 10;
 209           continue;
 210         } else if (block->contents == BonusBlock::CONTENT_EXPLODE) {
 211           total_coins += 10;
 212           continue;
 213         }
 214       }
 215       GoldBomb *goldbomb = dynamic_cast<GoldBomb*> (*o);
 216       if(goldbomb)
 217         total_coins += 10;
 218     }
 219   }
 220   return total_coins;
 221 }
 222
 223 int
 224 Level::get_total_badguys()
 225 {
 226   int total_badguys = 0;
 227   for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
 228     total_badguys += (*i)->get_total_badguys();
 229   return total_badguys;
 230 }
 231
 232 int
 233 Level::get_total_secrets()
 234 {
 235   int total_secrets = 0;
 236   for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
 237     total_secrets += (*i)->get_total_count<SecretAreaTrigger>();
 238   return total_secrets;
 239 }
 240
 241 /* EOF */