home · contact · privacy
Send log messages through server out file. Includes major refactoring.
[plomrogue] / src / server / io.c
index 947c1468b48711d998e875bb76924e6a0da3d03d..0cf2c056782aa2c56846580afb01676ec61f266d 100644 (file)
@@ -1,25 +1,31 @@
-/* src/server/io.c */
+/* src/server/io.c
+ *
+ * This file is part of PlomRogue. PlomRogue is licensed under the GPL version 3
+ * or any later version. For details on its copyright, license, and warranties,
+ * see the file NOTICE in the root directory of the PlomRogue source package.
+ */
 
 #define _POSIX_C_SOURCE 200112L /* snrpintf() */
 #include "io.h"
 #include <errno.h> /* global errno */
 #include <limits.h> /* PIPE_BUF */
-#include <stddef.h> /* size_t, NULL */
+#include <stddef.h> /* NULL */
 #include <stdint.h> /* uint8_t, uint16_t, uint32_t, UINT8_MAX */
-#include <stdio.h> /* defines EOF, FILE, sprintf(), fprintf() */
+#include <stdio.h> /* defines FILE, sprintf(), fprintf() */
 #include <stdlib.h> /* free() */
 #include <string.h> /* strlen(), snprintf(), memcpy(), memset(), strchr() */
 #include <sys/types.h> /* time_t */
 #include <time.h> /* time(), nanosleep() */
 #include "../common/readwrite.h" /* atomic_write_start(), atomic_write_finish(),
-                                  * try_fwrite(), try_fputc(), try_fgetc()
+                                  * get_message_from_queue(), try_fwrite(),
+                                  * read_file_into_queue(), try_fputc()
                                   */
 #include "../common/rexit.h" /* exit_trouble() */
 #include "../common/try_malloc.h" /* try_malloc() */
 #include "cleanup.h" /* set_cleanup_flag() */
 #include "hardcoded_strings.h" /* s */
-#include "things.h" /* Thing, ThingType, ThingAction, get_thing_type(),
-                     * get_player()
+#include "things.h" /* Thing, ThingType, ThingInMemory, ThingAction,
+                     * get_thing_type(), get_player()
                      */
 #include "world.h" /* global world  */
 
@@ -35,17 +41,10 @@ static void write_key_space_string(FILE * file, char * key, char * string);
 /* Write to "file" \n-delimited line of "key" + space + "value" as string. */
 static void write_thing(FILE * file, struct Thing * t);
 
-/* Cut out and return first \0-terminated string from world.queue and
- * appropriately reduce world.queue_size. Return NULL if queue is empty.
- * Superfluous \0 bytes after the string are also cut out. Should the queue
- * start with \0 bytes, those are cut out, but NULL is returned instead of "".
-*/
-static char * get_message_from_queue();
-
 /* Poll input file for world.queue input. Wait a few seconds until giving up;
- * poll only every 0.03 seconds.. Translate '\n' chars in input file into '\0'.
+ * poll only every 0.03 seconds. Translate '\n' chars in input file into '\0'.
  */
-static void read_file_into_queue();
+static void try_growing_queue();
 
 /* Write world state as visible to clients to its file. Write single dot line to
  * server output file to satisfy client ping mechanisms.
@@ -59,13 +58,15 @@ static void write_value_as_line(uint32_t value, FILE * file);
 static void write_inventory(struct Thing * player, FILE * file);
 
 /* Return map cells sequence as visible to the "player", with invisible cells as
- * whitespace. Super-impose over visible map cells things positioned there.
+ * whitespace. Super-impose over visible map cells things positioned there,
+ * with animate things overwriting inanimate things, and inanimate consumable
+ * things overwriting inanimate non-consumable things.
  */
 static char * build_visible_map(struct Thing * player);
 
 /* Write to "file" game map as visible to "player" right now, as drawn by
  * build_visible_map(), and thereafter game map as memorized by player in its
- * .mem_map. Write one row per \n-delimited line.
+ * .mem_map and .t_mem. Write one row per \n-delimited line.
  */
 static void write_map(struct Thing * player, FILE * file);
 
