From: erg <devnull@localhost>
Date: Tue, 15 Apr 2008 17:20:25 +0000 (+0000)
Subject: Add source for info pages to CVS
X-Git-Tag: LAST_LIBGRAPH~32^2~4307
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=3931d1abf5f37a4b3011a960c66dd92629dab213;p=graphviz

Add source for info pages to CVS
---

diff --git a/doc/infosrc/mkshapes.sh b/doc/infosrc/mkshapes.sh
new file mode 100755
index 000000000..8804e51f6
--- /dev/null
+++ b/doc/infosrc/mkshapes.sh
@@ -0,0 +1,32 @@
+#! /bin/ksh
+# For each name in shapelist, create a dot file using that
+# shape, then produce a gif file as output.
+
+for s in $(cat shapelist)
+do
+  F=$s.dot
+  exec 3> $F
+  echo "digraph G {" >&3
+  if [[ $s == "plaintext" || $s == "none" ]]
+  then
+    echo " node [shape=$s];" >&3
+  else
+    echo " node [style=filled,shape=$s];" >&3
+    echo " node [label=\"\"];" >&3
+  fi
+  if [[ $s == point ]]
+  then
+    echo " node [width=\"0.1\"];" >&3
+  elif [[ $s == polygon ]]
+  then
+    echo " node [sides=7]; " >&3
+  fi
+  echo " $s;" >&3
+  echo "}" >&3
+  exec 3>&-
+
+  dot -Tgif $s.dot > $s.gif
+  rm -f $s.dot
+done
+
+