bolt 0.24.0 → 0.25.0

data/vendored/puppet/lib/puppet/pops/evaluator/external_syntax_support.rb

@@ -1,45 +0,0 @@
-# This module is an integral part of the evaluator. It deals with the concern of validating
-# external syntax in text produced by heredoc and templates.
-#
-require 'puppet/plugins/syntax_checkers'
-module Puppet::Pops::Evaluator::ExternalSyntaxSupport
-  def assert_external_syntax(scope, result, syntax, reference_expr)
-    # ignore 'unspecified syntax'
-    return if syntax.nil? || syntax == ''
-
-    checker = checker_for_syntax(scope, syntax)
-    # ignore syntax with no matching checker
-    return unless checker
-
-    # Call checker and give it the location information from the expression
-    # (as opposed to where the heredoc tag is (somewhere on the line above)).
-    acceptor = Puppet::Pops::Validation::Acceptor.new()
-    checker.check(result, syntax, acceptor, reference_expr)
-
-    if acceptor.error_count > 0
-      checker_message = "Invalid produced text having syntax: '#{syntax}'."
-      Puppet::Pops::IssueReporter.assert_and_report(acceptor, :message => checker_message)
-      raise ArgumentError, _("Internal Error: Configuration of runtime error handling wrong: should have raised exception")
-    end
-  end
-
-  # Finds the most significant checker for the given syntax (most significant is to the right).
-  # Returns nil if there is no registered checker.
-  #
-  def checker_for_syntax(scope, syntax)
-    checkers_hash = Puppet.lookup(:plugins)[Puppet::Plugins::SyntaxCheckers::SYNTAX_CHECKERS_KEY]
-    checkers_hash[lookup_keys_for_syntax(syntax).find {|x| checkers_hash[x] }]
-  end
-
-  # Returns an array of possible syntax names
-  def lookup_keys_for_syntax(syntax)
-    segments = syntax.split(/\+/)
-    result = []
-    begin
-      result << segments.join("+")
-      segments.shift
-    end until segments.empty?
-    result
-  end
-
-end

data/vendored/puppet/lib/puppet/pops/evaluator/json_strict_literal_evaluator.rb

@@ -1,82 +0,0 @@
-# Literal values for
-#
-#   * String
-#   * Numbers
-#   * Booleans
-#   * Undef (produces nil)
-#   * Array
-#   * Hash where keys must be Strings
-#   * QualifiedName
-#
-# Not considered literal:
-#
-#   * QualifiedReference  # i.e. File, FooBar
-#   * Default is not accepted as being literal
-#   * Regular Expression is not accepted as being literal
-#   * Hash with non String keys
-#   * String with interpolation
-#
-class Puppet::Pops::Evaluator::JsonStrictLiteralEvaluator
-  #include Puppet::Pops::Utils
-
-  COMMA_SEPARATOR = ', '.freeze
-
-  def initialize
-    @@literal_visitor ||= Puppet::Pops::Visitor.new(self, "literal", 0, 0)
-  end
-
-  def literal(ast)
-    @@literal_visitor.visit_this_0(self, ast)
-  end
-
-  def literal_Object(o)
-    throw :not_literal
-  end
-
-  def literal_Factory(o)
-    literal(o.model)
-  end
-
-  def literal_Program(o)
-    literal(o.body)
-  end
-
-  def literal_LiteralString(o)
-    o.value
-  end
-
-  def literal_QualifiedName(o)
-    o.value
-  end
-
-  def literal_LiteralNumber(o)
-    o.value
-  end
-
-  def literal_LiteralBoolean(o)
-    o.value
-  end
-
-  def literal_LiteralUndef(o)
-    nil
-  end
-
-  def literal_ConcatenatedString(o)
-    # use double quoted string value if there is no interpolation
-    throw :not_literal unless o.segments.size == 1 && o.segments[0].is_a?(Puppet::Pops::Model::LiteralString)
-    o.segments[0].value
-  end
-
-  def literal_LiteralList(o)
-    o.values.map {|v| literal(v) }
-  end
-
-  def literal_LiteralHash(o)
-    o.entries.reduce({}) do |result, entry|
-      key = literal(entry.key)
-      throw :not_literal unless key.is_a?(String)
-      result[key] = literal(entry.value)
-      result
-    end
-  end
-end

