claus 0.1.0

data/README.md

@@ -0,0 +1,25 @@
+# Claus
+
+Simple rule expression using a combination of Array and Hash.
+
+## Example
+
+```ruby
+
+require 'claus'
+claus = Claus.new(foo: 1, bar: 2)
+claus.match(foo: 1, bar: 2)           #=> true
+claus.match(foo: 1, bar: 3)           #=> false
+claus.match(foo: 1, bar: 2, baz: 3)   #=> true
+
+claus = Claus.new(foo: 1, bar: 1..2)
+claus.match(foo: 1, bar: 2)           #=> true
+
+claus = Claus.new([{foo:1}, {bar:2}])
+claus.match?(foo: 1)                  #=> true
+claus.match?(bar: 2)                  #=> true
+claus.match?(baz: 3)                  #=> false
+```
+
+# License
+[Creative Commons Attribution - CC BY](http://creativecommons.org/licenses/by/3.0)

data/lib/claus.rb

@@ -0,0 +1,89 @@
+# Santa Claus tells ya if you're naughty or nice.
+#
+# @example
+#   claus = Claus.new(foo: 1, bar: 2)
+#   claus.match(foo: 1, bar: 2)           #=> true
+#   claus.match(foo: 1, bar: 3)           #=> false
+#   claus.match(foo: 1, bar: 2, baz: 3)   #=> true
+#
+#   claus = Claus.new(foo: 1, bar: 1..2)
+#   claus.match(foo: 1, bar: 2)           #=> true
+#
+#   claus = Claus.new([{foo:1}, {bar:2}])
+#   claus.match?(foo: 1)                  #=> true
+#   claus.match?(bar: 2)                  #=> true
+#   claus.match?(baz: 3)                  #=> false
+#
+class Claus
+  def initialize expression
+    @ast = compile(expression)
+  end
+
+  def match? value
+    @ast.match?(value)
+  end
+
+  protected
+    def compile expression
+      case expression
+        when Hash  then AST::Hash.new(expression)
+        when Array then AST::List.new(expression)
+        else       raise ArgumentError, "invalid expression at #{expression}"
+      end
+    end
+
+  module AST
+    class Node
+      attr_reader :ast
+      def initialize expression
+        @ast = compile(expression)
+      end
+
+      def compile expression
+        expression
+      end
+
+      def match? value
+        ast == value
+      end
+    end # Node
+
+    # TODO: refactor case statements
+    class Hash < Node
+      def compile expression
+        expression.each_with_object({}) do |(k, v), h|
+          case v
+            when ::Hash   then h[k] = Hash.new(v)
+            when ::Array  then h[k] = List.new(v)
+            when ::Range  then h[k] = List.new(v)
+            else               h[k] = Node.new(v)
+          end
+        end
+      end
+
+      def match? value
+        ast.each do |k, node|
+          return false unless ::Hash === value && node.match?(value[k])
+        end
+        true
+      end
+    end # Hash
+
+    class List < Node
+      def compile expression
+        expression.map do |v|
+          case v
+            when ::Hash   then Hash.new(v)
+            when ::Array  then List.new(v)
+            when ::Range  then List.new(v)
+            else               Node.new(v)
+          end
+        end
+      end
+
+      def match? value
+        !!ast.find {|node| node.match?(value)}
+      end
+    end # List
+  end # AST
+end # Claus

data/test/helper.rb

@@ -0,0 +1,2 @@
+require 'minitest/autorun'
+require 'claus'

data/test/test_claus.rb

@@ -0,0 +1,43 @@
+require 'helper'
+
+describe 'claus' do
+  it 'should match simple AND conditions' do
+    assert_equal true,  Claus.new(foo: 1).match?(foo: 1)
+    assert_equal false, Claus.new(foo: 1).match?(foo: 2)
+    assert_equal false, Claus.new(foo: 1).match?(bar: 2)
+    assert_equal false, Claus.new(foo: 1).match?(2)
+  end
+
+  it 'should match multiple AND conditions' do
+    assert_equal true,  Claus.new(foo: 1, bar: 2).match?(foo: 1, bar: 2)
+    assert_equal false, Claus.new(foo: 1, bar: 2).match?(foo: 1, bar: 3)
+    assert_equal false, Claus.new(foo: 1, bar: 2).match?(foo: 1)
+  end
+
+  it 'should match simple OR conditions' do
+    assert_equal true,  Claus.new([1, 2]).match?(1)
+    assert_equal true,  Claus.new(foo: [1, 2]).match?(foo: 1)
+    assert_equal true,  Claus.new(foo: [1, 2]).match?(foo: 2)
+    assert_equal true,  Claus.new(foo: 1..2).match?(foo: 1)
+    assert_equal true,  Claus.new(foo: 1..2).match?(foo: 2)
+    assert_equal false, Claus.new(foo: [1, 2]).match?(foo: 3)
+  end
+
+  it 'should match composite AND OR clauses' do
+    assert_equal true,  Claus.new(foo: 1, bar: 1..2).match?(foo: 1, bar: 2)
+    assert_equal false, Claus.new(foo: 1, bar: 1..2).match?(foo: 1, bar: 3)
+    assert_equal false, Claus.new(foo: 1, bar: 1..2).match?(foo: 1)
+    assert_equal true,  Claus.new([{foo: 1}, {bar: 1..2}]).match?(foo: 1)
+    assert_equal true,  Claus.new([{foo: 1}, {bar: 1..2}]).match?(bar: 1)
+    assert_equal false, Claus.new([{foo: 1}, {bar: 1..2}]).match?(foo: 2)
+  end
+
+  it 'should match some wickedly nested ones too' do
+    claus = Claus.new(foo: 1, bar: [{baz: 2}, {bar: 1..2}])
+
+    assert_equal true,  claus.match?(foo: 1, bar: {baz: 2})
+    assert_equal true,  claus.match?(foo: 1, bar: {bar: 1})
+    assert_equal false, claus.match?(foo: 1, bar: {baz: 3})
+    assert_equal false, claus.match?(foo: 1)
+  end
+end

metadata

@@ -0,0 +1,65 @@
+--- !ruby/object:Gem::Specification
+name: claus
+version: !ruby/object:Gem::Version
+  version: 0.1.0
+  prerelease: 
+platform: ruby
+authors:
+- Bharanee Rathna
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-05-18 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+description: simple hash / array based rule matching engine
+email:
+- deepfryed@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- test/helper.rb
+- test/test_claus.rb
+- lib/claus.rb
+- README.md
+homepage: http://github.com/deepfryed/claus
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.23
+signing_key: 
+specification_version: 3
+summary: simple hash / array based rule expression
+test_files: []