c66-copper 0.0.1

data/lib/copper/functions/fetch.rb

@@ -0,0 +1,27 @@
+require 'jsonpath'
+
+module Copper
+  module Functions
+	class Fetch < CopperNode
+
+		include ::Copper::ExpressionUtils
+
+		def value(vars = {})
+			key = elements[0].value(vars)
+			context = vars[:context]
+
+			begin
+				path = JsonPath.new(key)
+				result = path.on(context)
+			rescue ArgumentError => exc
+				raise ParseError, "JSONPath error #{key}: #{exc.message}"
+			rescue NoMethodError => exc
+				raise ParseError, "JSONPath error #{key}. Invalid JSONPath"
+			end
+
+			return handle_attributes(result, vars)
+		end
+
+	end
+  end
+end

data/lib/copper/functions/ip_address.rb

@@ -0,0 +1,18 @@
+require 'ipaddress'
+
+module Copper
+  module Functions
+	class IPAddress < CopperNode
+
+		include ::Copper::ExpressionUtils
+
+		def value(vars = {})
+			ipaddress = elements[0].value(vars)
+			result = ::IPAddress.parse(ipaddress)
+
+			return handle_attributes(result, vars)
+		end
+
+	end
+  end
+end

data/lib/copper/grammar/copper.treetop

