Class: Puppet::Graph::SimpleGraph

Inherits:
Object
  • Object
show all
Includes:
Util::PsychSupport
Defined in:
lib/puppet/graph/simple_graph.rb

Overview

A hopefully-faster graph class to replace the use of GRATR.

Direct Known Subclasses

RelationshipGraph, Resource::Catalog

Class Attribute Summary collapse

Instance Method Summary collapse

Methods included from Util::PsychSupport

#encode_with, #init_with

Constructor Details

#initializeSimpleGraph

All public methods of this class must maintain (assume ^ ensure) the following invariants, where “=~=” means equiv. up to order:

@in_to.keys =~= @out_to.keys =~= all vertices
@in_to.values.collect { |x| x.values }.flatten =~= @out_from.values.collect { |x| x.values }.flatten =~= all edges
@in_to[v1][v2] =~= @out_from[v2][v1] =~= all edges from v1 to v2
@in_to   [v].keys =~= vertices with edges leading to   v
@out_from[v].keys =~= vertices with edges leading from v
no operation may shed reference loops (for gc)
recursive operation must scale with the depth of the spanning trees, or better (e.g. no recursion over the set
    of all vertices, etc.)

This class is intended to be used with DAGs. However, if the graph has a cycle, it will not cause non-termination of any of the algorithms.



26
27
28
29
30
31
# File 'lib/puppet/graph/simple_graph.rb', line 26

def initialize
  @in_to = {}
  @out_from = {}
  @upstream_from = {}
  @downstream_from = {}
end

Class Attribute Details

.use_new_yaml_formatObject

Returns the value of attribute use_new_yaml_format.



483
484
485
# File 'lib/puppet/graph/simple_graph.rb', line 483

def use_new_yaml_format
  @use_new_yaml_format
end

Instance Method Details

#add_edge(e, *a) ⇒ Object

Add a new edge. The graph user has to create the edge instance, since they have to specify what kind of edge it is.



298
299
300
301
302
303
304
305
306
307
308
309
310
# File 'lib/puppet/graph/simple_graph.rb', line 298

def add_edge(e,*a)
  return add_relationship(e,*a) unless a.empty?
  e = Puppet::Relationship.from_data_hash(e) if e.is_a?(Hash)
  @upstream_from.clear
  @downstream_from.clear
  add_vertex(e.source)
  add_vertex(e.target)
  # Avoid multiple lookups here. This code is performance critical
  arr = (@in_to[e.target][e.source] ||= [])
  arr << e unless arr.include?(e)
  arr = (@out_from[e.source][e.target] ||= [])
  arr << e unless arr.include?(e)
end

#add_relationship(source, target, label = nil) ⇒ Object



312
313
314
# File 'lib/puppet/graph/simple_graph.rb', line 312

def add_relationship(source, target, label = nil)
  add_edge Puppet::Relationship.new(source, target, label)
end

#add_vertex(vertex) ⇒ Object

Add a new vertex to the graph.



271
272
273
274
# File 'lib/puppet/graph/simple_graph.rb', line 271

def add_vertex(vertex)
  @in_to[vertex]    ||= {}
  @out_from[vertex] ||= {}
end

#adjacent(v, options = {}) ⇒ Object

Find adjacent edges.



345
346
347
348
# File 'lib/puppet/graph/simple_graph.rb', line 345

def adjacent(v, options = {})
  return [] unless ns = (options[:direction] == :in) ? @in_to[v] : @out_from[v]
  (options[:type] == :edges) ? ns.values.flatten : ns.keys
end

#clearObject

Clear our graph.



34
35
36
37
38
39
# File 'lib/puppet/graph/simple_graph.rb', line 34

def clear
  @in_to.clear
  @out_from.clear
  @upstream_from.clear
  @downstream_from.clear
end

#dependencies(resource) ⇒ Object

Which resources depend upon the given resource.



42
43
44
# File 'lib/puppet/graph/simple_graph.rb', line 42

def dependencies(resource)
  vertex?(resource) ? upstream_from_vertex(resource).keys : []
end

#dependents(resource) ⇒ Object



46
47
48
# File 'lib/puppet/graph/simple_graph.rb', line 46

def dependents(resource)
  vertex?(resource) ? downstream_from_vertex(resource).keys : []
end

#direct_dependencies_of(v) ⇒ Object



403
404
405
# File 'lib/puppet/graph/simple_graph.rb', line 403

