summaryrefslogtreecommitdiff
path: root/bin/marionette-dotgraph
blob: 80e2f342d7c43afa07a4a847b0ff4463a36846ee (plain)
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
#!/usr/bin/ruby
#
# Author:: Adam Jacob (<adam@hjksolutions.com>)
# Copyright:: Copyright (c) 2008 HJK Solutions, LLC
# License:: GNU General Public License version 2 or later
# 
# This program and entire repository is free software; you can
# redistribute it and/or modify it under the terms of the GNU 
# General Public License as published by the Free Software 
# Foundation; either version 2 of the License, or any later version.
# 
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
# 
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
#

require File.join(File.dirname(__FILE__), "..", "lib", "marionette")
require 'rgl/dot'

mr = Marionette::Recipe.new("test", "default", "node")
raise ArgumentError, "#{ARGV[0]} is not a file!" unless File.exists?(ARGV[0])
mr.instance_eval(IO.read(ARGV[0]), ARGV[0], 1)
puts mr.inspect
puts mr.dg.directed?
puts mr.dg.acyclic?
tree = Array.new
mr.dg.depth_first_visit(:top) do |v|
  tree << v
end
maybe = mr.dg.bfs_search_tree_from(:top)
puts maybe.acyclic?
puts maybe.directed?
puts maybe.topsort_iterator.to_a.join("\n")
maybe.write_to_graphic_file