home · contact · privacy
Add basic food clock (but no consumables yet to re-set it).
[plomrogue] / src / server / io.c
index d4c9faf860c4f05ae969a70ca95ef685c882b8fb..9e55b0114d436b6b5f096af6a27d9638cf83785d 100644 (file)
 #include <errno.h> /* global errno */
 #include <limits.h> /* PIPE_BUF */
 #include <stddef.h> /* NULL */
-#include <stdint.h> /* uint8_t, uint16_t, uint32_t, UINT8_MAX */
+#include <stdint.h> /* uint8_t, uint16_t, uint32_t, int32_t, UINT8_MAX */
 #include <stdio.h> /* defines FILE, sprintf(), fprintf() */
 #include <stdlib.h> /* free() */
-#include <string.h> /* strlen(), snprintf(), memcpy(), memset(), strchr() */
+#include <string.h> /* strlen(), snprintf(), memcpy(), strchr() */
 #include <sys/types.h> /* time_t */
 #include <time.h> /* time(), nanosleep() */
 #include "../common/readwrite.h" /* atomic_write_start(), atomic_write_finish(),
@@ -24,6 +24,8 @@
 #include "../common/try_malloc.h" /* try_malloc() */
 #include "cleanup.h" /* set_cleanup_flag() */
 #include "hardcoded_strings.h" /* s */
+#include "map.h" /* init_empty_map() */
+#include "run.h" /* send_to_outfile() */
 #include "things.h" /* Thing, ThingType, ThingInMemory, ThingAction,
                      * get_thing_type(), get_player()
                      */
 
 /* Helpers to write lines of god commands to recreate thing "t". */
 static void write_key_space(FILE * file, char * key);
-static void write_value(FILE * file, uint32_t value);
+static void write_uvalue(FILE * file, uint32_t value);
 static void write_string(FILE * file, char * string);
-static void write_key_space_value(FILE * file, char * key, uint32_t value);
+static void write_key_space_uvalue(FILE * file, char * key, uint32_t value);
+static void write_key_space_svalue(FILE * file, char * key, int32_t value);
 static void write_key_space_string(FILE * file, char * key, char * string);
 
+/* Write to "file" game-map-sized "map" in "command"-prefixed numbered lines. */
+static void write_mem_map(FILE * file, char * map, char * command);
+
 /* Write to "file" \n-delimited line of "key" + space + "value" as string. */
 static void write_thing(FILE * file, struct Thing * t);
 
@@ -52,7 +58,7 @@ static void try_growing_queue();
 static void update_worldstate_file();
 
 /* Write "value" to new \n-delimited line of "file". */
-static void write_value_as_line(uint32_t value, FILE * file);
+static void write_value_as_line(int32_t value, FILE * file);
 
 /* Write to "file" player's inventory, one item name per line. End in "%\n". */
 static void write_inventory(struct Thing * player, FILE * file);
@@ -80,7 +86,7 @@ static void write_key_space(FILE * file, char * key)
 
 
 
