X-Git-Url: https://plomlompom.com/repos/?a=blobdiff_plain;f=src%2Fmisc.c;h=122f404e8e2eace4181a1fb9d42e14048d7b67bb;hb=8f60274cc94ea4b2d3a0bb71169e50b0d06ae629;hp=522af09b9a8ea807c1ac4595cd4f1751a4666a90;hpb=aafa0cb49e7ec8600dad902411de6e76e111c939;p=plomrogue diff --git a/src/misc.c b/src/misc.c index 522af09..122f404 100644 --- a/src/misc.c +++ b/src/misc.c @@ -6,62 +6,53 @@ #include /* for size_t, calloc(), free() */ #include /* for strlen(), strcmp(), memcpy() */ #include /* for uint8_t, uint16_t */ -#include "readwrite.h" /* for [read/write]_uint[8/16/32][_bigendian](), - * try_fopen(), try_fclose() +#include "readwrite.h" /* for try_fopen(), try_fclose(), textfile_sizes(), + * try_fputc(), try_fgetc() */ -#include "map_objects.h" /* for struct MapObj, read_map_objects(), +#include "map_objects.h" /* for struct MapObj, get_player(), read_map_objects(), * write_map_objects() */ -#include "map_object_actions.h" /* for is_passable(), move_actor() */ -#include "map.h" /* for Map struct */ -#include "main.h" /* for World struct */ +#include "map_object_actions.h" /* for struct MapObjAct */ +#include "ai.h" /* for pretty_dumb_ai() */ +#include "map.h" /* for Map struct, is_passable() */ +#include "main.h" /* for world global */ #include "yx_uint16.h" /* for yx_uint16 struct */ -#include "rrand.h" /* for rrand(), rrand_seed() */ -#include "rexit.h" /* for exit_err() */ +#include "rexit.h" /* for exit_err(), exit_trouble() */ #include "wincontrol.h" /* for init_winconfs(), init_wins(), free_winconfs(), * sorted_wintoggle_and_activate() */ #include "windows.h" /* for suspend_win() */ +#include "command_db.h" /* for is_command_id_shortdsc() */ -extern char * trouble_msg(struct World * w, char * parent, char * child) -{ - 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 uint16_t rrand() +{ /* Constants as recommended by POSIX.1-2001 (see man page rand(3)). */ + world.seed = ((world.seed * 1103515245) + 12345) % 4294967296; + return (world.seed >> 16); /* Ignore less random least significant bits. */ } -extern void * try_malloc(size_t size, struct World * w, char * f) +extern void * try_malloc(size_t size, char * f) { - char * msg = trouble_msg(w, f, "malloc()"); void * p = malloc(size); - exit_err(NULL == p, w, msg); - free(msg); + exit_trouble(NULL == p, f, "malloc()"); return p; } -extern void * try_calloc(size_t size1, size_t size2, struct World * w, char * f) +extern void * try_calloc(size_t size1, size_t size2, char * f) { - char * msg = trouble_msg(w, f, "calloc()"); void * p = calloc(size1, size2); - exit_err(NULL == p, w, msg); - free(msg); + exit_trouble(NULL == p, f, "calloc()"); return p; } -extern void check_files_xor(char * p1, char * p2, struct World * w) +extern void check_files_xor(char * p1, char * p2) { char * msg1 = "A file '"; char * msg2 = "' exists, but no file '"; @@ -74,112 +65,120 @@ extern void check_files_xor(char * p1, char * p2, struct World * w) { sprintf(msg, "%s%s%s%s%s", msg1, p1, msg2, p2, msg3); errno = 0; - exit_err(1, w, msg); + exit_err(1, msg); } else if (access(p1, F_OK) && !access(p2, F_OK)) { sprintf(msg, "%s%s%s%s%s", msg1, p2, msg2, p1, msg3); errno = 0; - exit_err(1, w, msg); + exit_err(1, msg); } } -extern void check_tempfile(char * path, struct World * w) +extern void check_tempfile(char * path) { 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."; + "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); + exit_err(!access(path, F_OK), msg); } -extern void save_interface_conf(struct World * world) +extern void save_interface_conf() { - 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); + save_keybindings("config/keybindings_global", &world.kb_global); + save_keybindings("config/keybindings_wingeom", &world.kb_wingeom); + save_keybindings("config/keybindings_winkeys", &world.kb_winkeys); + save_win_configs(); } -extern void load_interface_conf(struct World * world) +extern void load_interface_conf() { - 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); + init_keybindings("config/keybindings_global", &world.kb_global); + init_keybindings("config/keybindings_wingeom", &world.kb_wingeom); + init_keybindings("config/keybindings_winkeys", &world.kb_winkeys); + init_winconfs(); + init_wins(); + sorted_wintoggle_and_activate(); } -extern void unload_interface_conf(struct World * world) +extern void unload_interface_conf() { - free_keybindings(world->kb_global.kbs); - free_keybindings(world->kb_wingeom.kbs); - free_keybindings(world->kb_winkeys.kbs); - while (0 != world->wmeta->active) + free_keybindings(world.kb_global.kbs); + free_keybindings(world.kb_wingeom.kbs); + free_keybindings(world.kb_winkeys.kbs); + while (0 != world.wmeta->active) { - suspend_win(world->wmeta, world->wmeta->active); + suspend_win(world.wmeta->active); } - free_winconfs(world); + free_winconfs(); +} + + + +extern void reload_interface_conf() +{ + unload_interface_conf(); + load_interface_conf(); } -extern void update_log(struct World * world, char * text) +extern void update_log(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); + last_msg = try_calloc(1, sizeof(char), f_name); } char * new_text; - uint16_t len_old = strlen(world->log); + uint16_t len_old = strlen(world.log); if (0 == strcmp(last_msg, text)) { uint16_t len_whole = len_old + 1; - new_text = try_calloc(len_whole + 1, sizeof(char), world, f_name); - memcpy(new_text, world->log, len_old); + new_text = try_calloc(len_whole + 1, sizeof(char), f_name); + memcpy(new_text, world.log, len_old); memcpy(new_text + len_old, ".", 1); } else { uint16_t len_new = strlen(text); uint16_t len_whole = len_old + len_new + 1; - new_text = try_calloc(len_whole, sizeof(char), world, f_name); - memcpy(new_text, world->log, len_old); + new_text = try_calloc(len_whole, sizeof(char), f_name); + memcpy(new_text, world.log, len_old); memcpy(new_text + len_old, text, len_new); - last_msg = try_calloc(len_new + 1, sizeof(char), world, f_name); + last_msg = try_calloc(len_new + 1, sizeof(char), f_name); memcpy(last_msg, text, len_new); } - free(world->log); - world->log = new_text; + free(world.log); + world.log = new_text; } -extern uint16_t center_offset(uint16_t pos, uint16_t mapsize, +extern uint16_t center_offset(uint16_t position, uint16_t mapsize, uint16_t framesize) { uint16_t offset = 0; if (mapsize > framesize) { - if (pos > framesize / 2) + if (position > framesize / 2) { - if (pos < mapsize - (framesize / 2)) + if (position < mapsize - (framesize / 2)) { - offset = pos - (framesize / 2); + offset = position - (framesize / 2); } else { @@ -192,82 +191,109 @@ extern uint16_t center_offset(uint16_t pos, uint16_t mapsize, -extern void turn_over(struct World * world, char action) +extern void turn_over(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) + if (1 == world.interactive) { - 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); + FILE * file_old = try_fopen(recordfile, "r", f_name); + FILE * file_new = try_fopen(recordfile_tmp, "w", f_name); + int c = try_fgetc(file_old, f_name); while (EOF != c) { - exit_err(write_uint8(c, file_new), world, err_write); - c = fgetc(file_old); + try_fputc((uint8_t) c, file_new, f_name); + c = try_fgetc(file_old, f_name); } - 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); + try_fclose(file_old, f_name); + try_fputc(action, file_new, f_name); + if ( is_command_id_shortdsc(action, "drop") + || is_command_id_shortdsc(action, "use")) + { + try_fputc(world.inventory_sel, file_new, f_name); + } + try_fclose_unlink_rename(file_new, recordfile_tmp, recordfile, f_name); } - world->turn++; - rrand_seed(world->seed * world->turn); - struct MapObj * monster; - for (monster = world->map_objs; - monster != 0; - monster = monster->next) + + struct MapObj * player = get_player(); + struct MapObj * map_object = player; + uint8_t first_round = 1; + while (0 < player->lifepoints) { - if (0 < monster->lifepoints && 0 != monster->id) + if (NULL == map_object) { - move_actor(world, monster, rrand() % 5); + world.turn++; + map_object = world.map_objs; } + if (0 < map_object->lifepoints) /* map_object is animate. */ + { + if (0 == first_round && 0 == map_object->progress) + { + if (map_object == player) + { + break; + } + pretty_dumb_ai(map_object); + } + first_round = 0; + map_object->progress++; + struct MapObjAct * moa = world.map_obj_acts; + while (moa->id != map_object->command) + { + moa = moa->next; + } + if (map_object->progress == moa->effort) + { + moa->func(map_object); + map_object->progress = 0; + } + } + map_object = map_object->next; } } -extern void save_game(struct World * world) +extern void save_game() { char * f_name = "save_game()"; - char * savefile_tmp = "savefile_tmp"; char * savefile = "savefile"; - FILE * file = try_fopen(savefile_tmp, "w", world, f_name); - + FILE * file = try_fopen(savefile_tmp, "w", 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); - - try_fclose_unlink_rename(file, savefile_tmp, savefile, world, f_name); + sprintf(line, "%u\n", world.mapseed); + try_fwrite(line, strlen(line), 1, file, f_name); + sprintf(line, "%u\n", world.seed); + try_fwrite(line, strlen(line), 1, file, f_name); + sprintf(line, "%u\n", world.turn); + try_fwrite(line, strlen(line), 1, file, f_name); + sprintf(line, "%u\n", world.score); + try_fwrite(line, strlen(line), 1, file, f_name); + write_map_objects(file); + try_fclose_unlink_rename(file, savefile_tmp, savefile, f_name); } -extern void load_game(struct World * world) +extern void load_game() { 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); + FILE * file = try_fopen(filename, "r", f_name); + uint16_t linemax = textfile_sizes(file, NULL); 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); + try_fgets(line, linemax + 1, file, f_name); + world.mapseed = atoi(line); + try_fgets(line, linemax + 1, file, f_name); + world.seed = atoi(line); + try_fgets(line, linemax + 1, file, f_name); + world.turn = atoi(line); + try_fgets(line, linemax + 1, file, f_name); + world.score = atoi(line); + read_map_objects(file, line, linemax); + try_fclose(file, f_name); } @@ -282,3 +308,23 @@ extern struct yx_uint16 find_passable_pos(struct Map * map) } return pos; } + + + +extern void nav_inventory(char dir) +{ + if ('u' == dir) + { + world.inventory_sel = world.inventory_sel - (world.inventory_sel > 0); + return; + } + struct MapObj * player = get_player(); + struct MapObj * owned = player->owns; + if (NULL == owned) + { + return; + } + uint8_t n_owned = 0; + for (; NULL != owned->next; owned = owned->next, n_owned++); + world.inventory_sel = world.inventory_sel + (world.inventory_sel < n_owned); +}