data/vendored/puppet/lib/puppet/pops/evaluator/literal_evaluator.rb

@@ -1,87 +0,0 @@
-module Puppet::Pops
-module Evaluator
-# Literal values for
-# String (not containing interpolation)
-# Numbers
-# Booleans
-# Undef (produces nil)
-# Array
-# Hash
-# QualifiedName
-# Default (produced :default)
-# Regular Expression (produces ruby regular expression)
-#
-# Not considered literal
-# QualifiedReference  # i.e. File, FooBar
-#
-class LiteralEvaluator
-
-  COMMA_SEPARATOR = ', '.freeze
-
-  def initialize
-    @@literal_visitor ||= Visitor.new(self, "literal", 0, 0)
-  end
-
-  def literal(ast)
-    @@literal_visitor.visit_this_0(self, ast)
-  end
-
-  def literal_Object(o)
-    throw :not_literal
-  end
-
-  def literal_Factory(o)
-    literal(o.model)
-  end
-
-  def literal_Program(o)
-    literal(o.body)
-  end
-
-  def literal_LiteralString(o)
-    o.value
-  end
-
-  def literal_QualifiedName(o)
-    o.value
-  end
-
-  def literal_LiteralNumber(o)
-    o.value
-  end
-
-  def literal_LiteralBoolean(o)
-    o.value
-  end
-
-  def literal_LiteralUndef(o)
-    nil
-  end
-
-  def literal_LiteralDefault(o)
-    :default
-  end
-
-  def literal_LiteralRegularExpression(o)
-    o.value
-  end
-
-  def literal_ConcatenatedString(o)
-    # use double quoted string value if there is no interpolation
-    throw :not_literal unless o.segments.size == 1 && o.segments[0].is_a?(Model::LiteralString)
-    o.segments[0].value
-  end
-
-  def literal_LiteralList(o)
-    o.values.map {|v| literal(v) }
-  end
-
-  def literal_LiteralHash(o)
-    o.entries.reduce({}) do |result, entry|
-      result[literal(entry.key)] = literal(entry.value)
-      result
-    end
-  end
-end
-end
-end

data/vendored/puppet/lib/puppet/pops/evaluator/puppet_proc.rb

@@ -1,69 +0,0 @@
-# Complies with Proc API by mapping a Puppet::Pops::Evaluator::Closure to a ruby Proc.
-# Creating and passing an instance of this class instead of just a plain block makes
-# it possible to inherit the parameter info and arity from the closure. Advanced users
-# may also access the closure itself. The Puppet::Pops::Functions::Dispatcher uses this
-# when it needs to get the Callable type of the closure.
-#
-# The class is part of the Puppet Function API for Ruby and thus public API but a user
-# should never create an instance of this class.
-#
-# @api public
-class Puppet::Pops::Evaluator::PuppetProc < Proc
-  # Creates a new instance from a closure and a block that will dispatch
-  # all parameters to the closure. The block must be similar to:
-  #
-  #   { |*args| closure.call(*args) }
-  #
-  # @param closure [Puppet::Pops::Evaluator::Closure] The closure to map
-  # @param &block [Block] The varargs block that invokes the closure.call method
-  #
-  # @api private
-  def self.new(closure, &block)
-    proc = super(&block)
-    proc.instance_variable_set(:@closure, closure)
-    proc
-  end
-
-  # @return  [Puppet::Pops::Evaluator::Closure] the mapped closure
-  # @api public
-  attr_reader :closure
-
-  # @overrides Block.lambda?
-  # @return [Boolean] always false since this proc doesn't do the Ruby lambda magic
-  # @api public
-  def lambda?
-    false
-  end
-
-  # Maps the closure parameters to standard Block parameter info where each
-  # parameter is represented as a two element Array where the first
-  # element is :req, :opt, or :rest and the second element is the name
-  # of the parameter.
-  #
-  # @return [Array<Array<Symbol>>] array of parameter info pairs
-  # @overrides Block.parameters
-  # @api public
-  def parameters
-    @closure.parameters.map do |param|
-      sym = param.name.to_sym
-      if param.captures_rest
-        [ :rest, sym ]
-      elsif param.value
-        [ :opt, sym ]
-      else
-        [ :req, sym ]
-      end
-    end
-  end
-
-  # @return [Integer] the arity of the block
-  # @overrides Block.arity
-  # @api public
-  def arity
-    parameters.reduce(0) do |memo, param|
-      count = memo + 1
-      break -count unless param[0] == :req
-      count
-    end
-  end
-end

