1 files changed, 19 insertions, 0 deletions
diff --git a/scripts/dotty b/scripts/dotty
new file mode 100755
index 000000000..45bbd8d1d
--- /dev/null
+++ b/scripts/dotty
@@ -0,0 +1,19 @@
+#!/bin/sh -e
+
+##
+# CLOSE THIS FILE! DO NOT LOOK BELOW!
+#
+
+
+# ./scripts/deplist system | ./scripts/dotty
+
+printf "digraph G {\n";
+while read k; do
+    a=$(printf "%s " "${k}" | cut -d' ' -f1);
+    printf "    \"%s\n" "${a}";
+    for b in $(seq 2 $(_() { printf "%s" "${#}"; }; _ ${k})); do
+        printf "    \"%s\" -> \"" "${a}";
+        printf "%s " "${k}" | cut -d' ' -f${b};
+    done
+done | sed -e 's/$/";/g'
+printf "}\n";