def direct_dependencies_of(v)
  (@in_to[v] || {}).keys
end

#direct_dependents_of(v) ⇒ Object



389
390
391
# File 'lib/puppet/graph/simple_graph.rb', line 389

def direct_dependents_of(v)
  (@out_from[v] || {}).keys
end

#directed?Boolean

Whether our graph is directed. Always true. Used to produce dot files.

Returns:

  • (Boolean)


51
52
53
# File 'lib/puppet/graph/simple_graph.rb', line 51

def directed?
  true
end

#downstream_from_vertex(v) ⇒ Object



379
380
381
382
383
384
385
386
387
# File 'lib/puppet/graph/simple_graph.rb', line 379

def downstream_from_vertex(v)
  return @downstream_from[v] if @downstream_from[v]
  result = @downstream_from[v] = {}
  @out_from[v].keys.each do |node|
    result[node] = 1
    result.update(downstream_from_vertex(node))
  end
  result
end

#each_edgeObject



330
331
332
# File 'lib/puppet/graph/simple_graph.rb', line 330

def each_edge
  @in_to.each { |t,ns| ns.each { |s,es| es.each { |e| yield e }}}
end

#edge?(source, target) ⇒ Boolean

Is there an edge between the two vertices?

Returns:

  • (Boolean)


322
323
324
# File 'lib/puppet/graph/simple_graph.rb', line 322

def edge?(source, target)
  vertex?(source) and vertex?(target) and @out_from[source][target]
end

#edgesObject



326
327
328
# File 'lib/puppet/graph/simple_graph.rb', line 326

def edges
  @in_to.values.collect { |x| x.values }.flatten
end

#edges_between(source, target) ⇒ Object

Find all matching edges.



317
318
319
# File 'lib/puppet/graph/simple_graph.rb', line 317

def edges_between(source, target)
  (@out_from[source] || {})[target] || []
end

#find_cycles_in_graphObject

Find all cycles in the graph by detecting all the strongly connected components, then eliminating everything with a size of one as uninteresting - which it is, because it can’t be a cycle. :)

This has an unhealthy relationship with the ‘tarjan’ method above, which it uses to implement the detection of strongly connected components.



162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
# File 'lib/puppet/graph/simple_graph.rb', line 162

def find_cycles_in_graph
  state = {
    :number => 0, :index => {}, :lowlink => {}, :scc => [],
    :stack => [], :seen => {}
  }

  # we usually have a disconnected graph, must walk all possible roots
  vertices.each do |vertex|
    if ! state[:index][vertex] then
      tarjan vertex, state
    end
  end

  # To provide consistent results to the user, given that a hash is never
  # assured to return the same order, and given our graph processing is
  # based on hash tables, we need to sort the cycles internally, as well as
  # the set of cycles.
  #
  # Given we are in a failure state here, any extra cost is more or less
  # irrelevant compared to the cost of a fix - which is on a human
  # time-scale.
  state[:scc].select do |component|
    multi_vertex_component?(component) || single_vertex_referring_to_self?(component)
  end.map do |component|
    component.sort
  end.sort
end

#initialize_from_hash(hash) ⇒ Object



487
488
489
490
491
492
493
494
495
496
497
# File 'lib/puppet/graph/simple_graph.rb', line 487

def initialize_from_hash(hash)
  initialize
  vertices = hash['vertices']
  edges = hash['edges']
  if vertices.is_a?(Hash)
    # Support old (2.6) format
    vertices = vertices.keys
  end
  vertices.each { |v| add_vertex(v) } unless vertices.nil?
  edges.each { |e| add_edge(e) } unless edges.nil?
end

#leaves(vertex, direction = :out) ⇒ Object

Determine all of the leaf nodes below a given vertex.



56
57
58
# File 'lib/puppet/graph/simple_graph.rb', line 56

def leaves(vertex, direction = :out)
  tree_from_vertex(vertex, direction).keys.find_all { |c| adjacent(c, :direction => direction).empty? }
end

#matching_edges(event, base = nil) ⇒ Object

Collect all of the edges that the passed events match. Returns an array of edges.



62
63
64
65
66
67
68
69
70
71
72
73
# File 'lib/puppet/graph/simple_graph.rb', line 62

def matching_edges(event, base = nil)
  source = base || event.resource

  unless vertex?(source)
    Puppet.warning _("Got an event from invalid vertex %{source}") % { source: source.ref }
    return []
  end
  # Get all of the edges that this vertex should forward events
  # to, which is the same thing as saying all edges directly below
  # This vertex in the graph.
  @out_from[source].values.flatten.find_all { |edge| edge.match?(event.name) }
