X-Git-Url: https://git.octo.it/?a=blobdiff_plain;f=src%2Flevel.cpp;h=6c87b816e32e4c5e96a0103e96aa6be824fe346b;hb=b158cdbc7139bcc35fd4c37a5cf640bf9f744998;hp=3a55398840c5b0b2f414c4c1ebd5e553b265730f;hpb=61208b33a84be619f69d22199a9da9b785e7f5c6;p=supertux.git diff --git a/src/level.cpp b/src/level.cpp index 3a5539884..6c87b816e 100644 --- a/src/level.cpp +++ b/src/level.cpp @@ -17,674 +17,203 @@ // along with this program; if not, write to the Free Software // Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA // 02111-1307, USA. +#include #include -#include -#include -#include +#include +#include +#include #include #include -#include "globals.h" -#include "setup.h" -#include "screen.h" -#include "level.h" -#include "physic.h" -#include "scene.h" -#include "tile.h" -#include "lispreader.h" -#include "resources.h" -#include "music_manager.h" -#include "gameobjs.h" -#include "world.h" -#include "lispwriter.h" +#include +#include +#include + +#include "video/screen.hpp" +#include "lisp/parser.hpp" +#include "lisp/lisp.hpp" +#include "lisp/list_iterator.hpp" +#include "lisp/writer.hpp" +#include "level.hpp" +#include "physic.hpp" +#include "sector.hpp" +#include "tile.hpp" +#include "resources.hpp" +#include "file_system.hpp" +#include "object/gameobjs.hpp" +#include "object/camera.hpp" +#include "object/tilemap.hpp" +#include "object/coin.hpp" + +// test +#include "flip_level_transformer.hpp" using namespace std; -LevelSubset::LevelSubset() - : image(0), levels(0) +Level::Level() + : name("noname"), author("Mr. X"), extro_music("leveldone.ogg"), extro_length(7.0) { } -LevelSubset::~LevelSubset() +void +Level::load(const std::string& filepath) { - delete image; -} + try { + lisp::Parser parser; + std::auto_ptr root (parser.parse(filepath)); -void LevelSubset::create(const std::string& subset_name) -{ - Level new_lev; - LevelSubset new_subset; - new_subset.name = subset_name; - new_subset.title = "Unknown Title"; - new_subset.description = "No description so far."; - new_subset.save(); - new_lev.init_defaults(); - new_lev.save(subset_name, 1, 0); -} + const lisp::Lisp* level = root->get_lisp("supertux-level"); + if(!level) + throw std::runtime_error("file is not a supertux-level file."); -void LevelSubset::parse (lisp_object_t* cursor) -{ - while(!lisp_nil_p(cursor)) - { - lisp_object_t* cur = lisp_car(cursor); - char *s; + int version = 1; + level->get("version", version); + if(version == 1) { + load_old_format(*level); + return; + } - if (!lisp_cons_p(cur) || !lisp_symbol_p (lisp_car(cur))) - { - printf("Not good"); + lisp::ListIterator iter(level); + while(iter.next()) { + const std::string& token = iter.item(); + if(token == "version") { + iter.value()->get(version); + if(version > 2) { + std::cerr << "Warning: level format newer than application.\n"; } - else - { - if (strcmp(lisp_symbol(lisp_car(cur)), "title") == 0) - { - if(( s = lisp_string(lisp_car(lisp_cdr(cur)))) != NULL) - { - title = s; - } - } - else if (strcmp(lisp_symbol(lisp_car(cur)), "description") == 0) - { - if(( s = lisp_string(lisp_car(lisp_cdr(cur)))) != NULL) - { - description = s; - } - } + } else if(token == "name") { + iter.value()->get(name); + } else if(token == "author") { + iter.value()->get(author); + } else if(token == "extro") { + const lisp::Lisp* ext = iter.lisp(); + lisp::ListIterator ext_iter(ext); + while(ext_iter.next()) { + const std::string& ext_token = ext_iter.item(); + if(ext_token == "music") { + ext_iter.value()->get(extro_music); + } else if(ext_token == "length") { + ext_iter.value()->get(extro_length); + } } - cursor = lisp_cdr (cursor); + } else if(token == "sector") { + Sector* sector = new Sector; + sector->parse(*(iter.lisp())); + add_sector(sector); + } else { + std::cerr << "Unknown token '" << token << "' in level file.\n"; + continue; + } } + + } catch(std::exception& e) { + std::stringstream msg; + msg << "Problem when reading level '" << filepath << "': " << e.what(); + throw std::runtime_error(msg.str()); + } } -void LevelSubset::load(char *subset) +void +Level::load_old_format(const lisp::Lisp& reader) { - FILE* fi; - char filename[1024]; - char str[1024]; - int i; - lisp_object_t* root_obj = 0; - - name = subset; - - snprintf(filename, 1024, "%s/levels/%s/info", st_dir, subset); - if(!faccessible(filename)) - snprintf(filename, 1024, "%s/levels/%s/info", datadir.c_str(), subset); - if(faccessible(filename)) - { - fi = fopen(filename, "r"); - if (fi == NULL) - { - perror(filename); - } - lisp_stream_t stream; - lisp_stream_init_file (&stream, fi); - root_obj = lisp_read (&stream); - - if (root_obj->type == LISP_TYPE_EOF || root_obj->type == LISP_TYPE_PARSE_ERROR) - { - printf("World: Parse Error in file %s", filename); - } - - lisp_object_t* cur = lisp_car(root_obj); + reader.get("name", name); + reader.get("author", author); - if (!lisp_symbol_p (cur)) - { - printf("World: Read error in %s",filename); - } - - if (strcmp(lisp_symbol(cur), "supertux-level-subset") == 0) - { - parse(lisp_cdr(root_obj)); - - } - - lisp_free(root_obj); - fclose(fi); - - snprintf(str, 1024, "%s.png", filename); - if(faccessible(str)) - { - delete image; - image = new Surface(str,IGNORE_ALPHA); - } - else - { - snprintf(filename, 1024, "%s/images/status/level-subset-info.png", datadir.c_str()); - delete image; - image = new Surface(filename,IGNORE_ALPHA); - } - } - - for(i=1; i != -1; ++i) - { - /* Get the number of levels in this subset */ - snprintf(filename, 1024, "%s/levels/%s/level%d.stl", st_dir, subset,i); - if(!faccessible(filename)) - { - snprintf(filename, 1024, "%s/levels/%s/level%d.stl", datadir.c_str(), subset,i); - if(!faccessible(filename)) - break; - } - } - levels = --i; + Sector* sector = new Sector; + sector->parse_old_format(reader); + add_sector(sector); } -void LevelSubset::save() +void +Level::save(const std::string& filename) { - FILE* fi; - string filename; + lisp::Writer* writer = new lisp::Writer(filename); - /* Save data file: */ - filename = "/levels/" + name + "/"; + writer->write_comment("Level made using SuperTux's built-in Level Editor"); - fcreatedir(filename.c_str()); - filename = string(st_dir) + "/levels/" + name + "/info"; - if(!fwriteable(filename.c_str())) - filename = datadir + "/levels/" + name + "/info"; - if(fwriteable(filename.c_str())) - { - fi = fopen(filename.c_str(), "w"); - if (fi == NULL) - { - perror(filename.c_str()); - } + writer->start_list("supertux-level"); - /* Write header: */ - fprintf(fi,";SuperTux-Level-Subset\n"); - fprintf(fi,"(supertux-level-subset\n"); + int version = 2; + writer->write_int("version", version); - /* Save title info: */ - fprintf(fi," (title \"%s\")\n", title.c_str()); + writer->write_string("name", name, true); + writer->write_string("author", author); - /* Save the description: */ - fprintf(fi," (description \"%s\")\n", description.c_str()); + for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i) { + Sector* sector = *i; + writer->start_list("sector"); + sector->write(*writer); + writer->end_list("sector"); + } - fprintf( fi,")"); - fclose(fi); + writer->end_list("supertux-level"); - } -} - -Level::Level() - : img_bkgd(0) -{ - init_defaults(); + delete writer; } Level::~Level() { - delete img_bkgd; + for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i) + delete *i; } void -Level::init_defaults() -{ - name = "UnNamed"; - author = "UnNamed"; - song_title = "Mortimers_chipdisko.mod"; - bkgd_image = "arctis.jpg"; - width = 0; - height = 0; - start_pos_x = 100; - start_pos_y = 170; - time_left = 100; - gravity = 10.; - back_scrolling = false; - hor_autoscroll_speed = 0; - bkgd_speed = 50; - bkgd_top.red = 0; - bkgd_top.green = 0; - bkgd_top.blue = 0; - bkgd_bottom.red = 255; - bkgd_bottom.green = 255; - bkgd_bottom.blue = 255; - - resize(21, 19); -} - -int -Level::load(const std::string& subset, int level, World* world) -{ - char filename[1024]; - - // Load data file: - snprintf(filename, 1024, "%s/levels/%s/level%d.stl", st_dir, subset.c_str(), level); - if(!faccessible(filename)) - snprintf(filename, 1024, "%s/levels/%s/level%d.stl", datadir.c_str(), subset.c_str(), level); - - return load(filename, world); -} - -int -Level::load(const std::string& filename, World* world) -{ - lisp_object_t* root_obj = lisp_read_from_file(filename); - if (!root_obj) - { - std::cout << "Level: Couldn't load file: " << filename << std::endl; - return -1; - } - - if (root_obj->type == LISP_TYPE_EOF || root_obj->type == LISP_TYPE_PARSE_ERROR) - { - printf("World: Parse Error in file %s", filename.c_str()); - return -1; - } - - int version = 0; - if (strcmp(lisp_symbol(lisp_car(root_obj)), "supertux-level") == 0) - { - LispReader reader(lisp_cdr(root_obj)); - version = 0; - reader.read_int("version", &version); - if(!reader.read_int("width", &width)) - st_abort("No width specified for level.", ""); - if (!reader.read_int("start_pos_x", &start_pos_x)) start_pos_x = 100; - if (!reader.read_int("start_pos_y", &start_pos_y)) start_pos_y = 170; - time_left = 500; - if(!reader.read_int("time", &time_left)) { - printf("Warning no time specified for level.\n"); - } - - height = 15; - reader.read_int("height", &height); - - back_scrolling = false; - reader.read_bool("back_scrolling", &back_scrolling); - - hor_autoscroll_speed = 0; - reader.read_float("hor_autoscroll_speed", &hor_autoscroll_speed); - - bkgd_speed = 50; - reader.read_int("bkgd_speed", &bkgd_speed); - - - bkgd_top.red = bkgd_top.green = bkgd_top.blue = 0; - reader.read_int("bkgd_red_top", &bkgd_top.red); - reader.read_int("bkgd_green_top", &bkgd_top.green); - reader.read_int("bkgd_blue_top", &bkgd_top.blue); - - bkgd_bottom.red = bkgd_bottom.green = bkgd_bottom.blue = 0; - reader.read_int("bkgd_red_bottom", &bkgd_bottom.red); - reader.read_int("bkgd_green_bottom", &bkgd_bottom.green); - reader.read_int("bkgd_blue_bottom", &bkgd_bottom.blue); - - gravity = 10; - reader.read_float("gravity", &gravity); - name = "Noname"; - reader.read_string("name", &name); - author = "unknown author"; - reader.read_string("author", &author); - song_title = ""; - reader.read_string("music", &song_title); - bkgd_image = ""; - reader.read_string("background", &bkgd_image); - particle_system = ""; - reader.read_string("particle_system", &particle_system); - - reader.read_int_vector("background-tm", &bg_tiles); - if(int(bg_tiles.size()) != width * height) - st_abort("Wrong size of backgroundtilemap", ""); - - if (!reader.read_int_vector("interactive-tm", &ia_tiles)) - reader.read_int_vector("tilemap", &ia_tiles); - if(int(ia_tiles.size()) != width * height) - st_abort("Wrong size of interactivetilemap", ""); - - reader.read_int_vector("foreground-tm", &fg_tiles); - if(int(fg_tiles.size()) != width * height) - st_abort("Wrong size of foregroundtilemap", ""); - - { // Read ResetPoints - lisp_object_t* cur = 0; - if (reader.read_lisp("reset-points", &cur)) - { - while (!lisp_nil_p(cur)) - { - lisp_object_t* data = lisp_car(cur); - - ResetPoint pos; - - LispReader reader(lisp_cdr(data)); - if (reader.read_int("x", &pos.x) - && reader.read_int("y", &pos.y)) - { - reset_points.push_back(pos); - } - - cur = lisp_cdr(cur); - } - } - } - - { // Read BadGuys - lisp_object_t* cur = 0; - if (reader.read_lisp("objects", &cur)) - { - if(world) - world->parse_objects(cur); - } - } - -#if 0 // TODO fix this or remove it - // Convert old levels to the new tile numbers - if (version == 0) - { - std::map transtable; - transtable['.'] = 0; - transtable['x'] = 104; - transtable['X'] = 77; - transtable['y'] = 78; - transtable['Y'] = 105; - transtable['A'] = 83; - transtable['B'] = 102; - transtable['!'] = 103; - transtable['a'] = 84; - transtable['C'] = 85; - transtable['D'] = 86; - transtable['E'] = 87; - transtable['F'] = 88; - transtable['c'] = 89; - transtable['d'] = 90; - transtable['e'] = 91; - transtable['f'] = 92; - - transtable['G'] = 93; - transtable['H'] = 94; - transtable['I'] = 95; - transtable['J'] = 96; - - transtable['g'] = 97; - transtable['h'] = 98; - transtable['i'] = 99; - transtable['j'] = 100 - ; - transtable['#'] = 11; - transtable['['] = 13; - transtable['='] = 14; - transtable[']'] = 15; - transtable['$'] = 82; - transtable['^'] = 76; - transtable['*'] = 80; - transtable['|'] = 79; - transtable['\\'] = 81; - transtable['&'] = 75; - - int x = 0; - int y = 0; - for(std::vector::iterator i = ia_tm.begin(); i != ia_tm.end(); ++i) - { - if (*i == '0' || *i == '1' || *i == '2') - { - badguy_data.push_back(BadGuyData(static_cast(*i-'0'), - x*32, y*32, false)); - *i = 0; - } - else - { - std::map::iterator j = transtable.find(*i); - if (j != transtable.end()) - *i = j->second; - else - printf("Error: conversion will fail, unsupported char: '%c' (%d)\n", *i, *i); - } - ++x; - if (x >= width) - { - x = 0; - ++y; - } - } - } -#endif - } - - lisp_free(root_obj); - return 0; -} - -/* Save data for level: */ - -void -Level::save(const std::string& subset, int level, World* world) +Level::add_sector(Sector* sector) { - char filename[1024]; - char str[80]; - - /* Save data file: */ - sprintf(str, "/levels/%s/", subset.c_str()); - fcreatedir(str); - snprintf(filename, 1024, "%s/levels/%s/level%d.stl", st_dir, subset.c_str(), - level); - if(!fwriteable(filename)) - snprintf(filename, 1024, "%s/levels/%s/level%d.stl", datadir.c_str(), - subset.c_str(), level); - - std::ofstream out(filename); - if(!out.good()) { - st_abort("Couldn't write file.", filename); - } - LispWriter writer(out); - - /* Write header: */ - writer.write_comment("SuperTux level made using the built-in leveleditor"); - writer.start_list("supertux-level"); - - writer.write_int("version", 1); - writer.write_string("name", name); - writer.write_string("author", author); - writer.write_string("music", song_title); - writer.write_string("background", bkgd_image); - writer.write_string("particle_system", particle_system); - writer.write_int("bkgd_speed", bkgd_speed); - writer.write_int("bkgd_red_top", bkgd_top.red); - writer.write_int("bkgd_green_top", bkgd_top.green); - writer.write_int("bkgd_blue_top", bkgd_top.blue); - writer.write_int("bkgd_red_bottom", bkgd_bottom.red); - writer.write_int("bkgd_green_bottom", bkgd_bottom.green); - writer.write_int("bkgd_blue_bottom", bkgd_bottom.blue); - writer.write_int("time", time_left); - writer.write_int("width", width); - writer.write_int("height", height); - writer.write_bool("back_scrolling", back_scrolling); - writer.write_float("hor_autoscroll_speed", hor_autoscroll_speed); - writer.write_float("gravity", gravity); - - writer.write_int_vector("background-tm", bg_tiles); - writer.write_int_vector("interactive-tm", ia_tiles); - writer.write_int_vector("foreground-tm", fg_tiles); - - writer.start_list("reset-points"); - for(std::vector::iterator i = reset_points.begin(); - i != reset_points.end(); ++i) { - writer.start_list("point"); - writer.write_int("x", i->x); - writer.write_int("y", i->y); - writer.end_list("point"); - } - writer.end_list("reset-points"); - - // write objects - writer.start_list("objects"); - // pick all objects that can be written into a levelfile - for(std::vector::iterator it = world->gameobjects.begin(); - it != world->gameobjects.end(); ++it) { - Serializable* serializable = dynamic_cast (*it); - if(serializable) - serializable->write(writer); + Sector* test = get_sector(sector->get_name()); + if(test != 0) { + throw std::runtime_error("Trying to add 2 sectors with same name"); } - writer.end_list("objects"); - - writer.end_list("supertux-level"); - out.close(); + sectors.push_back(sector); } -/* Unload data for this level: */ -void -Level::cleanup() +Sector* +Level::get_sector(const std::string& name) { - bg_tiles.clear(); - ia_tiles.clear(); - fg_tiles.clear(); + for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i) { + Sector* sector = *i; + if(sector->get_name() == name) + return sector; + } - reset_points.clear(); - name = ""; - author = ""; - song_title = ""; - bkgd_image = ""; + return 0; } -void -Level::load_gfx() +size_t +Level::get_sector_count() { - if(!bkgd_image.empty()) - { - char fname[1024]; - snprintf(fname, 1024, "%s/background/%s", st_dir, bkgd_image.c_str()); - if(!faccessible(fname)) - snprintf(fname, 1024, "%s/images/background/%s", datadir.c_str(), bkgd_image.c_str()); - delete img_bkgd; - img_bkgd = new Surface(fname, IGNORE_ALPHA); - } - else - { - delete img_bkgd; - img_bkgd = 0; - } + return sectors.size(); } -/* Load a level-specific graphic... */ -void Level::load_image(Surface** ptexture, string theme,const char * file, int use_alpha) +Sector* +Level::get_sector(size_t num) { - char fname[1024]; - - snprintf(fname, 1024, "%s/themes/%s/%s", st_dir, theme.c_str(), file); - if(!faccessible(fname)) - snprintf(fname, 1024, "%s/images/themes/%s/%s", datadir.c_str(), theme.c_str(), file); - - *ptexture = new Surface(fname, use_alpha); + return sectors.at(num); } -/* Change the size of a level */ -void -Level::resize(int new_width, int new_height) +int +Level::get_total_badguys() { - if(new_width < width) { - // remap tiles for new width - for(int y = 0; y < height && y < new_height; ++y) { - for(int x = 0; x < new_width; ++x) { - ia_tiles[y * new_width + x] = ia_tiles[y * width + x]; - bg_tiles[y * new_width + x] = bg_tiles[y * width + x]; - fg_tiles[y * new_width + x] = fg_tiles[y * width + x]; - } - } - } - - ia_tiles.resize(new_width * new_height); - bg_tiles.resize(new_width * new_height); - fg_tiles.resize(new_width * new_height); - - if(new_width > width) { - // remap tiles - for(int y = std::min(height, new_height)-1; y >= 0; --y) { - for(int x = new_width-1; x >= 0; --x) { - if(x >= width) { - ia_tiles[y * new_width + x] = 0; - bg_tiles[y * new_width + x] = 0; - fg_tiles[y * new_width + x] = 0; - } else { - ia_tiles[y * new_width + x] = ia_tiles[y * width + x]; - bg_tiles[y * new_width + x] = bg_tiles[y * width + x]; - fg_tiles[y * new_width + x] = fg_tiles[y * width + x]; - } - } - } - } - - height = new_height; - width = new_width; + int total_badguys = 0; + for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i) + total_badguys += (*i)->get_total_badguys(); + return total_badguys; } -void -Level::change(float x, float y, int tm, unsigned int c) -{ - int yy = ((int)y / 32); - int xx = ((int)x / 32); - - if (yy >= 0 && yy < height && xx >= 0 && xx <= width) - { - switch(tm) - { - case TM_BG: - bg_tiles[yy * width + xx] = c; - break; - case TM_IA: - ia_tiles[yy * width + xx] = c; - break; - case TM_FG: - fg_tiles[yy * width + xx] = c; - break; - } +int +Level::get_total_coins() +{ + // FIXME not really correct as coins can also be inside blocks... + int total_coins = 0; + for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i) { + Sector* sector = *i; + for(Sector::GameObjects::iterator o = sector->gameobjects.begin(); + o != sector->gameobjects.end(); ++o) { + Coin* coin = dynamic_cast (*o); + if(coin) + total_coins++; } -} - -void -Level::load_song() -{ - char* song_path; - char* song_subtitle; - - level_song = music_manager->load_music(datadir + "/music/" + song_title); - - song_path = (char *) malloc(sizeof(char) * datadir.length() + - strlen(song_title.c_str()) + 8 + 5); - song_subtitle = strdup(song_title.c_str()); - strcpy(strstr(song_subtitle, "."), "\0"); - sprintf(song_path, "%s/music/%s-fast%s", datadir.c_str(), - song_subtitle, strstr(song_title.c_str(), ".")); - if(!music_manager->exists_music(song_path)) { - level_song_fast = level_song; - } else { - level_song_fast = music_manager->load_music(song_path); } - free(song_subtitle); - free(song_path); -} - -MusicRef -Level::get_level_music() -{ - return level_song; -} - -MusicRef -Level::get_level_music_fast() -{ - return level_song_fast; -} - -unsigned int -Level::gettileid(float x, float y) const -{ - int xx, yy; - unsigned int c; - - yy = ((int)y / 32); - xx = ((int)x / 32); - - if (yy >= 0 && yy < height && xx >= 0 && xx <= width) - c = ia_tiles[yy * width + xx]; - else - c = 0; - - return c; -} - -unsigned int -Level::get_tile_at(int x, int y) const -{ - if(x < 0 || x >= width || y < 0 || y >= height) - return 0; - - return ia_tiles[y * width + x]; + return total_coins; } -/* EOF */