Those sets haven't been merged.
[neverball] / ball / demo.c
index 4efde5e..2903b7f 100644 (file)
@@ -1,4 +1,4 @@
-/*   
+/*
  * Copyright (C) 2003 Robert Kooima
  *
  * NEVERBALL is  free software; you can redistribute  it and/or modify
 #include <stdio.h>
 #include <stdlib.h>
 #include <string.h>
+#include <time.h>
 
-#ifndef _WIN32
-#include <unistd.h>
-#endif
-
-#include "set.h"
 #include "demo.h"
 #include "game.h"
-#include "level.h"
 #include "audio.h"
 #include "solid.h"
 #include "config.h"
 #include "binary.h"
+#include "text.h"
 
 /*---------------------------------------------------------------------------*/
 
-#define MAGIC 0x4E425251
-#define DEMO_FPS_CAP 200 /* FPS replay limit, keeps size down on monster systems */
+#define MAGIC           0x52424EAF
+#define DEMO_VERSION    5
+
+#define DATELEN 20
 
 static FILE *demo_fp;
 
-static char name[MAXDEMO][MAXNAM];
-static char shot[MAXDEMO][PATHMAX];
-static int  score[MAXDEMO];
-static int  timer[MAXDEMO];
-static int  count;
+static struct demo demos[MAXDEMO]; /* Array of scanned demos  */
+static int         count;          /* Number of scanned demos */
 
 /*---------------------------------------------------------------------------*/
