X-Git-Url: https://git.verplant.org/?a=blobdiff_plain;f=src%2Fworld.cpp;h=df762ad3e8cec2de2668583c841268ee24bf1515;hb=d3be1cc7c63d3f8487a26050526802bb76b14e1c;hp=fb820962516fa09c1a07bf1ddbc7a861e8725fb1;hpb=ba598f2a1c377a42c76088cc7e234917ab25e693;p=supertux.git diff --git a/src/world.cpp b/src/world.cpp index fb8209625..df762ad3e 100644 --- a/src/world.cpp +++ b/src/world.cpp @@ -1,5 +1,5 @@ -// $Id: level_subset.cpp 3118 2006-03-25 17:29:08Z sommer $ -// +// $Id$ +// // SuperTux // Copyright (C) 2006 Matthias Braun // @@ -12,7 +12,7 @@ // but WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the // GNU General Public License for more details. -// +// // You should have received a copy of the GNU General Public License // along with this program; if not, write to the Free Software // Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA @@ -28,10 +28,11 @@ #include "lisp/parser.hpp" #include "lisp/lisp.hpp" #include "physfs/physfs_stream.hpp" -#include "script_manager.hpp" -#include "scripting/wrapper_util.hpp" +#include "scripting/squirrel_util.hpp" #include "scripting/serialize.hpp" -#include "msg.hpp" +#include "log.hpp" +#include "worldmap/worldmap.hpp" +#include "mainloop.hpp" static bool has_suffix(const std::string& data, const std::string& suffix) { @@ -47,10 +48,12 @@ World::World() { is_levelset = true; hide_from_contribs = false; + sq_resetobject(&world_thread); } World::~World() { + sq_release(Scripting::global_vm, &world_thread); if(current_ == this) current_ = NULL; } @@ -59,15 +62,31 @@ void World::set_savegame_filename(const std::string& filename) { this->savegame_filename = filename; + // make sure the savegame directory exists + std::string dirname = FileSystem::dirname(filename); + if(!PHYSFS_exists(dirname.c_str())) { + if(PHYSFS_mkdir(dirname.c_str())) { + std::ostringstream msg; + msg << "Couldn't create directory for savegames '" + << dirname << "': " < root (parser.parse(filename)); + const lisp::Lisp* root = parser.parse(filename); const lisp::Lisp* info = root->get_lisp("supertux-world"); if(info == NULL) @@ -86,11 +105,11 @@ World::load(const std::string& filename) // Level info file doesn't define any levels, so read the // directory to see what we can find - - std::string path = basedir + "/"; + + std::string path = basedir; char** files = PHYSFS_enumerateFiles(path.c_str()); if(!files) { - msg_warning << "Couldn't read subset dir '" << path << "'" << std::endl; + log_warning << "Couldn't read subset dir '" << path << "'" << std::endl; return; } @@ -105,10 +124,12 @@ World::load(const std::string& filename) void World::run() { + using namespace Scripting; + current_ = this; - - // create new squirrel table for persisten game state - HSQUIRRELVM vm = ScriptManager::instance->get_vm(); + + // create new squirrel table for persistent game state + HSQUIRRELVM vm = Scripting::global_vm; sq_pushroottable(vm); sq_pushstring(vm, "state", -1); @@ -118,46 +139,66 @@ World::run() sq_pop(vm, 1); load_state(); - - std::string filename = basedir + "/world.nut"; - IFileStream in(filename); - HSQUIRRELVM new_vm = ScriptManager::instance->create_thread(); - Scripting::compile_and_run(new_vm, in, filename); + std::string filename = basedir + "/world.nut"; + try { + IFileStream in(filename); + + sq_release(global_vm, &world_thread); + world_thread = create_thread(global_vm); + compile_and_run(object_to_vm(world_thread), in, filename); + } catch(std::exception& ) { + // fallback: try to load worldmap worldmap.stwm + using namespace WorldMapNS; + main_loop->push_screen(new WorldMap(basedir + "worldmap.stwm")); + } } void World::save_state() { + using namespace Scripting; + lisp::Writer writer(savegame_filename); writer.start_list("supertux-savegame"); writer.write_int("version", 1); + using namespace WorldMapNS; + if(WorldMap::current() != NULL) { + std::ostringstream title; + title << WorldMap::current()->get_title(); + title << " (" << WorldMap::current()->solved_level_count() + << "/" << WorldMap::current()->level_count() << ")"; + writer.write_string("title", title.str()); + } + writer.start_list("tux"); player_status->write(writer); writer.end_list("tux"); writer.start_list("state"); - HSQUIRRELVM vm = ScriptManager::instance->get_vm(); - sq_pushroottable(vm); - sq_pushstring(vm, "state", -1); - if(SQ_SUCCEEDED(sq_get(vm, -2))) { - Scripting::save_squirrel_table(vm, -1, writer); - sq_pop(vm, 1); + + sq_pushroottable(global_vm); + sq_pushstring(global_vm, "state", -1); + if(SQ_SUCCEEDED(sq_get(global_vm, -2))) { + Scripting::save_squirrel_table(global_vm, -1, writer); + sq_pop(global_vm, 1); } - sq_pop(vm, 1); + sq_pop(global_vm, 1); writer.end_list("state"); - + writer.end_list("supertux-savegame"); } void World::load_state() { + using namespace Scripting; + try { lisp::Parser parser; - std::auto_ptr root (parser.parse(savegame_filename)); + const lisp::Lisp* root = parser.parse(savegame_filename); const lisp::Lisp* lisp = root->get_lisp("supertux-savegame"); if(lisp == NULL) @@ -176,21 +217,20 @@ World::load_state() const lisp::Lisp* state = lisp->get_lisp("state"); if(state == NULL) throw std::runtime_error("No state section in savegame"); - - HSQUIRRELVM vm = ScriptManager::instance->get_vm(); - sq_pushroottable(vm); - sq_pushstring(vm, "state", -1); - if(SQ_FAILED(sq_deleteslot(vm, -2, SQFalse))) - sq_pop(vm, 1); - - sq_pushstring(vm, "state", -1); - sq_newtable(vm); - Scripting::load_squirrel_table(vm, -1, state); - if(SQ_FAILED(sq_createslot(vm, -3))) + + sq_pushroottable(global_vm); + sq_pushstring(global_vm, "state", -1); + if(SQ_FAILED(sq_deleteslot(global_vm, -2, SQFalse))) + sq_pop(global_vm, 1); + + sq_pushstring(global_vm, "state", -1); + sq_newtable(global_vm); + load_squirrel_table(global_vm, -1, state); + if(SQ_FAILED(sq_createslot(global_vm, -3))) throw std::runtime_error("Couldn't create state table"); - sq_pop(vm, 1); + sq_pop(global_vm, 1); } catch(std::exception& e) { - msg_debug << "Couldn't load savegame: " << e.what() << std::endl; + log_debug << "Couldn't load savegame: " << e.what() << std::endl; } } @@ -206,3 +246,8 @@ World::get_num_levels() const return levels.size(); } +const std::string& +World::get_basedir() const +{ + return basedir; +}