@@ -163,78 +164,42 @@ static void write_thing(FILE * file, struct Thing * t)
             try_fputc('\n', file, __func__);
         }
         free(mem_map_copy);
-    }
-    try_fputc('\n', file, __func__);
-}
-
-
-
-static char * get_message_from_queue()
-{
-    char * message = NULL;
-    if (world.queue_size)
-    {
-        size_t cutout_len = strlen(world.queue);
-        if (0 < cutout_len)
+        struct ThingInMemory * tm = t->t_mem;
+        for (; tm; tm = tm->next)
         {
-            cutout_len++;
-            message = try_malloc(cutout_len, __func__);
-            memcpy(message, world.queue, cutout_len);
-        }
-        for (;
-             cutout_len != world.queue_size && '\0' == world.queue[cutout_len];
-             cutout_len++);
-        world.queue_size = world.queue_size - cutout_len;
-        if (0 == world.queue_size)
-        {
-            free(world.queue);   /* NULL so read_file_into_queue() may free() */
-            world.queue = NULL;  /* this every time, even when it's           */
-        }                        /* un-allocated first. */
-        else
-        {
-            char * new_queue = try_malloc(world.queue_size, __func__);
-            memcpy(new_queue, &(world.queue[cutout_len]), world.queue_size);
-            free(world.queue);
-            world.queue = new_queue;
+            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__);
         }
     }
-    return message;
+    try_fputc('\n', file, __func__);
 }
 
 
 
-static void read_file_into_queue()
+static void try_growing_queue()
 {
     uint8_t wait_seconds = 5;
     time_t now = time(0);
     struct timespec dur;
     dur.tv_sec = 0;
     dur.tv_nsec = 33333333;
-    int test;
-    while (EOF == (test = try_fgetc(world.file_in, __func__)))
+    while (1)
     {
-        nanosleep(&dur, NULL);
-        if (time(0) > now + wait_seconds)
+        if (read_file_into_queue(world.file_in, &world.queue,&world.queue_size))
         {
             return;
         }
-    }
-    do
-    {
-        char c = (char) test;
-        if ('\n' == c)
+        nanosleep(&dur, NULL);
+        if (time(0) > now + wait_seconds)
         {
-            c = '\0';
+            return;
         }
-        char * new_queue = try_malloc(world.queue_size + 1, __func__);
-        memcpy(new_queue, world.queue, world.queue_size);
-        char * new_pos = new_queue + world.queue_size;
-        * new_pos = c;
-        world.queue_size++;
-        free(world.queue);
-        world.queue = new_queue;
     }
-    while (EOF != (test = try_fgetc(world.file_in, __func__)));
 }
 
 
@@ -251,10 +216,6 @@ static void update_worldstate_file()
     write_value_as_line(player->pos.x, file);
     write_value_as_line(world.map.length, file);
     write_map(player, file);
-    if (world.log)
-    {
-        try_fwrite(world.log, strlen(world.log), 1, file, __func__);
-    }
     atomic_write_finish(file, s[S_PATH_WORLDSTATE], path_tmp);
     set_cleanup_flag(CLEANUP_WORLDSTATE);
     char * dot = ".\n";