end

#path_between(f, t) ⇒ Object

Return an array of the edge-sets between a series of n+1 vertices (f=v0,v1,v2…t=vn)

connecting the two given vertices.  The ith edge set is an array containing all the
edges between v(i) and v(i+1); these are (by definition) never empty.

  * if f == t, the list is empty
  * if they are adjacent the result is an array consisting of
    a single array (the edges from f to t)
  * and so on by induction on a vertex m between them
  * if there is no path from f to t, the result is nil

This implementation is not particularly efficient; it’s used in testing where clarity

is more important than last-mile efficiency.


420
421
422
423
424
425
426
427
428
429
430
431
# File 'lib/puppet/graph/simple_graph.rb', line 420

def path_between(f,t)
  if f==t
    []
  elsif direct_dependents_of(f).include?(t)
    [edges_between(f,t)]
  elsif dependents(f).include?(t)
    m = (dependents(f) & direct_dependencies_of(t)).first
    path_between(f,m) + path_between(m,t)
  else
    nil
  end
end

#paths_in_cycle(cycle, max_paths = 1) ⇒ Object

Perform a BFS on the sub graph representing the cycle, with a view to generating a sufficient set of paths to report the cycle meaningfully, and ideally usefully, for the end user.

BFS is preferred because it will generally report the shortest paths through the graph first, which are more likely to be interesting to the user. I think; it would be interesting to verify that. –daniel 2011-01-23

Raises:

  • (ArgumentError)


197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
# File 'lib/puppet/graph/simple_graph.rb', line 197

def paths_in_cycle(cycle, max_paths = 1)
  #TRANSLATORS "negative or zero" refers to the count of paths
  raise ArgumentError, _("negative or zero max_paths") if max_paths < 1

  # Calculate our filtered outbound vertex lists...
  adj = {}
  cycle.each do |vertex|
    adj[vertex] = adjacent(vertex).select{|s| cycle.member? s}
  end

  found = []

  # frame struct is vertex, [path]
  stack = [[cycle.first, []]]
  while frame = stack.shift do
    if frame[1].member?(frame[0]) then
      found << frame[1] + [frame[0]]
      break if found.length >= max_paths
    else
      adj[frame[0]].each do |to|
        stack.push [to, frame[1] + [frame[0]]]
      end
    end
  end

  return found.sort
end

#remove_edge!(e) ⇒ Object

Remove an edge from our graph.



335
336
337
338
339
340
341
342
# File 'lib/puppet/graph/simple_graph.rb', line 335

def remove_edge!(e)
  if edge?(e.source,e.target)
    @upstream_from.clear
    @downstream_from.clear
    @in_to   [e.target].delete e.source if (@in_to   [e.target][e.source] -= [e]).empty?
    @out_from[e.source].delete e.target if (@out_from[e.source][e.target] -= [e]).empty?
  end
end

#remove_vertex!(v) ⇒ Object

Remove a vertex from the graph.



277
278
279
280
281
282
283
284
# File 'lib/puppet/graph/simple_graph.rb', line 277

def remove_vertex!(v)
  return unless vertex?(v)
  @upstream_from.clear
  @downstream_from.clear
  (@in_to[v].values+@out_from[v].values).flatten.each { |e| remove_edge!(e) }
  @in_to.delete(v)
  @out_from.delete(v)
end

#report_cycles_in_graphArray

Returns array of dependency cycles (arrays).

Returns:

  • (Array)

    array of dependency cycles (arrays)



226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
# File 'lib/puppet/graph/simple_graph.rb', line 226

def report_cycles_in_graph
  cycles = find_cycles_in_graph
  number_of_cycles = cycles.length
  return if number_of_cycles == 0

  message = n_("Found %{num} dependency cycle:\n", "Found %{num} dependency cycles:\n", number_of_cycles) % { num: number_of_cycles }
  cycles.each do |cycle|
    paths = paths_in_cycle(cycle)
    message += paths.map{ |path| '(' + path.join(" => ") + ')'}.join("\n") + "\n"
  end

  if Puppet[:graph] then
    filename = write_cycles_to_graph(cycles)
    message += _("Cycle graph written to %{filename}.") % { filename: filename }
  else
    #TRANSLATORS "graph" refers to a command line option and should not be translated
    #TRANSLATORS OmniGraffle and GraphViz and program names and should not be translated
    message += _("Try the '--graph' option and opening the resulting '.dot' file in OmniGraffle or GraphViz")
  end
  Puppet.err(message)
  cycles
