projects / henge / apc.git / blobdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | inline | side by side
fixes
[henge/apc.git] / src / ir.c
diff --git a/src/ir.c b/src/ir.c
index 4255f22..0f98698 100644 (file)
--- a/src/ir.c
+++ b/src/ir.c
@@ -23,6 +23,7 @@ void     ir_quit(void);
 int      ir_linker(void);\r
 int      ir_condenser(void);\r
 /* Private */\r
+struct pagenode_t;\r
 extern //apc.c\r
 long sys_pagesize;\r
 static inline\r
@@ -34,7 +35,6 @@ int                   bytes_identical(uint8_t*,uint8_t*);
 static\r
 void*                 stack_alloc(size_t);\r
 /* Memory allocator */\r
-struct pagenode_t;\r
 struct pagenode_t {\r
   struct pagenode_t* next;\r
   char*              head;\r
@@ -48,6 +48,21 @@ struct pagenode_t {
 /* Enumerated types */\r
 enum dtype { FSDAT, MSDAT, ADAT, LDAT, FBDAT };\r
 enum ltype { OLINK, MLINK, VLINK, ALINK };\r
+/* Set link data */\r
+struct ir_namelist_t;\r
+struct ir_namelist_t\r
+{ struct ir_namelist_t* nextsib;\r
+  uint8_t*              name;\r
+};\r
+struct ir_classld_t\r
+{ struct ir_class_t*    root_class;\r
+  struct ir_namelist_t* namelist;\r
+};\r
+struct ir_setld_t\r
+{ struct classld_t*     classld;\r
+  long long             ref;\r
+  struct ir_namelist_t* namelist;\r
+};\r
 /* Set data mem */\r
 struct ir_setdata_header_t\r
 { enum dtype          type;\r
@@ -58,7 +73,7 @@ struct ir_frameinfo_t
 { int facing, w, h; };\r
 struct ir_framedata_t\r
 { struct ir_setdata_header_t header;\r
-  struct ir_frameinfo_t     frameinfo;\r
+  struct ir_frameinfo_t      frameinfo;\r
 };\r
 struct ir_framebox_t\r
 { struct ir_setdata_header_t header;\r
@@ -69,7 +84,8 @@ struct ir_simplex_t
 { struct ir_setdata_header_t header; };\r
 struct ir_link_t\r
 { struct ir_setdata_header_t header;\r
-  struct ir_set_t*           src, * trg;\r
+  struct ir_classld_t*       classld;\r
+  struct ir_setld_t*         setld;\r
   enum ltype                 type;\r
 };\r
 union ir_setdata_t\r
@@ -86,13 +102,13 @@ struct ir_class_t
   uint8_t*           name;\r
 };\r
 struct ir_set_t\r
-{ struct ir_set_t*    nextchild, * nextsib;\r
-  struct ir_class_t*  class;\r
-  long long           ref;\r
-  uint8_t*            name;\r
-  struct framebox_t*  frameboxes;\r
-  struct simplex_t*   audio;\r
-  struct link_t*      links;\r
+{ struct ir_set_t*      nextchild, * nextsib;\r
+  struct ir_class_t*    class;\r
+  long long             ref;\r
+  uint8_t*              name;\r
+  struct ir_framebox_t* frameboxes;\r
+  struct ir_simplex_t*  audio;\r
+  struct ir_link_t*     links;\r
 };\r
 /* Function-Like Macros */\r
 #define do_warn() do {                         \\r
@@ -124,7 +140,7 @@ struct ir_class_t root_class = { .name = (uint8_t*)"." };
 /* Init */\r
 int ir_init\r
 ( void )\r
-{ pagenode_root = (struct pagenode_t*) calloc(PN_ALLOCSIZE);\r
+{ pagenode_root = (struct pagenode_t*) calloc((size_t)PN_ALLOCSIZE,1);\r
   if (pagenode_root == NULL)\r
     return -1;\r
   pagenode_root->head = pagenode_root->root;\r
@@ -183,7 +199,9 @@ struct ir_class_t* ir_class_addchild
     { iter = iter->nextsib;\r
       goto check;\r
     }\r
-  return iter->nextsib = struct_alloc(ir_class_t);\r
+  iter = struct_alloc(ir_class_t);\r
+  iter->nextsib = class->nextchild;\r
+  return class->nextchild = iter;\r
 }\r
 \r
 /* Add a set to a class\r
@@ -205,7 +223,9 @@ struct ir_set_t* ir_class_addset
     { iter = iter->nextsib;\r
       goto check;\r
     }\r
-  return iter->nextsib = struct_alloc(ir_set_t);\r
+  iter = struct_alloc(ir_set_t);\r
+  iter->nextsib = class->root_set;\r
+  return class->root_set = iter;\r
 }\r
 \r
 /* Add a set to a set\r
@@ -227,7 +247,9 @@ struct ir_set_t* ir_set_addchild
     { iter = iter->nextsib;\r
       goto check;\r
     }\r
-  return iter->nextsib = struct_alloc(ir_set_t);\r
+  iter = struct_alloc(ir_set_t);\r
+  iter->nextsib = set->nextchild;\r
+  return set->nextchild = iter;\r
 }\r
 \r
 /* Add a framebox to a set\r
@@ -244,13 +266,15 @@ struct ir_framebox_t* ir_set_add_framebox
     return set->frameboxes = struct_alloc(ir_framebox_t);\r
   iter = set->frameboxes;\r
  check:\r
-  if (bytes_identical(iter->header.name, name))\r
+  if (bytes_identical(iter->header.data_name, name))\r
     return iter;\r
   if (iter->header.nextsib != NULL)\r
-    { iter = iter->header.nextsib;\r
+    { iter = (struct ir_framebox_t*) iter->header.nextsib;\r
       goto check;\r
     }\r
-  return iter->header.nextsib = struct_alloc(ir_framebox_t);\r
+  iter = struct_alloc(ir_framebox_t);\r
+  iter->header.nextsib = (union ir_setdata_t*) set->frameboxes;\r
+  return set->frameboxes = iter;\r
 }\r
 \r
 /* Match two null-terminated bytestrings\r
@@ -261,10 +285,12 @@ int bytes_identical
 ( uint8_t* stra,\r
   uint8_t* strb\r
 )\r
-{ while (*stra && *strb)\r
-    if (*stra++ != *strb++)\r
-      return 0;\r
-  return *stra == *strb;\r
+{ int ca, cb;\r
+  do {\r
+    ca = *stra++;\r
+    cb = *strb++;\r
+  } while (ca && ca == cb);\r
+  return (ca == cb);\r
 }\r
 \r
 /* Assign Setdata to Set\r
@@ -276,47 +302,41 @@ void ir_set_assign_data
 )\r
 { struct ir_framebox_t* framebox;\r
   struct ir_simplex_t*  simplex;\r
-  struct ir_link_t*     link;\r
   switch (setdata->header.type)\r
     { case FSDAT:\r
-       framebox = ir_set_add_framebox(set, setdata->header.name);\r
-       if (framebox->framesheets[setdata->framesheet.frameinfo.facing] != NULL)\r
+       framebox = ir_set_add_framebox(set, setdata->header.data_name);\r
+       if (framebox->framesheets[setdata->framesheet.frameinfo.facing].header.data_name != NULL)\r
          wprintf("Duplicate framesheet [%i] %s\n",\r
                  setdata->framesheet.frameinfo.facing, setdata->header.data_name);\r
        framebox->framesheets[setdata->framesheet.frameinfo.facing] = setdata->framesheet;\r
        break;\r
       case MSDAT:\r
-       framebox = ir_set_add_framebox(set, setdata->header.name);\r
-       if (framebox->mapsheets[setdata->mapsheet.frameinfo.facing] != NULL)\r
+       framebox = ir_set_add_framebox(set, setdata->header.data_name);\r
+       if (framebox->mapsheets[setdata->mapsheet.frameinfo.facing].header.data_name != NULL)\r
          wprintf("Duplicate mapsheet [%i] %s\n",\r
                  setdata->mapsheet.frameinfo.facing, setdata->header.data_name);\r
        framebox->mapsheets[setdata->mapsheet.frameinfo.facing] = setdata->mapsheet;\r
        break;\r
       case ADAT:\r
        if (set->audio == NULL)\r
-         { set->audio = &setdata->audio;\r
+         { set->audio = (struct ir_simplex_t*) setdata;\r
            return;\r
          }\r
        simplex = set->audio;\r
-       while (simplex->header.nextsib != NULL;)\r
+       while (simplex->header.nextsib != NULL)\r
          if (bytes_identical(simplex->header.data_name, setdata->header.data_name))\r
            { wprintf("Duplicate audio %s\n", setdata->header.data_name);\r
              *simplex = setdata->audio;\r
+             //setdata is now a pointer to redundant, unused memory.\r
              return;\r
            }\r
          else\r
-           simplex = simplex->header.nextsib;\r
-       simplex->header.nextsib = &setdata->audio;\r
+           simplex = (struct ir_simplex_t*) simplex->header.nextsib;\r
+       simplex->header.nextsib = setdata;\r
        break;\r
       case LDAT:\r
-       if (set->links == NULL)\r
-         { set->links = &setdata->link;\r
-           return;\r
-         }\r
-       link = set->links;\r
-       while (link->header.nextsib != NULL)\r
-         link = link->header.nextsib;\r
-       link->header.nextsib = &setdata->link;\r
+       setdata->link.header.nextsib = set->links;\r
+       set->links = (struct ir_link_t*) setdata;\r
        break;\r
       default:\r
        fprintf(stderr, "Unknown setdata type %x\n", setdata->header.type);\r
@@ -325,12 +345,12 @@ void ir_set_assign_data
 }\r
 \r
 void ir_set_assign_ref\r
-( ir_set_t* set,\r
-  long long ref\r
+( struct ir_set_t* set,\r
+  long long        ref\r
 )\r
 { if (set->ref != 0)\r
-    wprintf("Ref override: 0x%x -> 0x%x for set %s\n",\r
-           set->ref, ref, set->name);\r
+    wprintf("Ref override: 0x%lx -> 0x%lx for set %s\n",\r
+           (long unsigned) set->ref, (long unsigned) ref, set->name);\r
   set->ref = ref;\r
   //TODO: reflist_add(set);\r
 }\r
@@ -339,10 +359,7 @@ void ir_data_assign_path
 ( union ir_setdata_t* setdata,\r
   uint8_t*            path\r
 )\r
-{ if (set->header.src_filename)\r
-    wprintf("Path override: %s -> %s for set %s\n",\r
-           set->header.src_filename, path, set->name);\r
-  set->header.src_filename = path;\r
+{ setdata->header.src_filename = path;\r
   //TODO: internal strdup, not assign (= path;)\r
 }\r
 \r
@@ -355,7 +372,7 @@ union ir_setdata_t* ir_framesheet
   int height\r
 )\r
 { struct ir_framedata_t* framesheet = struct_alloc(ir_framedata_t);\r
-  framesheet->header->type = FSDAT;\r
+  framesheet->header.type = FSDAT;\r
   framesheet->header.data_name = name;\r
   framesheet->frameinfo.facing = d;\r
   framesheet->frameinfo.w = width;\r
@@ -367,7 +384,7 @@ union ir_setdata_t* ir_mapsheet
 ( uint8_t* name,\r
   apc_facing d,\r
   int width,\r
-  int height,\r
+  int height\r
 )\r
 { struct ir_framedata_t* mapsheet = struct_alloc(ir_framedata_t);\r
   mapsheet->header.type = MSDAT;\r
@@ -393,7 +410,7 @@ void* stack_alloc(size_t bytes)
       return pagenode_head->head;\r
     }\r
   if (PN_HEADSPACE() < bytes) \r
-    { pagenode_head->next = (struct pagenode_t*) calloc(PN_ALLOCSIZE);\r
+    { pagenode_head->next = (struct pagenode_t*) calloc(PN_ALLOCSIZE,1);\r
       pagenode_head = pagenode_head->next;\r
       pagenode_head->head = pagenode_head->root;\r
     }\r
asset package compiler - creates asspack files for injection into the HENGE engine's runtime memory