#include "glext.h"
#include "config.h"
#include "image.h"
+#include "text.h"
#include "set.h"
#include "game.h"
+#include "common.h"
/*---------------------------------------------------------------------------*/
-static int count; /* number of sets */
+struct set
+{
+ char file[PATHMAX];
+
+ char *id; /* Internal set identifier */
+ char *name; /* Set name */
+ char *desc; /* Set description */
+ char *shot; /* Set screen-shot */
+
+ char user_scores[PATHMAX]; /* User high-score file */
+
+ struct score coin_score; /* Challenge score */
+ struct score time_score; /* Challenge score */
+
+ /* Level info */
+
+ int count; /* Number of levels */
+ char *level_name_v[MAXLVL]; /* List of level file names */
+};
-static struct set set_v[MAXSET]; /* array of sets */
+static int set_state = 0;
-static struct set *current_set; /* currently selected set */
+static int set;
+static int count;
-static struct level level_v[MAXLVL]; /* levels of the current set */
+static struct set set_v[MAXSET];
+static struct level level_v[MAXLVL];
/*---------------------------------------------------------------------------*/
static void put_score(FILE *fp, const struct score *s)
{
int j;
+
for (j = 0; j < NSCORE; j++)
- fprintf(fp, "%d %d %s\n", s->timer[j], s->coins[j], s->player[j]);
+ fprintf(fp, "%d %d %s\n", s->timer[j], s->coins[j], s->player[j]);
}
-static void set_store_hs(void)
-/* Store the score of the set */
+void set_store_hs(void)
{
- const struct set *s = current_set;
+ const struct set *s = &set_v[set];
FILE *fout;
int i;
const struct level *l;
for (i = 0; i < s->count; i++)
{
l = &level_v[i];
- put_score(fout, &l->time_score);
- put_score(fout, &l->goal_score);
- put_score(fout, &l->coin_score);
+
+ put_score(fout, &l->score.best_times);
+ put_score(fout, &l->score.unlock_goal);
+ put_score(fout, &l->score.most_coins);
}
fclose(fout);
{
int j;
int res = 1;
+
for (j = 0; j < NSCORE && res; j++)
{
- res = (fscanf(fp, "%d %d %s\n",
- &s->timer[j], &s->coins[j], s->player[j])) == 3;
+ res = fscanf(fp, "%d %d %s\n",
+ &s->timer[j],
+ &s->coins[j],
+ s->player[j]) == 3;
}
return res;
}
+/* Get the score of the set. */
static void set_load_hs(void)
-/* Get the score of the set */
{
- struct set *s = current_set;
+ struct set *s = &set_v[set];
FILE *fin;
int i;
int res = 0;
if ((fin = fopen(fn, "r")))
{
- res = ((fscanf(fin, "%s\n", states) == 1) &&
- (strlen(states) == s->count));
+ res = fscanf(fin, "%s\n", states) == 1 && strlen(states) == s->count;
+
for (i = 0; i < s->count && res; i++)
{
- if (states[i] == 'L')
+ switch (states[i])
{
+ case 'L':
level_v[i].is_locked = 1;
level_v[i].is_completed = 0;
- }
- else if (states[i] == 'C')
- {
+ break;
+
+ case 'C':
level_v[i].is_locked = 0;
level_v[i].is_completed = 1;
- }
- else if (states[i] == 'O')
- {
+ break;
+
+ case 'O':
level_v[i].is_locked = 0;
level_v[i].is_completed = 0;
- }
- else
+ break;
+
+ default:
res = 0;
+ }
}
res = res &&
for (i = 0; i < s->count && res; i++)
{
l = &level_v[i];
- res = get_score(fin, &l->time_score) &&
- get_score(fin, &l->goal_score) &&
- get_score(fin, &l->coin_score);
+ res = get_score(fin, &l->score.best_times) &&
+ get_score(fin, &l->score.unlock_goal) &&
+ get_score(fin, &l->score.most_coins);
}
fclose(fin);
if (!res && errno != ENOENT)
{
- fprintf(stderr, _("Error while loading user high-score file '%s': "),
- fn);
- if (errno)
- perror(NULL);
- else
- fprintf(stderr, _("Incorrect format\n"));
+ fprintf(stderr,
+ L_("Error while loading user high-score file '%s': %s\n"),
+ fn, errno ? strerror(errno) : L_("Incorrect format"));
}
}
-static char *chomp(char *str)
-/* Remove trailing \n if any */
-{
- char *p = str + strlen(str) - 1;
- if (p >= str && *p == '\n') *p = 0;
- return str;
-}
+/*---------------------------------------------------------------------------*/
static int set_load(struct set *s, const char *filename)
{
FILE *fin;
-
- char buf[MAXSTR];
- int res;
+ char *scores, *level_name;
fin = fopen(config_data(filename), "r");
+
if (!fin)
{
- fprintf(stderr, _("Cannot load the set file '%s':"), filename);
- perror(NULL);
+ fprintf(stderr, L_("Cannot load the set file '%s': %s\n"),
+ filename, strerror(errno));
return 0;
}
memset(s, 0, sizeof (struct set));
- /* Set some sane values in case the scores hs is missing. */
+ /* Set some sane values in case the scores are missing. */
score_init_hs(&s->time_score, 359999, 0);
score_init_hs(&s->coin_score, 359999, 0);
- /* Load set metadata. */
-
- strcpy(s->file, config_data(filename));
+ strncpy(s->file, filename, PATHMAX - 1);
- if ((res = fgets(buf, MAXSTR, fin) != NULL))
- strcpy(s->name, chomp(buf));
- if (res && (res = fgets(buf, MAXSTR, fin) != NULL))
- strcpy(s->desc, chomp(buf));
- if (res && (res = fgets(buf, MAXSTR, fin) != NULL))
- strcpy(s->setname, chomp(buf));
- if (res && (res = fgets(buf, MAXSTR, fin) != NULL))
- strcpy(s->shot, chomp(buf));
- if (res && (res = fgets(buf, MAXSTR, fin) != NULL))
- sscanf(buf, "%d %d %d %d %d %d",
- &s->time_score.timer[0],
- &s->time_score.timer[1],
- &s->time_score.timer[2],
- &s->coin_score.coins[0],
- &s->coin_score.coins[1],
- &s->coin_score.coins[2]);
-
- strcpy(s->user_scores, "neverballhs-");
- strcat(s->user_scores, s->setname);
-
- /* Count levels. */
-
- s->count = 0;
+ if (read_line(&s->name, fin) &&
+ read_line(&s->desc, fin) &&
+ read_line(&s->id, fin) &&
+ read_line(&s->shot, fin) &&
+ read_line(&scores, fin))
+ {
+ sscanf(scores, "%d %d %d %d %d %d",
+ &s->time_score.timer[0],
+ &s->time_score.timer[1],
+ &s->time_score.timer[2],
+ &s->coin_score.coins[0],
+ &s->coin_score.coins[1],
+ &s->coin_score.coins[2]);
- while (s->count < MAXLVL && (fscanf(fin, "%s", buf) == 1))
- s->count++;
+ free(scores);
- fclose(fin);
+ strncpy(s->user_scores, "neverballhs-", PATHMAX - 1);
+ strncat(s->user_scores, s->id, PATHMAX - 1 - strlen("neverballhs-"));
- /* Load the levels states (stored in the user highscore file) */
+ s->count = 0;
- s->locked = s->count;
- s->completed = 0;
-
- if ((fin = fopen(config_user(s->user_scores), "r")))
- {
- char states[MAXLVL + 1];
- int i;
- if ((fscanf(fin, "%s\n", states) == 1) && (strlen(states) == s->count))
+ while (s->count < MAXLVL && read_line(&level_name, fin))
{
- for (i = 0; i < s->count; i++)
- {
- if (states[i] == 'O')
- s->locked -= 1;
- else if (states[i] == 'C')
- {
- s->completed += 1;
- s->locked -= 1;
- }
- }
+ s->level_name_v[s->count] = level_name;
+ s->count++;
}
+
fclose(fin);
+
+ return 1;
}
- if (s->locked == s->count)
- s->locked = s->count-1;
- return 1;
-}
+ free(s->name);
+ free(s->desc);
+ free(s->id);
+ free(s->shot);
-/*---------------------------------------------------------------------------*/
+ fclose(fin);
-void set_init()
+ return 0;
+}
+
+int set_init()
{
- struct set *set;
FILE *fin;
+ char *name;
- char filename[MAXSTR];
- int res;
-
- current_set = NULL;
+ if (set_state)
+ set_free();
+ set = 0;
count = 0;
if ((fin = fopen(config_data(SET_FILE), "r")))
{
- res = 1;
- while (count < MAXSET && res)
+ while (count < MAXSET && read_line(&name, fin))
{
- set = &(set_v[count]);
- res = (fgets(filename, MAXSTR, fin) != NULL);
+ if (set_load(&set_v[count], name))
+ count++;
- if (res)
- {
- chomp(filename);
-
- res = set_load(set, filename);
- if (res)
- {
- set->number = count;
- count++;
- }
- }
+ free(name);
}
-
fclose(fin);
- }
-}
-/*---------------------------------------------------------------------------*/
+ set_state = 1;
+ }
-int set_exists(int i)
-{
- return (0 <= i && i < count);
+ return count;
}
-const struct set *get_set(int i)
+void set_free(void)
{
- return set_exists(i) ? &set_v[i] : NULL;
-}
-
-/*---------------------------------------------------------------------------*/
+ int i, j;
-int set_unlocked(const struct set *s)
-/* Are all levels (even extra bonus) unlocked? */
-{
- return s->locked == 0;
-}
+ for (i = 0; i < count; i++)
+ {
+ free(set_v[i].name);
+ free(set_v[i].desc);
+ free(set_v[i].id);
+ free(set_v[i].shot);
-int set_completed(const struct set *s)
-/* Are all levels (even extra bonus) completed? */
-{
- return s->completed == s->count;
-}
+ for (j = 0; j < set_v[i].count; j++)
+ free(set_v[i].level_name_v[j]);
+ }
-int set_level_exists(const struct set *s, int i)
-/* Does the level i of the set exist? */
-{
- return (i >= 0) && (i < s->count);
+ set_state = 0;
}
/*---------------------------------------------------------------------------*/
-static void set_load_levels(void)
+int set_exists(int i)
{
- FILE *fin;
- struct level *l;
-
- char buf[MAXSTR];
- char name[MAXSTR];
-
- int i = 0, res;
- int nb = 1, bnb = 1;
-
- if ((fin = fopen(current_set->file, "r")))
- {
- res = 1;
-
- /* Skip the five first lines */
- for (i = 0; i < 5; i++)
- fgets(buf, MAXSTR, fin);
-
- for (i = 0; i < current_set->count && res; i++)
- {
- l = &level_v[i];
-
- res = (fscanf(fin, "%s", name) == 1);
- assert(res);
-
- level_load(config_data(name), l);
-
- /* Initialize set related info */
- l->set = current_set;
- l->number = i;
- if (l->is_bonus)
- sprintf(l->numbername, _("B%d"), bnb++);
- else
- sprintf(l->numbername, "%02d", nb++);
- l->is_locked = 1;
- l->is_completed = 0;
- }
- level_v[0].is_locked = 0; /* unlock the first level */
- fclose(fin);
- }
-
- assert(i == current_set->count);
+ return (0 <= i && i < count);
}
-void set_goto(int i)
+const char *set_id(int i)
{
- current_set = &set_v[i];
- set_load_levels();
- set_load_hs();
+ return set_exists(i) ? set_v[i].id : NULL;
}
-const struct set *curr_set(void)
+const char *set_name(int i)
{
- return current_set;
+ return set_exists(i) ? _(set_v[i].name) : NULL;
}
-const struct level *get_level(int i)
+const char *set_desc(int i)
{
- return (i >= 0 && i < current_set->count) ? &level_v[i] : NULL;
+ return set_exists(i) ? _(set_v[i].desc) : NULL;
}
-/*---------------------------------------------------------------------------*/
-
-static int score_time_comp(const struct score *S, int i, int j)
+const char *set_shot(int i)
{
- if (S->timer[i] < S->timer[j])
- return 1;
-
- if (S->timer[i] == S->timer[j] && S->coins[i] > S->coins[j])
- return 1;
-
- return 0;
+ return set_exists(i) ? set_v[i].shot : NULL;
}
-static int score_coin_comp(const struct score *S, int i, int j)
+const struct score *set_time_score(int i)
{
- if (S->coins[i] > S->coins[j])
- return 1;
-
- if (S->coins[i] == S->coins[j] && S->timer[i] < S->timer[j])
- return 1;
-
- return 0;
+ return set_exists(i) ? &set_v[i].time_score : NULL;
}
-static void score_swap(struct score *S, int i, int j)
+const struct score *set_coin_score(int i)
{
- char player[MAXNAM];
- int tmp;
-
- strncpy(player, S->player[i], MAXNAM);
- strncpy(S->player[i], S->player[j], MAXNAM);
- strncpy(S->player[j], player, MAXNAM);
-
- tmp = S->timer[i];
- S->timer[i] = S->timer[j];
- S->timer[j] = tmp;
-
- tmp = S->coins[i];
- S->coins[i] = S->coins[j];
- S->coins[j] = tmp;
+ return set_exists(i) ? &set_v[i].coin_score : NULL;
}
-static int score_time_insert(struct score *s, const char *player, int timer,
- int coins)
-{
- int i;
-
- strncpy(s->player[3], player, MAXNAM);
- s->timer[3] = timer;
- s->coins[3] = coins;
-
- for (i = 2; i >= 0 && score_time_comp(s, i + 1, i); i--)
- score_swap(s, i + 1, i);
+/*---------------------------------------------------------------------------*/
- return i + 1;
+int set_level_exists(int s, int i)
+{
+ return (i >= 0 && i < set_v[s].count);
}
-static int score_coin_insert(struct score *s, const char *player, int timer,
- int coins)
+static void set_load_levels(void)
{
+ struct level *l;
+ int nb = 1, bnb = 1;
+
int i;
- strncpy(s->player[3], player, MAXNAM);
- s->timer[3] = timer;
- s->coins[3] = coins;
+ const char *roman[] = {
+ "",
+ "I", "II", "III", "IV", "V",
+ "VI", "VII", "VIII", "IX", "X",
+ "XI", "XII", "XIII", "XIV", "XV",
+ "XVI", "XVII", "XVIII", "XIX", "XX",
+ "XXI", "XXII", "XXIII", "XXIV", "XXV"
+ };
- for (i = 2; i >= 0 && score_coin_comp(s, i + 1, i); i--)
- score_swap(s, i + 1, i);
+ for (i = 0; i < set_v[set].count; i++)
+ {
+ l = &level_v[i];
- return i + 1;
-}
+ level_load(set_v[set].level_name_v[i], l);
-static int level_score_update(struct level_game *lg, const char *player)
-/* Update the level score rank according to coins and timer */
-{
- int timer = lg->timer;
- int coins = lg->coins;
- struct level *l = &level_v[lg->level->number];
+ l->set = &set_v[set];
+ l->number = i;
- lg->time_rank = score_time_insert(&l->time_score, player, timer, coins);
+ if (l->is_bonus)
+ sprintf(l->name, "%s", roman[bnb++]);
+ else
+ sprintf(l->name, "%02d", nb++);
- if (lg->mode == MODE_CHALLENGE || lg->mode == MODE_NORMAL)
- lg->goal_rank = score_time_insert(&l->goal_score, player, timer, coins);
- else
- lg->goal_rank = 3;
+ l->is_locked = 1;
+ l->is_completed = 0;
+ }
- lg->coin_rank = score_coin_insert(&l->coin_score, player, timer, coins);
+ /* Unlock first level. */
- return (lg->time_rank < 3 || lg->goal_rank < 3 || lg->coin_rank < 3);
+ level_v[0].is_locked = 0;
}
-static int set_score_update(struct level_game *lg, const char *player)
-/* Update the set score rank according to score and times */
+void set_goto(int i)
{
- int timer = lg->times;
- int coins = lg->score;
- struct set *s = current_set;
+ set = i;
- lg->score_rank = score_time_insert(&s->time_score, player, timer, coins);
- lg->times_rank = score_time_insert(&s->coin_score, player, timer, coins);
- return (lg->score_rank < 3 || lg->times_rank < 3);
+ set_load_levels();
+ set_load_hs();
}
-
-void score_change_name(struct level_game *lg, const char *player)
-/* Update the player name for set and level high-score */
+int curr_set(void)
{
-#define UPDATE(i, x) (strncpy((x).player[(i)], player, MAXNAM))
- struct set *s = current_set;
- struct level *l = &level_v[lg->level->number];
- UPDATE(lg->time_rank, l->time_score);
- UPDATE(lg->goal_rank, l->goal_score);
- UPDATE(lg->coin_rank, l->coin_score);
- UPDATE(lg->score_rank, s->coin_score);
- UPDATE(lg->times_rank, s->time_score);
- set_store_hs();
+ return set;
}
-static struct level *next_level(int i)
+struct level *get_level(int i)
{
-/* Return the ith level, or NULL */
- return set_level_exists(current_set, i + 1) ? &level_v[i + 1] : NULL;
+ return (i >= 0 && i < set_v[set].count) ? &level_v[i] : NULL;
}
-static struct level *next_normal_level(int i)
-/* Return the next normal level (starting for i)
- * Return NULL if there is not a such level */
-{
- for (i++; i < current_set->count; i++)
- if (!level_v[i].is_bonus)
- return &level_v[i];
- return NULL;
-}
+/*---------------------------------------------------------------------------*/
-void set_finish_level(struct level_game *lg, const char *player)
-/* Inform the set that a level is finished.
- * Update next_level and score rank fields */
+int set_score_update(int timer, int coins, int *score_rank, int *times_rank)
{
- struct set *s = current_set;
- int ln = lg->level->number; /* curent level number */
- struct level *cl = &level_v[ln]; /* current level */
- struct level *nl = NULL; /* next level */
- int dirty = 0; /* HS should be saved? */
+ struct set *s = &set_v[set];
+ char player[MAXSTR] = "";
- assert(s == cl->set);
+ config_get_s(CONFIG_PLAYER, player, MAXSTR);
- /* if no set, no next level */
- if (s == NULL)
- {
- /* if no set, return */
- lg->next_level = NULL;
- return;
- }
+ if (score_rank)
+ *score_rank = score_coin_insert(&s->coin_score, player, timer, coins);
- /* On level completed */
- if (lg->state == GAME_GOAL)
- {
- /* Update level scores */
- dirty = level_score_update(lg, player);
+ if (times_rank)
+ *times_rank = score_time_insert(&s->time_score, player, timer, coins);
- /* Complete the level */
- if (lg->mode == MODE_CHALLENGE || lg->mode == MODE_NORMAL)
- {
- /* Complete the level */
- if (!cl->is_completed)
- {
- cl->is_completed = 1;
- s->completed += 1;
- dirty = 1;
- }
- }
- }
-
- /* On goal reached */
- if (lg->state == GAME_GOAL || lg->state == GAME_SPEC)
- {
- /* Identify the following level */
- nl = next_level(ln + lg->state_value);
- if (nl != NULL)
- {
- /* skip bonuses if unlocked in non challenge mode */
- if (nl->is_bonus && nl->is_locked && lg->mode != MODE_CHALLENGE)
- nl = next_normal_level(nl->number);
- }
- else if (lg->mode == MODE_CHALLENGE)
- lg->win = 1;
- }
- else if (cl->is_bonus || lg->mode != MODE_CHALLENGE)
- {
- /* On fail, identify the next level (only in bonus for challenge) */
- nl = next_normal_level(ln);
- /* Next level may be unavailable */
- if (!cl->is_bonus && nl != NULL && nl->is_locked)
- nl = NULL;
- /* Fail a bonus level but win the set! */
- else if (nl == NULL && lg->mode == MODE_CHALLENGE)
- lg->win = 1;
- }
-
- /* Win ! */
- if (lg->win)
- {
- /* update set score */
- set_score_update(lg, player);
- /* unlock all levels */
- set_cheat();
- dirty = 1;
- }
-
- /* unlock the next level if needed */
- if (nl != NULL && nl->is_locked)
- {
- if (lg->mode == MODE_CHALLENGE || lg->mode == MODE_NORMAL)
- {
- lg->unlock = 1;
- nl->is_locked = 0;
- s->locked -= 1;
- dirty = 1;
- }
- else
- nl = NULL;
- }
+ if ((score_rank && *score_rank < 3) || (times_rank && *times_rank < 3))
+ return 1;
+ else
+ return 0;
+}
- /* got the next level */
- lg->next_level = nl;
+void set_rename_player(int score_rank, int times_rank, const char *player)
+{
+ struct set *s = &set_v[set];
- /* Update file */
- if (dirty)
- set_store_hs();
+ strncpy(s->coin_score.player[score_rank], player, MAXNAM);
+ strncpy(s->time_score.player[times_rank], player, MAXNAM);
}
/*---------------------------------------------------------------------------*/
/* Initialize the game for a snapshot. */
- if (game_init(&level_v[i], 0, 0))
+ if (game_init(level_v[i].file, 0, 1))
{
- int shadow;
-
- if ((shadow = config_get_d(CONFIG_SHADOW)))
- config_set_d(CONFIG_SHADOW, 0);
-
/* Render the level and grab the screen. */
config_clear();
game_set_fly(1.f);
game_kill_fade();
game_draw(1, 0);
- SDL_GL_SwapBuffers();
image_snap(filename);
- if (shadow)
- config_set_d(CONFIG_SHADOW, 1);
+ SDL_GL_SwapBuffers();
}
}
void set_cheat(void)
-/* Open each level of the current set */
{
int i;
- current_set->locked = 0;
- for (i = 0; i < current_set->count; i++)
- level_v[i].is_locked = 0;
-}
+ for (i = 0; i < set_v[set].count; i++)
+ {
+ level_v[i].is_locked = 0;
+ level_v[i].is_completed = 1;
+ }
+}
/*---------------------------------------------------------------------------*/
projects / neverball / blobdiff