end

#reversalObject

Return a reversed version of this graph.



76
77
78
79
80
81
82
83
# File 'lib/puppet/graph/simple_graph.rb', line 76

def reversal
  result = self.class.new
  vertices.each { |vertex| result.add_vertex(vertex) }
  edges.each do |edge|
    result.add_edge edge.class.new(edge.target, edge.source, edge.label)
  end
  result
end

#sizeObject

Return the size of the graph.



86
87
88
# File 'lib/puppet/graph/simple_graph.rb', line 86

def size
  vertices.size
end

#tarjan(root, s) ⇒ Object

This is a simple implementation of Tarjan’s algorithm to find strongly connected components in the graph; this is a fairly ugly implementation, because I can’t just decorate the vertices themselves.

This method has an unhealthy relationship with the find_cycles_in_graph method below, which contains the knowledge of how the state object is maintained.



101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
# File 'lib/puppet/graph/simple_graph.rb', line 101

def tarjan(root, s)
  # initialize the recursion stack we use to work around the nasty lack of a
  # decent Ruby stack.
  recur = [{ :node => root }]

  while not recur.empty? do
    frame = recur.last
    vertex = frame[:node]

    case frame[:step]
    when nil then
      s[:index][vertex]   = s[:number]
      s[:lowlink][vertex] = s[:number]
      s[:number]          = s[:number] + 1

      s[:stack].push(vertex)
      s[:seen][vertex] = true

      frame[:children] = adjacent(vertex)
      frame[:step]     = :children

    when :children then
      if frame[:children].length > 0 then
        child = frame[:children].shift
        if ! s[:index][child] then
          # Never seen, need to recurse.
          frame[:step] = :after_recursion
          frame[:child] = child
          recur.push({ :node => child })
        elsif s[:seen][child] then
          s[:lowlink][vertex] = [s[:lowlink][vertex], s[:index][child]].min
        end
      else
        if s[:lowlink][vertex] == s[:index][vertex] then
          this_scc = []
          begin
            top = s[:stack].pop
            s[:seen][top] = false
            this_scc << top
          end until top == vertex
          s[:scc] << this_scc
        end
        recur.pop               # done with this node, finally.
      end

    when :after_recursion then
      s[:lowlink][vertex] = [s[:lowlink][vertex], s[:lowlink][frame[:child]]].min
      frame[:step] = :children

    else
      fail "#{frame[:step]} is an unknown step"
    end
  end
end

#to_aObject



90
91
92
# File 'lib/puppet/graph/simple_graph.rb', line 90

def to_a
  vertices
end

#to_data_hashObject



499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
# File 'lib/puppet/graph/simple_graph.rb', line 499

def to_data_hash
  hash = { 'edges' => edges.map(&:to_data_hash) }
  hash['vertices'] = if self.class.use_new_yaml_format
    vertices
  else
    # Represented in YAML using the old (version 2.6) format.
    result = {}
    vertices.each do |vertex|
      adjacencies = {}
      [:in, :out].each do |direction|
        direction_hash = {}
        adjacencies[direction.to_s] = direction_hash
        adjacent(vertex, :direction => direction, :type => :edges).each do |edge|
          other_vertex = direction == :in ? edge.source : edge.target
          (direction_hash[other_vertex.to_s] ||= []) << edge
        end
        direction_hash.each_pair { |key, edges| direction_hash[key] = edges.uniq.map(&:to_data_hash) }
      end
      vname = vertex.to_s
      result[vname] = { 'adjacencies' => adjacencies, 'vertex' => vname }
    end
    result
  end
  hash
end

#to_dot(params = {}) ⇒ Object

Output the dot format as a string



465
# File 'lib/puppet/graph/simple_graph.rb', line 465

def to_dot (params={}) to_dot_graph(params).to_s; end

#to_dot_graph(params = {}) ⇒ Object

Return a DOT::DOTDigraph for directed graphs or a DOT::DOTSubgraph for an undirected Graph. params can contain any graph property specified in rdot.rb. If an edge or vertex label is a kind of Hash then the keys which match dot properties will be used as well.



439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
# File 'lib/puppet/graph/simple_graph.rb', line 439