-static void write_value(FILE * file, uint32_t value)
+static void write_uvalue(FILE * file, uint32_t value)
 {
     char * line = try_malloc(11, __func__);
     exit_trouble(-1 == sprintf(line, "%u", value), __func__, s[S_FCN_SPRINTF]);
@@ -106,10 +112,22 @@ static void write_string(FILE * file, char * string)
 
 
 
-static void write_key_space_value(FILE * file, char * key, uint32_t value)
+static void write_key_space_uvalue(FILE * file, char * key, uint32_t value)
 {
     write_key_space(file, key);
-    write_value(file, value);
+    write_uvalue(file, value);
+    try_fputc('\n', file, __func__);
+}
+
+
+
+static void write_key_space_svalue(FILE * file, char * key, int32_t value)
+{
+    write_key_space(file, key);
+    char * line = try_malloc(11, __func__);
+    exit_trouble(-1 == sprintf(line, "%d", value), __func__, s[S_FCN_SPRINTF]);
+    try_fwrite(line, strlen(line), 1, file, __func__);
+    free(line);
     try_fputc('\n', file, __func__);
 }
 
@@ -124,57 +142,65 @@ static void write_key_space_string(FILE * file, char * key, char * string)
 
 
 
-static void write_thing(FILE * file, struct Thing * t)
+static void write_mem_map(FILE * file, char * map, char * command)
 {
-    struct Thing * o;
-    for (o = t->owns; o; o = o->next)
-    {
-        write_thing(file, o);
-    }
-    write_key_space_value(file, s[S_CMD_T_ID], t->id);
-    write_key_space_value(file, s[S_CMD_T_TYPE], t->type);
-    write_key_space_value(file, s[S_CMD_T_POSY], t->pos.y);
-    write_key_space_value(file, s[S_CMD_T_POSX], t->pos.x);
-    write_key_space_value(file, s[S_CMD_T_COMMAND], t->command);
-    write_key_space_value(file, s[S_CMD_T_ARGUMENT], t->arg);
-    write_key_space_value(file, s[S_CMD_T_PROGRESS], t->progress);
-    write_key_space_value(file, s[S_CMD_T_HP], t->lifepoints);
-    for (o = t->owns; o; o = o->next)
-    {
-        write_key_space_value(file, s[S_CMD_T_CARRIES], o->id);
-    }
-    if (t->mem_map)
+    if (map)
     {
         uint32_t map_size = world.map.length * world.map.length;/* snprintf() */
-        char * mem_map_copy = try_malloc(map_size + 1, __func__);/* reads one */
-        memcpy(mem_map_copy, t->mem_map, map_size);   /* byte beyond map_size */
-        mem_map_copy[map_size] = '\0';     /* if string is not \0-terminated. */
+        char * map_copy = try_malloc(map_size + 1, __func__);    /* reads one */
+        memcpy(map_copy, map, map_size);              /* byte beyond map_size */
+        map_copy[map_size] = '\0';         /* if string is not \0-terminated. */
         uint16_t y;
         char string[UINT8_MAX + 1 + 1];
         for (y = 0; y < world.map.length; y++)
         {
-
             int test = snprintf(string, world.map.length + 1, "%s",
-                                mem_map_copy + (y * world.map.length));
+                                map_copy + (y * world.map.length));
             exit_trouble(test < 0, __func__, "snprintf()");
-            write_key_space(file, s[S_CMD_T_MEMMAP]);
-            write_value(file, y);
+            write_key_space(file, command);
+            write_uvalue(file, y);
             try_fputc(' ', file, __func__);
             write_string(file, string);
             try_fputc('\n', file, __func__);
         }
-        free(mem_map_copy);
-        struct ThingInMemory * tm = t->t_mem;
-        for (; tm; tm = tm->next)
-        {
-            write_key_space(file, s[S_CMD_T_MEMTHING]);
-            write_value(file, tm->type);
-            try_fputc(' ', file, __func__);
-            write_value(file, tm->pos.y);
-            try_fputc(' ', file, __func__);
-            write_value(file, tm->pos.x);
-            try_fputc('\n', file, __func__);
-        }
+        free(map_copy);
+    }
+}
+
+
+
+static void write_thing(FILE * file, struct Thing * t)
+{
+    struct Thing * o;
+    for (o = t->owns; o; o = o->next)
+    {
+        write_thing(file, o);
+    }
+    write_key_space_uvalue(file, s[S_CMD_T_ID], t->id);
+    write_key_space_uvalue(file, s[S_CMD_T_TYPE], t->type);
+    write_key_space_uvalue(file, s[S_CMD_T_POSY], t->pos.y);
+    write_key_space_uvalue(file, s[S_CMD_T_POSX], t->pos.x);
+    write_key_space_uvalue(file, s[S_CMD_T_COMMAND], t->command);
+    write_key_space_uvalue(file, s[S_CMD_T_ARGUMENT], t->arg);
+    write_key_space_uvalue(file, s[S_CMD_T_PROGRESS], t->progress);
+    write_key_space_uvalue(file, s[S_CMD_T_HP], t->lifepoints);
+    write_key_space_svalue(file, s[S_CMD_T_SATIATION], t->satiation);
+    for (o = t->owns; o; o = o->next)
+    {
+        write_key_space_uvalue(file, s[S_CMD_T_CARRIES], o->id);
+    }
+    write_mem_map(file, t->mem_depth_map, s[S_CMD_T_MEMDEPTHMAP]);
+    write_mem_map(file, t->mem_map, s[S_CMD_T_MEMMAP]);
+    struct ThingInMemory * tm = t->t_mem;
+    for (; tm; tm = tm->next)
+    {
+        write_key_space(file, s[S_CMD_T_MEMTHING]);
+        write_uvalue(file, tm->type);
+        try_fputc(' ', file, __func__);
+        write_uvalue(file, tm->pos.y);
+        try_fputc(' ', file, __func__);
+        write_uvalue(file, tm->pos.x);
+        try_fputc('\n', file, __func__);
     }
     try_fputc('\n', file, __func__);
 }
@@ -211,6 +237,7 @@ static void update_worldstate_file()
     struct Thing * player = get_player();
     write_value_as_line(world.turn, file);
     write_value_as_line(player->lifepoints, file);
+    write_value_as_line(player->satiation, file);
     write_inventory(player, file);
     write_value_as_line(player->pos.y, file);
     write_value_as_line(player->pos.x, file);
@@ -225,9 +252,9 @@ static void update_worldstate_file()
 
 
 
-static void write_value_as_line(uint32_t value, FILE * file)
+static void write_value_as_line(int32_t value, FILE * file)
 {
-    char write_buf[12];     /* Holds 10 digits of uint32_t maximum + \n + \0. */
+    char write_buf[13]; /* Hold "+"/"-" + 10 digits of int32_t max + \n + \0. */
     exit_trouble(sprintf(write_buf,"%u\n",value) < 0,__func__,s[S_FCN_SPRINTF]);
     try_fwrite(write_buf, strlen(write_buf), 1, file, __func__);
 }