data/vendored/puppet/lib/puppet/pops/evaluator/relationship_operator.rb

@@ -1,185 +0,0 @@
-module Puppet::Pops
-module Evaluator
-# The RelationshipOperator implements the semantics of the -> <- ~> <~ operators creating relationships or notification
-# relationships between the left and right hand side's references to resources.
-#
-# This is separate class since a second level of evaluation is required that transforms string in left or right hand
-# to type references. The task of "making a relationship" is delegated to the "runtime support" class that is included.
-# This is done to separate the concerns of the new evaluator from the 3x runtime; messy logic goes into the runtime support
-# module. Later when more is cleaned up this can be simplified further.
-#
-class RelationshipOperator
-
-  # Provides access to the Puppet 3.x runtime (scope, etc.)
-  # This separation has been made to make it easier to later migrate the evaluator to an improved runtime.
-  #
-  include Runtime3Support
-
-  class IllegalRelationshipOperandError < RuntimeError
-    attr_reader :operand
-    def initialize operand
-      @operand = operand
-    end
-  end
-
-  class NotCatalogTypeError < RuntimeError
-    attr_reader :type
-    def initialize type
-      @type = type
-    end
-  end
-
-  def initialize
-    @type_transformer_visitor = Visitor.new(self, "transform", 1, 1)
-    @type_calculator = Types::TypeCalculator.new()
-
-    tf = Types::TypeFactory
-    @catalog_type = tf.variant(tf.catalog_entry, tf.type_type(tf.catalog_entry))
-  end
-
-  def transform(o, scope)
-    @type_transformer_visitor.visit_this_1(self, o, scope)
-  end
-
-  # Catch all non transformable objects
-  # @api private
-  def transform_Object(o, scope)
-    raise IllegalRelationshipOperandError.new(o)
-  end
-
-  # A Resource is by definition a Catalog type, but of 3.x type
-  # @api private
-  def transform_Resource(o, scope)
-    Types::TypeFactory.resource(o.type, o.title)
-  end
-
-  # A string must be a type reference in string format
-  # @api private
-  def transform_String(o, scope)
-    assert_catalog_type(Types::TypeParser.singleton.parse(o), scope)
-  end
-
-  # A qualified name is short hand for a class with this name
-  # @api private
-  def transform_QualifiedName(o, scope)
-    Types::TypeFactory.host_class(o.value)
-  end
-
-  # Types are what they are, just check the type
-  # @api private
-  def transform_PAnyType(o, scope)
-    assert_catalog_type(o, scope)
-  end
-
-  # This transforms a 3x Collector (the result of evaluating a 3x AST::Collection).
-  # It is passed through verbatim since it is evaluated late by the compiler. At the point
-  # where the relationship is evaluated, it is simply recorded with the compiler for later evaluation.
-  # If one of the sides of the relationship is a Collector it is evaluated before the actual
-  # relationship is formed. (All of this happens at a later point in time.
-  #
-  def transform_Collector(o, scope)
-    o
-  end
-
-  def transform_AbstractCollector(o, scope)
-    o
-  end
-
-  # Array content needs to be transformed
-  def transform_Array(o, scope)
-    o.map{|x| transform(x, scope) }
-  end
-
-  # Asserts (and returns) the type if it is a PCatalogEntryType
-  # (A PCatalogEntryType is the base class of PClassType, and PResourceType).
-  #
-  def assert_catalog_type(o, scope)
-    unless @type_calculator.assignable?(@catalog_type, o)
-      raise NotCatalogTypeError.new(o)
-    end
-    # TODO must check if this is an abstract PResourceType (i.e. without a type_name) - which should fail ?
-    # e.g. File -> File (and other similar constructs) - maybe the catalog protects against this since references
-    # may be to future objects...
-    o
-  end
-
-  RELATIONSHIP_OPERATORS = ['->', '~>', '<-', '<~'].freeze
-  REVERSE_OPERATORS      = ['<-', '<~'].freeze
-  RELATION_TYPE = {
-    '->' => :relationship,
-    '<-' => :relationship,
-    '~>' => :subscription,
-    '<~' => :subscription
-  }.freeze
-
-  # Evaluate a relationship.
-  # TODO: The error reporting is not fine grained since evaluation has already taken place
-  # There is no references to the original source expressions at this point, only the overall
-  # relationship expression. (e.g.. the expression may be ['string', func_call(), etc.] -> func_call())
-  # To implement this, the general evaluator needs to be able to track each evaluation result and associate
-  # it with a corresponding expression. This structure should then be passed to the relationship operator.
-  #
-  def evaluate (left_right_evaluated, relationship_expression, scope)
-    # assert operator (should have been validated, but this logic makes assumptions which would
-    # screw things up royally). Better safe than sorry.
-    unless RELATIONSHIP_OPERATORS.include?(relationship_expression.operator)
-      fail(Issues::UNSUPPORTED_OPERATOR, relationship_expression, {:operator => relationship_expression.operator})
-    end
-
-    begin
-      # Turn each side into an array of types (this also asserts their type)
-      # (note wrap in array first if value is not already an array)
-      #
-      # TODO: Later when objects are Puppet Runtime Objects and know their type, it will be more efficient to check/infer
-      # the type first since a chained operation then does not have to visit each element again. This is not meaningful now
-      # since inference needs to visit each object each time, and this is what the transformation does anyway).
-      #
-      # real is [left, right], and both the left and right may be a single value or an array. In each case all content
-      # should be flattened, and then transformed to a type. left or right may also be a value that is transformed
-      # into an array, and thus the resulting left and right must be flattened individually
-      # Once flattened, the operands should be sets (to remove duplicate entries)
-      #
-      real = left_right_evaluated.collect {|x| [x].flatten.collect {|y| transform(y, scope) }}
-      real[0].flatten!
-      real[1].flatten!
-      real[0].uniq!
-      real[1].uniq!
-
-      # reverse order if operator is Right to Left
-      source, target = reverse_operator?(relationship_expression) ? real.reverse : real
-
-      # Add the relationships to the catalog
-      source.each {|s| target.each {|t| add_relationship(s, t, RELATION_TYPE[relationship_expression.operator], scope) }}
-
-      # The result is the transformed source RHS unless it is empty, in which case the transformed LHS is returned.
-      # This closes the gap created by an empty set of references in a chain of relationship
-      # such that X -> [ ] -> Y results in  X -> Y.
-      #result = real[1].empty? ? real[0] : real[1]
-      if real[1].empty?
-        # right side empty, simply use the left (whatever it may be)
-        result = real[0]
-      else
-        right = real[1]
-        if right.size == 1 && right[0].is_a?(Puppet::Pops::Evaluator::Collectors::AbstractCollector)
-          # the collector when evaluated later may result in an empty set, if so, the
-          # lazy relationship forming logic needs to have access to the left value.
-          adapter = Puppet::Pops::Adapters::EmptyAlternativeAdapter.adapt(right[0])
-          adapter.empty_alternative = real[0]
-        end
-        result = right
-      end
-      result
-
-    rescue NotCatalogTypeError => e
-      fail(Issues::NOT_CATALOG_TYPE, relationship_expression, {:type => @type_calculator.string(e.type)})
-    rescue IllegalRelationshipOperandError => e
-      fail(Issues::ILLEGAL_RELATIONSHIP_OPERAND_TYPE, relationship_expression, {:operand => e.operand})
-    end
-  end
-
-  def reverse_operator?(o)
-    REVERSE_OPERATORS.include?(o.operator)
-  end
-end
-end
-end