def to_dot_graph (params = {})
  params['name'] ||= self.class.name.gsub(/:/,'_')
  fontsize   = params['fontsize'] ? params['fontsize'] : '8'
  graph      = (directed? ? DOT::DOTDigraph : DOT::DOTSubgraph).new(params)
  edge_klass = directed? ? DOT::DOTDirectedEdge : DOT::DOTEdge
  vertices.each do |v|
    name = v.ref
    params = {'name'     => '"'+name+'"',
      'fontsize' => fontsize,
      'label'    => name}
    v_label = v.ref
    params.merge!(v_label) if v_label and v_label.kind_of? Hash
    graph << DOT::DOTNode.new(params)
  end
  edges.each do |e|
    params = {'from'     => '"'+ e.source.ref + '"',
      'to'       => '"'+ e.target.ref + '"',
      'fontsize' => fontsize }
    e_label = e.ref
    params.merge!(e_label) if e_label and e_label.kind_of? Hash
    graph << edge_klass.new(params)
  end
  graph
end

#tree_from_vertex(start, direction = :out) ⇒ Object

A different way of walking a tree, and a much faster way than the one that comes with GRATR.



371
372
373
374
375
376
377
# File 'lib/puppet/graph/simple_graph.rb', line 371

def tree_from_vertex(start, direction = :out)
  predecessor={}
  walk(start, direction) do |parent, child|
    predecessor[child] = parent
  end
  predecessor
end

#upstream_from_vertex(v) ⇒ Object



393
394
395
396
397
398
399
400
401
# File 'lib/puppet/graph/simple_graph.rb', line 393

def upstream_from_vertex(v)
  return @upstream_from[v] if @upstream_from[v]
  result = @upstream_from[v] = {}
  @in_to[v].keys.each do |node|
    result[node] = 1
    result.update(upstream_from_vertex(node))
  end
  result
end

#vertex?(v) ⇒ Boolean

Test whether a given vertex is in the graph.

Returns:

  • (Boolean)


287
288
289
# File 'lib/puppet/graph/simple_graph.rb', line 287

def vertex?(v)
  @in_to.include?(v)
end

#verticesObject

Return a list of all vertices.



292
293
294
# File 'lib/puppet/graph/simple_graph.rb', line 292

def vertices
  @in_to.keys
end

#walk(source, direction) ⇒ Object

Just walk the tree and pass each edge.



351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
# File 'lib/puppet/graph/simple_graph.rb', line 351

def walk(source, direction)
  # Use an iterative, breadth-first traversal of the graph. One could do
  # this recursively, but Ruby's slow function calls and even slower
  # recursion make the shorter, recursive algorithm cost-prohibitive.
  stack = [source]
  seen = Set.new
  until stack.empty?
    node = stack.shift
    next if seen.member? node
    connected = adjacent(node, :direction => direction)
    connected.each do |target|
      yield node, target
    end
    stack.concat(connected)
    seen << node
  end
end

#write_cycles_to_graph(cycles) ⇒ Object



249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
# File 'lib/puppet/graph/simple_graph.rb', line 249

def write_cycles_to_graph(cycles)
  # This does not use the DOT graph library, just writes the content
  # directly.  Given the complexity of this, there didn't seem much point
  # using a heavy library to generate exactly the same content. --daniel 2011-01-27
  graph = ["digraph Resource_Cycles {"]
  graph << '  label = "Resource Cycles"'

  cycles.each do |cycle|
    paths_in_cycle(cycle, 10).each do |path|
      graph << path.map { |v| '"' + v.to_s.gsub(/"/, '\\"') + '"' }.join(" -> ")
    end
  end

  graph << '}'

  filename = File.join(Puppet[:graphdir], "cycles.dot")
  # DOT files are assumed to be UTF-8 by default - http://www.graphviz.org/doc/info/lang.html
  File.open(filename, "w:UTF-8") { |f| f.puts graph }
  return filename
end

#write_graph(name) ⇒ Object

Produce the graph files if requested.



468
469
470
471
472
473
474
475
476
# File 'lib/puppet/graph/simple_graph.rb', line 468

def write_graph(name)
  return unless Puppet[:graph]

  file = File.join(Puppet[:graphdir], "#{name}.dot")
  # DOT files are assumed to be UTF-8 by default - http://www.graphviz.org/doc/info/lang.html
  File.open(file, "w:UTF-8") { |f|
    f.puts to_dot("name" => name.to_s.capitalize)
  }
end