1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
|
#include "graphs.h"
#include <stdio.h>
#include <errno.h>
#include <string.h>
#include "err.h"
int create_graph_trie (vcomponent* ev, char* filename) {
FILE* f = fopen(filename, "w");
fputs("digraph {\n rankdir=LR;", f);
TRIE_DOT(content_line)(&ev->clines, f);
fputs("}", f);
fclose(f);
INFO_F("Wrote '%s' to '%s'", ev->filename, 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) {
ERR_F("Error opening file %s, errno = %i", outfile, errno);
return 1;
}
vcomponent* c = root;
fputs("digraph {", f);
helper_vcomponent(c, f);
fputs("}", f);
fclose(f);
return 0;
}
|
