| Current Path : /usr/share/ruby/vendor_ruby/puppet/pops/binder/ |
Linux gator3171.hostgator.com 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64 |
| Current File : //usr/share/ruby/vendor_ruby/puppet/pops/binder/producers.rb |
# This module contains the various producers used by Puppet Bindings.
# The main (abstract) class is {Puppet::Pops::Binder::Producers::Producer} which documents the
# Producer API and serves as a base class for all other producers.
# It is required that custom producers inherit from this producer (directly or indirectly).
#
# The selection of a Producer is typically performed by the Innjector when it configures itself
# from a Bindings model where a {Puppet::Pops::Binder::Bindings::ProducerDescriptor} describes
# which producer to use. The configuration uses this to create the concrete producer.
# It is possible to describe that a particular producer class is to be used, and also to describe that
# a custom producer (derived from Producer) should be used. This is available for both regular
# bindings as well as multi-bindings.
#
#
# @api public
#
module Puppet::Pops::Binder::Producers
# Producer is an abstract base class representing the base contract for a bound producer.
# Typically, when a lookup is performed it is the value that is returned (via a producer), but
# it is also possible to lookup the producer, and ask it to produce the value (the producer may
# return a series of values, which makes this especially useful).
#
# When looking up a producer, it is of importance to only use the API of the Producer class
# unless it is known that a particular custom producer class has been bound.
#
# Custom Producers
# ----------------
# The intent is that this class is derived for custom producers that require additional
# options/arguments when producing an instance. Such a custom producer may raise an error if called
# with too few arguments, or may implement specific `produce` methods and always raise an
# error on #produce indicating that this producer requires custom calls and that it can not
# be used as an implicit producer.
#
# Features of Producer
# --------------------
# The Producer class is abstract, but offers the ability to transform the produced result
# by passing the option `:transformer` which should be a Puppet Lambda Expression taking one argument
# and producing the transformed (wanted) result.
#
# @abstract
# @api public
#
class Producer
# A Puppet 3 AST Lambda Expression
# @api public
#
attr_reader :transformer
# Creates a Producer.
# Derived classes should call this constructor to get support for transformer lambda.
#
# @param injector [Puppet::Pops::Binder::Injector] The injector where the lookup originates
# @param binding [Puppet::Pops::Binder::Bindings::Binding, nil] The binding using this producer
# @param scope [Puppet::Parser::Scope] The scope to use for evaluation
# @option options [Puppet::Pops::Model::LambdaExpression] :transformer (nil) a transformer of produced value
# @api public
#
def initialize(injector, binding, scope, options)
if transformer_lambda = options[:transformer]
if transformer_lambda.is_a?(Proc)
raise ArgumentError, "Transformer Proc must take one argument; value." unless transformer_lambda.arity == 1
@transformer = transformer_lambda
else
raise ArgumentError, "Transformer must be a LambdaExpression" unless transformer_lambda.is_a?(Puppet::Pops::Model::LambdaExpression)
raise ArgumentError, "Transformer lambda must take one argument; value." unless transformer_lambda.parameters.size() == 1
@transformer = Puppet::Pops::Parser::EvaluatingParser.new.closure(transformer_lambda, scope)
end
end
end
# Produces an instance.
# @param scope [Puppet::Parser:Scope] the scope to use for evaluation
# @param args [Object] arguments to custom producers, always empty for implicit productions
# @return [Object] the produced instance (should never be nil).
# @api public
#
def produce(scope, *args)
do_transformation(scope, internal_produce(scope))
end
# Returns the producer after possibly having recreated an internal/wrapped producer.
# This implementation returns `self`. A derived class may want to override this method
# to perform initialization/refresh of its internal state. This method is called when
# a producer is requested.
# @see Puppet::Pops::Binder::ProducerProducer for an example of implementation.
# @param scope [Puppet::Parser:Scope] the scope to use for evaluation
# @return [Puppet::Pops::Binder::Producer] the producer to use
# @api public
#
def producer(scope)
self
end
protected
# Derived classes should implement this method to do the production of a value
# @param scope [Puppet::Parser::Scope] the scope to use when performing lookup and evaluation
# @raise [NotImplementedError] this implementation always raises an error
# @abstract
# @api private
#
def internal_produce(scope)
raise NotImplementedError, "Producer-class '#{self.class.name}' should implement #internal_produce(scope)"
end
# Transforms the produced value if a transformer has been defined.
# @param scope [Puppet::Parser::Scope] the scope used for evaluation
# @param produced_value [Object, nil] the produced value (possibly nil)
# @return [Object] the transformed value if a transformer is defined, else the given `produced_value`
# @api private
#
def do_transformation(scope, produced_value)
return produced_value unless transformer
transformer.call(produced_value)
end
end
# Abstract Producer holding a value
# @abstract
# @api public
#
class AbstractValueProducer < Producer
# @api public
attr_reader :value
# @param injector [Puppet::Pops::Binder::Injector] The injector where the lookup originates
# @param binding [Puppet::Pops::Binder::Bindings::Binding, nil] The binding using this producer
# @param scope [Puppet::Parser::Scope] The scope to use for evaluation
# @option options [Puppet::Pops::Model::LambdaExpression] :transformer (nil) a transformer of produced value
# @option options [Puppet::Pops::Model::LambdaExpression, nil] :value (nil) the value to produce
# @api public
#
def initialize(injector, binding, scope, options)
super
# nil is ok here, as an abstract value producer may be used to signal "not found"
@value = options[:value]
end
end
# Produces the same/singleton value on each production
# @api public
#
class SingletonProducer < AbstractValueProducer
protected
# @api private
def internal_produce(scope)
value()
end
end
# Produces a deep clone of its value on each production.
# @api public
#
class DeepCloningProducer < AbstractValueProducer
protected
# @api private
def internal_produce(scope)
case value
when Integer, Float, TrueClass, FalseClass, Symbol
# These are immutable
return value
when String
# ok if frozen, else fall through to default
return value() if value.frozen?
end
# The default: serialize/deserialize to get a deep copy
Marshal.load(Marshal.dump(value()))
end
end
# This abstract producer class remembers the injector and binding.
# @abstract
# @api public
#
class AbstractArgumentedProducer < Producer
# @api public
attr_reader :injector
# @api public
attr_reader :binding
# @param injector [Puppet::Pops::Binder::Injector] The injector where the lookup originates
# @param binding [Puppet::Pops::Binder::Bindings::Binding, nil] The binding using this producer
# @param scope [Puppet::Parser::Scope] The scope to use for evaluation
# @option options [Puppet::Pops::Model::LambdaExpression] :transformer (nil) a transformer of produced value
# @api public
#
def initialize(injector, binding, scope, options)
super
@injector = injector
@binding = binding
end
end
# @api public
class InstantiatingProducer < AbstractArgumentedProducer
# @api public
attr_reader :the_class
# @api public
attr_reader :init_args
# @param injector [Puppet::Pops::Binder::Injector] The injector where the lookup originates
# @param binding [Puppet::Pops::Binder::Bindings::Binding, nil] The binding using this producer
# @param scope [Puppet::Parser::Scope] The scope to use for evaluation
# @option options [Puppet::Pops::Model::LambdaExpression] :transformer (nil) a transformer of produced value
# @option options [String] :class_name The name of the class to create instance of
# @option options [Array<Object>] :init_args ([]) Optional arguments to class constructor
# @api public
#
def initialize(injector, binding, scope, options)
# Better do this, even if a transformation of a created instance is kind of an odd thing to do, one can imagine
# sending it to a function for further detailing.
#
super
class_name = options[:class_name]
raise ArgumentError, "Option 'class_name' must be given for an InstantiatingProducer" unless class_name
# get class by name
@the_class = Puppet::Pops::Types::ClassLoader.provide(class_name)
@init_args = options[:init_args] || []
raise ArgumentError, "Can not load the class #{class_name} specified in binding named: '#{binding.name}'" unless @the_class
end
protected
# Performs initialization the same way as Assisted Inject does (but handle arguments to
# constructor)
# @api private
#
def internal_produce(scope)
result = nil
# A class :inject method wins over an instance :initialize if it is present, unless a more specific
# constructor exists. (i.e do not pick :inject from superclass if class has a constructor).
#
if the_class.respond_to?(:inject)
inject_method = the_class.method(:inject)
initialize_method = the_class.instance_method(:initialize)
if inject_method.owner <= initialize_method.owner
result = the_class.inject(injector, scope, binding, *init_args)
end
end
if result.nil?
result = the_class.new(*init_args)
end
result
end
end
# @api public
class FirstFoundProducer < Producer
# @api public
attr_reader :producers
# @param injector [Puppet::Pops::Binder::Injector] The injector where the lookup originates
# @param binding [Puppet::Pops::Binder::Bindings::Binding, nil] The binding using this producer
# @param scope [Puppet::Parser::Scope] The scope to use for evaluation
# @option options [Puppet::Pops::Model::LambdaExpression] :transformer (nil) a transformer of produced value
# @option options [Array<Puppet::Pops::Binder::Producers::Producer>] :producers list of producers to consult. Required.
# @api public
#
def initialize(injector, binding, scope, options)
super
@producers = options[:producers]
raise ArgumentError, "Option :producers' must be set to a list of producers." if @producers.nil?
raise ArgumentError, "Given 'producers' option is not an Array" unless @producers.is_a?(Array)
end
protected
# @api private
def internal_produce(scope)
# return the first produced value that is non-nil (unfortunately there is no such enumerable method)
producers.reduce(nil) {|memo, p| break memo unless memo.nil?; p.produce(scope)}
end
end
# Evaluates a Puppet Expression and returns the result.
# This is typically used for strings with interpolated expressions.
# @api public
#
class EvaluatingProducer < Producer
# A Puppet 3 AST Expression
# @api public
#
attr_reader :expression
# @param injector [Puppet::Pops::Binder::Injector] The injector where the lookup originates
# @param binding [Puppet::Pops::Binder::Bindings::Binding, nil] The binding using this producer
# @param scope [Puppet::Parser::Scope] The scope to use for evaluation
# @option options [Puppet::Pops::Model::LambdaExpression] :transformer (nil) a transformer of produced value
# @option options [Array<Puppet::Pops::Model::Expression>] :expression The expression to evaluate
# @api public
#
def initialize(injector, binding, scope, options)
super
@expression = options[:expression]
raise ArgumentError, "Option 'expression' must be given to an EvaluatingProducer." unless @expression
end
# @api private
def internal_produce(scope)
Puppet::Pops::Parser::EvaluatingParser.new.evaluate(scope, expression)
end
end
# @api public
class LookupProducer < AbstractArgumentedProducer
# @api public
attr_reader :type
# @api public
attr_reader :name
# @param injector [Puppet::Pops::Binder::Injector] The injector where the lookup originates
# @param binder [Puppet::Pops::Binder::Bindings::Binding, nil] The binding using this producer
# @param scope [Puppet::Parser::Scope] The scope to use for evaluation
# @option options [Puppet::Pops::Model::LambdaExpression] :transformer (nil) a transformer of produced value
# @option options [Puppet::Pops::Types::PAnyType] :type The type to lookup
# @option options [String] :name ('') The name to lookup
# @api public
#
def initialize(injector, binder, scope, options)
super
@type = options[:type]
@name = options[:name] || ''
raise ArgumentError, "Option 'type' must be given in a LookupProducer." unless @type
end
protected
# @api private
def internal_produce(scope)
injector.lookup_type(scope, type, name)
end
end
# @api public
class LookupKeyProducer < LookupProducer
# @api public
attr_reader :key
# @param injector [Puppet::Pops::Binder::Injector] The injector where the lookup originates
# @param binder [Puppet::Pops::Binder::Bindings::Binding, nil] The binding using this producer
# @param scope [Puppet::Parser::Scope] The scope to use for evaluation
# @option options [Puppet::Pops::Model::LambdaExpression] :transformer (nil) a transformer of produced value
# @option options [Puppet::Pops::Types::PAnyType] :type The type to lookup
# @option options [String] :name ('') The name to lookup
# @option options [Puppet::Pops::Types::PAnyType] :key The key to lookup in the hash
# @api public
#
def initialize(injector, binder, scope, options)
super
@key = options[:key]
raise ArgumentError, "Option 'key' must be given in a LookupKeyProducer." if key.nil?
end
protected
# @api private
def internal_produce(scope)
result = super
result.is_a?(Hash) ? result[key] : nil
end
end
# Produces the given producer, then uses that producer.
# @see ProducerProducer for the non singleton version
# @api public
#
class SingletonProducerProducer < Producer
# @api public
attr_reader :value_producer
# @param injector [Puppet::Pops::Binder::Injector] The injector where the lookup originates
# @param binding [Puppet::Pops::Binder::Bindings::Binding, nil] The binding using this producer
# @param scope [Puppet::Parser::Scope] The scope to use for evaluation
# @option options [Puppet::Pops::Model::LambdaExpression] :transformer (nil) a transformer of produced value
# @option options [Puppet::Pops::Model::LambdaExpression] :producer_producer a producer of a value producer (required)
# @api public
#
def initialize(injector, binding, scope, options)
super
p = options[:producer_producer]
raise ArgumentError, "Option :producer_producer must be given in a SingletonProducerProducer" unless p
@value_producer = p.produce(scope)
end
protected
# @api private
def internal_produce(scope)
value_producer.produce(scope)
end
end
# A ProducerProducer creates a producer via another producer, and then uses this created producer
# to produce values. This is useful for custom production of series of values.
# On each request for a producer, this producer will reset its internal producer (i.e. restarting
# the series).
#
# @param producer_producer [#produce(scope)] the producer of the producer
#
# @api public
#
class ProducerProducer < Producer
# @api public
attr_reader :producer_producer
# @api public
attr_reader :value_producer
# Creates new ProducerProducer given a producer.
#
# @param injector [Puppet::Pops::Binder::Injector] The injector where the lookup originates
# @param binding [Puppet::Pops::Binder::Bindings::Binding, nil] The binding using this producer
# @param scope [Puppet::Parser::Scope] The scope to use for evaluation
# @option options [Puppet::Pops::Model::LambdaExpression] :transformer (nil) a transformer of produced value
# @option options [Puppet::Pops::Binder::Producer] :producer_producer a producer of a value producer (required)
#
# @api public
#
def initialize(injector, binding, scope, options)
super
unless producer_producer = options[:producer_producer]
raise ArgumentError, "The option :producer_producer must be set in a ProducerProducer"
end
raise ArgumentError, "Argument must be a Producer" unless producer_producer.is_a?(Producer)
@producer_producer = producer_producer
@value_producer = nil
end
# Updates the internal state to use a new instance of the wrapped producer.
# @api public
#
def producer(scope)
@value_producer = @producer_producer.produce(scope)
self
end
protected
# Produces a value after having created an instance of the wrapped producer (if not already created).
# @api private
#
def internal_produce(scope, *args)
producer() unless value_producer
value_producer.produce(scope)
end
end
# This type of producer should only be created by the Injector.
#
# @api private
#
class AssistedInjectProducer < Producer
# An Assisted Inject Producer is created when a lookup is made of a type that is
# not bound. It does not support a transformer lambda.
# @note This initializer has a different signature than all others. Do not use in regular logic.
# @api private
#
def initialize(injector, clazz)
raise ArgumentError, "class must be given" unless clazz.is_a?(Class)
@injector = injector
@clazz = clazz
@inst = nil
end
def produce(scope, *args)
producer(scope, *args) unless @inst
@inst
end
# @api private
def producer(scope, *args)
@inst = nil
# A class :inject method wins over an instance :initialize if it is present, unless a more specific zero args
# constructor exists. (i.e do not pick :inject from superclass if class has a zero args constructor).
#
if @clazz.respond_to?(:inject)
inject_method = @clazz.method(:inject)
initialize_method = @clazz.instance_method(:initialize)
if inject_method.owner <= initialize_method.owner || initialize_method.arity != 0
@inst = @clazz.inject(@injector, scope, nil, *args)
end
end
if @inst.nil?
unless args.empty?
raise ArgumentError, "Assisted Inject can not pass arguments to no-args constructor when there is no class inject method."
end
@inst = @clazz.new()
end
self
end
end
# Abstract base class for multibind producers.
# Is suitable as base class for custom implementations of multibind producers.
# @abstract
# @api public
#
class MultibindProducer < AbstractArgumentedProducer
attr_reader :contributions_key
# @param injector [Puppet::Pops::Binder::Injector] The injector where the lookup originates
# @param binding [Puppet::Pops::Binder::Bindings::Binding, nil] The binding using this producer
# @param scope [Puppet::Parser::Scope] The scope to use for evaluation
# @option options [Puppet::Pops::Model::LambdaExpression] :transformer (nil) a transformer of produced value
#
# @api public
#
def initialize(injector, binding, scope, options)
super
@contributions_key = injector.key_factory.multibind_contributions(binding.id)
end
# @param expected [Array<Puppet::Pops::Types::PAnyType>, Puppet::Pops::Types::PAnyType] expected type or types
# @param actual [Object, Puppet::Pops::Types::PAnyType> the actual value (or its type)
# @return [String] a formatted string for inclusion as detail in an error message
# @api private
#
def type_error_detail(expected, actual)
tc = injector.type_calculator
expected = [expected] unless expected.is_a?(Array)
actual_t = tc.is_ptype?(actual) ? actual : tc.infer(actual)
expstrs = expected.collect {|t| tc.string(t) }
"expected: #{expstrs.join(', or ')}, got: #{tc.string(actual_t)}"
end
end
# A configurable multibind producer for Array type multibindings.
#
# This implementation collects all contributions to the multibind and then combines them using the following rules:
#
# - all *unnamed* entries are added unless the option `:priority_on_unnamed` is set to true, in which case the unnamed
# contribution with the highest priority is added, and the rest are ignored (unless they have the same priority in which
# case an error is raised).
# - all *named* entries are handled the same way as *unnamed* but the option `:priority_on_named` controls their handling.
# - the option `:uniq` post processes the result to only contain unique entries
# - the option `:flatten` post processes the result by flattening all nested arrays.
# - If both `:flatten` and `:uniq` are true, flattening is done first.
#
# @note
# Collection accepts elements that comply with the array's element type, or the entire type (i.e. Array[element_type]).
# If the type is restrictive - e.g. Array[String] and an Array[String] is contributed, the result will not be type
# compliant without also using the `:flatten` option, and a type error will be raised. For an array with relaxed typing
# i.e. Array[Data], it is valid to produce a result such as `['a', ['b', 'c'], 'd']` and no flattening is required
# and no error is raised (but using the array needs to be aware of potential array, non-array entries.
# The use of the option `:flatten` controls how the result is flattened.
#
# @api public
#
class ArrayMultibindProducer < MultibindProducer
# @return [Boolean] whether the result should be made contain unique (non-equal) entries or not
# @api public
attr_reader :uniq
# @return [Boolean, Integer] If result should be flattened (true), or not (false), or flattened to given level (0 = none, -1 = all)
# @api public
attr_reader :flatten
# @return [Boolean] whether priority should be considered for named contributions
# @api public
attr_reader :priority_on_named
# @return [Boolean] whether priority should be considered for unnamed contributions
# @api public
attr_reader :priority_on_unnamed
# @param injector [Puppet::Pops::Binder::Injector] The injector where the lookup originates
# @param binding [Puppet::Pops::Binder::Bindings::Binding, nil] The binding using this producer
# @param scope [Puppet::Parser::Scope] The scope to use for evaluation
# @option options [Puppet::Pops::Model::LambdaExpression] :transformer (nil) a transformer of produced value
# @option options [Boolean] :uniq (false) if collected result should be post-processed to contain only unique entries
# @option options [Boolean, Integer] :flatten (false) if collected result should be post-processed so all contained arrays
# are flattened. May be set to an Integer value to indicate the level of recursion (-1 is endless, 0 is none).
# @option options [Boolean] :priority_on_named (true) if highest precedented named element should win or if all should be included
# @option options [Boolean] :priority_on_unnamed (false) if highest precedented unnamed element should win or if all should be included
# @api public
#
def initialize(injector, binding, scope, options)
super
@uniq = !!options[:uniq]
@flatten = options[:flatten]
@priority_on_named = options[:priority_on_named].nil? ? true : options[:priority_on_name]
@priority_on_unnamed = !!options[:priority_on_unnamed]
case @flatten
when Integer
when true
@flatten = -1
when false
@flatten = nil
when NilClass
@flatten = nil
else
raise ArgumentError, "Option :flatten must be nil, Boolean, or an integer value" unless @flatten.is_a?(Integer)
end
end
protected
# @api private
def internal_produce(scope)
seen = {}
included_keys = []
injector.get_contributions(scope, contributions_key).each do |element|
key = element[0]
entry = element[1]
name = entry.binding.name
existing = seen[name]
empty_name = name.nil? || name.empty?
if existing
if empty_name && priority_on_unnamed
if (seen[name] <=> entry) >= 0
raise ArgumentError, "Duplicate key (same priority) contributed to Array Multibinding '#{binding.name}' with unnamed entry."
end
next
elsif !empty_name && priority_on_named
if (seen[name] <=> entry) >= 0
raise ArgumentError, "Duplicate key (same priority) contributed to Array Multibinding '#{binding.name}', key: '#{name}'."
end
next
end
else
seen[name] = entry
end
included_keys << key
end
result = included_keys.collect do |k|
x = injector.lookup_key(scope, k)
assert_type(binding(), injector.type_calculator(), x)
x
end
result.flatten!(flatten) if flatten
result.uniq! if uniq
result
end
# @api private
def assert_type(binding, tc, value)
infered = tc.infer(value)
unless tc.assignable?(binding.type.element_type, infered) || tc.assignable?(binding.type, infered)
raise ArgumentError, ["Type Error: contribution to '#{binding.name}' does not match type of multibind, ",
"#{type_error_detail([binding.type.element_type, binding.type], value)}"].join()
end
end
end
# @api public
class HashMultibindProducer < MultibindProducer
# @return [Symbol] One of `:error`, `:merge`, `:append`, `:priority`, `:ignore`
# @api public
attr_reader :conflict_resolution
# @return [Boolean]
# @api public
attr_reader :uniq
# @return [Boolean, Integer] Flatten all if true, or none if false, or to given level (0 = none, -1 = all)
# @api public
attr_reader :flatten
# The hash multibind producer provides options to control conflict resolution.
# By default, the hash is produced using `:priority` resolution - the highest entry is selected, the rest are
# ignored unless they have the same priority which is an error.
#
# @param injector [Puppet::Pops::Binder::Injector] The injector where the lookup originates
# @param binding [Puppet::Pops::Binder::Bindings::Binding, nil] The binding using this producer
# @param scope [Puppet::Parser::Scope] The scope to use for evaluation
# @option options [Puppet::Pops::Model::LambdaExpression] :transformer (nil) a transformer of produced value
# @option options [Symbol, String] :conflict_resolution (:priority) One of `:error`, `:merge`, `:append`, `:priority`, `:ignore`
# <ul><li> `ignore` the first found highest priority contribution is used, the rest are ignored</li>
# <li>`error` any duplicate key is an error</li>
# <li>`append` element type must be compatible with Array, makes elements be arrays and appends all found</li>
# <li>`merge` element type must be compatible with hash, merges hashes with retention of highest priority hash content</li>
# <li>`priority` the first found highest priority contribution is used, duplicates with same priority raises and error, the rest are
# ignored.</li></ul>
# @option options [Boolean, Integer] :flatten (false) If appended should be flattened. Also see {#flatten}.
# @option options [Boolean] :uniq (false) If appended result should be made unique.
#
# @api public
#
def initialize(injector, binding, scope, options)
super
@conflict_resolution = options[:conflict_resolution].nil? ? :priority : options[:conflict_resolution]
@uniq = !!options[:uniq]
@flatten = options[:flatten]
unless [:error, :merge, :append, :priority, :ignore].include?(@conflict_resolution)
raise ArgumentError, "Unknown conflict_resolution for Multibind Hash: '#{@conflict_resolution}."
end
case @flatten
when Integer
when true
@flatten = -1
when false
@flatten = nil
when NilClass
@flatten = nil
else
raise ArgumentError, "Option :flatten must be nil, Boolean, or an integer value" unless @flatten.is_a?(Integer)
end
if uniq || flatten || conflict_resolution.to_s == 'append'
etype = binding.type.element_type
unless etype.class == Puppet::Pops::Types::PDataType || etype.is_a?(Puppet::Pops::Types::PArrayType)
detail = []
detail << ":uniq" if uniq
detail << ":flatten" if flatten
detail << ":conflict_resolution => :append" if conflict_resolution.to_s == 'append'
raise ArgumentError, ["Options #{detail.join(', and ')} cannot be used with a Multibind ",
"of type #{injector.type_calculator.string(binding.type)}"].join()
end
end
end
protected
# @api private
def internal_produce(scope)
seen = {}
included_entries = []
injector.get_contributions(scope, contributions_key).each do |element|
key = element[0]
entry = element[1]
name = entry.binding.name
raise ArgumentError, "A Hash Multibind contribution to '#{binding.name}' must have a name." if name.nil? || name.empty?
existing = seen[name]
if existing
case conflict_resolution.to_s
when 'priority'
# skip if duplicate has lower prio
if (comparison = (seen[name] <=> entry)) <= 0
raise ArgumentError, "Internal Error: contributions not given in decreasing precedence order" unless comparison == 0
raise ArgumentError, "Duplicate key (same priority) contributed to Hash Multibinding '#{binding.name}', key: '#{name}'."
end
next
when 'ignore'
# skip, ignore conflict if prio is the same
next
when 'error'
raise ArgumentError, "Duplicate key contributed to Hash Multibinding '#{binding.name}', key: '#{name}'."
end
else
seen[name] = entry
end
included_entries << [key, entry]
end
result = {}
included_entries.each do |element|
k = element[ 0 ]
entry = element[ 1 ]
x = injector.lookup_key(scope, k)
name = entry.binding.name
assert_type(binding(), injector.type_calculator(), name, x)
if result[ name ]
merge(result, name, result[ name ], x)
else
result[ name ] = conflict_resolution().to_s == 'append' ? [x] : x
end
end
result
end
# @api private
def merge(result, name, higher, lower)
case conflict_resolution.to_s
when 'append'
unless higher.is_a?(Array)
higher = [higher]
end
tmp = higher + [lower]
tmp.flatten!(flatten) if flatten
tmp.uniq! if uniq
result[name] = tmp
when 'merge'
result[name] = lower.merge(higher)
end
end
# @api private
def assert_type(binding, tc, key, value)
unless tc.instance?(binding.type.key_type, key)
raise ArgumentError, ["Type Error: key contribution to #{binding.name}['#{key}'] ",
"is incompatible with key type: #{tc.label(binding.type)}, ",
type_error_detail(binding.type.key_type, key)].join()
end
if key.nil? || !key.is_a?(String) || key.empty?
raise ArgumentError, "Entry contributing to multibind hash with id '#{binding.id}' must have a name."
end
unless tc.instance?(binding.type.element_type, value)
raise ArgumentError, ["Type Error: value contribution to #{binding.name}['#{key}'] ",
"is incompatible, ",
type_error_detail(binding.type.element_type, value)].join()
end
end
end
end