3 #include "map_objects.h"
4 #include <stdlib.h> /* for malloc(), calloc(), free(), atoi() */
5 #include <stdint.h> /* for uint8_t */
6 #include <stdio.h> /* for FILE typedef */
7 #include <string.h> /* for strchr(), strlen(), memcpy(), strtok() */
8 #include "readwrite.h" /* for [read/write]_uint[8/16/23][_bigendian]() */
9 #include "misc.h" /* for textfile_sizes(), find_passable_pos() */
10 #include "main.h" /* for World struct */
11 #include "rexit.h" /* for err_exit() */
15 /* Return pointer to newly allocated map object struct of size "size". If first
16 * in map object chain ("first" pointing to !0), point "start" to it.
18 * Returns NULL instead of MapObj pointer if malloc() failed.
20 static struct MapObj * get_next_map_obj(void * start, char * first,
21 size_t size, struct MapObj * map_obj);
25 /* Map-object-type-specific helpers to (build|write|read)_map_objects(). */
26 static void build_map_objects_itemdata(struct MapObjDef * map_obj_def,
28 static void build_map_objects_monsterdata(struct MapObjDef * map_obj_def,
30 static uint8_t write_map_objects_monsterdata(void * start, FILE * file);
31 static uint8_t read_map_objects_monsterdata( void * start, FILE * file);
35 static struct MapObj * get_next_map_obj(void * start, char * first,
36 size_t size, struct MapObj * map_obj)
40 struct MapObj * * z = start;
41 map_obj = malloc(size);
47 map_obj->next = malloc(size);
48 map_obj = map_obj->next;
55 static void build_map_objects_itemdata(struct MapObjDef * map_obj_def,
58 struct Item * i = (struct Item *) start;
59 i->map_obj.type = map_obj_def->id;
64 static void build_map_objects_monsterdata(struct MapObjDef * map_obj_def,
67 struct Monster * m = (struct Monster *) start;
68 m->map_obj.type = map_obj_def->id;
69 struct MonsterDef * md = (struct MonsterDef *) map_obj_def;
70 m->hitpoints = md->hitpoints_start;
75 static uint8_t write_map_objects_monsterdata(void * start, FILE * file)
77 struct Monster * m = (struct Monster *) start;
78 return write_uint8(m->hitpoints, file);
83 static uint8_t read_map_objects_monsterdata (void * start, FILE * file)
85 struct Monster * m = (struct Monster *) start;
86 return read_uint8(file, &m->hitpoints);
91 extern void init_map_object_defs(struct World * world, char * filename)
94 world->monster_def = 0;
95 char * err = "Trouble in init_map_object_defs() with fopen().";
96 FILE * file = fopen(filename, "r");
97 exit_err(NULL == file, world, err);
99 err = "Trouble in init_map_object_defs() with textfile_sizes().";
100 exit_err(textfile_sizes(file, &linemax, NULL), world, err);
101 struct MapObjDef mod;
103 struct MonsterDef md;
104 struct ItemDef * * p_p_id = &world->item_def;
105 struct MonsterDef * * p_p_md = &world->monster_def;
106 err = "Trouble in init_map_object_defs() with malloc() or calloc().";
107 char * defline = malloc(linemax);
108 exit_err(NULL == defline, world, err);
111 while (fgets(defline, linemax, file))
114 mod.id = atoi(strtok(defline, delim));
115 mod.m_or_i = * strtok(NULL, delim);
116 mod.mapchar = * strtok(NULL, delim);
117 if ('i' == mod.m_or_i)
119 line_p = strtok(NULL, delim);
123 md.corpse_id = atoi(strtok(NULL, delim));
124 md.hitpoints_start = atoi(strtok(NULL, delim));
125 line_p = strtok(NULL, delim);
127 mod.desc = calloc(strlen(line_p), sizeof(char));
128 exit_err(NULL == mod.desc, world, err);
129 memcpy(mod.desc, line_p, strlen(line_p) - 1);
130 if ('i' == mod.m_or_i)
132 id.map_obj_def = mod;
133 * p_p_id = malloc(sizeof(struct ItemDef));
134 exit_err(NULL == p_p_id, world, err);
136 p_p_id = (struct ItemDef * *) * p_p_id;
140 md.map_obj_def = mod;
141 * p_p_md = malloc(sizeof(struct MonsterDef));
142 exit_err(NULL == p_p_md, world, err);
144 p_p_md = (struct MonsterDef * *) * p_p_md;
148 err = "Trouble in init_map_object_defs() with fclose().";
149 exit_err(fclose(file), world, err);
154 extern void free_item_defs(struct ItemDef * id_start)
156 if (0 != id_start->map_obj_def.next)
158 free_item_defs((struct ItemDef *) id_start->map_obj_def.next);
160 free(id_start->map_obj_def.desc);
167 extern void free_monster_defs(struct MonsterDef * md_start)
169 if (0 != md_start->map_obj_def.next)
171 free_monster_defs((struct MonsterDef *) md_start->map_obj_def.next);
173 free(md_start->map_obj_def.desc);
179 extern uint8_t write_map_objects(struct World * world, void * start,
182 struct MapObj * map_obj;
183 struct MapObjDef * mod;
184 for (map_obj = start; map_obj != 0; map_obj = map_obj->next)
186 if ( write_uint8(map_obj->type, file)
187 || write_uint16_bigendian(map_obj->pos.y + 1, file)
188 || write_uint16_bigendian(map_obj->pos.x + 1, file))
192 mod = get_map_obj_def(world, map_obj->type);
193 if ('m' == mod->m_or_i)
195 if (write_map_objects_monsterdata(map_obj, file))
201 return write_uint16_bigendian(0, file);
206 extern uint8_t read_map_objects(struct World * world, void * start, FILE * file)
208 struct MapObj * map_obj;
209 struct MapObjDef * mod;
214 uint16_t read_uint16 = 0;
215 char * err = "Trouble in read_map_objects() with get_next_map_obj().";
219 if (read_uint16_bigendian(file, &read_uint16))
223 if (0 == read_uint16)
227 fseek(file, pos, SEEK_SET);
228 if (read_uint8(file, &type))
232 mod = get_map_obj_def(world, type);
233 if ('m' == mod->m_or_i)
235 size = sizeof(struct Monster);
239 size = sizeof(struct Item);
241 map_obj = get_next_map_obj(start, &first, size, map_obj);
242 exit_err(NULL == map_obj, world, err);
243 map_obj->type = type;
244 if ( read_uint16_bigendian(file, &map_obj->pos.y)
245 || read_uint16_bigendian(file, &map_obj->pos.x))
251 if ('m' == mod->m_or_i)
253 if (read_map_objects_monsterdata(map_obj, file))
268 extern void * build_map_objects(struct World * world, void * start, char def_id,
274 struct MapObjDef * mod = get_map_obj_def(world, def_id);
276 char * err = "Trouble in build_map_objects() with get_next_map_obj().";
277 if ('i' == mod->m_or_i)
279 size = sizeof(struct Item);
283 size = sizeof(struct Monster);
285 for (i = 0; i < n; i++)
287 mo = get_next_map_obj(start, &first, size, mo);
288 exit_err(NULL == mo, world, err);
289 mo->pos = find_passable_pos(world->map);
290 if ('i' == mod->m_or_i)
292 build_map_objects_itemdata(mod, mo);
296 build_map_objects_monsterdata(mod, mo);
309 extern void free_items(struct Item * item)
311 if (0 != item->map_obj.next)
313 free_items((struct Item *) item->map_obj.next);
320 extern void free_monsters(struct Monster * monster)
322 if (0 != monster->map_obj.next)
324 free_monsters((struct Monster *) monster->map_obj.next);
331 extern struct MapObjDef * get_map_obj_def(struct World * world, char def_id)
333 struct MapObjDef * d = NULL;
334 for (d = (struct MapObjDef *) world->monster_def;
335 d->id != def_id && 0 != d->next;
339 for (d = (struct MapObjDef *) world->item_def;
340 d->id != def_id && 0 != d->next;