#!/usr/bin/ruby

$:.unshift( "../lib" );
require "graphviz"

g = nil
if ARGV[0]
  g = GraphViz::new( "G", :path => ARGV[0] )
else
  g = GraphViz::new( "G" )
end

g.node[:shape] = "ellipse"
g.node[:color] = "black"

g.edge[:color] = "black"
g.edge[:weight] = "1"
g.edge[:style] = "filled"
g.edge[:label] = ""

g[:size] = "4,4"

main        = g.add_nodes( "main", :shape => "box" )
parse       = g.add_nodes( "parse" )
execute     = g.add_nodes( "execute" )
init        = g.add_nodes( "init" )
cleanup     = g.add_nodes( "cleanup" )
make_string = g.add_nodes( "make_string", :label => 'make a\nstring' )
printf      = g.add_nodes( "printf" )
compare     = g.add_nodes( "compare", :shape => "box", :style => "filled", :color => ".7 .3 1.0" )

g.add_edges( main, parse, :weight => "8" )
g.add_edges( parse, execute )
g.add_edges( main, init, :style => "dotted" )
g.add_edges( main, cleanup )
g.add_edges( execute, make_string )
g.add_edges( execute, printf )
g.add_edges( init, make_string )
g.add_edges( main, printf, :color => "red", :style => "bold", :label => "100 times" )
g.add_edges( execute, compare, :color => "red" )

g.output( :png => "#{$0}.png" )