@@ -261,13 +288,12 @@ static void write_inventory(struct Thing * player, FILE * file)
 
 static char * build_visible_map(struct Thing * player)
 {
-    uint32_t map_size = world.map.length * world.map.length;
-    char * visible_map = try_malloc(map_size, __func__);
-    memset(visible_map, ' ', map_size);
+    char * visible_map;
+    init_empty_map(&visible_map);
     if (player->fov_map) /* May fail if player thing was created / positioned */
     {                    /* by god command after turning off FOV building.    */
-        uint32_t pos_i;
-        for (pos_i = 0; pos_i < map_size; pos_i++)
+        uint32_t pos_i = 0;
+        for (; pos_i < (uint32_t) world.map.length * world.map.length; pos_i++)
         {
             if (player->fov_map[pos_i] == 'v')
             {
@@ -356,6 +382,7 @@ extern char * io_round()
     if (world.do_update)
     {
         update_worldstate_file();
+        send_to_outfile("WORLD_UPDATED\n", 1);
         world.do_update = 0;
     }
     try_growing_queue();
@@ -368,45 +395,46 @@ extern void save_world()
 {
     char * path_tmp;
     FILE * file = atomic_write_start(s[S_PATH_SAVE], &path_tmp);
-    write_key_space_value(file, s[S_CMD_MAPLENGTH], world.map.length);
-    write_key_space_value(file, s[S_CMD_PLAYTYPE], world.player_type);
+    write_key_space_uvalue(file, s[S_CMD_MAPLENGTH], world.map.length);
+    write_key_space_uvalue(file, s[S_CMD_PLAYTYPE], world.player_type);
     try_fputc('\n', file, __func__);
     struct ThingAction * ta;
     for (ta = world.thing_actions; ta; ta = ta->next)
     {
-        write_key_space_value(file, s[S_CMD_TA_ID], ta->id);
-        write_key_space_value(file, s[S_CMD_TA_EFFORT], ta->effort);
+        write_key_space_uvalue(file, s[S_CMD_TA_ID], ta->id);
+        write_key_space_uvalue(file, s[S_CMD_TA_EFFORT], ta->effort);
         write_key_space_string(file, s[S_CMD_TA_NAME], ta->name);
         try_fputc('\n', file, __func__);
     }
     struct ThingType * tt;
     for (tt = world.thing_types; tt; tt = tt->next)
     {
-        write_key_space_value(file, s[S_CMD_TT_ID], tt->id);
-        write_key_space_value(file, s[S_CMD_TT_STARTN], tt->start_n);
-        write_key_space_value(file, s[S_CMD_TT_HP], tt->lifepoints);
+        write_key_space_uvalue(file, s[S_CMD_TT_ID], tt->id);
+        write_key_space_uvalue(file, s[S_CMD_TT_STARTN], tt->start_n);
+        write_key_space_uvalue(file, s[S_CMD_TT_HP], tt->lifepoints);
         int test = fprintf(file, "%s %c\n", s[S_CMD_TT_SYMB], tt->char_on_map);
         exit_trouble(test < 0, __func__, "fprintf");
         write_key_space_string(file, s[S_CMD_TT_NAME], tt->name);
-        write_key_space_value(file, s[S_CMD_TT_CONSUM], tt->consumable);
-        write_key_space_value(file, s[S_CMD_TT_PROL], tt->proliferate);
+        write_key_space_uvalue(file, s[S_CMD_TT_CONSUM], tt->consumable);
+        write_key_space_uvalue(file, s[S_CMD_TT_PROL], tt->proliferate);
+        write_key_space_uvalue(file, s[S_CMD_TT_STOMACH], tt->stomach);
         try_fputc('\n', file, __func__);
     }
     for (tt = world.thing_types; tt; tt = tt->next)
     {
-        write_key_space_value(file, s[S_CMD_TT_ID], tt->id);
-        write_key_space_value(file, s[S_CMD_TT_CORPS], tt->corpse_id);
+        write_key_space_uvalue(file, s[S_CMD_TT_ID], tt->id);
+        write_key_space_uvalue(file, s[S_CMD_TT_CORPS], tt->corpse_id);
     }
     try_fputc('\n', file, __func__);
-    write_key_space_value(file, s[S_CMD_SEED_MAP], world.seed_map);
-    write_key_space_value(file, s[S_CMD_SEED_RAND], world.seed);
-    write_key_space_value(file, s[S_CMD_TURN], world.turn);
+    write_key_space_uvalue(file, s[S_CMD_SEED_MAP], world.seed_map);
+    write_key_space_uvalue(file, s[S_CMD_SEED_RAND], world.seed);
+    write_key_space_uvalue(file, s[S_CMD_TURN], world.turn);
     try_fputc('\n', file, __func__);
     struct Thing * t;
     for (t = world.things; t; t = t->next)
     {
         write_thing(file, t);
     }
-    write_key_space_value(file, s[S_CMD_WORLD_ACTIVE], 1);
+    write_key_space_uvalue(file, s[S_CMD_WORLD_ACTIVE], 1);
     atomic_write_finish(file, s[S_PATH_SAVE], path_tmp);
 }