Module: Archsight::GraphvisRenderer

Defined in:
lib/archsight/renderer.rb

Overview

GraphvisRenderer renders instances of the database

Constant Summary collapse

FONT = 
"Helvetica"

Instance Method Summary collapse

Instance Method Details

#create_graph_all(db, root_kinds: nil, max_depth: 3, allowed_kinds: nil) ⇒ Object 



52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
 
# File 'lib/archsight/renderer.rb', line 52

def create_graph_all(db, root_kinds: nil, max_depth: 3, allowed_kinds: nil)
  root_kinds ||= [Archsight::Resources["BusinessProduct"], Archsight::Resources["BusinessProcess"]]

  # Default allowed kinds for overview: Products, Processes, Services, and Teams
  allowed_kinds ||= [
    Archsight::Resources["BusinessProduct"],
    Archsight::Resources["BusinessProcess"],
    Archsight::Resources["ApplicationService"],
    Archsight::Resources["BusinessActor"]
  ]
  allowed_kinds_set = allowed_kinds.to_set

  Archsight::Graphvis.new("all").draw_dot do |g|
    nodes = {} # Track visited nodes
    edges = {} # Track created edges

    # Collect root instances
    queue = [] # [instance, depth] pairs
    root_kinds.each do |klass|
      db.instances[klass]&.each_value do |inst|
        next if inst.abandoned?

        queue << [inst, 0]
      end
    end

    # BFS traversal with depth limit
    while queue.any?
      inst, depth = queue.shift
      next if nodes[inst]

      nodes[inst] = true
      gnode(g, inst, simple_label: true)

      # Stop following relations at max depth
      next if depth >= max_depth

      inst.class.relations.each do |verb, kind|
        inst.relations(verb, kind).each do |rel|
          next if rel.abandoned?
          next unless allowed_kinds_set.include?(rel.class)

          edge_key = "#{gname(inst)}|#{verb}|#{gname(rel)}"
          unless edges[edge_key]
            gedge(g, inst, rel, verb)
            edges[edge_key] = true
          end

          queue << [rel, depth + 1] unless nodes[rel]
        end
      end
    end
  end
end

#create_graph_one(db, klass_pat, name_pat) ⇒ Object 



107
108
109
110
111
112
113
114
115
116
117
 
# File 'lib/archsight/renderer.rb', line 107

def create_graph_one(db, klass_pat, name_pat)
  name = "#{klass_pat}:#{name_pat}"
  nodes = {}
  edges = {}
  Archsight::Graphvis.new(name).draw_dot do |g|
    klass = Archsight::Resources[klass_pat] || raise("kind #{klass_pat} unknown")
    instances = db.instances[klass]
    inst = instances[name_pat] || raise("name #{name_pat} for kind #{klass_pat} not found")
    create_graph_one_inst(db, g, inst, nodes, edges)
  end
end

#create_graph_one_inst(db, graph, inst, nodes, edges) ⇒ Object 



119
120
121
122
123
124
125
126
127
128
129
130
131
132
 
# File 'lib/archsight/renderer.rb', line 119

def create_graph_one_inst(db, graph, inst, nodes, edges)
  return if nodes[inst] # Already visited - prevent infinite recursion

  gnode(graph, inst)
  nodes[inst] = true
  inst.class.relations.each do |verb, kind|
    inst.relations(verb, kind).each do |rel|
      edge_name = "#{inst}|#{verb}|#{rel}"
      gedge(graph, inst, rel, verb) unless edges[edge_name]
      edges[edge_name] = true
      create_graph_one_inst(db, graph, rel, nodes, edges)
    end
  end
end

#css_class(inst) ⇒ Object 



12
13
14
15
16
 
# File 'lib/archsight/renderer.rb', line 12

def css_class(inst)
  base_class = inst.class.name.to_s.gsub("::", "")
  layer_class = "layer-#{inst.class.layer}"
  "#{base_class} #{layer_class}"
end

#gedge(graph, a_inst, b_inst, label) ⇒ Object 



48
49
50
 
# File 'lib/archsight/renderer.rb', line 48

def gedge(graph, a_inst, b_inst, label)
  graph.edge gname(a_inst), gname(b_inst), label: label, fontname: "#{FONT} italic"
end

#gname(inst) ⇒ Object 



8
9
10
 
# File 'lib/archsight/renderer.rb', line 8

def gname(inst)
  "#{inst.class}/#{inst.name}"
end

#gnode(graph, inst, opts = {}) ⇒ Object 



40
41
42
43
44
45
46
 
# File 'lib/archsight/renderer.rb', line 40

def gnode(graph, inst, opts = {})
  label = "<TABLE><TR><TD><B>#{inst.name}</B></TD></TR><TR><TD>#{inst.klass}</TD></TR></TABLE>"
  label = inst.name if opts[:simple_label]
  graph.node gname(inst), class: css_class(inst), shape: :box,
                          style: "rounded,filled", fontname: FONT, label: label,
                          href: "/kinds/#{inst.klass}/instances/#{inst.name}"
end

#has_incoming_relations?(db, inst) ⇒ Boolean

Check if any resource in the database references this instance

Returns:

  • (Boolean) 


27
28
29
30
31
32
33
34
35
36
37
38
 
# File 'lib/archsight/renderer.rb', line 27

def has_incoming_relations?(db, inst)
  db.instances.each do |other_klass, instances|
    other_klass.relations.each do |_verb, target_kind|
      next unless target_kind == inst.class

      instances.each_value do |other_inst|
        return true if other_inst.relations(_verb, target_kind).include?(inst)
      end
    end
  end
  false
end

#has_relations?(inst, klass) ⇒ Boolean

Returns:

  • (Boolean) 


18
19
20
21
22
23
24
 
# File 'lib/archsight/renderer.rb', line 18

def has_relations?(inst, klass)
  # Check outgoing relations defined on this class
  klass.relations.each do |verb, kind|
    return true if inst.relations(verb, kind).any?
  end
  false
end