fixes
[henge/apc.git] / src / ir.c
index 4b01142..f39f85b 100644 (file)
--- a/src/ir.c
+++ b/src/ir.c
@@ -101,17 +101,17 @@ struct ir_set_t
 static inline\r
 int                   init_pagelist(struct pagelist_t*,size_t);\r
 static inline\r
-struct ir_framebox_t* ir_set_add_framebox(struct ir_set_t*, uint8_t*);\r
+struct ir_framebox_t* ir_set_add_framebox(struct ir_set_t*,const uint8_t*);\r
 static\r
 void                  ir_free_pagenodes(struct pagenode_t*);\r
 static inline\r
-int                   bytes_identical(uint8_t*,uint8_t*);\r
+int                   bytes_identical(const uint8_t*,const uint8_t*);\r
 static\r
 void*                 stack_alloc(size_t);\r
 static\r
-uint8_t*              name_alloc(uint8_t*);\r
+uint8_t*              name_alloc(const uint8_t*);\r
 static inline\r
-union ir_setdata_t*   ir_framedata (enum dtype,uint8_t*,apc_facing,int,int);\r
+union ir_setdata_t*   ir_framedata (enum dtype,const uint8_t*,apc_facing,int,int);\r
 /* Function-Like Macros */\r
 #define do_warn() do {                         \\r
   } while (0)\r
