1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
|
# the parent class for all of our syntactical objects
require 'puppet'
require 'puppet/autoload'
# The base class for all of the objects that make up the parse trees.
# Handles things like file name, line #, and also does the initialization
# for all of the parameters of all of the child objects.
class Puppet::Parser::AST
# Do this so I don't have to type the full path in all of the subclasses
AST = Puppet::Parser::AST
include Puppet::Util::Errors
include Puppet::Util::MethodHelper
Puppet.setdefaults("ast",
:typecheck => [true, "Whether to validate types during parsing."],
:paramcheck => [true, "Whether to validate parameters during parsing."]
)
attr_accessor :line, :file, :parent, :scope
# Just used for 'tree', which is only used in debugging.
@@pink = "[0;31m"
@@green = "[0;32m"
@@yellow = "[0;33m"
@@slate = "[0;34m"
@@reset = "[0m"
# Just used for 'tree', which is only used in debugging.
@@indent = " " * 4
@@indline = @@pink + ("-" * 4) + @@reset
@@midline = @@slate + ("-" * 4) + @@reset
@@settypes = {}
# Just used for 'tree', which is only used in debugging.
def AST.indention
return @@indent * @@indention
end
# Just used for 'tree', which is only used in debugging.
def AST.midline
return @@midline
end
# Does this ast object set something? If so, it gets evaluated first.
def self.settor?
if defined? @settor
@settor
else
false
end
end
# Evaluate the current object. Basically just iterates across all
# of the contained children and evaluates them in turn, returning a
# list of all of the collected values, rejecting nil values
def evaluate(args)
#Puppet.debug("Evaluating ast %s" % @name)
value = self.collect { |obj|
obj.safeevaluate(args)
}.reject { |obj|
obj.nil?
}
end
# Throw a parse error.
def parsefail(message)
self.fail(Puppet::ParseError, message)
end
# Wrap a statemp in a reusable way so we always throw a parse error.
def parsewrap
exceptwrap :type => Puppet::ParseError do
yield
end
end
# The version of the evaluate method that should be called, because it
# correctly handles errors. It is critical to use this method because
# it can enable you to catch the error where it happens, rather than
# much higher up the stack.
def safeevaluate(*args)
# We duplicate code here, rather than using exceptwrap, because this
# is called so many times during parsing.
#exceptwrap do
# self.evaluate(*args)
#end
begin
return self.evaluate(*args)
rescue Puppet::Error => detail
raise adderrorcontext(detail)
rescue => detail
message = options[:message] || "%s failed with error %s: %s" %
[self.class, detail.class, detail.to_s]
error = options[:type].new(message)
# We can't use self.fail here because it always expects strings,
# not exceptions.
raise adderrorcontext(error, detail)
end
end
# Again, just used for printing out the parse tree.
def typewrap(string)
#return self.class.to_s.sub(/.+::/,'') +
#"(" + @@green + string.to_s + @@reset + ")"
return @@green + string.to_s + @@reset +
"(" + self.class.to_s.sub(/.+::/,'') + ")"
end
# Initialize the object. Requires a hash as the argument, and
# takes each of the parameters of the hash and calls the settor
# method for them. This is probably pretty inefficient and should
# likely be changed at some point.
def initialize(args)
@file = nil
@line = nil
set_options(args)
end
#---------------------------------------------------------------
# Now autoload everything.
@autoloader = Puppet::Autoload.new(self,
"puppet/parser/ast"
)
@autoloader.loadall
end
#require 'puppet/parser/ast/astarray'
#require 'puppet/parser/ast/branch'
#require 'puppet/parser/ast/collection'
#require 'puppet/parser/ast/caseopt'
#require 'puppet/parser/ast/casestatement'
#require 'puppet/parser/ast/component'
#require 'puppet/parser/ast/else'
#require 'puppet/parser/ast/hostclass'
#require 'puppet/parser/ast/ifstatement'
#require 'puppet/parser/ast/leaf'
#require 'puppet/parser/ast/node'
#require 'puppet/parser/ast/resourcedef'
#require 'puppet/parser/ast/resourceparam'
#require 'puppet/parser/ast/resourceref'
#require 'puppet/parser/ast/resourceoverride'
#require 'puppet/parser/ast/selector'
#require 'puppet/parser/ast/resourcedefaults'
#require 'puppet/parser/ast/vardef'
#require 'puppet/parser/ast/tag'
#require 'puppet/parser/ast/function'
# $Id$
|
