home · contact · privacy
Added experimental map loading / saving.
[plomrogue] / roguelike.c
index 8235d7c1ad7aa1eeac1ee0d63bd1b68affc361b9..cc218a374568531f28b34be530a036be2b6b52d8 100644 (file)
@@ -1,9 +1,12 @@
+#include <stdlib.h>
+#include <limits.h>
+#include <stdint.h>
 #include <ncurses.h>
 #include <string.h>
-#include <stdlib.h>
 #include "windows.h"
 #include "draw_wins.h"
 #include "roguelike.h"
+#include "keybindings.h"
 
 void toggle_window (struct WinMeta * win_meta, struct Win * win) {
 // Toggle display of window win.
@@ -15,8 +18,8 @@ void toggle_window (struct WinMeta * win_meta, struct Win * win) {
 void growshrink_active_window (struct WinMeta * win_meta, char change) {
 // Grow or shrink active window horizontally or vertically by one cell size.
   if (0 != win_meta->active) {
-    int height = win_meta->active->height;
-    int width = win_meta->active->width;
+    uint16_t height = win_meta->active->height;
+    uint16_t width = win_meta->active->width;
     if      (change == '-')
       height--;
     else if (change == '+')
@@ -27,42 +30,6 @@ void growshrink_active_window (struct WinMeta * win_meta, char change) {
       width++;
     resize_active_window (win_meta, height, width); } }
 
-void init_keybindings(struct World * world) {
-// Initialize keybindings from file "keybindings".
-  FILE * file = fopen("keybindings", "r");
-  int lines = 0;
-  int c = 0;
-  int linemax = 0;
-  int c_count = 0;
-  while (EOF != c) {
-    c_count++;
-    c = getc(file);
-    if ('\n' == c) {
-      if (c_count > linemax)
-        linemax = c_count + 1;
-      c_count = 0;
-      lines++; } }
-  struct KeyBinding * keybindings = malloc(lines * sizeof(struct KeyBinding));
-  fseek(file, 0, SEEK_SET);
-  char * command = malloc(linemax);
-  int commcount = 0;
-  char * cmdptr;
-  while (fgets(command, linemax, file)) {
-    keybindings[commcount].key = atoi(command);
-    cmdptr = strchr(command, ' ') + 1;
-    keybindings[commcount].name = malloc(strlen(cmdptr));
-    memcpy(keybindings[commcount].name, cmdptr, strlen(cmdptr) - 1);
-    keybindings[commcount].name[strlen(cmdptr) - 1] = '\0';
-    commcount++; }
-  free(command);
-  fclose(file);
-  struct KeysWinData * keyswindata = malloc(sizeof(struct KeysWinData));
-  keyswindata->max = lines - 1;
-  keyswindata->select = 0;
-  keyswindata->edit = 0;
-  world->keybindings = keybindings;
-  world->keyswindata = keyswindata; }
-
 struct Map init_map () {
 // Initialize map with some experimental start values.
   struct Map map;
@@ -71,7 +38,7 @@ struct Map init_map () {
   map.offset_x = 0;
   map.offset_y = 0;
   map.cells = malloc(map.width * map.height);
-  int x, y, ran;
+  uint16_t x, y, ran;
   char terrain;
   for (y = 0; y < map.height; y++)
     for (x = 0; x < map.width; x++) {
@@ -119,100 +86,16 @@ void next_turn (struct World * world) {
 void update_log (struct World * world, char * text) {
 // Update log with new text to be appended.
   char * new_text;
-  int len_old = strlen(world->log);
-  int len_new = strlen(text);
-  int len_whole = len_old + len_new + 1;
+  uint16_t len_old = strlen(world->log);
+  uint16_t len_new = strlen(text);
+  uint16_t len_whole = len_old + len_new + 1;
   new_text = calloc(len_whole, sizeof(char));
   memcpy(new_text, world->log, len_old);
   memcpy(new_text + len_old, text, len_new);
   free(world->log);
   world->log = new_text; }
 
-void save_keybindings(struct World * world) {
-// Write keybindings to keybindings file.
-  struct KeysWinData * keyswindata = (struct KeysWinData *) world->keyswindata;
-  struct KeyBinding * keybindings = world->keybindings;
-  FILE * file = fopen("keybindings", "w");
-  int linemax = 0;
-  int i;
-  for (i = 0; i <= keyswindata->max; i++)
-    if (strlen(keybindings[i].name) > linemax)
-      linemax = strlen(keybindings[i].name);
-  linemax = linemax + 6;                                // + 6 = + 3 digits + whitespace + newline + null byte
-  char * line = malloc(linemax);
-  for (i = 0; i <= keyswindata->max; i++) {
-    snprintf(line, linemax, "%d %s\n", keybindings[i].key, keybindings[i].name);
-    fwrite(line, sizeof(char), strlen(line), file); }
-  free(line);
-  fclose(file); }
-
-int get_action_key (struct KeyBinding * keybindings, char * name) {
-// Return key matching name in keybindings.
-  int i = 0;
-  while (strcmp(keybindings[i].name, name) )
-    i++;
-  return keybindings[i].key; }
-
-char * get_keyname(int keycode) {
-// Translate some keycodes to readable names of max 9 chars.
-  char * keyname;
-  keyname = malloc(15);
-  if (32 < keycode && keycode < 127)
-    sprintf(keyname, "%c", keycode);
-  else if (keycode == 9)
-    sprintf(keyname, "TAB");
-  else if (keycode == 10)
-    sprintf(keyname, "RETURN");
-  else if (keycode == 27)
-    sprintf(keyname, "ESCAPE");
-  else if (keycode == 32)
-    sprintf(keyname, "SPACE");
-  else if (keycode == KEY_UP)
-    sprintf(keyname, "UP");
-  else if (keycode == KEY_DOWN)
-    sprintf(keyname, "DOWN");
-  else if (keycode == KEY_LEFT)
-    sprintf(keyname, "LEFT");
-  else if (keycode == KEY_RIGHT)
-    sprintf(keyname, "RIGHT");
-  else if (keycode == KEY_HOME)
-    sprintf(keyname, "HOME");
-  else if (keycode == KEY_BACKSPACE)
-    sprintf(keyname, "BACKSPACE");
-  else if (keycode >= KEY_F0 && keycode <= KEY_F(63)) {
-    int f = keycode - KEY_F0;
-    sprintf(keyname, "F%d", f); }
-  else if (keycode == KEY_DC)
-    sprintf(keyname, "DELETE");
-  else if (keycode == KEY_IC)
-    sprintf(keyname, "INSERT");
-  else if (keycode == KEY_NPAGE)
-    sprintf(keyname, "NEXT PAGE");
-  else if (keycode == KEY_PPAGE)
-    sprintf(keyname, "PREV PAGE");
-  else if (keycode == KEY_END)
-    sprintf(keyname, "END");
-  else
-    sprintf(keyname, "(unknown)");
-  return keyname;  }
-
-void keyswin_mod_key (struct World * world, struct WinMeta * win_meta) {
-// In keybindings window, mark selection modifiable, modify key. Ensure max of three digits in key code field.
-  world->keyswindata->edit = 1;
-  draw_all_windows (win_meta);
-  int key = getch();
-  if (key < 1000)
-    world->keybindings[world->keyswindata->select].key = key;
-  world->keyswindata->edit = 0; }
-
-void keyswin_move_selection (struct World * world, char dir) {
-// In keybindings window, move selection upwards or downwards (if within limits of list length).
-  if ('u' == dir && world->keyswindata->select > 0)
-    world->keyswindata->select--;
-  else if ('d' == dir && world->keyswindata->select < world->keyswindata->max)
-    world->keyswindata->select++; }
-
-char is_passable (struct World * world, int x, int y) {
+char is_passable (struct World * world, uint16_t x, uint16_t y) {
 // Check if coordinate on (or beyond) map is accessible to movement.
   char passable = 0;
   if (0 <= x && x < world->map->width && 0 <= y && y < world->map->height)
@@ -261,11 +144,45 @@ void move_player (struct World * world, char d) {
   prev = success * d;
   next_turn (world); }
 
-void player_wait(struct World * world) {
+void player_wait (struct World * world) {
 // Make player wait one turn.
   next_turn (world);
   update_log (world, "\nYou wait."); }
 
+void save_map (struct Map * map) {
+// Save map to file "map".
+  FILE * file = fopen("map", "w");
+  fputc(map->width / CHAR_MAX, file);
+  fputc(map->width % CHAR_MAX, file);
+  uint16_t y, x;
+  for (y = 0; y < map->height; y++)
+    for (x = 0; x < map->width; x++)
+      fputc(map->cells[y * map->width + x], file);
+  fclose(file); }
+
+struct Map load_map () {
+// Load map from file.
+  FILE * file = fopen("map", "r");
+  struct Map map;
+  map.width = (fgetc(file) * CHAR_MAX) + fgetc(file);
+  long pos = ftell(file);
+  int c = fgetc(file);
+  uint32_t i = 0;
+  while (EOF != c) {
+    i++;
+    c = fgetc(file); }
+  map.cells = malloc(i * sizeof(char));
+  map.height = i / map.width;
+  fseek(file, pos, SEEK_SET);
+  c = fgetc(file);
+  i = 0;
+  while (EOF != c) {
+    map.cells[i] = (char) c;
+    c = fgetc(file);
+    i++; }
+  fclose(file);
+  return map; }
+
 int main () {
   struct World world;
   init_keybindings(&world);
@@ -336,6 +253,10 @@ int main () {
       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, "load map"))
+      map = load_map();
+    else if (key == get_action_key(world.keybindings, "save map"))
+      save_map(&map);
     else if (key == get_action_key(world.keybindings, "map up"))
       map_scroll (&map, 'n');
     else if (key == get_action_key(world.keybindings, "map down"))