3 #include "map_objects.h"
4 #include <stdlib.h> /* for 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 get_linemax(), try_fopen(), try_fclose()
9 * [read/write]_uint[8/16/23][_bigendian]()
11 #include "misc.h" /* for try_malloc(), try_calloc(), find_passable_pos() */
12 #include "main.h" /* for World struct */
13 #include "rexit.h" /* for err_exit() */
17 /* Return pointer to newly allocated map object struct of size "size". If first
18 * in map object chain ("first" pointing to !0), point "start" to it.
20 static struct MapObj * get_next_map_obj(struct World * world,
21 void * start, char * first,
22 size_t size, struct MapObj * map_obj);
26 /* Map-object-type-specific helpers to (build|write|read)_map_objects(). */
27 static void build_map_objects_itemdata(struct MapObjDef * map_obj_def,
29 static void build_map_objects_monsterdata(struct MapObjDef * map_obj_def,
31 static uint8_t write_map_objects_monsterdata(void * start, FILE * file);
32 static uint8_t read_map_objects_monsterdata( void * start, FILE * file);
36 static struct MapObj * get_next_map_obj(struct World * world,
37 void * start, char * first,
38 size_t size, struct MapObj * map_obj)
40 char * f_name = "get_next_map_obj()";
43 struct MapObj * * z = start;
44 map_obj = try_malloc(size, world, f_name);
50 map_obj->next = try_malloc(size, world, f_name);
51 map_obj = map_obj->next;
58 static void build_map_objects_itemdata(struct MapObjDef * map_obj_def,
61 struct Item * i = (struct Item *) start;
62 i->map_obj.type = map_obj_def->id;
67 static void build_map_objects_monsterdata(struct MapObjDef * map_obj_def,
70 struct Monster * m = (struct Monster *) start;
71 m->map_obj.type = map_obj_def->id;
72 struct MonsterDef * md = (struct MonsterDef *) map_obj_def;
73 m->hitpoints = md->hitpoints_start;
78 static uint8_t write_map_objects_monsterdata(void * start, FILE * file)
80 struct Monster * m = (struct Monster *) start;
81 return write_uint8(m->hitpoints, file);
86 static uint8_t read_map_objects_monsterdata (void * start, FILE * file)
88 struct Monster * m = (struct Monster *) start;
89 return read_uint8(file, &m->hitpoints);
94 extern void init_map_object_defs(struct World * world, char * filename)
96 char * f_name = "init_map_object_defs()";
97 FILE * file = try_fopen(filename, "r", world, f_name);
98 uint16_t linemax = get_linemax(file, world, f_name);
101 struct MonsterDef md;
103 world->monster_def = 0;
104 struct ItemDef * * p_p_id = &world->item_def;
105 struct MonsterDef * * p_p_md = &world->monster_def;
106 char defline[linemax + 1];
109 while (fgets(defline, linemax + 1, file))
112 mod.id = atoi(strtok(defline, delim));
113 mod.m_or_i = * strtok(NULL, delim);
114 mod.mapchar = * strtok(NULL, delim);
115 if ('i' == mod.m_or_i)
117 line_p = strtok(NULL, delim);
121 md.corpse_id = atoi(strtok(NULL, delim));
122 md.hitpoints_start = atoi(strtok(NULL, delim));
123 line_p = strtok(NULL, delim);
125 mod.desc = try_calloc(strlen(line_p), sizeof(char), world, f_name);
126 memcpy(mod.desc, line_p, strlen(line_p) - 1);
127 if ('i' == mod.m_or_i)
129 id.map_obj_def = mod;
130 * p_p_id = try_malloc(sizeof(struct ItemDef), world, f_name);
132 p_p_id = (struct ItemDef * *) * p_p_id;
136 md.map_obj_def = mod;
137 * p_p_md = try_malloc(sizeof(struct MonsterDef), world, f_name);
139 p_p_md = (struct MonsterDef * *) * p_p_md;
142 try_fclose(file, world, f_name);
147 extern void free_item_defs(struct ItemDef * id_start)
149 if (0 != id_start->map_obj_def.next)
151 free_item_defs((struct ItemDef *) id_start->map_obj_def.next);
153 free(id_start->map_obj_def.desc);
160 extern void free_monster_defs(struct MonsterDef * md_start)
162 if (0 != md_start->map_obj_def.next)
164 free_monster_defs((struct MonsterDef *) md_start->map_obj_def.next);
166 free(md_start->map_obj_def.desc);
172 extern uint8_t write_map_objects(struct World * world, void * start,
175 struct MapObj * map_obj;
176 struct MapObjDef * mod;
177 for (map_obj = start; map_obj != 0; map_obj = map_obj->next)
179 if ( write_uint8(map_obj->type, file)
180 || write_uint16_bigendian(map_obj->pos.y + 1, file)
181 || write_uint16_bigendian(map_obj->pos.x + 1, file))
185 mod = get_map_obj_def(world, map_obj->type);
186 if ('m' == mod->m_or_i)
188 if (write_map_objects_monsterdata(map_obj, file))
194 return write_uint16_bigendian(0, file);
199 extern uint8_t read_map_objects(struct World * world, void * start, FILE * file)
201 char * err = "Trouble in read_map_objects() with get_next_map_obj().";
202 struct MapObj * map_obj;
203 struct MapObjDef * mod;
208 uint16_t read_uint16 = 0;
212 if (read_uint16_bigendian(file, &read_uint16))
216 if (0 == read_uint16)
220 fseek(file, pos, SEEK_SET);
221 if (read_uint8(file, &type))
225 mod = get_map_obj_def(world, type);
226 if ('m' == mod->m_or_i)
228 size = sizeof(struct Monster);
232 size = sizeof(struct Item);
234 map_obj = get_next_map_obj(world, start, &first, size, map_obj);
235 exit_err(NULL == map_obj, world, err);
236 map_obj->type = type;
237 if ( read_uint16_bigendian(file, &map_obj->pos.y)
238 || read_uint16_bigendian(file, &map_obj->pos.x))
244 if ('m' == mod->m_or_i)
246 if (read_map_objects_monsterdata(map_obj, file))
261 extern void * build_map_objects(struct World * world, void * start, char def_id,
264 char * err = "Trouble in build_map_objects() with get_next_map_obj().";
268 struct MapObjDef * mod = get_map_obj_def(world, def_id);
270 if ('i' == mod->m_or_i)
272 size = sizeof(struct Item);
276 size = sizeof(struct Monster);
278 for (i = 0; i < n; i++)
280 mo = get_next_map_obj(world, start, &first, size, mo);
281 exit_err(NULL == mo, world, err);
282 mo->pos = find_passable_pos(world->map);
283 if ('i' == mod->m_or_i)
285 build_map_objects_itemdata(mod, mo);
289 build_map_objects_monsterdata(mod, mo);
302 extern void free_items(struct Item * item)
308 free_items((struct Item *) item->map_obj.next);
314 extern void free_monsters(struct Monster * monster)
320 free_monsters((struct Monster *) monster->map_obj.next);
326 extern struct MapObjDef * get_map_obj_def(struct World * world, char def_id)
328 struct MapObjDef * d = NULL;
329 for (d = (struct MapObjDef *) world->monster_def;
330 d->id != def_id && 0 != d->next;
334 for (d = (struct MapObjDef *) world->item_def;
335 d->id != def_id && 0 != d->next;