From eba7f0e2713a55b2516df97999a3995476a7c166 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Sat, 9 Feb 2019 01:19:43 +0100
Subject: Add support for full tree printing.

---
 graphs.c | 50 +++++++++++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 49 insertions(+), 1 deletion(-)

(limited to 'graphs.c')

diff --git a/graphs.c b/graphs.c
index ab49f4f1..f1c8ed75 100644
--- a/graphs.c
+++ b/graphs.c
@@ -1,8 +1,9 @@
 #include "graphs.h"
 
 #include <stdio.h>
+#include <errno.h>
 
-int create_graph (vcomponent* ev, char* filename) {
+int create_graph_trie (vcomponent* ev, char* filename) {
 	FILE* f = fopen(filename, "w");
 
 	fputs("digraph {\n	rankdir=LR;", f);
@@ -15,3 +16,50 @@ int create_graph (vcomponent* ev, char* filename) {
 
 	return 0;
 }
+
+int helper_vcomponent (vcomponent* root, FILE* f) {
+	fprintf(f, "subgraph \"cluster_root\" { label=File; \"%p\" [label=%s] }\n", root, root->type);
+
+	TRIE(content_line)* trie = &root->clines;
+	TRIE_NODE(content_line)* n = trie->root->child;
+
+	if (! EMPTY(TRIE(content_line))(trie)) {
+		fprintf(f, "subgraph \"cluster_%p\" {\n", root);
+		fprintf(f, "\"%p\" [label=trie fontcolor=gray, color=gray];", trie);
+		fprintf(f, "\"%p\" -> \"%p\" [color=red]\n", root, trie);
+		while (n != NULL) {
+			fprintf(f, "\"%p\" -> \"%p\" [color=gray]\n",
+					(void*) trie,
+					(void*) n);
+			fprintf(f, "subgraph \"cluster_%c_%p\" {\ncolor=red; \n",
+					n->c, root);
+			TRIE_DOT_HELP(content_line) ( n, f );
+			fputs("}", f);
+			n = n->next;
+		}
+		fputs("}", f);
+	}
+
+	vcomponent* child;
+	for (size_t i = 0; i < root->components.length; i++) {
+		child = GET(VECT(vcomponent))(&root->components, i);
+		if (child == NULL) continue;
+		fprintf(f, "\"%p\" -> \"%p\"\n", root, child);
+		helper_vcomponent(child, f);
+	}
+	return 0;
+}
+
+int create_graph_vcomponent (vcomponent* root, char* outfile) {
+	FILE* f = fopen(outfile, "w");
+	if (f == NULL) {
+		printf("Error opening file %s, errno = %i\n", outfile, errno);
+		return 1;
+	}
+	vcomponent* c = root;
+	fputs("digraph {", f);
+	helper_vcomponent(c, f);
+	fputs("}", f);
+	fclose(f);
+	return 0;
+}
-- 
cgit v1.2.3