# # DO NOT MODIFY!!!! # This file is automatically generated by racc 1.4.5 # from racc grammer file "grammar.ra". # require 'racc/parser' require 'puppet' require 'puppet/parsedfile' require 'puppet/parser/lexer' require 'puppet/parser/ast' #require 'puppet/parser/interpreter' module Puppet class ParseError < Puppet::Error; end class ImportError < Racc::ParseError; end end Puppet[:typecheck] = true Puppet[:paramcheck] = true module Puppet module Parser class Parser < Racc::Parser module_eval <<'..end grammar.ra modeval..idbd33cf53a5', 'grammar.ra', 603 require 'puppet/parser/functions' attr_reader :file attr_accessor :files # Create an AST array out of all of the args def aryfy(*args) if args[0].instance_of?(AST::ASTArray) result = args.shift args.each { |arg| result.push arg } else result = ast AST::ASTArray, :children => args end return result end # Create an AST object, and automatically add the file and line information if # available. def ast(klass, hash = {}) unless hash[:line] hash[:line] = @lexer.line end unless hash[:file] if file = @lexer.file hash[:file] = file end end return klass.new(hash) end def file=(file) unless FileTest.exists?(file) unless file =~ /\.pp$/ file = file + ".pp" end unless FileTest.exists?(file) raise Puppet::Error, "Could not find file %s" % file end end if @files.detect { |f| f.file == file } raise Puppet::ImportError.new("Import loop detected") else @files << Puppet::ParsedFile.new(file) @lexer.file = file end end def initialize @lexer = Puppet::Parser::Lexer.new() @files = [] #if Puppet[:debug] # @yydebug = true #end end def on_error(token,value,stack) #on '%s' at '%s' in\n'%s'" % [token,value,stack] #error = "line %s: parse error after '%s'" % # [@lexer.line,@lexer.last] error = "Syntax error at '%s'" % [value] #if Puppet[:debug] #puts stack.inspect #puts stack.class #end #if @lexer.file # error += (" in '%s'" % @lexer.file) #end except = Puppet::ParseError.new(error) except.line = @lexer.line if @lexer.file except.file = @lexer.file end raise except end # how should I do error handling here? def parse(string = nil) if string self.string = string end begin yyparse(@lexer,:scan) rescue Racc::ParseError => except error = Puppet::ParseError.new(except) error.line = @lexer.line error.file = @lexer.file error.backtrace = except.backtrace raise error rescue Puppet::ParseError => except except.line ||= @lexer.line except.file ||= @lexer.file raise except rescue Puppet::Error => except # and this is a framework error except.line ||= @lexer.line except.file ||= @lexer.file #if Puppet[:debug] # puts except.stack #end raise except rescue Puppet::DevError => except except.line ||= @lexer.line except.file ||= @lexer.file #if Puppet[:debug] # puts except.stack #end raise except rescue => except error = Puppet::DevError.new(except.message) error.line = @lexer.line error.file = @lexer.file error.backtrace = except.backtrace #if Puppet[:debug] # puts caller #end raise error end end def reparse? @files.detect { |file| file.changed? } end def string=(string) @lexer.string = string end # Make emacs happy # Local Variables: # mode: ruby # End: # $Id$ ..end grammar.ra modeval..idbd33cf53a5 ##### racc 1.4.5 generates ### racc_reduce_table = [ 0, 0, :racc_error, 1, 44, :_reduce_1, 1, 44, :_reduce_none, 1, 45, :_reduce_none, 2, 45, :_reduce_4, 1, 47, :_reduce_none, 1, 47, :_reduce_none, 1, 47, :_reduce_none, 1, 47, :_reduce_none, 1, 47, :_reduce_none, 1, 47, :_reduce_none, 1, 47, :_reduce_none, 1, 47, :_reduce_none, 1, 47, :_reduce_none, 1, 47, :_reduce_none, 1, 47, :_reduce_none, 4, 55, :_reduce_16, 2, 55, :_reduce_17, 1, 59, :_reduce_none, 3, 59, :_reduce_19, 1, 60, :_reduce_none, 1, 60, :_reduce_none, 1, 60, :_reduce_none, 5, 48, :_reduce_23, 5, 48, :_reduce_24, 5, 48, :_reduce_25, 2, 49, :_reduce_26, 3, 50, :_reduce_27, 4, 69, :_reduce_28, 1, 64, :_reduce_none, 3, 64, :_reduce_30, 0, 65, :_reduce_none, 1, 65, :_reduce_none, 1, 61, :_reduce_33, 1, 68, :_reduce_34, 1, 70, :_reduce_none, 1, 70, :_reduce_none, 1, 70, :_reduce_none, 1, 70, :_reduce_none, 1, 70, :_reduce_none, 1, 70, :_reduce_none, 3, 51, :_reduce_41, 0, 66, :_reduce_42, 1, 66, :_reduce_43, 3, 66, :_reduce_44, 3, 74, :_reduce_45, 1, 75, :_reduce_none, 3, 75, :_reduce_47, 1, 73, :_reduce_none, 1, 73, :_reduce_none, 1, 73, :_reduce_none, 1, 73, :_reduce_none, 1, 73, :_reduce_none, 1, 73, :_reduce_none, 1, 73, :_reduce_none, 1, 73, :_reduce_none, 1, 73, :_reduce_none, 4, 79, :_reduce_57, 1, 63, :_reduce_58, 1, 63, :_reduce_59, 1, 77, :_reduce_60, 4, 78, :_reduce_61, 6, 53, :_reduce_62, 0, 81, :_reduce_none, 4, 81, :_reduce_64, 1, 80, :_reduce_none, 5, 52, :_reduce_66, 1, 82, :_reduce_none, 2, 82, :_reduce_68, 5, 83, :_reduce_69, 4, 83, :_reduce_70, 1, 84, :_reduce_none, 3, 84, :_reduce_72, 3, 71, :_reduce_73, 1, 86, :_reduce_none, 3, 86, :_reduce_75, 1, 88, :_reduce_none, 3, 88, :_reduce_77, 3, 87, :_reduce_78, 1, 85, :_reduce_none, 1, 85, :_reduce_none, 1, 85, :_reduce_none, 1, 85, :_reduce_none, 1, 85, :_reduce_none, 1, 85, :_reduce_none, 1, 85, :_reduce_85, 2, 54, :_reduce_86, 7, 56, :_reduce_87, 6, 56, :_reduce_88, 6, 57, :_reduce_89, 5, 57, :_reduce_90, 6, 58, :_reduce_91, 5, 58, :_reduce_92, 1, 91, :_reduce_none, 3, 91, :_reduce_94, 1, 92, :_reduce_95, 1, 92, :_reduce_96, 1, 92, :_reduce_97, 0, 46, :_reduce_98, 1, 89, :_reduce_none, 3, 89, :_reduce_100, 3, 89, :_reduce_101, 1, 93, :_reduce_none, 3, 93, :_reduce_103, 3, 94, :_reduce_104, 1, 94, :_reduce_105, 3, 94, :_reduce_106, 1, 94, :_reduce_107, 1, 90, :_reduce_none, 2, 90, :_reduce_109, 1, 62, :_reduce_110, 1, 95, :_reduce_111, 3, 72, :_reduce_112, 2, 72, :_reduce_113, 1, 76, :_reduce_none, 1, 76, :_reduce_none, 0, 67, :_reduce_none, 1, 67, :_reduce_117 ] racc_reduce_n = 118 racc_shift_n = 198 racc_action_table = [ 48, 36, 38, 64, 162, 20, 48, 36, 38, 75, -84, 161, 48, 36, 38, 81, 20, 36, 38, 145, 36, 38, 20, 37, 37, -79, 36, 38, 20, 44, 86, -82, 72, 49, 53, 44, 31, 55, 65, 49, 53, 44, 31, 55, 113, 49, 53, -79, 44, 55, 48, 36, 38, 37, 44, 85, 48, 36, 38, 37, -81, 137, 48, 36, 38, 79, 20, 72, 29, 79, 169, 33, 20, -80, 29, 146, 154, 33, 20, 44, 115, 170, 102, 49, 53, 44, 149, 55, 77, 49, 53, 44, 88, 55, -81, 49, 53, 36, 38, 55, 48, 36, 38, 36, 38, 116, 48, 36, 38, 117, 118, 87, 48, 36, 38, 112, 20, 155, 145, -82, 45, 158, 20, 37, 178, 44, 117, 118, 20, 44, 37, 44, 105, 49, 53, 44, 37, 55, 64, 49, 53, 44, 163, 55, 77, 49, 93, 85, 84, 55, 48, 36, 38, 167, 168, 72, 48, 36, 38, 171, 172, -80, 48, 36, 38, -83, 20, 177, 108, 136, 181, 79, 20, 36, 38, 112, 77, 109, 20, 44, 71, 70, 69, 49, 53, 44, 190, 55, 20, 49, 53, 44, 113, 55, 66, 49, 53, 36, 38, 55, 125, 44, 112, 36, 38, 49, 53, 35, 28, 55, 166, nil, 20, 36, 38, nil, nil, nil, 20, 36, 38, nil, nil, nil, nil, 44, nil, nil, 20, 49, 53, 44, nil, 55, 20, 49, 53, nil, nil, 55, nil, 44, nil, nil, nil, 49, 53, 44, nil, 55, nil, 49, 53, 36, 38, 55, nil, 160, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 20, 175, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 20, 44, nil, nil, 174, 49, 53, nil, 12, 55, 16, 19, nil, 24, 26, 20, 3, nil, 9, 185, 14, nil, 21, 12, nil, 16, 19, nil, 24, 26, 20, 3, nil, 9, 197, 14, nil, 21, 12, nil, 16, 19, nil, 24, 26, 20, 3, nil, 9, 153, 14, nil, 21, 12, nil, 16, 19, nil, 24, 26, 20, 3, nil, 9, 189, 14, nil, 21, 12, nil, 16, 19, nil, 24, 26, 20, 3, nil, 9, 193, 14, nil, 21, 12, nil, 16, 19, nil, 24, 26, 20, 3, nil, 9, 196, 14, nil, 21, 12, nil, 16, 19, nil, 24, 26, 20, 3, nil, 9, 148, 14, nil, 21, 12, nil, 16, 19, nil, 24, 26, 20, 3, nil, 9, 194, 14, nil, 21, 12, nil, 16, 19, nil, 24, 26, 20, 3, nil, 9, nil, 14, nil, 21, 12, nil, 16, 19, nil, 24, 26, 20, 3, nil, 9, nil, 14, nil, 21, 12, nil, 16, 19, nil, 24, 26, 20, 3, nil, 9, nil, 14, nil, 21, 12, nil, 16, 19, nil, 24, 26, 20, 3, nil, 9, nil, 14, nil, 21, 12, nil, 16, 19, nil, 24, 26, 20, 3, nil, 9, nil, 14, nil, 21, 12, nil, 16, 19, nil, 24, 26, nil, 3, nil, 9, nil, 14, nil, 21 ] racc_action_check = [ 158, 158, 158, 17, 133, 21, 86, 86, 86, 30, 46, 133, 48, 48, 48, 48, 158, 16, 16, 169, 79, 79, 86, 21, 169, 98, 45, 45, 48, 158, 57, 99, 30, 158, 158, 86, 3, 158, 17, 86, 86, 48, 75, 86, 93, 48, 48, 57, 79, 48, 69, 69, 69, 79, 45, 93, 137, 137, 137, 45, 100, 101, 171, 171, 171, 121, 69, 103, 3, 80, 141, 3, 137, 92, 75, 107, 121, 75, 171, 69, 80, 141, 65, 69, 69, 137, 111, 69, 112, 137, 137, 171, 62, 137, 61, 171, 171, 85, 85, 171, 12, 12, 12, 9, 9, 83, 14, 14, 14, 83, 83, 60, 64, 64, 64, 90, 12, 122, 105, 59, 9, 128, 14, 105, 156, 85, 156, 156, 64, 12, 85, 9, 66, 12, 12, 14, 9, 12, 68, 14, 14, 64, 135, 14, 136, 64, 64, 53, 52, 64, 172, 172, 172, 139, 140, 70, 119, 119, 119, 142, 144, 51, 113, 113, 113, 50, 172, 153, 72, 95, 161, 39, 119, 179, 179, 164, 35, 74, 113, 172, 28, 26, 24, 172, 172, 119, 177, 172, 179, 119, 119, 113, 77, 119, 19, 113, 113, 87, 87, 113, 87, 179, 76, 88, 88, 179, 179, 6, 2, 179, 138, nil, 87, 125, 125, nil, nil, nil, 88, 162, 162, nil, nil, nil, nil, 87, nil, nil, 125, 87, 87, 88, nil, 87, 162, 88, 88, nil, nil, 88, nil, 125, nil, nil, nil, 125, 125, 162, nil, 125, nil, 162, 162, 131, 131, 162, nil, 131, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 131, 147, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 147, 131, nil, nil, 146, 131, 131, nil, 147, 131, 147, 147, nil, 147, 147, 146, 147, nil, 147, 167, 147, nil, 147, 146, nil, 146, 146, nil, 146, 146, 167, 146, nil, 146, 195, 146, nil, 146, 167, nil, 167, 167, nil, 167, 167, 195, 167, nil, 167, 120, 167, nil, 167, 195, nil, 195, 195, nil, 195, 195, 120, 195, nil, 195, 173, 195, nil, 195, 120, nil, 120, 120, nil, 120, 120, 173, 120, nil, 120, 181, 120, nil, 120, 173, nil, 173, 173, nil, 173, 173, 181, 173, nil, 173, 192, 173, nil, 173, 181, nil, 181, 181, nil, 181, 181, 192, 181, nil, 181, 109, 181, nil, 181, 192, nil, 192, 192, nil, 192, 192, 109, 192, nil, 192, 184, 192, nil, 192, 109, nil, 109, 109, nil, 109, 109, 184, 109, nil, 109, nil, 109, nil, 109, 184, nil, 184, 184, nil, 184, 184, 84, 184, nil, 184, nil, 184, nil, 184, 84, nil, 84, 84, nil, 84, 84, 190, 84, nil, 84, nil, 84, nil, 84, 190, nil, 190, 190, nil, 190, 190, 5, 190, nil, 190, nil, 190, nil, 190, 5, nil, 5, 5, nil, 5, 5, 0, 5, nil, 5, nil, 5, nil, 5, 0, nil, 0, 0, nil, 0, 0, nil, 0, nil, 0, nil, 0, nil, 0 ] racc_action_pointer = [ 457, nil, 208, 32, nil, 442, 201, nil, nil, 100, nil, nil, 98, nil, 104, nil, 14, -3, nil, 158, nil, -13, nil, nil, 169, nil, 145, nil, 180, nil, -1, nil, nil, nil, nil, 140, nil, nil, nil, 161, nil, nil, nil, nil, nil, 23, -9, nil, 10, nil, 146, 142, 142, 127, nil, nil, nil, 28, nil, 100, 92, 75, 86, nil, 110, 40, 112, nil, 132, 48, 122, nil, 132, nil, 171, 38, 192, 183, nil, 17, 59, nil, nil, 100, 412, 94, 4, 194, 200, nil, 105, nil, 54, 35, nil, 152, nil, nil, 6, 12, 41, 24, nil, 34, nil, 87, nil, 69, nil, 382, nil, 79, 52, 160, nil, nil, nil, nil, nil, 154, 322, 55, 112, nil, nil, 210, nil, nil, 112, nil, nil, 250, nil, -6, nil, 135, 108, 54, 203, 147, 133, 60, 146, nil, 147, nil, 277, 262, nil, nil, nil, nil, nil, 140, nil, nil, 117, nil, -2, nil, nil, 164, 216, nil, 165, nil, nil, 292, nil, -12, nil, 60, 148, 337, nil, nil, nil, 180, nil, 170, nil, 352, nil, nil, 397, nil, nil, nil, nil, nil, 427, nil, 367, nil, nil, 307, nil, nil ] racc_action_default = [ -98, -12, -118, -118, -13, -1, -118, -14, -2, -33, -15, -3, -118, -5, -118, -6, -118, -118, -7, -118, -34, -118, -8, -9, -118, -10, -118, -11, -118, -95, -98, -96, -93, -97, -4, -42, -58, -33, -59, -17, -18, -20, -21, -22, -110, -118, -51, -55, -118, -60, -56, -50, -118, -33, -52, -85, -54, -49, -65, -53, -118, -48, -118, -86, -42, -118, -98, -26, -118, -118, -98, 198, -118, -108, -118, -118, -116, -118, -43, -118, -118, -113, -46, -118, -118, -118, -118, -118, -118, -84, -116, -83, -37, -33, -29, -118, -38, -40, -36, -39, -35, -31, -27, -98, -99, -98, -41, -118, -109, -118, -94, -118, -117, -118, -19, -16, -112, -114, -115, -118, -118, -118, -118, -80, -79, -118, -82, -81, -118, -73, -74, -118, -67, -118, -71, -118, -42, -32, -118, -118, -118, -118, -105, -102, -107, -111, -118, -118, -92, -25, -44, -45, -47, -63, -57, -61, -118, -76, -118, -68, -66, -118, -118, -24, -116, -30, -23, -118, -100, -118, -101, -118, -118, -118, -90, -91, -62, -118, -75, -118, -78, -118, -72, -28, -118, -88, -103, -104, -106, -89, -118, -77, -118, -70, -87, -118, -69, -64 ] racc_goto_table = [ 34, 43, 5, 8, 130, 42, 111, 132, 63, 89, 128, 134, 150, 39, 94, 76, 32, 52, 96, 97, 135, 176, 131, 83, 119, 74, 138, 129, 101, 143, 156, 103, 89, 89, 114, 30, 67, 43, 51, 141, 51, 42, 157, 2, 90, nil, nil, nil, 128, 80, 159, nil, nil, nil, 134, nil, 100, nil, nil, nil, 99, nil, nil, nil, nil, 107, nil, nil, nil, 104, 89, 43, nil, nil, 51, 42, 89, 43, nil, 127, 127, 42, 89, 126, 126, 182, 120, 165, 110, 121, 92, 96, 97, 186, 183, 51, 191, 179, 139, 58, nil, 62, 128, nil, nil, nil, nil, 89, 140, nil, nil, 147, 51, 123, 123, 34, 164, 127, nil, nil, nil, 126, nil, 127, 89, 41, nil, 126, 57, 100, 57, nil, nil, 99, nil, 82, nil, 68, nil, 51, nil, nil, 34, nil, nil, 51, nil, nil, 173, nil, nil, 123, nil, 91, 127, nil, 106, 123, 126, nil, nil, 41, nil, 92, 57, nil, nil, nil, 34, 184, nil, 127, nil, 122, nil, 126, 91, 91, nil, 34, 98, nil, nil, 192, 51, 57, nil, 34, 123, nil, 34, nil, 195, nil, nil, 41, nil, 51, 51, nil, 151, 41, 57, 124, 124, 123, 152, nil, nil, nil, nil, nil, nil, nil, 91, nil, nil, nil, nil, nil, 91, 142, nil, nil, nil, nil, 91, nil, nil, 57, nil, nil, nil, nil, nil, 57, nil, nil, nil, nil, nil, 124, nil, nil, nil, 180, nil, 124, nil, nil, nil, 91, nil, 98, nil, nil, nil, nil, 187, 188, nil, nil, nil, nil, nil, nil, nil, nil, 91, nil, nil, nil, nil, nil, 57, nil, nil, nil, 124, nil, nil, nil, nil, nil, nil, 142, nil, 57, 57, nil, nil, nil, nil, nil, nil, 124 ] racc_goto_check = [ 4, 20, 2, 3, 44, 19, 24, 40, 20, 34, 42, 42, 31, 16, 26, 23, 49, 37, 28, 29, 24, 38, 39, 32, 33, 47, 22, 43, 21, 51, 45, 46, 34, 34, 17, 48, 5, 20, 25, 50, 25, 19, 44, 1, 23, nil, nil, nil, 42, 16, 40, nil, nil, nil, 42, nil, 20, nil, nil, nil, 19, nil, nil, nil, nil, 47, nil, nil, nil, 3, 34, 20, nil, nil, 25, 19, 34, 20, nil, 20, 20, 19, 34, 19, 19, 42, 2, 26, 49, 16, 25, 28, 29, 51, 24, 25, 44, 33, 47, 30, nil, 30, 42, nil, nil, nil, nil, 34, 3, nil, nil, 2, 25, 25, 25, 4, 23, 20, nil, nil, nil, 19, nil, 20, 34, 18, nil, 19, 18, 20, 18, nil, nil, 19, nil, 30, nil, 18, nil, 25, nil, nil, 4, nil, nil, 25, nil, nil, 2, nil, nil, 25, nil, 36, 20, nil, 30, 25, 19, nil, nil, 18, nil, 25, 18, nil, nil, nil, 4, 2, nil, 20, nil, 30, nil, 19, 36, 36, nil, 4, 18, nil, nil, 2, 25, 18, nil, 4, 25, nil, 4, nil, 2, nil, nil, 18, nil, 25, 25, nil, 30, 18, 18, 18, 18, 25, 30, nil, nil, nil, nil, nil, nil, nil, 36, nil, nil, nil, nil, nil, 36, 18, nil, nil, nil, nil, 36, nil, nil, 18, nil, nil, nil, nil, nil, 18, nil, nil, nil, nil, nil, 18, nil, nil, nil, 30, nil, 18, nil, nil, nil, 36, nil, 18, nil, nil, nil, nil, 30, 30, nil, nil, nil, nil, nil, nil, nil, nil, 36, nil, nil, nil, nil, nil, 18, nil, nil, nil, 18, nil, nil, nil, nil, nil, nil, 18, nil, 18, 18, nil, nil, nil, nil, nil, nil, 18 ] racc_goto_pointer = [ nil, 43, 2, 3, -5, 15, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 4, -45, 116, -4, -8, -36, -75, -20, -70, 26, -50, nil, -46, -45, 87, -100, -25, -59, -55, nil, 89, 5, -132, -66, -81, nil, -77, -60, -83, -95, -35, -5, 32, 13, -66, -76, nil ] racc_goto_default = [ nil, nil, nil, 73, 11, 13, 15, 18, 22, 23, 25, 27, 1, 4, 7, 10, nil, 40, 17, 59, 61, nil, nil, nil, nil, 6, nil, 95, 54, 56, nil, 78, nil, nil, 46, 47, 50, nil, nil, nil, nil, 133, 60, nil, nil, nil, nil, nil, nil, nil, nil, nil, 144 ] racc_token_table = { false => 0, Object.new => 1, :LBRACK => 2, :DQTEXT => 3, :SQTEXT => 4, :RBRACK => 5, :LBRACE => 6, :RBRACE => 7, :SYMBOL => 8, :FARROW => 9, :COMMA => 10, :TRUE => 11, :FALSE => 12, :EQUALS => 13, :LESSEQUAL => 14, :NOTEQUAL => 15, :DOT => 16, :COLON => 17, :TYPE => 18, :QMARK => 19, :LPAREN => 20, :RPAREN => 21, :ISEQUAL => 22, :GREATEREQUAL => 23, :GREATERTHAN => 24, :LESSTHAN => 25, :IF => 26, :ELSE => 27, :IMPORT => 28, :DEFINE => 29, :ELSIF => 30, :VARIABLE => 31, :CLASS => 32, :INHERITS => 33, :NODE => 34, :BOOLEAN => 35, :NAME => 36, :SEMIC => 37, :CASE => 38, :DEFAULT => 39, :AT => 40, :LCOLLECT => 41, :RCOLLECT => 42 } racc_use_result_var = true racc_nt_base = 43 Racc_arg = [ racc_action_table, racc_action_check, racc_action_default, racc_action_pointer, racc_goto_table, racc_goto_check, racc_goto_default, racc_goto_pointer, racc_nt_base, racc_reduce_table, racc_token_table, racc_shift_n, racc_reduce_n, racc_use_result_var ] Racc_token_to_s_table = [ '$end', 'error', 'LBRACK', 'DQTEXT', 'SQTEXT', 'RBRACK', 'LBRACE', 'RBRACE', 'SYMBOL', 'FARROW', 'COMMA', 'TRUE', 'FALSE', 'EQUALS', 'LESSEQUAL', 'NOTEQUAL', 'DOT', 'COLON', 'TYPE', 'QMARK', 'LPAREN', 'RPAREN', 'ISEQUAL', 'GREATEREQUAL', 'GREATERTHAN', 'LESSTHAN', 'IF', 'ELSE', 'IMPORT', 'DEFINE', 'ELSIF', 'VARIABLE', 'CLASS', 'INHERITS', 'NODE', 'BOOLEAN', 'NAME', 'SEMIC', 'CASE', 'DEFAULT', 'AT', 'LCOLLECT', 'RCOLLECT', '$start', 'program', 'statements', 'nothing', 'statement', 'object', 'collectable', 'collection', 'assignment', 'casestatement', 'ifstatement', 'import', 'fstatement', 'definition', 'hostclass', 'nodedef', 'classnames', 'classname', 'name', 'variable', 'quotedtext', 'objectinstances', 'endsemi', 'params', 'endcomma', 'type', 'objectinst', 'objectname', 'selector', 'array', 'rvalue', 'param', 'rvalues', 'comma', 'boolean', 'objectref', 'funcrvalue', 'iftest', 'else', 'caseopts', 'caseopt', 'casevalues', 'selectlhand', 'svalues', 'selectval', 'sintvalues', 'argumentlist', 'parent', 'hostnames', 'hostname', 'arguments', 'argument', 'lvariable'] Racc_debug_parser = false ##### racc system variables end ##### # reduce 0 omitted module_eval <<'.,.,', 'grammar.ra', 22 def _reduce_1( val, _values, result ) if val[0].is_a?(AST::ASTArray) result = val[0] else end result end .,., # reduce 2 omitted # reduce 3 omitted module_eval <<'.,.,', 'grammar.ra', 33 def _reduce_4( val, _values, result ) if val[0].instance_of?(AST::ASTArray) val[0].push(val[1]) result = val[0] else result = ast AST::ASTArray, :children => [val[0],val[1]] end result end .,., # reduce 5 omitted # reduce 6 omitted # reduce 7 omitted # reduce 8 omitted # reduce 9 omitted # reduce 10 omitted # reduce 11 omitted # reduce 12 omitted # reduce 13 omitted # reduce 14 omitted # reduce 15 omitted module_eval <<'.,.,', 'grammar.ra', 54 def _reduce_16( val, _values, result ) args = aryfy(val[2]) result = ast AST::Function, :name => val[0], :arguments => args, :ftype => :statement result end .,., module_eval <<'.,.,', 'grammar.ra', 61 def _reduce_17( val, _values, result ) args = aryfy(val[1]) result = ast AST::Function, :name => val[0], :arguments => args, :ftype => :statement result end .,., # reduce 18 omitted module_eval <<'.,.,', 'grammar.ra', 80 def _reduce_19( val, _values, result ) result = aryfy(val[0], val[2]) result.line = @lexer.line result.file = @lexer.file result end .,., # reduce 20 omitted # reduce 21 omitted # reduce 22 omitted module_eval <<'.,.,', 'grammar.ra', 109 def _reduce_23( val, _values, result ) if val[0].instance_of?(AST::ASTArray) raise Puppet::ParseError, "Invalid name" end array = val[2] if array.instance_of?(AST::ObjectInst) array = [array] end result = ast AST::ASTArray # this iterates across each specified objectinstance array.each { |instance| unless instance.instance_of?(AST::ObjectInst) raise Puppet::Dev, "Got something that isn't an instance" end # now, i need to somehow differentiate between those things with # arrays in their names, and normal things result.push ast(AST::ObjectDef, :type => val[0], :name => instance[0], :params => instance[1]) } result end .,., module_eval <<'.,.,', 'grammar.ra', 118 def _reduce_24( val, _values, result ) if val[0].instance_of?(AST::ASTArray) Puppet.notice "invalid name" raise Puppet::ParseError, "Invalid name" end # an object but without a name # this cannot be an instance of a library type result = ast AST::ObjectDef, :type => val[0], :params => val[2] result end .,., module_eval <<'.,.,', 'grammar.ra', 124 def _reduce_25( val, _values, result ) # a template setting for a type if val[0].instance_of?(AST::ASTArray) raise Puppet::ParseError, "Invalid type" end result = ast(AST::TypeDefaults, :type => val[0], :params => val[2]) result end .,., module_eval <<'.,.,', 'grammar.ra', 147 def _reduce_26( val, _values, result ) unless Puppet[:storeconfigs] raise Puppet::ParseError, "You cannot collect without storeconfigs being set" end if val[1].is_a? AST::TypeDefaults raise Puppet::ParseError, "Defaults are not collectable" end # Just mark our objects as collectable and pass them through. if val[1].instance_of?(AST::ASTArray) val[1].each do |obj| obj.collectable = true end else val[1].collectable = true end result = val[1] result end .,., module_eval <<'.,.,', 'grammar.ra', 156 def _reduce_27( val, _values, result ) unless Puppet[:storeconfigs] raise Puppet::ParseError, "You cannot collect without storeconfigs being set" end result = ast AST::Collection, :type => val[0] result end .,., module_eval <<'.,.,', 'grammar.ra', 160 def _reduce_28( val, _values, result ) result = ast AST::ObjectInst, :children => [val[0],val[2]] result end .,., # reduce 29 omitted module_eval <<'.,.,', 'grammar.ra', 170 def _reduce_30( val, _values, result ) if val[0].instance_of?(AST::ObjectInst) result = ast AST::ASTArray, :children => [val[0],val[2]] else val[0].push val[2] result = val[0] end result end .,., # reduce 31 omitted # reduce 32 omitted module_eval <<'.,.,', 'grammar.ra', 177 def _reduce_33( val, _values, result ) result = ast AST::Name, :value => val[0] result end .,., module_eval <<'.,.,', 'grammar.ra', 181 def _reduce_34( val, _values, result ) result = ast AST::Type, :value => val[0] result end .,., # reduce 35 omitted # reduce 36 omitted # reduce 37 omitted # reduce 38 omitted # reduce 39 omitted # reduce 40 omitted module_eval <<'.,.,', 'grammar.ra', 194 def _reduce_41( val, _values, result ) # this is distinct from referencing a variable variable = ast AST::Name, :value => val[0].sub(/^\$/,'') result = ast AST::VarDef, :name => variable, :value => val[2] result end .,., module_eval <<'.,.,', 'grammar.ra', 199 def _reduce_42( val, _values, result ) result = ast AST::ASTArray result end .,., module_eval <<'.,.,', 'grammar.ra', 199 def _reduce_43( val, _values, result ) result = val[0] result end .,., module_eval <<'.,.,', 'grammar.ra', 208 def _reduce_44( val, _values, result ) if val[0].instance_of?(AST::ASTArray) val[0].push(val[2]) result = val[0] else result = ast AST::ASTArray, :children => [val[0],val[2]] end result end .,., module_eval <<'.,.,', 'grammar.ra', 213 def _reduce_45( val, _values, result ) leaf = ast AST::String, :value => val[0] result = ast AST::ObjectParam, :param => leaf, :value => val[2] result end .,., # reduce 46 omitted module_eval <<'.,.,', 'grammar.ra', 222 def _reduce_47( val, _values, result ) if val[0].instance_of?(AST::ASTArray) result = val[0].push(val[2]) else result = ast AST::ASTArray, :children => [val[0],val[2]] end result end .,., # reduce 48 omitted # reduce 49 omitted # reduce 50 omitted # reduce 51 omitted # reduce 52 omitted # reduce 53 omitted # reduce 54 omitted # reduce 55 omitted # reduce 56 omitted module_eval <<'.,.,', 'grammar.ra', 241 def _reduce_57( val, _values, result ) args = aryfy(val[2]) result = ast AST::Function, :name => val[0], :arguments => args, :ftype => :rvalue result end .,., module_eval <<'.,.,', 'grammar.ra', 245 def _reduce_58( val, _values, result ) result = ast AST::String, :value => val[0] result end .,., module_eval <<'.,.,', 'grammar.ra', 247 def _reduce_59( val, _values, result ) result = ast AST::FlatString, :value => val[0] result end .,., module_eval <<'.,.,', 'grammar.ra', 251 def _reduce_60( val, _values, result ) result = ast AST::Boolean, :value => val[0] result end .,., module_eval <<'.,.,', 'grammar.ra', 255 def _reduce_61( val, _values, result ) result = ast AST::ObjectRef, :type => val[0], :name => val[2] result end .,., module_eval <<'.,.,', 'grammar.ra', 268 def _reduce_62( val, _values, result ) args = { :test => val[1], :statements => val[3] } if val[5] args[:else] = val[5] end result = ast AST::IfStatement, args result end .,., # reduce 63 omitted module_eval <<'.,.,', 'grammar.ra', 273 def _reduce_64( val, _values, result ) result = ast AST::Else, :statements => val[2] result end .,., # reduce 65 omitted module_eval <<'.,.,', 'grammar.ra', 285 def _reduce_66( val, _values, result ) options = val[3] unless options.instance_of?(AST::ASTArray) options = ast AST::ASTArray, :children => [val[3]] end result = ast AST::CaseStatement, :test => val[1], :options => options result end .,., # reduce 67 omitted module_eval <<'.,.,', 'grammar.ra', 295 def _reduce_68( val, _values, result ) if val[0].instance_of?(AST::ASTArray) val[0].push val[1] result = val[0] else result = ast AST::ASTArray, :children => [val[0], val[1]] end result end .,., module_eval <<'.,.,', 'grammar.ra', 299 def _reduce_69( val, _values, result ) result = ast AST::CaseOpt, :value => val[0], :statements => val[3] result end .,., module_eval <<'.,.,', 'grammar.ra', 304 def _reduce_70( val, _values, result ) result = ast(AST::CaseOpt, :value => val[0], :statements => ast(AST::ASTArray) ) result end .,., # reduce 71 omitted module_eval <<'.,.,', 'grammar.ra', 314 def _reduce_72( val, _values, result ) if val[0].instance_of?(AST::ASTArray) val[0].push(val[2]) result = val[0] else result = ast AST::ASTArray, :children => [val[0],val[2]] end result end .,., module_eval <<'.,.,', 'grammar.ra', 318 def _reduce_73( val, _values, result ) result = ast AST::Selector, :param => val[0], :values => val[2] result end .,., # reduce 74 omitted module_eval <<'.,.,', 'grammar.ra', 320 def _reduce_75( val, _values, result ) result = val[1] result end .,., # reduce 76 omitted module_eval <<'.,.,', 'grammar.ra', 331 def _reduce_77( val, _values, result ) if val[0].instance_of?(AST::ASTArray) val[0].push(val[2]) result = val[0] else result = ast AST::ASTArray, :children => [val[0],val[2]] end result end .,., module_eval <<'.,.,', 'grammar.ra', 335 def _reduce_78( val, _values, result ) result = ast AST::ObjectParam, :param => val[0], :value => val[2] result end .,., # reduce 79 omitted # reduce 80 omitted # reduce 81 omitted # reduce 82 omitted # reduce 83 omitted # reduce 84 omitted module_eval <<'.,.,', 'grammar.ra', 345 def _reduce_85( val, _values, result ) result = ast AST::Default, :value => val[0] result end .,., module_eval <<'.,.,', 'grammar.ra', 401 def _reduce_86( val, _values, result ) # importing files # yuk, i hate keywords # we'll probably have to have some kind of search path eventually # but for now, just use a path relative to the file doing the importing dir = @lexer.file.sub(%r{[^/]+$},'').sub(/\/$/, '') if dir == "" dir = "." end result = ast AST::ASTArray Dir.chdir(dir) { # We can't interpolate at this point since we don't have any # scopes set up. Warn the user if they use a variable reference pat = val[1].value if pat.index("$") Puppet.warning( "The import of #{pat} contains a variable reference;" + " variables are not interpolated for imports " + "in file #{@lexer.file} at line #{@lexer.line}" ) end files = Dir.glob(pat) if files.size == 0 files = Dir.glob(pat + ".pp") if files.size == 0 raise Puppet::ImportError.new("No file(s) found for import " + "of '#{pat}'") end end files.each { |file| parser = Puppet::Parser::Parser.new() parser.files = self.files Puppet.debug("importing '%s'" % file) unless file =~ /^#{File::SEPARATOR}/ file = File.join(dir, file) end begin parser.file = file rescue Puppet::ImportError Puppet.warning( "Importing %s would result in an import loop" % File.join(dir, file) ) next end # push the results into the main result array parser.parse.each do |child| result.push child end } } result end .,., module_eval <<'.,.,', 'grammar.ra', 415 def _reduce_87( val, _values, result ) args = { :type => ast(AST::Name, :value => val[1]), :args => val[2], :keyword => val[0], :code => val[5] } if val[3].instance_of?(AST::Name) args[:parentclass] = val[3] end result = ast AST::CompDef, args result end .,., module_eval <<'.,.,', 'grammar.ra', 428 def _reduce_88( val, _values, result ) args = { :type => ast(AST::Name, :value => val[1]), :args => val[2], :keyword => val[0], :code => ast(AST::ASTArray) } if val[3].instance_of?(AST::Name) args[:parentclass] = val[3] end result = ast AST::CompDef,args result end .,., module_eval <<'.,.,', 'grammar.ra', 443 def _reduce_89( val, _values, result ) #:args => val[2], args = { :type => ast(AST::Name, :value => val[1]), :keyword => val[0], :code => val[4] } # It'll be an ASTArray if we didn't get a parent if val[2].instance_of?(AST::Name) args[:parentclass] = val[2] end result = ast AST::ClassDef, args result end .,., module_eval <<'.,.,', 'grammar.ra', 454 def _reduce_90( val, _values, result ) args = { :type => ast(AST::Name, :value => val[1]), :keyword => val[0], :code => ast(AST::ASTArray, :children => []) } # It'll be an ASTArray if we didn't get a parent if val[2].instance_of?(AST::Name) args[:parentclass] = val[2] end result = ast AST::ClassDef, args result end .,., module_eval <<'.,.,', 'grammar.ra', 472 def _reduce_91( val, _values, result ) unless val[1].instance_of?(AST::ASTArray) val[1] = ast AST::ASTArray, :line => val[1].line, :file => val[1].file, :children => [val[1]] end args = { :names => val[1], :keyword => val[0], :code => val[4] } if val[2].instance_of?(AST::Name) args[:parentclass] = val[2] end result = ast AST::NodeDef, args result end .,., module_eval <<'.,.,', 'grammar.ra', 488 def _reduce_92( val, _values, result ) unless val[1].instance_of?(AST::ASTArray) val[1] = ast AST::ASTArray, :line => val[1].line, :file => val[1].file, :children => [val[1]] end args = { :keyword => val[0], :names => val[1], :code => ast(AST::ASTArray, :children => []) } if val[2].instance_of?(AST::Name) args[:parentclass] = val[2] end result = ast AST::NodeDef,args result end .,., # reduce 93 omitted module_eval <<'.,.,', 'grammar.ra', 499 def _reduce_94( val, _values, result ) if val[0].instance_of?(AST::ASTArray) result = val[0] result.push val[2] else result = ast AST::ASTArray, :children => [val[0], val[2]] end result end .,., module_eval <<'.,.,', 'grammar.ra', 503 def _reduce_95( val, _values, result ) result = ast AST::HostName, :value => val[0] result end .,., module_eval <<'.,.,', 'grammar.ra', 505 def _reduce_96( val, _values, result ) result = ast AST::HostName, :value => val[0] result end .,., module_eval <<'.,.,', 'grammar.ra', 507 def _reduce_97( val, _values, result ) result = ast AST::Default, :value => val[0] result end .,., module_eval <<'.,.,', 'grammar.ra', 511 def _reduce_98( val, _values, result ) result = ast AST::ASTArray, :children => [] result end .,., # reduce 99 omitted module_eval <<'.,.,', 'grammar.ra', 516 def _reduce_100( val, _values, result ) result = val[1] result end .,., module_eval <<'.,.,', 'grammar.ra', 523 def _reduce_101( val, _values, result ) if val[1].instance_of?(AST::ASTArray) result = val[1] else result = ast AST::ASTArray, :children => [val[1]] end result end .,., # reduce 102 omitted module_eval <<'.,.,', 'grammar.ra', 533 def _reduce_103( val, _values, result ) if val[0].instance_of?(AST::ASTArray) val[0].push(val[2]) result = val[0] else result = ast AST::ASTArray, :children => [val[0],val[2]] end result end .,., module_eval <<'.,.,', 'grammar.ra', 541 def _reduce_104( val, _values, result ) msg = "Deprecation notice: Variables must now include '$' in prototypes" msg += " at line %s" % @lexer.line msg += " in file %s" % @lexer.file if @lexer.file Puppet.warning msg result = ast AST::CompArgument, :children => [val[0],val[2]] result end .,., module_eval <<'.,.,', 'grammar.ra', 548 def _reduce_105( val, _values, result ) msg = "Deprecation notice: Variables must now include '$' in prototypes" msg += " at line %s" % @lexer.line msg += " in file %s" % @lexer.file if @lexer.file Puppet.warning msg result = ast AST::CompArgument, :children => [val[0]] result end .,., module_eval <<'.,.,', 'grammar.ra', 550 def _reduce_106( val, _values, result ) result = ast AST::CompArgument, :children => [val[0],val[2]] result end .,., module_eval <<'.,.,', 'grammar.ra', 552 def _reduce_107( val, _values, result ) result = ast AST::CompArgument, :children => [val[0]] result end .,., # reduce 108 omitted module_eval <<'.,.,', 'grammar.ra', 557 def _reduce_109( val, _values, result ) result = ast AST::Name, :value => val[1] result end .,., module_eval <<'.,.,', 'grammar.ra', 562 def _reduce_110( val, _values, result ) name = val[0].sub(/^\$/,'') result = ast AST::Variable, :value => name result end .,., module_eval <<'.,.,', 'grammar.ra', 567 def _reduce_111( val, _values, result ) result = ast AST::Name, :value => val[0].sub(/^\$/,'') result end .,., module_eval <<'.,.,', 'grammar.ra', 575 def _reduce_112( val, _values, result ) if val[1].instance_of?(AST::ASTArray) result = val[1] else result = ast AST::ASTArray, :children => [val[1]] end result end .,., module_eval <<'.,.,', 'grammar.ra', 577 def _reduce_113( val, _values, result ) result = ast AST::ASTArray result end .,., # reduce 114 omitted # reduce 115 omitted # reduce 116 omitted module_eval <<'.,.,', 'grammar.ra', 582 def _reduce_117( val, _values, result ) result = nil result end .,., def _reduce_none( val, _values, result ) result end end # class Parser end # module Parser end # module Puppet