4 // Copyright (C) 2004 SuperTux Development Team, see AUTHORS for details
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.
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.
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
22 #include "app/setup.h"
24 #include "app/globals.h"
25 #include "video/surface.h"
26 #include "level_subset.h"
28 using namespace SuperTux;
30 static bool has_suffix(const std::string& data, const std::string& suffix)
32 if (data.length() >= suffix.length())
33 return data.compare(data.length() - suffix.length(), suffix.length(), suffix) == 0;
38 LevelSubset::LevelSubset()
43 LevelSubset::~LevelSubset()
47 void LevelSubset::create(const std::string& subset_name)
50 LevelSubset new_subset;
51 new_subset.name = subset_name;
52 new_subset.title = "Unknown Title";
53 new_subset.description = "No description so far.";
57 void LevelSubset::read_info_file(const std::string& info_file)
59 lisp_object_t* root_obj = lisp_read_from_file(info_file);
60 lisp_object_t* cur = lisp_car(root_obj);
62 if (lisp_symbol_p(cur) && strcmp(lisp_symbol(cur), "supertux-level-subset") == 0)
64 LispReader reader(lisp_cdr(root_obj));
66 reader.read_string("title", title, true);
67 reader.read_string("description", description, true);
68 reader.read_string_vector("levels", levels);
72 std::cout << "LevelSubset: parse error in info file: " << info_file << std::endl;
78 void LevelSubset::load(const char* subset)
82 // Check in which directory our subset is located (ie. ~/.supertux/
83 // or SUPERTUX_DATADIR)
85 snprintf(filename, 1024, "%s/levels/%s/", st_dir, subset);
86 if (access(filename, R_OK) == 0)
92 snprintf(filename, 1024, "%s/levels/%s/", datadir.c_str(), subset);
93 if (access(filename, R_OK) == 0)
96 std::cout << "Error: LevelSubset: couldn't find subset: " << subset << std::endl;
99 read_info_file(directory + "info");
102 { // Level info file doesn't define any levels, so read the
103 // directory to see what we can find
104 std::vector<std::string> files;
106 snprintf(filename, 1024, "%s/levels/%s/", st_dir, subset);
107 if(access(filename, R_OK) == 0)
109 files = read_directory(filename);
113 snprintf(filename, 1024, "%s/levels/%s/", datadir.c_str(), subset);
114 files = read_directory(filename);
117 for(std::vector<std::string>::iterator i = files.begin(); i != files.end(); ++i)
119 if (has_suffix(*i, ".stl"))
120 levels.push_back(*i);
129 std::string filename;
131 /* Save data file: */
132 filename = "/levels/" + name + "/";
134 fcreatedir(filename.c_str());
135 filename = std::string(st_dir) + "/levels/" + name + "/info";
136 if(!fwriteable(filename.c_str()))
137 filename = datadir + "/levels/" + name + "/info";
138 if(fwriteable(filename.c_str()))
140 fi = fopen(filename.c_str(), "w");
143 perror(filename.c_str());
147 fprintf(fi,";; SuperTux-Level-Subset\n");
148 fprintf(fi,"(supertux-level-subset\n");
150 /* Save title info: */
151 fprintf(fi," (title \"%s\")\n", title.c_str());
153 /* Save the description: */
154 fprintf(fi," (description \"%s\")\n", description.c_str());
162 LevelSubset::add_level(const std::string& name)
164 levels.push_back(name);
168 LevelSubset::get_level_filename(unsigned int num)
170 assert(num < levels.size());
172 return directory + levels[num];
176 LevelSubset::get_num_levels() const
178 return levels.size();