@@ -212,12 +212,17 @@ struct ir_class_t* ir_class_root
 */\r
 struct ir_class_t* ir_class_addchild\r
 ( struct ir_class_t* class,\r
-  uint8_t*           name\r
+  const uint8_t*     name\r
 )\r
 { struct ir_class_t* iter;\r
+  printf("Class %s, addchild %s\n", class->name, name);\r
   if (class->nextchild == NULL)\r
-    return class->nextchild = struct_alloc(ir_class_t);\r
+    goto alloc;\r
   iter = class->nextchild;\r
+  if (iter->name == NULL)\r
+    eprintf("Null name pointer in class %p\n", iter);\r
+  if (name == NULL)\r
+    eprintf("Null child added to class %s\n", iter->name);\r
  check:\r
   if (bytes_identical(iter->name, name))\r
     return iter;\r
@@ -225,6 +230,7 @@ struct ir_class_t* ir_class_addchild
     { iter = iter->nextsib;\r
       goto check;\r
     }\r
+ alloc:\r
   iter = struct_alloc(ir_class_t);\r
   iter->nextsib = class->nextchild;\r
   iter->name = name_alloc(name);\r
@@ -237,12 +243,17 @@ struct ir_class_t* ir_class_addchild
 */\r
 struct ir_set_t* ir_class_addset\r
 ( struct ir_class_t* class,\r
-  uint8_t*           name\r
+  const uint8_t*     name\r
 )\r
 { struct ir_set_t* iter;\r
+  printf("Class %s, addset %s\n", class->name, name);\r
   if (class->root_set == NULL)\r
-    return class->root_set = struct_alloc(ir_set_t);\r
+    goto alloc;\r
   iter = class->root_set;\r
+  if (iter->name == NULL)\r
+    eprintf("Null name pointer in class %p\n", iter);\r
+  if (name == NULL)\r
+    eprintf("Null set added to class %s\n", iter->name);\r
  check:\r
   if (bytes_identical(iter->name, name))\r
     return iter;\r
@@ -250,6 +261,7 @@ struct ir_set_t* ir_class_addset
     { iter = iter->nextsib;\r
       goto check;\r
     }\r
+ alloc:\r
   iter = struct_alloc(ir_set_t);\r
   iter->nextsib = class->root_set;\r
   iter->name = name_alloc(name);\r
@@ -262,12 +274,17 @@ struct ir_set_t* ir_class_addset
 */\r
 struct ir_set_t* ir_set_addchild\r
 ( struct ir_set_t* set,\r
-  uint8_t*         name\r
+  const uint8_t*   name\r
 )\r
 { struct ir_set_t* iter;\r
+  printf("Set %s, addchild %s\n", set->name, name);\r
   if (set->nextchild == NULL)\r
-    return set->nextchild = struct_alloc(ir_set_t);\r
+    goto alloc;\r
   iter = set->nextchild;\r
+  if (iter->name == NULL)\r
+    eprintf("Null name pointer in set %p\n", iter);\r
+  if (name == NULL)\r
+    eprintf("Null child added to set %s\n", iter->name);\r
  check:\r
   if (bytes_identical(iter->name, name))\r
     return iter;\r
@@ -275,6 +292,7 @@ struct ir_set_t* ir_set_addchild
     { iter = iter->nextsib;\r
       goto check;\r
     }\r
+ alloc:\r
   iter = struct_alloc(ir_set_t);\r
   iter->nextsib = set->nextchild;\r
   iter->name = name_alloc(name);\r
@@ -288,11 +306,11 @@ struct ir_set_t* ir_set_addchild
 static inline\r
 struct ir_framebox_t* ir_set_add_framebox\r
 ( struct ir_set_t* set,\r
-  uint8_t*         name\r
+  const uint8_t*   name\r
 )\r
 { struct ir_framebox_t* iter;\r
   if (set->frameboxes == NULL)\r
-    return set->frameboxes = struct_alloc(ir_framebox_t);\r
+    goto alloc;\r
   iter = set->frameboxes;\r
  check:\r
   if (bytes_identical(iter->header.data_name, name))\r
@@ -301,6 +319,7 @@ struct ir_framebox_t* ir_set_add_framebox
     { iter = (struct ir_framebox_t*) iter->header.nextsib;\r
       goto check;\r
     }\r
+ alloc:\r
   iter = struct_alloc(ir_framebox_t);\r
   iter->header.nextsib = (union ir_setdata_t*) set->frameboxes;\r
   iter->header.data_name = name_alloc(name);\r
@@ -312,14 +331,14 @@ struct ir_framebox_t* ir_set_add_framebox
 */\r
 static inline\r
 int bytes_identical\r
-( uint8_t* stra,\r
-  uint8_t* strb\r
+( const uint8_t* stra,\r
+  const uint8_t* strb\r
 )\r
 { int ca, cb;\r
   do {\r
     ca = *stra++;\r
     cb = *strb++;\r
-  } while (ca && ca == cb);\r
+  } while (ca && ca != '_' && ca == cb);\r
   return (ca == cb);\r
 }\r
 \r
@@ -388,39 +407,43 @@ void ir_set_assign_ref
 \r
 void ir_data_assign_path\r
 ( union ir_setdata_t* setdata,\r
-  uint8_t*            path\r
+  const uint8_t*      path\r
 )\r
-{ if (setdata->header.src_filename != NULL)\r
+{ if (path == NULL)\r
+    eprintf("Null path in data %s\n", setdata->header.data_name);\r
+  if (setdata->header.src_filename != NULL)\r
     wprintf("Path override: %s -> %s for setdata %s\n",\r
            setdata->header.src_filename, path, setdata->header.data_name);\r
   setdata->header.src_filename = name_alloc(path);\r
 }\r
 \r
 union ir_setdata_t* ir_framesheet\r
-( uint8_t*   name,\r
-  apc_facing d,\r
-  int        width,\r
-  int        height\r
+( const uint8_t* name,\r
+  apc_facing     d,\r
+  int            width,\r
+  int            height\r
 )\r
 { return ir_framedata(FSDAT, name, d, width, height); }\r
 \r
 union ir_setdata_t* ir_mapsheet\r
-( uint8_t*   name,\r
-  apc_facing d,\r
-  int        width,\r
-  int        height\r
+( const uint8_t* name,\r
+  apc_facing     d,\r
+  int            width,\r
+  int            height\r
 )\r
 { return ir_framedata(MSDAT, name, d, width, height); }\r
 \r
 static inline\r
 union ir_setdata_t* ir_framedata\r
-( enum dtype type,\r
-  uint8_t*   name,\r
-  apc_facing d,\r
-  int        width,\r
-  int        height\r
+( enum dtype     type,\r
+  const uint8_t* name,\r
+  apc_facing     d,\r
+  int            width,\r
+  int            height\r
 )\r
 { struct ir_framedata_t* framedata = struct_alloc(ir_framedata_t);\r
+  if (name == NULL)\r
+    eprint("Null name in set allocation\n");\r
   framedata->header.type = type;\r
   framedata->header.data_name = name_alloc(name);\r
   framedata->frameinfo.facing = d;\r
@@ -430,8 +453,10 @@ union ir_setdata_t* ir_framedata
 }\r
 \r
 union ir_setdata_t* ir_audio\r
-( uint8_t* name )\r
+( const uint8_t* name )\r
 { struct ir_simplex_t* audio = struct_alloc(ir_simplex_t);\r
+  if (name == NULL)\r
+    eprint("Null audio\n");\r
   audio->header.type = ADAT;\r
   audio->header.data_name = name_alloc(name);\r
   return (union ir_setdata_t*) audio;\r
@@ -442,6 +467,8 @@ union ir_setdata_t* ir_audio
 struct ir_classld_t* ir_classld_from_class\r
 ( struct ir_class_t* class )\r
 { struct ir_classld_t* classld;\r
+  if (class == NULL)\r
+    eprint("Null class in classld\n");\r
   classld = struct_alloc(ir_classld_t);\r
   classld->root_class = class;\r
   return classld;\r
@@ -457,7 +484,7 @@ struct ir_setld_t* ir_setld_from_ref
 \r
 struct ir_setld_t* ir_setld_from_classld\r
 ( struct ir_classld_t* classld,\r
-  uint8_t*             name\r
+  const uint8_t*       name\r
 )\r
 { struct ir_setld_t* setld;\r
   setld = struct_alloc(ir_setld_t);\r
@@ -470,7 +497,7 @@ struct ir_setld_t* ir_setld_from_classld
 \r
 struct ir_setld_t* ir_setld_addchild\r
 ( struct ir_setld_t* setld,\r
-  uint8_t*           name\r
+  const uint8_t*     name\r
 )\r
 { if (setld->namelist == NULL)\r
     { setld->namelist = struct_alloc(ir_namelist_t);\r
@@ -487,7 +514,7 @@ struct ir_setld_t* ir_setld_addchild
 union ir_setdata_t* ir_link\r
 ( enum ltype         link_type,\r
   struct ir_setld_t* setld,\r
-  uint8_t*           name\r
+  const uint8_t*     name\r
 )\r
 { struct ir_link_t* link;\r
   link = struct_alloc(ir_link_t);\r
@@ -519,13 +546,14 @@ void* stack_alloc
 \r
 static\r
 uint8_t* name_alloc\r
-( uint8_t* name_src )\r
-{ uint8_t* iter, * name;\r
-  int      head_mem;\r
+( const uint8_t* name_src )\r
+{ const uint8_t* iter;\r
+  uint8_t*       name;\r
+  int            head_mem;\r
  copy:\r
   name = (uint8_t*)namepages.head->header.head;\r
   iter = name_src;\r
-  for (head_mem = PL_HEADMEM(namepages); *iter && head_mem; head_mem--)\r
+  for (head_mem = PL_HEADMEM(namepages); *iter && *iter != '_' && head_mem; head_mem--)\r
     *(namepages.head->header.head)++ = *iter++;\r
   if (head_mem == 0) //not enough room\r
     { namepages.head->header.next = (struct pagenode_t*) calloc(namepages.pagesize,1);\r