doclib/dot

   1 #!/bin/sh
   2
   3 topdir="`dirname "$0"`"; topdir="`cd "$topdir/.."; pwd`"
   4 sed -i -e 's/rankdir=LR/rankdir=TB/' "$1"
   5 "$topdir/doclib/dot-munge.pl" "$1"
   6
   7 case "$2" in
   8     -Tpng:gd)
   9         first="$1"; shift; shift
  10         set -- "$first" "-Tpng" "$@"
  11         ;;
  12     *)
  13 esac
  14
  15 set -e
  16
  17 dot "$@"
  18
  19 case "$4" in
  20     *.png)
  21         if [ -r "$4" ]; then
  22             size="`pngtopnm "$4" | sed -n -e '2p'`"
  23             width_a="${size% *}"
  24             height_a="${size#* }"
  25             if [ $width_a -gt 800 ]; then
  26                 for file in "${1%.dot}".*; do
  27                     cp "$file" "$file.a"
  28                 done
  29                 sed -e 's/rankdir=LR/rankdir=TB/' -e t -e 's/rankdir=TB/rankdir=LR/' "$1.a" > "$1"
  30                 dot "$@"
  31                 size="`pngtopnm "$4" | sed -n -e '2p'`"
  32                 width_b="${size% *}"
  33                 height_b="${size#* }"
  34                 if [ $width_a -lt $width_b ]; then
  35                     for file in "${1%.dot}".*.a; do
  36                         mv "$file" "${file%.a}"
  37                     done
  38                 else
  39                     rm "${1%.dot}".*.a
  40                 fi
  41             fi
  42         fi
  43         ;;
  44     *)  ;;
  45 esac