// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
// 02111-1307, USA.
-#include "setup.h"
+#include <assert.h>
+#include <unistd.h>
+#include "app/setup.h"
#include "level.h"
-#include "globals.h"
-#include "screen/surface.h"
+#include "app/globals.h"
+#include "video/surface.h"
#include "level_subset.h"
+using namespace SuperTux;
+
+static bool has_suffix(const std::string& data, const std::string& suffix)
+{
+ if (data.length() >= suffix.length())
+ return data.compare(data.length() - suffix.length(), suffix.length(), suffix) == 0;
+ else
+ return false;
+}
+
LevelSubset::LevelSubset()
- : image(0), levels(0)
+ : levels(0)
{
}
LevelSubset::~LevelSubset()
{
- delete image;
}
void LevelSubset::create(const std::string& subset_name)
new_subset.title = "Unknown Title";
new_subset.description = "No description so far.";
new_subset.save();
- //new_lev.save(subset_name, 1, 0);
}
-void LevelSubset::parse (lisp_object_t* cursor)
+void LevelSubset::read_info_file(const std::string& info_file)
{
- while(!lisp_nil_p(cursor))
+ lisp_object_t* root_obj = lisp_read_from_file(info_file);
+ lisp_object_t* cur = lisp_car(root_obj);
+
+ if (lisp_symbol_p(cur) && strcmp(lisp_symbol(cur), "supertux-level-subset") == 0)
{
- lisp_object_t* cur = lisp_car(cursor);
- char *s;
+ LispReader reader(lisp_cdr(root_obj));
- if (!lisp_cons_p(cur) || !lisp_symbol_p (lisp_car(cur)))
- {
- printf("Not good");
- }
- 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;
- }
- }
- }
- cursor = lisp_cdr (cursor);
+ reader.read_string("title", title, true);
+ reader.read_string("description", description, true);
+ reader.read_string_vector("levels", levels);
}
+ else
+ {
+ std::cout << "LevelSubset: parse error in info file: " << info_file << std::endl;
+ }
+
+ lisp_free(root_obj);
}
-void LevelSubset::load(const char* subset)
+void LevelSubset::load(const std::string& subset)
{
- 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))
+
+ // Check in which directory our subset is located (ie. ~/.supertux/
+ // or SUPERTUX_DATADIR)
+ std::string filename;
+ filename = st_dir + "/levels/" + subset + "/";
+ if (access(filename.c_str(), R_OK) == 0)
{
- 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);
-
- 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))
+ directory = filename;
+ }
+ else
+ {
+ filename = datadir + "/levels/" + subset + "/";
+ if (access(filename.c_str(), R_OK) == 0)
+ directory = filename;
+ else
+ std::cout << "Error: LevelSubset: couldn't find subset: " << subset << std::endl;
+ }
+
+ read_info_file(directory + "info");
+
+ if (levels.empty())
+ { // Level info file doesn't define any levels, so read the
+ // directory to see what we can find
+ std::set<std::string> files;
+
+ filename = st_dir + "/levels/" + subset + "/";
+ if(access(filename.c_str(), R_OK) == 0)
{
- delete image;
- image = new Surface(str,IGNORE_ALPHA);
+ files = FileSystem::read_directory(filename);
}
else
{
- snprintf(filename, 1024, "%s/images/status/level-subset-info.png", datadir.c_str());
- delete image;
- image = new Surface(filename,IGNORE_ALPHA);
+ filename = datadir + "/levels/" + subset + "/";
+ files = FileSystem::read_directory(filename);
}
- }
-
- 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))
+
+ for(std::set<std::string>::iterator i = files.begin(); i != files.end(); ++i)
{
- snprintf(filename, 1024, "%s/levels/%s/level%d.stl", datadir.c_str(), subset,i);
- if(!faccessible(filename))
- break;
+ if (has_suffix(*i, ".stl"))
+ levels.push_back(*i);
}
}
- levels = --i;
}
void
/* Save data file: */
filename = "/levels/" + name + "/";
- fcreatedir(filename.c_str());
+ FileSystem::fcreatedir(filename.c_str());
filename = std::string(st_dir) + "/levels/" + name + "/info";
- if(!fwriteable(filename.c_str()))
+ if(!FileSystem::fwriteable(filename.c_str()))
filename = datadir + "/levels/" + name + "/info";
- if(fwriteable(filename.c_str()))
+ if(FileSystem::fwriteable(filename.c_str()))
{
fi = fopen(filename.c_str(), "w");
if (fi == NULL)
}
/* Write header: */
- fprintf(fi,";SuperTux-Level-Subset\n");
+ fprintf(fi,";; SuperTux-Level-Subset\n");
fprintf(fi,"(supertux-level-subset\n");
/* Save title info: */
}
}
+void
+LevelSubset::add_level(const std::string& name)
+{
+ levels.push_back(name);
+}
+
std::string
LevelSubset::get_level_filename(unsigned int num)
{
- char filename[1024];
-
- // Load data file:
- snprintf(filename, 1024, "%s/levels/%s/level%d.stl", st_dir,
- name.c_str(), num);
- if(!faccessible(filename))
- snprintf(filename, 1024, "%s/levels/%s/level%d.stl", datadir.c_str(),
- name.c_str(), num);
-
- return std::string(filename);
+ assert(num < levels.size());
+ return directory + levels[num];
}
-/* EOF */
+int
+LevelSubset::get_num_levels() const
+{
+ return levels.size();
+}
+/* EOF */