@@ -276,7 +237,7 @@ static void write_value_as_line(uint32_t value, FILE * file)
 static void write_inventory(struct Thing * player, FILE * file)
 {
     struct Thing * owned = player->owns;
-    if (NULL == owned)
+    if (!owned)
     {
         char * empty = "(none)\n";
         try_fwrite(empty, strlen(empty), 1, file, __func__);
@@ -284,7 +245,7 @@ static void write_inventory(struct Thing * player, FILE * file)
     else
     {
         uint8_t q;
-        for (q = 0; NULL != owned; q++)
+        for (q = 0; owned; q++)
         {
             struct ThingType * tt = get_thing_type(owned->type);
             try_fwrite(tt->name, strlen(tt->name), 1, file, __func__);
@@ -314,20 +275,22 @@ static char * build_visible_map(struct Thing * player)
             }
         }
         struct Thing * t;
-        struct ThingType * tt;
         char c;
         uint8_t i;
-        for (i = 0; i < 2; i++)
+        for (i = 0; i < 3; i++)
         {
             for (t = world.things; t != 0; t = t->next)
             {
-                if (   'v'==player->fov_map[t->pos.y*world.map.length+t->pos.x]
-                    && (   (0 == i && 0 == t->lifepoints)
-                        || (1 == i && 0 < t->lifepoints)))
+                if ('v' == player->fov_map[t->pos.y*world.map.length+t->pos.x])
                 {
-                    tt = get_thing_type(t->type);
-                    c = tt->char_on_map;
-                    visible_map[t->pos.y * world.map.length + t->pos.x] = c;
+                    struct ThingType * tt = get_thing_type(t->type);
+                    if (   (0 == i && !t->lifepoints && !tt->consumable)
+                        || (1 == i && !t->lifepoints &&  tt->consumable)
+                        || (2 == i &&  t->lifepoints))
+                    {
+                        c = tt->char_on_map;
+                        visible_map[t->pos.y * world.map.length + t->pos.x] = c;
+                    }
                 }
             }
         }
@@ -350,14 +313,36 @@ static void write_map(struct Thing * player, FILE * file)
         try_fputc('\n', file, __func__);
     }
     free(visible_map);
+    uint32_t map_size = world.map.length * world.map.length;
+    char * mem_map = try_malloc(map_size, __func__);
+    memcpy(mem_map, player->mem_map, map_size);
+    uint8_t i;
+    struct ThingInMemory * tm;
+    for (i = 0; i < 2; i++)
+    {
+        for (tm = player->t_mem; tm; tm = tm->next)
+        {
+            if (' ' != player->mem_map[tm->pos.y*world.map.length+tm->pos.x])
+            {
+                struct ThingType * tt = get_thing_type(tm->type);
+                if (   (0 == i && !tt->consumable)
+                    || (1 == i &&  tt->consumable))
+                {
+                    char c = tt->char_on_map;
+                    mem_map[tm->pos.y * world.map.length + tm->pos.x] = c;
+                }
+            }
+        }
+    }
     for (y = 0; y < world.map.length; y++)
     {
         for (x = 0; x < world.map.length; x++)
         {
-            try_fputc(player->mem_map[y * world.map.length + x], file, __func__);
+            try_fputc(mem_map[y * world.map.length + x], file, __func__);
         }
         try_fputc('\n', file, __func__);
     }
+    free(mem_map);
 }
 
 
@@ -366,24 +351,15 @@ extern char * io_round()
 {
     if (0 < world.queue_size)
     {
-        return get_message_from_queue();
+        return get_message_from_queue(&world.queue, &world.queue_size);
     }
     if (world.do_update)
     {
         update_worldstate_file();
         world.do_update = 0;
     }
-    read_file_into_queue();
-    if (world.queue_size && '\0' != world.queue[world.queue_size - 1])
-    {
-        char * new_queue = try_malloc(world.queue_size + 1, __func__);
-        memcpy(new_queue, world.queue, world.queue_size);
-        new_queue[world.queue_size] = '\0';
-        world.queue_size++;
-        free(world.queue);
-        world.queue = new_queue;
-    }
-    return get_message_from_queue();
+    try_growing_queue();
+    return get_message_from_queue(&world.queue, &world.queue_size);
 }
 
 
@@ -413,6 +389,7 @@ extern void save_world()
         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);
         try_fputc('\n', file, __func__);
     }
     for (tt = world.thing_types; tt; tt = tt->next)