]> git.donarmstrong.com Git - dsa-puppet.git/blob - modules/stdlib/lib/puppet/parser/functions/upcase.rb
upgrade to concat 2.0.0
[dsa-puppet.git] / modules / stdlib / lib / puppet / parser / functions / upcase.rb
1 #
2 # upcase.rb
3 #
4
5 module Puppet::Parser::Functions
6   newfunction(:upcase, :type => :rvalue, :doc => <<-EOS
7 Converts a string or an array of strings to uppercase.
8
9 *Examples:*
10
11     upcase("abcd")
12
13 Will return:
14
15     ASDF
16     EOS
17   ) do |arguments|
18
19     raise(Puppet::ParseError, "upcase(): Wrong number of arguments " +
20       "given (#{arguments.size} for 1)") if arguments.size < 1
21
22     value = arguments[0]
23     klass = value.class
24
25     unless [Array, String].include?(klass)
26       raise(Puppet::ParseError, 'upcase(): Requires either ' +
27         'array or string to work with')
28     end
29
30     if value.is_a?(Array)
31       # Numbers in Puppet are often string-encoded which is troublesome ...
32       result = value.collect { |i| i.is_a?(String) ? i.upcase : i }
33     else
34       result = value.upcase
35     end
36
37     return result
38   end
39 end
40
41 # vim: set ts=2 sw=2 et :