parser wip pt2
[henge/webcc.git] / src / apc / ir.c
diff --git a/src/apc/ir.c b/src/apc/ir.c
new file mode 100644 (file)
index 0000000..10aede8
--- /dev/null
@@ -0,0 +1,110 @@
+#include <errno.h>
+#include <ir.h>
+
+#define CURR_OBI (OB[obi])
+#define CURR_VBI (VB[vbi])
+#define CURR_CBI (CB[cbi])
+#define IS_SUBCLASS() (CB[cbi].num_subclasses)
+
+//TODO: label and vdat_id
+void
+insert_set()
+{
+  if(IS_SUBCLASS()) //if set is set of subclass
+    OB[obi].class_id = CB[cbi].subclass_list[subclass_index].label; //TODO: specify subclass other than label?
+  else
+    OB[obi].class_id = CB[cbi].label;
+
+  CB[cbi].set_list[set_index].odat_id = obi;
+  CB[cbi].set_list[set_index].parent_id = OB[obi].class_id;
+  //TODO: add ele_stack is created in element_list
+  //TODO: add odat
+
+}
+
+#define CURR_QUAD (OB[obi].ref_list[ref_index])
+void
+insert_ref(int x, int y, int z, int ref)
+{
+  CURR_QUAD.x = x;
+  CURR_QUAD.y = y;
+  CURR_QUAD.z = z;
+  CURR_QUAD.ref = ref;
+}
+
+
+//Insert element into OB and CB
+void
+insert_ele(char* label, int vdat_id)
+{
+
+
+  OB[obi].label = label;
+  OB[obi].vdat_id = vdat_id;
+  //TODO: check set_obi to see if set_map_data exists
+  OB[obi].num_ref = OB[set_obi].num_ref;
+  OB[obi].ref_list = OB[set_obi].ref_list;
+  OB[obi].class_id = cbi;
+
+  if(IS_SUBCLASS())
+    {
+      CB[cbi].subclass_list[subclass_index].set_list[set_index].ele_list[ele_index].odat_id = obi;
+      CB[cbi].subclass_list[subclass_index].set_list[set_index].ele_list[ele_index].parent_id = CB[cbi].subclass_list[subclass_index].set_index;
+    }
+  else
+    {
+      CB[cbi].set_list[set_index].ele_list[ele_index].odat_id = obi;
+      CB[cbi].set_list[set_index].ele_list[ele_index].parent_id = CB[cbi].set_index;
+    }
+
+  obi++;
+}
+
+
+/* fd could be a directory entry */
+int
+insert_fdat(char* label, char direction, int fd)
+{
+  VB[vbi].model_list[VB[vbi].len].label = label;
+  VB[vbi].model_list[VB[vbi].len].fdat_id[(int)direction] = fd;
+}
+
+void
+condense()
+{
+  FILE* vp, op, cp;
+  int v, m;
+  int num_models;
+
+  vp = fopen("vdat_output", w+);
+  if(!vp)
+    perror("vdat_output failed to open\n");
+
+  op = fopen("odat_output", w+);
+  if(!op)
+    perror("odat_output failed to open\n");
+
+  cp = fopen("cdat_output", w+);
+  if(!cp)
+    perror("cdat_output failed to open\n");
+
+
+
+  /* fwrite vdat */
+  for(v = 0; v <= vbi; v++)
+    {
+      num_models = VB[v].num_models; //data duplication for caching
+      for(m = 0; m <= num_models; m++)
+        {
+            
+        }
+    }
+
+  /* fwrite odat */
+  /* Convert ref_list to actual offset */
+
+  /* fwrite cdat */
+
+
+}
+