summaryrefslogtreecommitdiff
path: root/lib/puppet/parser
diff options
context:
space:
mode:
Diffstat (limited to 'lib/puppet/parser')
-rw-r--r--lib/puppet/parser/functions/kwalify.rb35
1 files changed, 35 insertions, 0 deletions
diff --git a/lib/puppet/parser/functions/kwalify.rb b/lib/puppet/parser/functions/kwalify.rb
new file mode 100644
index 0000000..7238f84
--- /dev/null
+++ b/lib/puppet/parser/functions/kwalify.rb
@@ -0,0 +1,35 @@
+#
+# kwalify.rb
+#
+
+require 'kwalify'
+
+module Puppet::Parser::Functions
+ newfunction(:kwalify, :type => :statement, :doc => <<-EOS
+This function uses kwalify to validate Puppet data structures against Kwalify
+schemas.
+ EOS
+ ) do |args|
+
+ raise(Puppet::ParseError, "kwalify(): Wrong number of arguments " +
+ "given (#{args.size} for 2)") if args.size != 2
+
+ schema = args[0]
+ document = args[1]
+
+ validator = Kwalify::Validator.new(schema)
+
+ errors = validator.validate(document)
+
+ if errors && !errors.empty?
+ error_out = []
+ for e in errors
+ error_out << "[#{e.path}] #{e.message}"
+ end
+ raise(Puppet::ParseError, "Failed kwalify schema validation:\n" + error_out.join("\n"))
+ end
+
+ end
+end
+
+# vim: set ts=2 sw=2 et :