/* misc.c */
#include "misc.h"
-#include <stdlib.h> /* for calloc(), free() */
+#include <errno.h> /* for errno */
+#include <unistd.h> /* for unlink(), acess() */
+#include <stdlib.h> /* for size_t, calloc(), free() */
#include <string.h> /* for strlen(), strcmp(), memcpy() */
-#include <stdint.h> /* for uint8_t */
-#include "windows.h" /* for suspend_win(), append_win(), reset_pad_offset(),
- * resize_active_win(), cycle_active_win(),
- * shift_active_win(), struct Win, struct WinMeta
- */
-#include "keybindings.h" /* for get_action_key(), save_keybindings(),
- * keyswin_move_selection(), keyswin_mod_key()
+#include <stdint.h> /* for uint8_t, uint16_t */
+#include "readwrite.h" /* for [read/write]_uint[8/16/32][_bigendian](),
+ * try_fopen(), try_fclose()
+ */
+#include "map_objects.h" /* for struct MapObj, read_map_objects(),
+ * write_map_objects()
*/
-#include "readwrite.h" /* for [read/write]_uint[8/16/32][_bigendian]() */
-#include "map_objects.h" /* for struct Monster, write_map_objects(), */
-#include "map_object_actions.h" /* for is_passable(), move_monster() */
-#include "map.h" /* for map_scroll(),map_center_player(), Map struct,dir enum */
+#include "map_object_actions.h" /* for is_passable(), move_actor() */
+#include "map.h" /* for Map struct */
#include "main.h" /* for World struct */
-#include "yx_uint16.h" /* for yx_uint16 */
+#include "yx_uint16.h" /* for yx_uint16 struct */
#include "rrand.h" /* for rrand(), rrand_seed() */
#include "rexit.h" /* for exit_err() */
+#include "wincontrol.h" /* for init_winconfs(), init_wins(), free_winconfs(),
+ * sorted_wintoggle_and_activate()
+ */
+#include "windows.h" /* for suspend_win() */
-extern void textfile_sizes(FILE * file, uint16_t * linemax_p,
- uint16_t * n_lines_p)
+extern char * trouble_msg(struct World * w, char * parent, char * child)
{
- uint16_t n_lines = 0;
- int c = 0;
- uint16_t linemax = 0;
- uint16_t c_count = 0;
- while (EOF != c)
+ char * p1 = "Trouble in ";
+ char * p2 = " with ";
+ char * p3 = ".";
+ uint16_t size = strlen(p1) + strlen(parent) + strlen(p2) + strlen(child)
+ + strlen(p3) + 1;
+ char * msg = malloc(size);
+ exit_err(NULL == msg, w, "malloc() in trouble_msg() failed.");
+ sprintf(msg, "%s%s%s%s%s", p1, parent, p2, child, p3);
+ return msg;
+}
+
+
+
+extern void * try_malloc(size_t size, struct World * w, char * f)
+{
+ char * msg = trouble_msg(w, f, "malloc()");
+ void * p = malloc(size);
+ exit_err(NULL == p, w, msg);
+ free(msg);
+ return p;
+}
+
+
+
+extern void * try_calloc(size_t size1, size_t size2, struct World * w, char * f)
+{
+ char * msg = trouble_msg(w, f, "calloc()");
+ void * p = calloc(size1, size2);
+ exit_err(NULL == p, w, msg);
+ free(msg);
+ return p;
+}
+
+
+
+extern void check_files_xor(char * p1, char * p2, struct World * w)
+{
+ char * msg1 = "A file '";
+ char * msg2 = "' exists, but no file '";
+ char * msg3 = "'. If everything was in order, both or noe would exist. "
+ "The game won't start until this is corrected.";
+ uint16_t size = strlen(msg1) + strlen(p1) + strlen(msg2) + strlen(p2)
+ + strlen(msg3);
+ char msg[size];
+ if (!access(p1, F_OK) && access(p2, F_OK))
{
- c_count++;
- c = getc(file);
- if ('\n' == c)
- {
- if (c_count > linemax)
- {
- linemax = c_count + 1;
- }
- c_count = 0;
- if (n_lines_p)
- {
- n_lines++;
- }
- }
+ sprintf(msg, "%s%s%s%s%s", msg1, p1, msg2, p2, msg3);
+ errno = 0;
+ exit_err(1, w, msg);
}
- fseek(file, 0, SEEK_SET);
- * linemax_p = linemax;
- if (n_lines_p)
+ else if (access(p1, F_OK) && !access(p2, F_OK))
{
- * n_lines_p = n_lines;
+ sprintf(msg, "%s%s%s%s%s", msg1, p2, msg2, p1, msg3);
+ errno = 0;
+ exit_err(1, w, msg);
}
}
-extern void update_log(struct World * world, char * text)
+extern void check_tempfile(char * path, struct World * w)
+{
+ char * msg1 = "A file '";
+ char * msg2 = "' exists, probably from a corrupted previous file saving "
+ "process. To avoid corruption of game files, the game won't "
+ "start until it is removed or renamed.";
+ uint16_t size = strlen(msg1) + strlen(path) + strlen(msg2);
+ char msg[size];
+ sprintf(msg, "%s%s%s", msg1, path, msg2);
+ exit_err(!access(path, F_OK), w, msg);
+}
+
+
+
+extern void save_interface_conf(struct World * world)
+{
+ save_keybindings(world, "config/keybindings_global", &world->kb_global);
+ save_keybindings(world, "config/keybindings_wingeom", &world->kb_wingeom);
+ save_keybindings(world, "config/keybindings_winkeys", &world->kb_winkeys);
+ save_win_configs(world);
+}
+
+
+
+extern void load_interface_conf(struct World * world)
{
- static char * last_msg;
- if (0 == last_msg)
+ init_keybindings(world, "config/keybindings_global", &world->kb_global);
+ init_keybindings(world, "config/keybindings_wingeom", &world->kb_wingeom);
+ init_keybindings(world, "config/keybindings_winkeys", &world->kb_winkeys);
+ init_winconfs(world);
+ init_wins(world);
+ sorted_wintoggle_and_activate(world);
+}
+
+
+
+extern void unload_interface_conf(struct World * world)
+{
+ free_keybindings(world->kb_global.kbs);
+ free_keybindings(world->kb_wingeom.kbs);
+ free_keybindings(world->kb_winkeys.kbs);
+ while (0 != world->wmeta->active)
{
- last_msg = calloc(1, sizeof(char));
+ suspend_win(world->wmeta, world->wmeta->active);
+ }
+ free_winconfs(world);
+}
+
+
+
+extern void update_log(struct World * world, char * text)
+{
+ char * f_name = "update_log()";
+ static char * last_msg; /* TODO: valgrind is dissatisfied */
+ if (0 == last_msg) /* with this calloc'd pointer not */
+ { /* being freed. Rectify this? */
+ last_msg = try_calloc(1, sizeof(char), world, f_name);
}
char * new_text;
uint16_t len_old = strlen(world->log);
if (0 == strcmp(last_msg, text))
{
uint16_t len_whole = len_old + 1;
- new_text = calloc(len_whole + 1, sizeof(char));
+ new_text = try_calloc(len_whole + 1, sizeof(char), world, f_name);
memcpy(new_text, world->log, len_old);
memcpy(new_text + len_old, ".", 1);
}
{
uint16_t len_new = strlen(text);
uint16_t len_whole = len_old + len_new + 1;
- new_text = calloc(len_whole, sizeof(char));
+ new_text = try_calloc(len_whole, sizeof(char), world, f_name);
memcpy(new_text, world->log, len_old);
memcpy(new_text + len_old, text, len_new);
- last_msg = calloc(len_new + 1, sizeof(char));
+ last_msg = try_calloc(len_new + 1, sizeof(char), world, f_name);
memcpy(last_msg, text, len_new);
}
free(world->log);
extern void turn_over(struct World * world, char action)
{
+ char * f_name = "turn_over()";
+ char * err_write = "Trouble in turn_over() with write_uint8() "
+ "writing to opened file 'record_tmp'.";
+
+ char * recordfile_tmp = "record_tmp";
+ char * recordfile = "record";
if (1 == world->interactive)
{
- FILE * file = fopen("record", "a");
- exit_err(write_uint8(action, file), world, "Record writing failure.");
- fclose(file);
+ FILE * file_old = try_fopen(recordfile, "r", world, f_name);
+ FILE * file_new = try_fopen(recordfile_tmp, "w", world, f_name);
+ char c = fgetc(file_old);
+ while (EOF != c)
+ {
+ exit_err(write_uint8(c, file_new), world, err_write);
+ c = fgetc(file_old);
+ }
+ try_fclose(file_old, world, f_name);
+ exit_err(write_uint8(action, file_new), world, err_write);
+ try_fclose_unlink_rename(file_new, recordfile_tmp, recordfile,
+ world, f_name);
}
world->turn++;
rrand_seed(world->seed * world->turn);
- struct Monster * monster;
- for (monster = world->monster;
+ struct MapObj * monster;
+ for (monster = world->map_objs;
monster != 0;
- monster = monster->map_obj.next)
+ monster = monster->next)
{
- move_monster(world, monster);
+ if (0 < monster->lifepoints && 0 != monster->id)
+ {
+ move_actor(world, monster, rrand() % 5);
+ }
}
}
extern void save_game(struct World * world)
{
- uint8_t err;
- FILE * file = fopen("savefile", "w");
- err = write_uint32_bigendian(world->seed, file);
- err = err | write_uint32_bigendian(world->turn, file);
- err = err | write_uint16_bigendian(world->player->pos.y + 1, file);
- err = err | write_uint16_bigendian(world->player->pos.x + 1, file);
- err = err | write_uint8(world->player->hitpoints, file);
- err = err | write_map_objects(world, world->monster, file);
- err = err | write_map_objects(world, world->item, file);
- exit_err(err, world, "Error saving game.");
- fclose(file);
-}
+ char * f_name = "save_game()";
+ char * savefile_tmp = "savefile_tmp";
+ char * savefile = "savefile";
+ FILE * file = try_fopen(savefile_tmp, "w", world, f_name);
+ char line[12];
+ sprintf(line, "%d\n", world->seed);
+ try_fwrite(line, strlen(line), 1, file, world, f_name);
+ sprintf(line, "%d\n", world->turn);
+ try_fwrite(line, strlen(line), 1, file, world, f_name);
+ sprintf(line, "%d\n", world->score);
+ try_fwrite(line, strlen(line), 1, file, world, f_name);
+ write_map_objects(world, file);
-extern void toggle_window(struct WinMeta * win_meta, struct Win * win)
-{
- if (0 != win->frame.curses_win)
- {
- suspend_win(win_meta, win);
- }
- else
- {
- append_win(win_meta, win);
- }
+ try_fclose_unlink_rename(file, savefile_tmp, savefile, world, f_name);
}
-extern void scroll_pad(struct WinMeta * win_meta, char dir)
+extern void load_game(struct World * world)
{
- if ('+' == dir)
- {
- reset_pad_offset(win_meta, win_meta->pad_offset + 1);
- }
- else if ('-' == dir)
- {
- reset_pad_offset(win_meta, win_meta->pad_offset - 1);
- }
-}
-
-
-
-extern void growshrink_active_window(struct WinMeta * win_meta, char change)
-{
- if (0 != win_meta->active)
- {
- struct yx_uint16 size = win_meta->active->frame.size;
- if (change == '-')
- {
- size.y--;
- }
- else if (change == '+')
- {
- size.y++;
- }
- else if (change == '_')
- {
- size.x--;
- }
- else if (change == '*')
- {
- size.x++;
- }
- resize_active_win (win_meta, size);
- }
+ char * f_name = "load_game2()";
+ char * filename = "savefile";
+ FILE * file = try_fopen(filename, "r", world, f_name);
+ uint16_t linemax = get_linemax(file, world, f_name);
+ char line[linemax + 1];
+ try_fgets(line, linemax + 1, file, world, f_name);
+ world->seed = atoi(line);
+ try_fgets(line, linemax + 1, file, world, f_name);
+ world->turn = atoi(line);
+ try_fgets(line, linemax + 1, file, world, f_name);
+ world->score = atoi(line);
+ read_map_objects(world, file, line, linemax);
+ try_fclose(file, world, f_name);
}
}
return pos;
}
-
-
-
-extern uint8_t meta_keys(int key, struct World * world,
- struct WinMeta * win_meta, struct Win * win_keys,
- struct Win * win_map, struct Win * win_info,
- struct Win * win_log)
-{
- if (key == get_action_key(world->keybindings, "quit"))
- {
- return 1;
- }
- else if (key == get_action_key(world->keybindings, "scroll pad right"))
- {
- scroll_pad (win_meta, '+');
- }
- else if (key == get_action_key(world->keybindings, "scroll pad left"))
- {
- scroll_pad (win_meta, '-');
- }
- else if (key == get_action_key(world->keybindings, "toggle keys window"))
- {
- toggle_window(win_meta, win_keys);
- }
- else if (key == get_action_key(world->keybindings, "toggle map window"))
- {
- toggle_window(win_meta, win_map);
- }
- else if (key == get_action_key(world->keybindings, "toggle info window"))
- {
- toggle_window(win_meta, win_info);
- }
- else if (key == get_action_key(world->keybindings, "toggle log window"))
- {
- toggle_window(win_meta, win_log);
- }
- else if (key == get_action_key(world->keybindings, "cycle forwards"))
- {
- cycle_active_win(win_meta, 'n');
- }
- else if (key == get_action_key(world->keybindings, "cycle backwards"))
- {
- cycle_active_win(win_meta, 'p');
- }
- else if (key == get_action_key(world->keybindings, "shift forwards"))
- {
- shift_active_win(win_meta, 'f');
- }
- else if (key == get_action_key(world->keybindings, "shift backwards"))
- {
- shift_active_win(win_meta, 'b');
- }
- else if (key == get_action_key(world->keybindings, "grow horizontally"))
- {
- growshrink_active_window(win_meta, '*');
- }
- else if (key == get_action_key(world->keybindings, "shrink horizontally"))
- {
- growshrink_active_window(win_meta, '_');
- }
- else if (key == get_action_key(world->keybindings, "grow vertically"))
- {
- growshrink_active_window(win_meta, '+');
- }
- else if (key == get_action_key(world->keybindings, "shrink vertically"))
- {
- growshrink_active_window(win_meta, '-');
- }
- else if (key == get_action_key(world->keybindings, "save keys"))
- {
- save_keybindings(world);
- }
- else if (key == get_action_key(world->keybindings, "keys nav up"))
- {
- keyswin_move_selection (world, 'u');
- }
- else if (key == get_action_key(world->keybindings, "keys nav down"))
- {
- keyswin_move_selection (world, 'd');
- }
- else if (key == get_action_key(world->keybindings, "keys mod"))
- {
- keyswin_mod_key (world, win_meta);
- }
- else if (key == get_action_key(world->keybindings, "map up"))
- {
- map_scroll (world->map, NORTH, win_map->frame.size);
- }
- else if (key == get_action_key(world->keybindings, "map down"))
- {
- map_scroll (world->map, SOUTH, win_map->frame.size);
- }
- else if (key == get_action_key(world->keybindings, "map right"))
- {
- map_scroll (world->map, EAST, win_map->frame.size);
- }
- else if (key == get_action_key(world->keybindings, "map left"))
- {
- map_scroll (world->map, WEST, win_map->frame.size);
- }
- else if (key == get_action_key(world->keybindings, "map center player"))
- {
- map_center_player (world->map, world->player, win_map->frame.size);
- }
- return 0;
-}