- Trampoline test level
[supertux.git] / src / high_scores.cpp
index d1b4d94..cb3d410 100644 (file)
@@ -1,9 +1,22 @@
-/*
-  by Adam Czachorowski
-  gislan@o2.pl
-*/
+//  $Id$
+// 
+//  SuperTux
+//  Copyright (C) 2004 Adam Czachorowski <gislan@o2.pl>
+//
+//  This program is free software; you can redistribute it and/or
+//  modify it under the terms of the GNU General Public License
+//  as published by the Free Software Foundation; either version 2
+//  of the License, or (at your option) any later version.
+//
+//  This program is distributed in the hope that it will be useful,
+//  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
+//  02111-1307, USA.
 
 /* Open the highscore file: */
 
 #include "menu.h"
 #include "screen.h"
 #include "texture.h"
+#include "setup.h"
+#include "lispreader.h"
 
-int hs_score;
-char hs_name[62]; /* highscores global variables*/
-
-FILE * opendata(char * mode)
-{
-  char * filename = NULL;
-  FILE * fi;
-
-
-  filename = (char *) malloc(sizeof(char) * (strlen(st_dir) +
-                             strlen("/st_highscore.dat") + 1));
-
-  strcpy(filename, st_dir);
-  /* Open the high score file: */
-
-#ifndef WIN32
-  strcat(filename, "/highscore");
+#ifdef WIN32
+const char * highscore_filename = "/st_highscore.dat";
 #else
-  strcat(filename, "/st_highscore.dat");
+const char * highscore_filename = "/highscore";
 #endif
 
+int hs_score;
+std::string hs_name; /* highscores global variables*/
 
-  /* Try opening the file: */
+/* Load data from high score file: */
 
-  fi = fopen(filename, mode);
-  free( filename );
+void load_hs(void)
+{
+  hs_score = 100;
+  hs_name  = "Grandma";
 
+  FILE * fi;
+  lisp_object_t* root_obj = 0;
+  fi = fopen(highscore_filename, "r");
   if (fi == NULL)
     {
-      fprintf(stderr, "Warning: Unable to open the high score file ");
-
-      if (strcmp(mode, "r") == 0)
-        fprintf(stderr, "for read!!!\n");
-      else if (strcmp(mode, "w") == 0)
-        fprintf(stderr, "for write!!!\n");
-
+      perror(highscore_filename);
+      return;
     }
 
-  return(fi);
-}
-
-/* Load data from high score file: */
-
-void load_hs(void)
-{
-  FILE * fi;
-  char temp[128];
-  int strl;
-  unsigned int i, c;
+  lisp_stream_t stream;
+  lisp_stream_init_file (&stream, fi);
+  root_obj = lisp_read (&stream);
 
-  hs_score = 100;
-  strcpy(hs_name, "Grandma\0");
-  c = 0;
+  if (root_obj->type == LISP_TYPE_EOF || root_obj->type == LISP_TYPE_PARSE_ERROR)
+    {
+      printf("HighScore: Parse Error in file %s", highscore_filename);
+    }
 
-  /* Try to open file: */
 
-  fi = opendata("r");
-  if (fi != NULL)
+  if (strcmp(lisp_symbol(lisp_car(root_obj)), "supertux-highscore") == 0)
     {
-      do
-        {
-          fgets(temp, sizeof(temp), fi);
-
-          if (!feof(fi))
-            {
-              temp[strlen(temp) - 1] = '\0';
-
-
-              /* Parse each line: */
-
-              if (strstr(temp, "highscore=") == temp)
-                {
-                  hs_score = atoi(temp + 10);
-
-                  if (hs_score == 0)
-                    hs_score = 100;
-                }
-              if (strstr(temp, "name=") == temp)
-                {
-                  fprintf(stderr, "name found\n");
-                  strl = strlen("name=");
-                  for(c = strl, i = 0; c < strlen(temp); ++c, ++i)
-                    hs_name[i] = temp[c];
-                  hs_name[i]= '\0';
-                }
-            }
-        }
-      while (!feof(fi));
-
-      fclose(fi);
+      LispReader reader(lisp_cdr(root_obj));
+      reader.read_int("score",  &hs_score);
+      reader.read_string("name", &hs_name);
     }
+  fclose(fi);
+  lisp_free(root_obj);
 }
 
 void save_hs(int score)
 {
   char str[80];
 
-  texture_type bkgd;
+  Surface* bkgd;
   SDL_Event event;
-  FILE * fi;
 
-
-  texture_load(&bkgd, DATA_PREFIX "/images/highscore/highscore.png", IGNORE_ALPHA);
+  bkgd = new Surface(datadir + "/images/highscore/highscore.png", IGNORE_ALPHA);
 
   hs_score = score;
 
-  menu_reset();
-  menu_set_current(&highscore_menu);
+  Menu::set_current(highscore_menu);
 
-  if(!highscore_menu.item[0].input)
-    highscore_menu.item[0].input = (char*) malloc(strlen(hs_name) + 1);
+  if(!highscore_menu->item[0].input)
+    highscore_menu->item[0].input = (char*) malloc(strlen(hs_name.c_str()) + 1);
 
-  strcpy(highscore_menu.item[0].input,hs_name);
+  strcpy(highscore_menu->item[0].input,hs_name.c_str());
 
   /* ask for player's name */
-  show_menu = 1;
-  while(show_menu)
+  while(Menu::current())
     {
-      texture_draw_bg(&bkgd, NO_UPDATE);
+      bkgd->draw_bg();
 
-      text_drawf(&blue_text, "Congratulations", 0, 130, A_HMIDDLE, A_TOP, 2, NO_UPDATE);
-      text_draw(&blue_text, "Your score:", 150, 180, 1, NO_UPDATE);
+      blue_text->drawf("Congratulations", 0, 130, A_HMIDDLE, A_TOP, 2, NO_UPDATE);
+      blue_text->draw("Your score:", 150, 180, 1, NO_UPDATE);
       sprintf(str, "%d", hs_score);
-      text_draw(&yellow_nums, str, 350, 170, 1, NO_UPDATE);
+      yellow_nums->draw(str, 350, 170, 1, NO_UPDATE);
+
+      Menu::current()->draw();
+      Menu::current()->action();
 
-      menu_process_current();
       flipscreen();
 
       while(SDL_PollEvent(&event))
         if(event.type == SDL_KEYDOWN)
-          menu_event(&event.key.keysym);
+          Menu::current()->event(event);
 
-      switch (menu_check(&highscore_menu))
+      switch (highscore_menu->check())
         {
         case 0:
-          if(highscore_menu.item[0].input != NULL)
-            strcpy(hs_name, highscore_menu.item[0].input);
+          if(highscore_menu->item[0].input != NULL)
+            hs_name = highscore_menu->item[0].input;
           break;
         }
 
@@ -160,9 +126,39 @@ void save_hs(int score)
     }
 
 
-  /* Try to open file: */
+  /* Save to file: */
+
+  FILE* fi;
+  std::string filename;
 
-  fi = opendata("w");
+  /* Save data file: */
+  filename = highscore_filename;
+
+  fcreatedir(filename.c_str());
+  if(fwriteable(filename.c_str()))
+    {
+      fi = fopen(filename.c_str(), "w");
+      if (fi == NULL)
+        {
+          perror(filename.c_str());
+        }
+
+      /* Write header: */
+      fprintf(fi,";SuperTux HighScores\n");
+      fprintf(fi,"(supertux-highscore\n");
+
+      /* Save title info: */
+      fprintf(fi,"  (name \"%s\")\n", hs_name.c_str());
+
+      /* Save the description: */
+      fprintf(fi,"  (score \"%i\")\n", hs_score);
+
+      fprintf( fi,")");
+      fclose(fi);
+    }
+
+/*
+  fi = opendata(highscore_filename, "w");
   if (fi != NULL)
     {
       fprintf(fi, "# Supertux highscore file\n\n");
@@ -173,5 +169,5 @@ void save_hs(int score)
       fprintf(fi, "# (File automatically created.)\n");
 
       fclose(fi);
-    }
+    }*/
 }