2011-04-30 03:54:47 +02:00
|
|
|
#
|
|
|
|
# upcase.rb
|
|
|
|
#
|
|
|
|
|
|
|
|
module Puppet::Parser::Functions
|
|
|
|
newfunction(:upcase, :type => :rvalue, :doc => <<-EOS
|
2011-07-29 23:18:56 +02:00
|
|
|
Converts a string or an array of strings to uppercase.
|
|
|
|
|
|
|
|
*Examples:*
|
|
|
|
|
|
|
|
upcase("abcd")
|
|
|
|
|
|
|
|
Will return:
|
|
|
|
|
|
|
|
ASDF
|
2015-02-25 20:39:27 +01:00
|
|
|
EOS
|
2011-04-30 03:54:47 +02:00
|
|
|
) do |arguments|
|
|
|
|
|
|
|
|
raise(Puppet::ParseError, "upcase(): Wrong number of arguments " +
|
2015-02-28 02:40:32 +01:00
|
|
|
"given (#{arguments.size} for 1)") if arguments.size != 1
|
2011-04-30 03:54:47 +02:00
|
|
|
|
|
|
|
value = arguments[0]
|
|
|
|
|
2015-02-28 02:40:32 +01:00
|
|
|
unless value.is_a?(Array) || value.is_a?(Hash) || value.respond_to?(:upcase)
|
2015-02-25 20:39:27 +01:00
|
|
|
raise(Puppet::ParseError, 'upcase(): Requires an ' +
|
2015-02-28 02:40:32 +01:00
|
|
|
'array, hash or object that responds to upcase in order to work')
|
2011-04-30 03:54:47 +02:00
|
|
|
end
|
|
|
|
|
|
|
|
if value.is_a?(Array)
|
|
|
|
# Numbers in Puppet are often string-encoded which is troublesome ...
|
2015-02-28 02:40:32 +01:00
|
|
|
result = value.collect { |i| function_upcase([i]) }
|
2015-02-25 20:39:27 +01:00
|
|
|
elsif value.is_a?(Hash)
|
|
|
|
result = {}
|
2015-02-26 19:13:28 +01:00
|
|
|
value.each_pair do |k, v|
|
2015-02-28 02:40:32 +01:00
|
|
|
result[function_upcase([k])] = function_upcase([v])
|
2015-02-25 20:39:27 +01:00
|
|
|
end
|
2011-04-30 03:54:47 +02:00
|
|
|
else
|
|
|
|
result = value.upcase
|
|
|
|
end
|
|
|
|
|
|
|
|
return result
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
# vim: set ts=2 sw=2 et :
|