src/level.cpp

   1 //  $Id$
   2 //
   3 //  SuperTux
   4 //  Copyright (C) 2004 SuperTux Development Team, see AUTHORS for details
   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
  19 //  02111-1307, USA.
  20 #include <config.h>
  21
  22 #include <map>
  23 #include <cstdlib>
  24 #include <cstdio>
  25 #include <cstring>
  26 #include <iostream>
  27 #include <fstream>
  28 #include <sstream>
  29 #include <memory>
  30 #include <stdexcept>
  31
  32 #include "video/screen.hpp"
  33 #include "msg.hpp"
  34 #include "lisp/parser.hpp"
  35 #include "lisp/lisp.hpp"
  36 #include "lisp/list_iterator.hpp"
  37 #include "lisp/writer.hpp"
  38 #include "level.hpp"
  39 #include "physic.hpp"
  40 #include "sector.hpp"
  41 #include "tile.hpp"
  42 #include "resources.hpp"
  43 #include "file_system.hpp"
  44 #include "object/gameobjs.hpp"
  45 #include "object/camera.hpp"
  46 #include "object/tilemap.hpp"
  47 #include "object/coin.hpp"
  48
  49 // test
  50 #include "flip_level_transformer.hpp"
  51
  52 using namespace std;
  53
  54 Level::Level()
  55   : name("noname"), author("Mr. X"), extro_music("leveldone.ogg"), extro_length(7.0)
  56 {
  57 }
  58
  59 void
  60 Level::load(const std::string& filepath)
  61 {
  62   try {
  63     lisp::Parser parser;
  64     std::auto_ptr<lisp::Lisp> root (parser.parse(filepath));
  65
  66     const lisp::Lisp* level = root->get_lisp("supertux-level");
  67     if(!level)
  68       throw std::runtime_error("file is not a supertux-level file.");
  69
  70     int version = 1;
  71     level->get("version", version);
  72     if(version == 1) {
  73       load_old_format(*level);
  74       return;
  75     }
  76
  77     lisp::ListIterator iter(level);
  78     while(iter.next()) {
  79       const std::string& token = iter.item();
  80       if(token == "version") {
  81         iter.value()->get(version);
  82         if(version > 2) {
  83           msg_warning("level format newer than application");
  84         }
  85       } else if(token == "name") {
  86         iter.value()->get(name);
  87       } else if(token == "author") {
  88         iter.value()->get(author);
  89       } else if(token == "extro") {
  90         const lisp::Lisp* ext = iter.lisp();
  91         lisp::ListIterator ext_iter(ext);
  92         while(ext_iter.next()) {
  93           const std::string& ext_token = ext_iter.item();
  94           if(ext_token == "music") {
  95             ext_iter.value()->get(extro_music);
  96           } else if(ext_token == "length") {
  97             ext_iter.value()->get(extro_length);
  98           }
  99         }
 100       } else if(token == "sector") {
 101         Sector* sector = new Sector;
 102         sector->parse(*(iter.lisp()));
 103         add_sector(sector);
 104       } else {
 105         msg_warning("Unknown token '" << token << "' in level file");
 106         continue;
 107       }
 108     }
 109
 110   } catch(std::exception& e) {
 111     std::stringstream msg;
 112     msg << "Problem when reading level '" << filepath << "': " << e.what();
 113     throw std::runtime_error(msg.str());
 114   }
 115 }
 116
 117 void
 118 Level::load_old_format(const lisp::Lisp& reader)
 119 {
 120   reader.get("name", name);
 121   reader.get("author", author);
 122
 123   Sector* sector = new Sector;
 124   sector->parse_old_format(reader);
 125   add_sector(sector);
 126 }
 127
 128 void
 129 Level::save(const std::string& filename)
 130 {
 131   lisp::Writer* writer = new lisp::Writer(filename);
 132
 133   writer->write_comment("Level made using SuperTux's built-in Level Editor");
 134
 135   writer->start_list("supertux-level");
 136
 137   int version = 2;
 138   writer->write_int("version", version);
 139
 140   writer->write_string("name", name, true);
 141   writer->write_string("author", author);
 142
 143   for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i) {
 144     Sector* sector = *i;
 145     writer->start_list("sector");
 146     sector->write(*writer);
 147     writer->end_list("sector");
 148   }
 149
 150   writer->end_list("supertux-level");
 151
 152   delete writer;
 153 }
 154
 155 Level::~Level()
 156 {
 157   for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
 158     delete *i;
 159 }
 160
 161 void
 162 Level::add_sector(Sector* sector)
 163 {
 164   Sector* test = get_sector(sector->get_name());
 165   if(test != 0) {
 166     throw std::runtime_error("Trying to add 2 sectors with same name");
 167   }
 168   sectors.push_back(sector);
 169 }
 170
 171 Sector*
 172 Level::get_sector(const std::string& name)
 173 {
 174   for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i) {
 175     Sector* sector = *i;
 176     if(sector->get_name() == name)
 177       return sector;
 178   }
 179
 180   return 0;
 181 }
 182
 183 size_t
 184 Level::get_sector_count()
 185 {
 186   return sectors.size();
 187 }
 188
 189 Sector*
 190 Level::get_sector(size_t num)
 191 {
 192   return sectors.at(num);
 193 }
 194
 195 int
 196 Level::get_total_badguys()
 197 {
 198   int total_badguys = 0;
 199   for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
 200     total_badguys += (*i)->get_total_badguys();
 201   return total_badguys;
 202 }
 203
 204 int
 205 Level::get_total_coins()
 206 {
 207   // FIXME not really correct as coins can also be inside blocks...
 208   int total_coins = 0;
 209   for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i) {
 210     Sector* sector = *i;
 211     for(Sector::GameObjects::iterator o = sector->gameobjects.begin();
 212         o != sector->gameobjects.end(); ++o) {
 213       Coin* coin = dynamic_cast<Coin*> (*o);
 214       if(coin)
 215         total_coins++;
 216     }
 217   }
 218   return total_coins;
 219 }
 220