+
+void demo_dump_info(const struct demo *d)
+{
+    printf("Name:         %s\n"
+           "File:         %s\n"
+           "Time:         %d\n"
+           "Coins:        %d\n"
+           "Mode:         %d\n"
+           "State:        %d\n"
+           "Date:         %s"
+           "Player:       %s\n"
+           "Shot:         %s\n"
+           "Level:        %s\n"
+           "  Back:       %s\n"
+           "  Grad:       %s\n"
+           "  Song:       %s\n"
+           "Time:         %d\n"
+           "Goal:         %d\n"
+           "Score:        %d\n"
+           "Balls:        %d\n"
+           "Total Time:   %d\n",
+           d->name, d->filename,
+           d->timer, d->coins, d->mode, d->status, ctime(&d->date),
+           d->player,
+           d->shot, d->file, d->back, d->grad, d->song,
+           d->time, d->goal, d->score, d->balls, d->times);
+}
+
+static time_t make_time_from_utc(struct tm *tm)
+{
+    struct tm local, *utc;
+    time_t t;
+
+    t = mktime(tm);
+
+    local = *localtime(&t);
+    utc   =  gmtime(&t);
+
+    local.tm_year += local.tm_year - utc->tm_year;
+    local.tm_mon  += local.tm_mon  - utc->tm_mon ;
+    local.tm_mday += local.tm_mday - utc->tm_mday;
+    local.tm_hour += local.tm_hour - utc->tm_hour;
+    local.tm_min  += local.tm_min  - utc->tm_min ;
+    local.tm_sec  += local.tm_sec  - utc->tm_sec ;
+
+    return mktime(&local);
+}
+
+static int demo_header_read(FILE *fp, struct demo *d)
+{
+    int magic;
+    int version;
+    int t;
+
+    struct tm date;
+    char datestr[DATELEN];
+
+    get_index(fp, &magic);
+    get_index(fp, &version);
+
+    get_index(fp, &t);
+
+    if (magic == MAGIC && version == DEMO_VERSION && t)
+    {
+        d->timer = t;
+
+        get_index(fp, &d->coins);
+        get_index(fp, &d->status);
+        get_index(fp, &d->mode);
+
+        get_string(fp, d->player, MAXNAM);
+
+        get_string(fp, datestr, DATELEN);
+        sscanf(datestr,
+               "%d-%d-%dT%d:%d:%d",
+               &date.tm_year,
+               &date.tm_mon,
+               &date.tm_mday,
+               &date.tm_hour,
+               &date.tm_min,
+               &date.tm_sec);
+
+        /* Convert certain values to valid structure member values. */
+
+        date.tm_year -= 1900;
+        date.tm_mon  -= 1;
+
+        d->date = make_time_from_utc(&date);
+
+        get_string(fp, d->shot, PATHMAX);
+        get_string(fp, d->file, PATHMAX);
+
+        get_index(fp, &d->time);
+        get_index(fp, &d->goal);
+        get_index(fp, &d->score);
+        get_index(fp, &d->balls);
+        get_index(fp, &d->times);
+
+        return 1;
+    }
+    return 0;
+}
+
+static char *bname(const char *name, const char *suffix)
+{
+    static char buf[MAXSTR];
+
+    char *base;
+    size_t l;
+
+    /* Remove the directory delimiter */
+
+    base = strrchr(name, '/');
+#ifdef _WIN32
+    if (!base)
+        base = strrchr(name, '\\');
+    else
+    {
+        char *tmp;
+        if ((tmp = strrchr(base, '\\')))
+            base = tmp;
+    }
+#endif
+    strncpy(buf, base ? base + 1 : name, MAXSTR);
+
+    /* Remove the extension */
+
+    l = strlen(buf) - strlen(suffix);
+    if ((l > 1) && (strcmp(buf + l, suffix) == 0))
+        buf[l] = '\0';
+
+    return buf;
+}
+
+static void demo_header_write(FILE *fp, struct demo *d)
+{
+    int magic = MAGIC;
+    int version = DEMO_VERSION;
+    int zero  = 0;
+
+    char datestr[DATELEN];
+
+    strftime(datestr, DATELEN, "%Y-%m-%dT%H:%M:%S", gmtime(&d->date));
+
+    put_index(fp, &magic);
+    put_index(fp, &version);
+    put_index(fp, &zero);
+    put_index(fp, &zero);
+    put_index(fp, &zero);
+    put_index(fp, &d->mode);
+
+    put_string(fp, d->player);
+    put_string(fp, datestr);
+
+    put_string(fp, d->shot);
+    put_string(fp, d->file);
+
+    put_index(fp, &d->time);
+    put_index(fp, &d->goal);
+    put_index(fp, &d->score);
+    put_index(fp, &d->balls);
+    put_index(fp, &d->times);
+}
+
+/*---------------------------------------------------------------------------*/
+
+/* Scan another file (used by demo_scan). */
+
+static void demo_scan_file(const char *filename)
+{
+    FILE *fp;
+    struct demo *d = &demos[count];
+
+    if ((fp = fopen(config_user(filename), FMODE_RB)))
+    {
+        if (demo_header_read(fp, d))
+        {
+            strncpy(d->filename, config_user(filename), MAXSTR);
+            strncpy(d->name, bname(text_from_locale(d->filename), REPLAY_EXT),
+                    PATHMAX);
+            d->name[PATHMAX - 1] = '\0';
+
+            count++;
+        }
+        fclose(fp);
+    }
+}
+
 #ifdef _WIN32
 
 int demo_scan(void)
 {
     WIN32_FIND_DATA d;
     HANDLE h;
-    FILE *fp;
 
     count = 0;
 
@@ -58,27 +240,7 @@ int demo_scan(void)
     if ((h = FindFirstFile(config_user("*"), &d)) != INVALID_HANDLE_VALUE)
     {
         do
-            if ((fp = fopen(config_user(d.cFileName), FMODE_RB)))
-            {
-                int magic;
-                int t, c;
-
-                /* Note the name and screen shot of each replay file. */
-
-                get_index(fp, &magic);
-                get_index(fp, &t);
-                get_index(fp, &c);
-
-                if (magic == MAGIC && t)
-                {
-                    fread(shot[count], 1, PATHMAX, fp);
-                    timer[count] = t;
-                    score[count] = c;
-                    strncpy(name[count], d.cFileName, MAXNAM);
-                    count++;
-                }
-                fclose(fp);
-            }
+            demo_scan_file(d.cFileName);
         while (count < MAXDEMO && FindNextFile(h, &d));
 
         FindClose(h);
@@ -92,7 +254,6 @@ int demo_scan(void)
 int demo_scan(void)
 {
     struct dirent *ent;
-    FILE *fp;
     DIR  *dp;
 
     count = 0;
@@ -102,27 +263,7 @@ int demo_scan(void)
     if ((dp = opendir(config_user(""))))
     {
         while (count < MAXDEMO && (ent = readdir(dp)))
-            if ((fp = fopen(config_user(ent->d_name), FMODE_RB)))
-            {
-                int magic;
-                int t, c;
-
-                /* Note the name and screen shot of each replay file. */
-
-                get_index(fp, &magic);
-                get_index(fp, &t);
-                get_index(fp, &c);
-
-                if (magic == MAGIC && t)
-                {
-                    fread(shot[count], 1, PATHMAX, fp);
-                    timer[count] = t;
-                    score[count] = c;
-                    strncpy(name[count], ent->d_name, MAXNAM);
-                    count++;
-                }
-                fclose(fp);
-            }
+            demo_scan_file(ent->d_name);
 
         closedir(dp);
     }
@@ -134,36 +275,40 @@ const char *demo_pick(void)
 {
     int n = demo_scan();
 
-    return (n > 0) ? name[(rand() >> 4) % n] : NULL;
-}
-
-const char *demo_name(int i)
-{
-    return (0 <= i && i < count) ? name[i] : NULL;
-}
-
-const char *demo_shot(int i)
-{
-    return (0 <= i && i < count) ? shot[i] : NULL;
+    return (n > 0) ? demos[(rand() >> 4) % n].filename : NULL;
 }
 
-int demo_coins(int i)
+const struct demo *demo_get(int i)
 {
-    return (0 <= i && i < count) ? score[i] : 0;
+    return (0 <= i && i < count) ? &demos[i] : NULL;
 }
 
-int demo_clock(int i)
+const char *date_to_str(time_t i)
 {
-    return (0 <= i && i < count) ? timer[i] : 0;
+    static char str[MAXSTR];
+    const char *fmt;
+
+    /* TRANSLATORS:  here is the format of the date shown at the
+       replay selection screen (and possibly elsewhere).  The default
+       format is necessarily locale-independent.  See strftime(3) for
+       details on the format.
+     */
+
+    fmt = /* xgettext:no-c-format */ L_("%Y-%m-%d %H:%M:%S");
+    strftime(str, MAXSTR, fmt, localtime(&i));
+    return text_from_locale(str);
 }
 
 /*---------------------------------------------------------------------------*/
 
-int demo_exists(char *name)
+int demo_exists(const char *name)
 {
     FILE *fp;
+    char buf[MAXSTR];
 
-    if ((fp = fopen(config_user(name), "r")))
+    strcpy(buf, config_user(name));
+    strcat(buf, REPLAY_EXT);
+    if ((fp = fopen(buf, "r")))
     {
         fclose(fp);
         return 1;
@@ -179,7 +324,7 @@ void demo_unique(char *name)
 
     for (i = 1; i < 100; i++)
     {
-        sprintf(name, _("replay%02d"), i);
+        sprintf(name, "replay%02d", i);
 
         if (!demo_exists(name))
             return;
@@ -189,185 +334,179 @@ void demo_unique(char *name)
 /*---------------------------------------------------------------------------*/
 
 int demo_play_init(const char *name,
-                   const char *file,
-                   const char *back,
-                   const char *grad,
-                   const char *song,
-                   const char *shot,
-                   int t, int g, int s, int c, int b)
+                   const struct level *level,
+                   const struct level_game *lg)
 {
-    int magic = MAGIC;
-    int zero  = 0;
-    int st    = t;
-    int sg    = g;
-    int ss    = s;
-    int sc    = c;
-    int sb    = b;
+    struct demo demo;
 
-    /* Initialize the replay file.  Write the header. */
+    memset(&demo, 0, sizeof (demo));
 
-    if (name && (demo_fp = fopen(config_user(name), FMODE_WB)))
-    {
-        put_index(demo_fp, &magic);
-        put_index(demo_fp, &zero);
-        put_index(demo_fp, &zero);
+    strncpy(demo.filename, config_user(name), MAXSTR);
+    strcat(demo.filename, REPLAY_EXT);
+
+    demo.mode = lg->mode;
+    demo.date = time(NULL);
 
-        fwrite(shot, 1, PATHMAX, demo_fp);
-        fwrite(file, 1, PATHMAX, demo_fp);
-        fwrite(back, 1, PATHMAX, demo_fp);
-        fwrite(grad, 1, PATHMAX, demo_fp);
-        fwrite(song, 1, PATHMAX, demo_fp);
+    config_get_s(CONFIG_PLAYER, demo.player, MAXNAM);
 
-        put_index(demo_fp, &st);
-        put_index(demo_fp, &sg);
-        put_index(demo_fp, &ss);
-        put_index(demo_fp, &sc);
-        put_index(demo_fp, &sb);
+    strncpy(demo.shot, level->shot, PATHMAX);
+    strncpy(demo.file, level->file, PATHMAX);
+    strncpy(demo.back, level->back, PATHMAX);
+    strncpy(demo.grad, level->grad, PATHMAX);
+    strncpy(demo.song, level->song, PATHMAX);
 
-        audio_music_fade_to(2.0f, song);
+    demo.time  = lg->time;
+    demo.goal  = lg->goal;
+    demo.score = lg->score;
+    demo.balls = lg->balls;
+    demo.times = lg->times;
 
-        return game_init(file, back, grad, t, (g == 0));
+    if ((demo_fp = fopen(demo.filename, FMODE_WB)))
+    {
+        demo_header_write(demo_fp, &demo);
+        audio_music_fade_to(2.0f, level->song);
+        return game_init(level, lg->time, lg->goal);
     }
     return 0;
 }
 
-void demo_play_step(float dt)
+void demo_play_step()
 {
-    static float fps_track = 0.0f;
-    static float fps_cap   = 1.0f / (float) DEMO_FPS_CAP;
-
     if (demo_fp)
-    {
-        fps_track += dt;
-        if (fps_track > fps_cap)
-        {            
-            put_float(demo_fp, &fps_track);
-            put_game_state(demo_fp); 
-            fps_track = 0.0f;
-        }
-    }
+        input_put(demo_fp);
 }
 
-void demo_play_stat(int coins, int timer)
+void demo_play_stat(const struct level_game *lg)
 {
-    int c = coins;
-    int t = timer;
-
     if (demo_fp)
     {
-        /* Update the demo header using the final score and time. */
+        long pos = ftell(demo_fp);
 
-        fseek(demo_fp, 4, SEEK_SET);
+        fseek(demo_fp, 8, SEEK_SET);
 
-        put_index(demo_fp, &t);
-        put_index(demo_fp, &c);
+        put_index(demo_fp, &lg->timer);
+        put_index(demo_fp, &lg->coins);
+        put_index(demo_fp, &lg->status);
 
-        fseek(demo_fp, 0, SEEK_END);
+        fseek(demo_fp, pos, SEEK_SET);
     }
 }
 
-void demo_play_stop(const char *name)
+void demo_play_stop(void)
 {
-    char src[PATHMAX];
-    char dst[PATHMAX];
-
     if (demo_fp)
     {
         fclose(demo_fp);
         demo_fp = NULL;
+    }
+}
 
-        /* Rename the temporary replay file to its given name. */
+int demo_saved(void)
+{
+    return demo_exists(USER_REPLAY_FILE);
+}
 
-        if (name)
-        {
-            strncpy(src, config_user(USER_REPLAY_FILE), PATHMAX);
-            strncpy(dst, config_user(name),             PATHMAX);
+void demo_rename(const char *name)
+{
+    char src[MAXSTR];
+    char dst[MAXSTR];
 
-            rename(src, dst);
-        }
+    if (name &&
+        demo_exists(USER_REPLAY_FILE) &&
+        strcmp(name, USER_REPLAY_FILE) != 0)
+    {
+        strcpy(src, config_user(USER_REPLAY_FILE));
+        strcat(src, REPLAY_EXT);
+
+        strcpy(dst, config_user(name));
+        strcat(dst, REPLAY_EXT);
+
+#ifdef _WIN32
+        if (demo_exists(name))
+            remove(dst);
+#endif
+        rename(src, dst);
     }
 }
 
 /*---------------------------------------------------------------------------*/
 
-static char demo_replay_name[MAXSTR];
+static int demo_load_level(const struct demo *demo, struct level *level)
+{
+    if (level_load(demo->file, level))
+    {
+        level->time = demo->time;
+        level->goal = demo->goal;
+        return 1;
+    }
+    return 0;
+}
+
+static struct demo  demo_replay;       /* The current demo */
+static struct level demo_level_replay; /* The current level demo-ed*/
 
-int demo_replay_init(const char *name, int *s, int *c, int *b, int *g, int *t)
+const struct demo *curr_demo_replay(void)
 {
-    char shot[PATHMAX];
-    char file[PATHMAX];
-    char back[PATHMAX];
-    char grad[PATHMAX];
-    char song[PATHMAX];
+    return &demo_replay;
+}
 
-    int magic;
-    int zero;
-    int st;
-    int sg;
-    int ss;
-    int sc;
-    int sb;
-    
-    if ((demo_fp = fopen(config_user(name), FMODE_RB)))
+static int demo_status = GAME_NONE;
+
+int demo_replay_init(const char *name, struct level_game *lg)
+{
+    demo_status = GAME_NONE;
+    demo_fp     = fopen(name, FMODE_RB);
+
+    if (demo_fp && demo_header_read(demo_fp, &demo_replay))
     {
-        strncpy(demo_replay_name, name, MAXSTR);
+        strncpy(demo_replay.filename, name, MAXSTR);
+        strncpy(demo_replay.name, bname(text_from_locale(demo_replay.filename),
+                REPLAY_EXT), PATHMAX);
 
-        get_index(demo_fp, &magic);
+        if (!demo_load_level(&demo_replay, &demo_level_replay))
+            return 0;
 
-        if (magic == MAGIC)
+        if (lg)
         {
-            get_index(demo_fp, &zero);
-            get_index(demo_fp, &zero);
-
-            fread(shot, 1, PATHMAX, demo_fp);
-            fread(file, 1, PATHMAX, demo_fp);
-            fread(back, 1, PATHMAX, demo_fp);
-            fread(grad, 1, PATHMAX, demo_fp);
-            fread(song, 1, PATHMAX, demo_fp);
-
-            get_index(demo_fp, &st);
-            get_index(demo_fp, &sg);
-            get_index(demo_fp, &ss);
-            get_index(demo_fp, &sc);
-            get_index(demo_fp, &sb);
-
-            if (g) *g = (int) sg;
-            if (s) *s = (int) ss;
-            if (c) *c = (int) sc;
-            if (b) *b = (int) sb;
-            if (t) *t = (int) st;
-
-            if (g)
-            {
-                audio_music_fade_to(0.5f, song);
-                return game_init(file, back, grad, st, (*g == 0));
-            }
-            else
-                return game_init(file, back, grad, st, 1);
+            lg->mode  = demo_replay.mode;
+            lg->score = demo_replay.score;
+            lg->times = demo_replay.times;
+            lg->time  = demo_replay.time;
+            lg->goal  = demo_replay.goal;
+
+            /* A normal replay demo */
+            audio_music_fade_to(0.5f, demo_level_replay.song);
+            return game_init(&demo_level_replay, demo_replay.time,
+                             demo_replay.goal);
         }
-        fclose(demo_fp);
+        else /* A title screen demo */
+            return game_init(&demo_level_replay, demo_replay.time, 0);
     }
     return 0;
 }
 
-int demo_replay_step(float *dt)
+int demo_replay_step(float dt)
 {
-    const float g[3] = { 0.0f, -9.8f, 0.0f };
+    const float gdn[3] = { 0.0f, -9.8f, 0.0f };
+    const float gup[3] = { 0.0f, +9.8f, 0.0f };
 
     if (demo_fp)
     {
-        get_float(demo_fp, dt);
-
-        if (feof(demo_fp) == 0)
+        if (input_get(demo_fp))
         {
-            /* Play out current game state for particles, clock, etc. */
+            /* Play out current game state. */
 
-            game_step(g, *dt, 1);
+            switch (demo_status)
+            {
+            case GAME_NONE:
+                demo_status = game_step(gdn, dt, 1); break;
+            case GAME_GOAL:
+                (void)        game_step(gup, dt, 0); break;
+            default:
+                (void)        game_step(gdn, dt, 0); break;
+            }
 
-            /* Load real current game state from file. */
-            
-            if (get_game_state(demo_fp))
-                return 1;
+            return 1;
         }
     }
     return 0;
@@ -380,8 +519,13 @@ void demo_replay_stop(int d)
         fclose(demo_fp);
         demo_fp = NULL;
 
-        if (d) unlink(config_user(demo_replay_name));
+        if (d) remove(demo_replay.filename);
     }
 }
 
+void demo_replay_dump_info(void)
+{
+    demo_dump_info(&demo_replay);
+}
+
 /*---------------------------------------------------------------------------*/