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
  21 #include <map>
  22 #include <cstdlib>
  23 #include <cstdio>
  24 #include <cstring>
  25 #include <iostream>
  26 #include <fstream>
  27 #include <stdexcept>
  28
  29 #include "globals.h"
  30 #include "setup.h"
  31 #include "camera.h"
  32 #include "screen/screen.h"
  33 #include "level.h"
  34 #include "physic.h"
  35 #include "scene.h"
  36 #include "sector.h"
  37 #include "tile.h"
  38 #include "lispreader.h"
  39 #include "resources.h"
  40 #include "gameobjs.h"
  41 #include "lispwriter.h"
  42
  43 using namespace std;
  44
  45 Level::Level()
  46   : name("noname"), author("mr. x"), time_left(500)
  47 {
  48 }
  49
  50 void
  51 Level::load(const std::string& filename)
  52 {
  53   LispReader* level = LispReader::load(filename, "supertux-level");
  54
  55   int version = 1;
  56   level->read_int("version", version);
  57   if(version == 1) {
  58     load_old_format(*level);
  59     delete level;
  60     return;
  61   }
  62
  63   for(lisp_object_t* cur = level->get_lisp(); !lisp_nil_p(cur);
  64       cur = lisp_cdr(cur)) {
  65     std::string token = lisp_symbol(lisp_car(lisp_car(cur)));
  66     lisp_object_t* data = lisp_car(lisp_cdr(lisp_car(cur)));
  67     LispReader reader(lisp_cdr(lisp_car(cur)));
  68
  69     if(token == "name") {
  70       name = lisp_string(data);
  71     } else if(token == "author") {
  72       author = lisp_string(data);
  73     } else if(token == "time") {
  74       time_left = lisp_integer(data);
  75     } else if(token == "sector") {
  76       Sector* sector = new Sector;
  77       sector->parse(reader);
  78       add_sector(sector);
  79     } else {
  80       std::cerr << "Unknown token '" << token << "' in level file.\n";
  81       continue;
  82     }
  83   }
  84
  85   delete level;
  86 }
  87
  88 void
  89 Level::load_old_format(LispReader& reader)
  90 {
  91   reader.read_string("name", name);
  92   reader.read_string("author", author);
  93   reader.read_int("time", time_left);
  94
  95   Sector* sector = new Sector;
  96   sector->parse_old_format(reader);
  97   add_sector(sector);
  98 }
  99
 100 void
 101 Level::save(const std::string& filename)
 102 {
 103 #if 0
 104   LispReader* level = LispReader::load(filename, "supertux-level");
 105
 106   int version = 1;
 107   level->read_int("version", version);
 108   if(version == 1) {
 109     load_old_format(*level);
 110     return;
 111   }
 112
 113   for(lisp_object_t* cur = level->get_lisp(); !lisp_nil_p(cur);
 114       cur = lisp_cdr(cur)) {
 115     std::string token = lisp_symbol(lisp_car(lisp_car(cur)));
 116     lisp_object_t* data = lisp_car(lisp_cdr(lisp_car(cur)));
 117     LispReader reader(lisp_cdr(lisp_car(cur)));
 118
 119     if(token == "name") {
 120       name = lisp_string(data);
 121     } else if(token == "author") {
 122       author = lisp_string(data);
 123     } else if(token == "time") {
 124       time_left = lisp_integer(data);
 125     } else if(token == "sector") {
 126       Sector* sector = new Sector;
 127       sector->parse(reader);
 128       add_sector(sector);
 129     } else {
 130       std::cerr << "Unknown token '" << token << "' in level file.\n";
 131       continue;
 132     }
 133   }
 134
 135   delete level;
 136 #endif
 137 }
 138
 139 Level::~Level()
 140 {
 141   for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
 142     delete i->second;
 143 }
 144
 145 void
 146 Level::add_sector(Sector* sector)
 147 {
 148   sectors.insert(std::make_pair(sector->get_name(), sector));
 149 }
 150
 151 Sector*
 152 Level::get_sector(const std::string& name)
 153 {
 154   Sectors::iterator i = sectors.find(name);
 155   if(i == sectors.end())
 156     return 0;
 157
 158   return i->second;
 159 }
 160