#
# upcase.rb
#

module Puppet::Parser::Functions
  newfunction(:upcase, :type => :rvalue, :doc => <<-EOS
Converts a string or an array of strings to uppercase.

*Examples:*

    upcase("abcd")

Will return:

    ASDF
  EOS
  ) do |arguments|

    raise(Puppet::ParseError, "upcase(): Wrong number of arguments " +
                                "given (#{arguments.size} for 1)") if arguments.size < 1

    value = arguments[0]

    unless value.is_a?(Array) || value.is_a?(String) || value.is_a?(Hash)
      raise(Puppet::ParseError, 'upcase(): Requires an ' +
                                  'array, string or hash to work with')
    end

    if value.is_a?(Array)
      # Numbers in Puppet are often string-encoded which is troublesome ...
      result = value.collect { |i| i.is_a?(String) ? i.upcase : i }
    elsif value.is_a?(Hash)
      result = {}
      result << value.each_pair do |k, v|
        return {k.upcase => v.collect! { |p| p.upcase }}
      end
    else
      result = value.upcase
    end

    return result
  end
end

# vim: set ts=2 sw=2 et :

#
# upcase.rb
#

module Puppet::Parser::Functions
  newfunction(:upcase, :type => :rvalue, :doc => <<-EOS
Converts a string or an array of strings to uppercase.

*Examples:*

    upcase("abcd")

Will return:

    ASDF
  EOS
  ) do |arguments|

    raise(Puppet::ParseError, "upcase(): Wrong number of arguments " +
                                "given (#{arguments.size} for 1)") if arguments.size < 1

    value = arguments[0]

    unless value.is_a?(Array) || value.is_a?(String) || value.is_a?(Hash)
      raise(Puppet::ParseError, 'upcase(): Requires an ' +
                                  'array, string or hash to work with')
    end

    if value.is_a?(Array)
      # Numbers in Puppet are often string-encoded which is troublesome ...
      result = value.collect { |i| i.is_a?(String) ? i.upcase : i }
    elsif value.is_a?(Hash)
      result = {}
      value.each_pair do |k, v|
        result.merge!({k.upcase => v.collect! { |p| p.upcase }})
      end
    else
      result = value.upcase
    end

    return result
  end
end

# vim: set ts=2 sw=2 et :

Fix issue with Ruby 1.8.7 which did not allow for the return in an each_pair of the hash
Fix issue with Ruby 1.8.7 which did not allow for the return in an each_pair of the hash
