vcs.maemo.org Git - neverball/blob - ball/level.c

   1 /*
   2  * Copyright (C) 2003 Robert Kooima
   3  *
   4  * NEVERBALL is  free software; you can redistribute  it and/or modify
   5  * it under the  terms of the GNU General  Public License as published
   6  * by the Free  Software Foundation; either version 2  of the License,
   7  * or (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful, but
  10  * WITHOUT  ANY  WARRANTY;  without   even  the  implied  warranty  of
  11  * MERCHANTABILITY or  FITNESS FOR A PARTICULAR PURPOSE.   See the GNU
  12  * General Public License for more details.
  13  */
  14
  15 #include <stdio.h>
  16 #include <stdlib.h>
  17 #include <string.h>
  18 #include <math.h>
  19 #include <errno.h>
  20
  21 #include "level.h"
  22 #include "solid.h"
  23
  24 /*---------------------------------------------------------------------------*/
  25
  26 void score_init_hs(struct score *s, int timer, int coins)
  27 {
  28     int i;
  29
  30     strcpy(s->player[0], "Hard");
  31     strcpy(s->player[1], "Medium");
  32     strcpy(s->player[2], "Easy");
  33     strcpy(s->player[3], "");
  34
  35     for (i = 0; i < NSCORE + 1; i++)
  36     {
  37         s->timer[i] = timer;
  38         s->coins[i] = coins;
  39     }
  40 }
  41
  42 /*---------------------------------------------------------------------------*/
  43
  44 static int level_scan_metadata(struct level *l, char *av)
  45 {
  46 #define CASE(x) (strcmp((x), c) == 0)
  47     char *c    = av;
  48     char *stop = av + strlen(av);
  49     char *v, *e;
  50
  51     while (c < stop)
  52     {
  53         /* look for the start of the value */
  54         v = strchr(c, '=');
  55         if (v == NULL)
  56             return 0;
  57         *v = '\0';
  58         v++;
  59
  60         /* look the end of the value */
  61         e = strchr(v, '\n');
  62         if (e == NULL)
  63             return 0;
  64         *e = '\0';
  65         e++;
  66
  67         /* test metadata */
  68         if (CASE("message"))
  69             strcpy(l->message, v);
  70         else if (CASE("back"))
  71             strcpy(l->back, v);
  72         else if (CASE("song"))
  73             strcpy(l->song, v);
  74         else if (CASE("grad"))
  75             strcpy(l->grad, v);
  76         else if (CASE("shot"))
  77             strcpy(l->shot, v);
  78         else if (CASE("goal"))
  79         {
  80             l->goal = atoi(v);
  81             l->coin_score.coins[2] = l->goal;
  82         }
  83         else if (CASE("time"))
  84         {
  85             l->time = atoi(v);
  86             l->time_score.timer[2] = l->time;
  87             l->goal_score.timer[2] = l->time;
  88         }
  89         else if (CASE("time_hs"))
  90             sscanf(v, "%d %d",
  91                    &l->time_score.timer[0],
  92                    &l->time_score.timer[1]);
  93         else if (CASE("goal_hs"))
  94             sscanf(v, "%d %d",
  95                    &l->goal_score.timer[0],
  96                    &l->goal_score.timer[1]);
  97         else if (CASE("coin_hs"))
  98             sscanf(v, "%d %d",
  99                    &l->coin_score.coins[0],
 100                    &l->coin_score.coins[1]);
 101         else if (CASE("levelname"))
 102             strcpy(l->name, v);
 103         else if (CASE("version"))
 104             l->version = atoi(v);
 105         else if (CASE("author"))
 106             strcpy(l->author, v);
 107         else if (CASE("special"))
 108             l->is_bonus = atoi(v);
 109
 110         c = e;
 111     }
 112     return 1;
 113 }
 114
 115 /* Load the sol file 'filename' and fill the 'level' structure.  Return 1 on
 116  * success, 0 on error. */
 117
 118 int level_load(const char *filename, struct level *level)
 119 {
 120     struct s_file sol;
 121
 122     int money;
 123     int i;
 124
 125     memset(level, 0, sizeof (struct level));
 126     memset(&sol,  0, sizeof (sol));
 127
 128     /* Try to load the sol file */
 129     if (!sol_load_only_file(&sol, filename))
 130     {
 131         fprintf(stderr,
 132                 _("Error while loading level file '%s': %s\n"), filename,
 133                 errno ? strerror(errno) : _("Not a valid level file"));
 134         return 0;
 135     }
 136
 137     strcpy(level->file, filename);
 138
 139     /* Init hs with default values */
 140     score_init_hs(&level->time_score, 59999, 0);
 141     score_init_hs(&level->goal_score, 59999, 0);
 142     score_init_hs(&level->coin_score, 59999, 0);
 143
 144     /* Compute money and default max money */
 145     money = 0;
 146     for (i = 0; i < sol.cc; i++)
 147         money += sol.cv[i].n;
 148     level->coin_score.coins[0] = money;
 149
 150     /* Scan sol metadata */
 151     if (sol.ac > 0)
 152         level_scan_metadata(level, sol.av);
 153
 154     /* Compute initial hs default values */
 155
 156 #define HOP(t, c) \
 157     if (t[2] c t[0]) \
 158         t[0] = t[1] = t[2]; \
 159     else if (t[2] c t[1]) \
 160         t[1] = (t[0] + t[2]) / 2
 161
 162     HOP(level->time_score.timer, <=);
 163     HOP(level->goal_score.timer, <=);
 164     HOP(level->coin_score.coins, >=);
 165
 166     sol_free(&sol);
 167
 168     return 1;
 169 }
 170
 171 /*---------------------------------------------------------------------------*/
 172
 173 void level_dump_info(const struct level *l)
 174 /* This function dumps the info of a demo structure
 175  * It's only a function for debugging, no need of I18N */
 176 {
 177     printf("filename:        %s\n"
 178            "name:            %s\n"
 179            "version:         %d\n"
 180            "author:          %s\n"
 181            "time limit:      %d\n"
 182            "goal count:      %d\n"
 183            "time hs:         %d %d %d\n"
 184            "goal hs:         %d %d %d\n"
 185            "coin hs:         %d %d %d\n"
 186            "message:         %s\n"
 187            "background:      %s\n"
 188            "gradiant:        %s\n"
 189            "screenshot:      %s\n"
 190            "song:            %s\n",
 191            l->file, l->name, l->version, l->author,
 192            l->time, l->goal,
 193            l->time_score.timer[0],
 194            l->time_score.timer[1],
 195            l->time_score.timer[2],
 196            l->goal_score.timer[0],
 197            l->goal_score.timer[1],
 198            l->goal_score.timer[2],
 199            l->coin_score.coins[0],
 200            l->coin_score.coins[1],
 201            l->coin_score.coins[2],
 202            l->message, l->back, l->grad, l->shot, l->song);
 203 }
 204
 205 /*---------------------------------------------------------------------------*/
 206
 207 const char *mode_to_str(int m)
 208 {
 209     switch (m)
 210     {
 211     case MODE_CHALLENGE: return _("Challenge");
 212     case MODE_NORMAL:    return _("Normal");
 213     case MODE_PRACTICE:  return _("Practice");
 214     case MODE_SINGLE:    return _("Single");
 215     default:             return _("Unknown");
 216     }
 217 }
 218
 219 /*---------------------------------------------------------------------------*/
 220
 221 const char *state_to_str(int m)
 222 {
 223     switch (m)
 224     {
 225     case GAME_NONE:    return _("Aborted");
 226     case GAME_TIME:    return _("Time-out");
 227     case GAME_SPEC:
 228     case GAME_GOAL:    return _("Success");
 229     case GAME_FALL:    return _("Fall-out");
 230     default:           return _("Unknown");
 231     }
 232 }
 233
 234 /*---------------------------------------------------------------------------*/