plomlompom.com Git - plomrogue/blob - src/map_objects.c

   1 #include "map_objects.h"
   2 #include <stdlib.h>
   3 #include <stdio.h>
   4 #include "readwrite.h"
   5 #include "misc.h"
   6 #include "main.h"
   7
   8 static struct MapObj * get_next_map_obj (void *, char *, size_t, struct MapObj *);
   9
  10 extern void readwrite_map_objects_dummy (void * dummy, FILE * file) {
  11 // Dummy function for calls of (write|read)_map_objects on map objects without specific attributes.
  12   ; }
  13
  14 extern void write_map_objects_monsterdata (void * start, FILE * file) {
  15 // Write to file data specific to map objects of type monster.
  16   struct Monster * m = (struct Monster *) start;
  17   fputc(m->hitpoints, file); }
  18
  19 extern void write_map_objects (void * start, FILE * file, void (* w_typedata) (void *, FILE *) ) {
  20 // Write into file the map object chain starting at start, use write_type() for object-type specific data.
  21   struct MapObj * map_obj;
  22   for (map_obj = start; map_obj != 0; map_obj = map_obj->next) {
  23     write_uint16_bigendian(map_obj->pos.y + 1, file);
  24     write_uint16_bigendian(map_obj->pos.x + 1, file);
  25     fputc(map_obj->type, file);
  26     w_typedata (map_obj, file); }
  27   write_uint16_bigendian(0, file); }
  28
  29 extern void read_map_objects_monsterdata (void * start, FILE * file) {
  30 // Read from file data speciifc to map objects of type monster.
  31   struct Monster * m = (struct Monster *) start;
  32   m->hitpoints = fgetc(file); }
  33
  34 static struct MapObj * get_next_map_obj (void * start, char * first, size_t size, struct MapObj * map_obj) {
  35 // Return pointer to map object of "size". If first in chain ("first" pointing to !0), point "start" to it.
  36   if (* first) {
  37     struct MapObj * * z = start;
  38     map_obj = malloc(size);
  39     * z = map_obj;
  40     * first = 0; }
  41   else {
  42     map_obj->next = malloc(size);
  43     map_obj = map_obj->next; }
  44   return map_obj; }
  45
  46 extern void read_map_objects (void * start, FILE * file, size_t size, void (* r_typedata) (void *, FILE *) ) {
  47 // Read from file chain of map objects starting at start, use r_typedata() for object-type specific data.
  48   struct MapObj * map_obj;
  49   uint16_t test;
  50   char first = 1;
  51   while (1) {
  52     test = read_uint16_bigendian(file);
  53     if (0 == test)
  54       break;
  55     map_obj = get_next_map_obj(start, &first, size, map_obj);
  56     map_obj->pos.y = test - 1;
  57     map_obj->pos.x = read_uint16_bigendian(file) - 1;
  58     map_obj->type = fgetc(file);
  59     r_typedata (map_obj, file); }
  60   if (!first)
  61     map_obj->next = 0; }
  62
  63 extern void build_map_objects_monsterdata (struct MapObjDef * map_obj_def, void * start) {
  64 // Build data specific to map objects of type monster.
  65   struct Monster * m = (struct Monster *) start;
  66   m->map_obj.type = map_obj_def->id;
  67   struct MonsterDef * md = (struct MonsterDef *) map_obj_def;
  68   m->hitpoints = md->hitpoints_start; }
  69
  70 extern void build_map_objects_itemdata (struct MapObjDef * map_obj_def, void * start) {
  71 // Build data speciifc to map objects of type data.
  72   struct Item * i = (struct Item *) start;
  73   i->map_obj.type = map_obj_def->id; }
  74
  75 extern void * build_map_objects (struct World * world, void * start, char def_id, unsigned char n,
  76                                  size_t size, void (* b_typedata) (struct MapObjDef *, void *)) {
  77 // Build chain of n map objects starting at start, use f() for object-specific data.
  78   unsigned char i;
  79   struct MapObj * mo;
  80   char first = 1;
  81   struct MapObjDef * mod = get_map_obj_def (world, def_id);
  82   for (i = 0; i < n; i++) {
  83     mo = get_next_map_obj(start, &first, size, mo);
  84     mo->pos = find_passable_pos(world->map);
  85     b_typedata (mod, mo); }
  86   if (!first)
  87     mo->next = 0;
  88   return &mo->next; }
  89
  90 extern struct MapObjDef * get_map_obj_def (struct World * world, char def_id) {
  91 // Get pointer to the map object definition with id "def_id".
  92   struct MapObjDef * d = NULL;
  93   for (d = (struct MapObjDef *) world->monster_def; d->id != def_id && 0 != d->next; d = d->next);
  94   if (d->id != def_id)
  95     for (d = (struct MapObjDef *) world->item_def; d->id != def_id && 0 != d->next; d = d->next);
  96   return d; }