@@ -0,0 +1,161 @@
+grammar Copper
+
+	rule root
+		(var_definition / rule_definition / comment / comment_block)+ <Root>
+	end
+
+	rule comment
+		s '//' (![\n\r] .)* [\n\r]
+	end
+
+	rule comment_block
+		s '/*' (!'*/' .)* '*/' s
+	end
+
+	rule rule_definition
+		s 'rule' s identifier s action s '{' sn
+			logic sn
+		'}' sn
+		<RuleDefinition>
+	end
+
+	rule var_definition
+		s 'var' s single_var_definition
+		<VarDefinition>
+	end
+
+	rule single_var_definition
+		s identifier s '=' s expression sn <SingleVarDefinition>
+	end
+
+	rule logic
+		s comparison s (logic_right_associated)? sn <Logic>
+	end
+
+	rule range
+		s '(' s expression s '..' s expression s ')' (attributes)? <Range>
+	end
+
+	rule expression
+		s (string / number / boolean / func / variable / set / range) <Expression>
+	end
+
+	rule logic_right_associated
+		logic_op sn logic <LogicRightAssociated>
+	end
+
+	rule action
+		'ensure' <Action>
+	  / 'warn' <Action>
+	end
+
+	rule logic_op
+		  'and' <LogicOp>
+		/ '&' <LogicOp>
+		/  '&&' <LogicOp>
+		/ 'or' <LogicOp>
+		/ '|' <LogicOp>
+		/ '||' <LogicOp>
+		/ '->' <CompOp>
+	end
+
+	rule comparison
+		s expression s comp_op s expression <Comparison>
+	  / s boolean <Boolean>
+	end
+
+	rule func
+		(fetch_func / func_ipaddress)
+	end
+
+	rule fetch_func
+		'fetch' s '(' s (string / variable) s ')' (attributes)? <Functions::Fetch>
+	end
+
+	rule func_ipaddress
+		'ipaddress' s '(' (string / variable) s ')' (attributes)? <Functions::IPAddress>
+	end
+
+	rule attributes
+		sn '.' attribute (attributes_right_associated)? <Attributes>
+	end
+
+	rule attributes_right_associated
+		(attributes) <AttributesRightAssociated>
+	end
+
+	rule attribute
+		identifier attribute_params? <Attribute>
+	end
+
+	rule params
+		s expression s (param_right_associated)? <Param>
+	end
+
+	rule param_right_associated
+		',' s params <ParamRightAssociated>
+	end
+
+	rule attribute_params
+		s '(' s (params) s ')' <AttributeParams>
+	end
+
+	rule set
+		s '[' (params) s ']' (attributes)? <Set>
+	end
+
+	rule variable_identifier
+		[a-zA-Z] [a-zA-Z0-9_]* <VariableIdentifier>
+	end
+
+	rule variable
+		variable_identifier (attributes)? <Variable>
+	end
+
+	rule identifier
+		[a-zA-Z] [a-zA-Z0-9_]* <Identifier>
+	end
+
+	rule number
+		[0-9]+ <Number>
+	end
+
+	rule comp_op
+		'<=' <CompOp>
+		/ '>=' <CompOp>
+		/ '<'  <CompOp>
+		/ '>'  <CompOp>
+		/ '==' <CompOp>
+		/ '='  <CompOp>
+		/ '!=' <CompOp>
+		/ 'in' <CompOp>
+		/ '->' <CompOp>
+	end
+
+	rule boolean
+		'true' <Boolean>
+	  / 'false' <Boolean>
+	  / 'console' <Boolean>
+	end
+
+	rule string
+		'"' string_content '"' (attributes)? <String>
+	end
+
+	rule string_content
+		([^"\\] / "\\" . )* <StringContent>
+	end
+
+	rule sn
+  		s '//' (![\n\r] .)* [\n\r] / s / s [\n\r] / [\n\r]
+	end
+
+	rule s
+		[\s\t]*
+	end
+
+	rule S
+		[\s\t]+
+	end
+
+end

data/lib/copper/identifier.rb

@@ -0,0 +1,9 @@
+module Copper
+	# Node class for an identifier
+	class Identifier < CopperNode
+
+		def value(vars = {})
+			return self.text_value.to_sym
+		end
+	end
+end

data/lib/copper/loader.rb

@@ -0,0 +1,13 @@
+require 'treetop'
+
+# Load the parser from the Treetop grammar.
+Treetop.load(File.join(__dir__, 'grammar', 'copper.treetop'))
+
+require File.join(__dir__, 'data_types', 'data_type')
+# Load custom Copper syntax node.
+require File.join(__dir__, 'copper_node')
+
+require File.join(__dir__, 'expression_utils')
+
+# Load other Copper classes.
+Dir.glob File.join(__dir__, '**', '*.rb'), &method(:require)

data/lib/copper/logic.rb

@@ -0,0 +1,14 @@
+module Copper
+	class Logic < CopperNode
+		def value(vars = {})
+			if elements[1].nil?
+				# no right association
+				return elements[0].value(vars)
+			else
+				# has right association
+				return elements[1].value(vars)
+			end
+		end
+	end
+
+end

data/lib/copper/logic_op.rb

@@ -0,0 +1,7 @@
+module Copper
+	class LogicOp < CopperNode
+		def value(vars = {})
+			return text_value
+		end
+	end
+end

data/lib/copper/logic_right_associated.rb

@@ -0,0 +1,16 @@
+module Copper
+	class LogicRightAssociated < CopperNode
+		def value(vars = {})
+			rhs = self.parent.elements[0].value(vars)
+			op = self.elements[0].value(vars)
+			lhs = self.elements[1].value(vars)
+
+			case op
+			when 'and', '&', '&&'
+				return (lhs and rhs)
+			when 'or', '|', '||'
+				return (lhs or rhs)
+			end
+		end
+	end
+end

data/lib/copper/number.rb

@@ -0,0 +1,10 @@
+module Copper
+	# Node class for a simple number.
+	class Number < CopperNode
+
+		def value(vars = {})
+			return text_value.to_i
+		end
+
+	end
+end

data/lib/copper/param.rb

@@ -0,0 +1,13 @@
+module Copper
+	class Param < CopperNode
+		def value(vars = {})
+			if elements[1].nil?
+				# no right association
+				return elements[0].value(vars)
+			else
+				# has right association
+				return elements[1].value(vars)
+			end
+		end
+	end
+end

data/lib/copper/param_right_associated.rb

@@ -0,0 +1,10 @@
+module Copper
+	class ParamRightAssociated < CopperNode
+		def value(vars = {})
+			rhs = self.parent.elements[0].value(vars)
+			lhs = self.elements[0].value(vars)
+
+			return ([rhs] + [lhs]).flatten
+		end
+	end
+end

data/lib/copper/parser.rb

@@ -0,0 +1,42 @@
+module Copper
+	class Parser
+		def initialize
+			@parser = CopperParser.new
+		end
+
+		def parse(content)
+			root_node = @parser.parse(content)
+
+			# Raise any errors.
+			unless root_node
+				@parser.failure_reason =~ /^(Expected .+) after/m
+				if $1.nil?
+					puts "#{@parser.failure_reason}"
+				else
+					puts "#{$1.gsub("\n", '$NEWLINE')}:"
+				end
+				puts content.lines.to_a[@parser.failure_line - 1]
+				puts "#{'~' * (@parser.failure_column - 1)}^"
+				return nil
+			end
+
+			puts root_node.inspect if $parser_debug
+
+			clean_tree(root_node)
+
+			puts root_node.inspect if $parser_debug
+
+			root_node
+		end
+
+		def cc_parser
+			@parser
+		end
+
+		def clean_tree(root_node)
+			return if(root_node.elements.nil?)
+			root_node.elements.delete_if { |node| !node.is_a?(CopperNode) }
+			root_node.elements.each { |node| self.clean_tree(node) }
+		end
+	end
+end

data/lib/copper/range.rb

@@ -0,0 +1,15 @@
+module Copper
+	class Range < CopperNode
+
+		include ::Copper::ExpressionUtils
+
+		def value(vars = {})
+			lhs = elements[0].value(vars)
+			rhs = elements[1].value(vars)
+
+			return handle_attributes((lhs..rhs), vars)
+		rescue ArgumentError => exc
+			raise RuntimeError, "#{lhs} (#{lhs.class.name})..#{rhs} (#{rhs.class.name}) #{exc.message}"
+		end
+	end
+end

data/lib/copper/root.rb

@@ -0,0 +1,13 @@
+module Copper
+	class Root < CopperNode
+		def value(vars = {})
+			result = []
+			elements.each do |element|
+				parse_result = element.value(vars)
+				result << parse_result unless parse_result.nil?
+			end
+
+			return result
+		end
+	end
+end

data/lib/copper/rule_definition.rb

@@ -0,0 +1,21 @@
+module Copper
+	class RuleDefinition < CopperNode
+
+		def value(vars = {})
+			rules = vars[:rules] || []
+			t = {}
+			t[:name] = elements[0].value(vars)
+
+			raise ParseError, "a rule named #{t[:name]} already exists" if rules.detect { |x| x[:name] == t[:name] }
+
+			t[:outcome] = elements[2].value(vars)
+			t[:action] = elements[1].value(vars)
+
+			rules << t
+			vars[:rules] = rules
+
+			return t
+		end
+
+	end
+end

data/lib/copper/set.rb

@@ -0,0 +1,11 @@
+module Copper
+	class Set < CopperNode
+
+		include ::Copper::ExpressionUtils
+
+		def value(vars = {})
+			return handle_attributes(elements[0].value(vars), vars)
+		end
+
+	end
+end

data/lib/copper/single_var_definition.rb

@@ -0,0 +1,20 @@
+module Copper
+	class SingleVarDefinition < CopperNode
+		RESERVED_VARS = [:semver, :array, :string]
+
+		def value(vars = {})
+			variables = vars[:variables] || {}
+
+			lhr = elements[0].value(vars)
+			rhs = elements[1].value(vars)
+
+			# check for resevered words
+			raise ::Copper::RuntimeError, "#{lhr} is a reserved word" if ::Copper::SingleVarDefinition::RESERVED_VARS.include?(lhr.to_sym)
+
+			variables[lhr.to_sym] = rhs
+			vars[:variables] = variables
+
+			return nil
+		end
+	end
+end

data/lib/copper/string.rb

@@ -0,0 +1,17 @@
+module Copper
+	# Node class for a simple string.
+	class String < CopperNode
+
+		include ::Copper::ExpressionUtils
+
+		def value(vars = {})
+			return handle_attributes(elements[0].value(vars), vars)
+		end
+	end
+
+	class StringContent < CopperNode
+		def value(vars = {})
+			return text_value
+		end
+	end
+end

data/lib/copper/var_definition.rb

@@ -0,0 +1,11 @@
+module Copper
+	class VarDefinition < CopperNode
+		def value(vars = {})
+			elements.each do |element|
+				element.value(vars)
+			end
+
+			return nil
+		end
+	end
+end

data/lib/copper/variable.rb

@@ -0,0 +1,9 @@
+module Copper
+	class Variable < CopperNode
+		include ::Copper::ExpressionUtils
+
+		def value(vars = {})
+			return handle_attributes(elements[0].value(vars), vars)
+		end
+	end
+end

data/lib/copper/variable_identifier.rb

@@ -0,0 +1,15 @@
+module Copper
+	class VariableIdentifier < CopperNode
+
+	def value(vars = {})
+		variables = vars[:variables] || {}
+		identifier = self.text_value.to_sym
+		if variables.has_key?(identifier)
+			return variables[identifier]
+		else
+			raise ::Copper::ParseError, "no variable found with name #{identifier}"
+		end
+	end
+
+	end
+end

data/lib/copper/version.rb

@@ -0,0 +1,5 @@
+module Copper
+	VERSION = '0.0.1'
+	COPYRIGHT_MESSAGE = "(c) 2018 Cloud66 Inc."
+	APP_NAME = 'Copper'
+end

data/lib/copper.rb

@@ -0,0 +1,5 @@
+require_relative 'copper/version'
+require_relative 'copper/loader'
+
+module Copper
+end