# HG changeset patch
# User John Tsiombikas <nuclear@member.fsf.org>
# Date 1464866737 -10800
# Node ID 75807c6b939b852a6e56a8136ee1d1d6463d4b07

initial commit

diff -r 000000000000 -r 75807c6b939b Makefile
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Makefile	Thu Jun 02 14:25:37 2016 +0300
@@ -0,0 +1,14 @@
+src = $(wildcard src/*.c)
+obj = $(src:.c=.o)
+
+bin = test
+
+CFLAGS = -pedantic -Wall -g
+LDFLAGS = -ljansson
+
+$(bin): $(obj)
+	$(CC) -o $@ $(obj) $(LDFLAGS)
+
+.PHONY: clean
+clean:
+	rm -f $(obj) $(bin)
diff -r 000000000000 -r 75807c6b939b src/main.c
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/main.c	Thu Jun 02 14:25:37 2016 +0300
@@ -0,0 +1,152 @@
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <errno.h>
+#include <jansson.h>
+
+void proc_osg_node(const char *node_type, json_t *node, int level);
+void proc_geometry(json_t *node, int level);
+void proc_primitive(json_t *prim, int level);
+json_t *find_node(json_t *node, const char *key);
+
+int main(int argc, char **argv)
+{
+	FILE *fp = stdin;
+	json_t *root, *osgnode;
+	json_error_t err;
+
+	if(argc > 1) {
+		if(!(fp = fopen(argv[1], "r"))) {
+			fprintf(stderr, "failed to open osgjs file: %s: %s\n", argv[1], strerror(errno));
+			return 1;
+		}
+	}
+
+	if(!(root = json_loadf(fp, 0, &err))) {
+		fprintf(stderr, "json parsing error at %d:%d: %s\n", err.line, err.column, err.text);
+		return 1;
+	}
+	if(!json_is_object(root)) {
+		fprintf(stderr, "root node is not an object!\n");
+		return 1;
+	}
+	if(!(osgnode = json_object_get(root, "osg.Node"))) {
+		fprintf(stderr, "root doesn't have an osg.Node field!\n");
+		return 1;
+	}
+	proc_osg_node("osg.Node", osgnode, 0);
+
+	json_decref(root);
+	return 0;
+}
+
+void indent(int n)
+{
+	while(n--) {
+		putchar(' ');
+	}
+}
+
+void proc_osg_node(const char *node_type, json_t *node, int level)
+{
+	json_t *children, *name_field;
+	const char *name = 0;
+
+	if((name_field = json_object_get(node, "Name"))) {
+		if(json_is_string(name_field)) {
+			name = json_string_value(name_field);
+		}
+	}
+
+	indent(level);
+	printf("%s: %s\n", node_type, name ? name : "<unnamed>");
+
+	if(strcmp(node_type, "osg.Geometry") == 0) {
+		proc_geometry(node, level);
+	}
+
+	if((children = json_object_get(node, "Children")) && json_is_array(children)) {
+		int i, num = json_array_size(children);
+
+		for(i=0; i<num; i++) {
+			void *fiter;
+			json_t *child = json_array_get(children, i);
+			if(!child) continue;
+
+			fiter = json_object_iter(child);
+			while(fiter) {
+				const char *key = json_object_iter_key(fiter);
+				if(strstr(key, "osg") == key) {	/* starts with osg */
+					// recurse into new OSG node
+					proc_osg_node(key, json_object_iter_value(fiter), level + 1);
+				}
+				fiter = json_object_iter_next(child, fiter);
+			}
+		}
+	}
+}
+
+void proc_geometry(json_t *node, int level)
+{
+	json_t *prim_list;
+	int i, num;
+
+	if(!(prim_list = json_object_get(node, "PrimitiveSetList"))) {
+		fprintf(stderr, "geometry node without a PrimitiveSetList array\n");
+		return;
+	}
+	if(!json_is_array(prim_list)) {
+		fprintf(stderr, "PrimitiveSetList should be an array\n");
+		return;
+	}
+	num = json_array_size(prim_list);
+
+	for(i=0; i<num; i++) {
+		json_t *prim;
+
+		prim = json_array_get(prim_list, i);
+		if(!json_is_object(prim)) continue;
+
+		proc_primitive(prim, level);
+	}
+}
+
+void proc_primitive(json_t *prim, int level)
+{
+	json_t *mode;
+	const char *mode_str;
+
+	if(!(mode = json_object_get(prim, "Mode"))) {
+		fprintf(stderr, "skipping PrimitiveSetList item without Mode\n");
+		return;
+	}
+	if(!json_is_string(mode) || !(mode_str = json_string_value(mode))) {
+		fprintf(stderr, "primitive mode should be a string!\n");
+		return;
+	}
+}
+
+json_t *find_node(json_t *node, const char *key)
+{
+	json_t *res;
+	if(json_is_object(node)) {
+		void *iter = json_object_iter(node);
+		while(iter) {
+			if(strcmp(json_object_iter_key(iter), key) == 0) {
+				return json_object_iter_value(iter);
+			}
+			if((res = find_node(json_object_iter_value(iter), key))) {
+				return res;
+			}
+			iter = json_object_iter_next(node, iter);
+		}
+	} else if(json_is_array(node)) {
+		int i, num = json_array_size(node);
+		for(i=0; i<num; i++) {
+			if((res = find_node(json_array_get(node, i), key))) {
+				return res;
+			}
+		}
+	}
+	return 0;
+}