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
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
|
# I pulled this into a separate file, because I got
# tired of rebuilding the parser.rb file all the time.
class Puppet::Parser::Parser
require 'puppet/parser/functions'
require 'puppet/parser/files'
require 'puppet/resource/type_collection'
require 'puppet/resource/type_collection_helper'
require 'puppet/resource/type'
require 'monitor'
AST = Puppet::Parser::AST
include Puppet::Resource::TypeCollectionHelper
attr_reader :version, :environment
attr_accessor :files
attr_accessor :lexer
# Add context to a message; useful for error messages and such.
def addcontext(message, obj = nil)
obj ||= @lexer
message += " on line #{obj.line}"
if file = obj.file
message += " in file #{file}"
end
message
end
# 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
result
end
# Create an AST object, and automatically add the file and line information if
# available.
def ast(klass, hash = {})
klass.new ast_context(klass.use_docs).merge(hash)
end
def ast_context(include_docs = false)
result = {
:line => lexer.line,
:file => lexer.file
}
result[:doc] = lexer.getcomment(result[:line]) if include_docs
result
end
# The fully qualifed name, with the full namespace.
def classname(name)
[@lexer.namespace, name].join("::").sub(/^::/, '')
end
def clear
initvars
end
# Raise a Parse error.
def error(message)
if brace = @lexer.expected
message += "; expected '%s'"
end
except = Puppet::ParseError.new(message)
except.line = @lexer.line
except.file = @lexer.file if @lexer.file
raise except
end
def file
@lexer.file
end
def file=(file)
unless FileTest.exist?(file)
unless file =~ /\.pp$/
file = file + ".pp"
end
raise Puppet::Error, "Could not find file #{file}" unless FileTest.exist?(file)
end
raise Puppet::AlreadyImportedError, "Import loop detected" if known_resource_types.watching_file?(file)
watch_file(file)
@lexer.file = file
end
[:hostclass, :definition, :node, :nodes?].each do |method|
define_method(method) do |*args|
known_resource_types.send(method, *args)
end
end
def find_hostclass(namespace, name)
known_resource_types.find_or_load(namespace, name, :hostclass)
end
def find_definition(namespace, name)
known_resource_types.find_or_load(namespace, name, :definition)
end
def import(file)
known_resource_types.loader.import(file, @lexer.file)
end
def initialize(env)
# The environment is needed to know how to find the resource type collection.
@environment = env.is_a?(String) ? Puppet::Node::Environment.new(env) : env
initvars()
end
# Initialize or reset all of our variables.
def initvars
@lexer = Puppet::Parser::Lexer.new()
end
# Split an fq name into a namespace and name
def namesplit(fullname)
ary = fullname.split("::")
n = ary.pop || ""
ns = ary.join("::")
return ns, n
end
# Create a new class, or merge with an existing class.
def newclass(name, options = {})
known_resource_types.add Puppet::Resource::Type.new(:hostclass, name, ast_context(true).merge(options))
end
# Create a new definition.
def newdefine(name, options = {})
known_resource_types.add Puppet::Resource::Type.new(:definition, name, ast_context(true).merge(options))
end
# Create a new node. Nodes are special, because they're stored in a global
# table, not according to namespaces.
def newnode(names, options = {})
names = [names] unless names.instance_of?(Array)
context = ast_context(true)
names.collect do |name|
known_resource_types.add(Puppet::Resource::Type.new(:node, name, context.merge(options)))
end
end
def on_error(token,value,stack)
if token == 0 # denotes end of file
value = 'end of file'
else
value = "'#{value[:value]}'"
end
error = "Syntax error at #{value}"
if brace = @lexer.expected
error += "; expected '#{brace}'"
end
except = Puppet::ParseError.new(error)
except.line = @lexer.line
except.file = @lexer.file if @lexer.file
raise except
end
# how should I do error handling here?
def parse(string = nil)
return parse_ruby_file if self.file =~ /\.rb$/
self.string = string if string
begin
@yydebug = false
main = yyparse(@lexer,:scan)
rescue Racc::ParseError => except
error = Puppet::ParseError.new(except)
error.line = @lexer.line
error.file = @lexer.file
error.set_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
raise except
rescue Puppet::DevError => except
except.line ||= @lexer.line
except.file ||= @lexer.file
raise except
rescue => except
error = Puppet::DevError.new(except.message)
error.line = @lexer.line
error.file = @lexer.file
error.set_backtrace except.backtrace
raise error
end
if main
# Store the results as the top-level class.
newclass("", :code => main)
end
return known_resource_types
ensure
@lexer.clear
end
def parse_ruby_file
require self.file
end
def string=(string)
@lexer.string = string
end
def version
known_resource_types.version
end
# Add a new file to be checked when we're checking to see if we should be
# reparsed. This is basically only used by the TemplateWrapper to let the
# parser know about templates that should be parsed.
def watch_file(filename)
known_resource_types.watch_file(filename)
end
end
|
