predicator 0.4.0 → 1.0.0

data/lib/predicator/lexer.rb

@@ -1,125 +0,0 @@
-require "stringio"
-require "strscan"
-
-module Predicator
-  class Lexer
-    SPACE   = /[ \t\r\n]/
-    DOT     = /\./
-    LPAREN  = /\(/
-    RPAREN  = /\)/
-    NEQ     = /!=/
-    GEQ     = />=/
-    LEQ     = /<=/
-    GT      = />/
-    LT      = /</
-    EQ      = /=/
-    BANG    = /!/
-    DATE    = /(\d{4})-(\d{2})-(\d{2})/i
-    FLOAT   = /[+-]?(?:[0-9_]+\.[0-9_]*|\.[0-9_]+|\d+(?=[eE]))(?:[eE][+-]?[0-9_]+)?\b/
-    INTEGER = /[+-]?\d(_?\d)*\b/
-    TRUE    = /true\b/
-    FALSE   = /false\b/
-    AND     = /and/i
-    OR      = /or/i
-    BETWEEN = /between/i
-    BLANK   = /blank\?/i
-    PRESENT = /present\?/i
-    STRING  = /(["])(?:\\?.)*?\1/
-    IDENTIFIER = /[a-z][A-Za-z0-9_]*/
-
-    def initialize string_or_io
-      io = string_or_io.is_a?(String) ?
-        StringIO.new(string_or_io) :
-        string_or_io
-
-      @ss = StringScanner.new io.read
-      @tokens = []
-      tokenize
-    end
-
-    def next_token
-      @tokens.shift
-    end
-
-    def tokenize
-      until @ss.eos?
-        case
-        when @ss.scan(SPACE)
-          # ignore space
-
-        when text = @ss.scan(DOT)
-          @tokens.push [:tDOT, text]
-
-        when text = @ss.scan(LPAREN)
-          @tokens.push [:tLPAREN, text]
-
-        when text = @ss.scan(RPAREN)
-          @tokens.push [:tRPAREN, text]
-
-        when text = @ss.scan(NEQ)
-          @tokens.push [:tNEQ, text]
-
-        when text = @ss.scan(GEQ)
-          @tokens.push [:tGEQ, text]
-
-        when text = @ss.scan(LEQ)
-          @tokens.push [:tLEQ, text]
-
-        when text = @ss.scan(GT)
-          @tokens.push [:tGT, text]
-
-        when text = @ss.scan(LT)
-          @tokens.push [:tLT, text]
-
-        when text = @ss.scan(EQ)
-          @tokens.push [:tEQ, text]
-
-        when text = @ss.scan(BANG)
-          @tokens.push [:tBANG, text]
-
-        when text = @ss.scan(DATE)
-          args = [ @ss[1], @ss[2], @ss[3] ].map(&:to_i)
-          @tokens.push [:tDATE, args]
-
-        when text = @ss.scan(FLOAT)
-          @tokens.push [:tFLOAT, text]
-
-        when text = @ss.scan(INTEGER)
-          @tokens.push [:tINTEGER, text]
-
-        when text = @ss.scan(TRUE)
-          @tokens.push [:tTRUE, text]
-
-        when text = @ss.scan(FALSE)
-          @tokens.push [:tFALSE, text]
-
-        when text = @ss.scan(AND)
-          @tokens.push [:tAND, text]
-
-        when text = @ss.scan(OR)
-          @tokens.push [:tOR, text]
-
-        when text = @ss.scan(BETWEEN)
-          @tokens.push [:tBETWEEN, text]
-
-        when text = @ss.scan(BLANK)
-          @tokens.push [:tBLANK, text]
-
-        when text = @ss.scan(PRESENT)
-          @tokens.push [:tPRESENT, text]
-
-        when text = @ss.scan(STRING)
-          @tokens.push [:tSTRING, text[1..-2]]
-
-        when text = @ss.scan(IDENTIFIER)
-          @tokens.push [:tIDENTIFIER, text]
-
-        else
-          raise "Unexpected characters: #{@ss.peek(5).inspect}"
-        end
-      end
-
-      @tokens.push [false, false]
-    end
-  end
-end

data/lib/predicator/nodes.rb

@@ -1,6 +0,0 @@
-require "predicator/nodes/base_node"
-require "predicator/nodes/date_node"
-require "predicator/nodes/fixnum_node"
-require "predicator/nodes/float_node"
-require "predicator/nodes/nil_class_node"
-require "predicator/nodes/string_node"

data/lib/predicator/nodes/base_node.rb

@@ -1,53 +0,0 @@
-module Predicator
-  module Nodes
-    class BaseNode
-      attr_reader :value
-
-      def self.class_for value
-        class_name = "#{value.class.name}Node"
-        if ::Predicator::Nodes.const_defined? class_name
-          ::Predicator::Nodes.const_get class_name
-        else
-          raise UnknownNodeTypeError, "Unknown node type for #{value.class} (#{value.inspect})"
-        end
-      end
-
-      def initialize value
-        @value = value
-      end
-
-      def blank?
-        value.respond_to?(:empty?) ?
-          !!value.empty? :
-          !value
-      end
-
-      def present?
-        !blank?
-      end
-
-      def comparison_method
-        "compare_to_#{type}"
-      end
-
-      def compare_to_nil
-        raise NilValueError
-      end
-
-      #def compare_to_date
-      #end
-
-      def compare_to_fixnum
-        value.to_i
-      end
-
-      def compare_to_float
-        value.to_f
-      end
-
-      def compare_to_string
-        value.to_s
-      end
-    end
-  end
-end

data/lib/predicator/nodes/date_node.rb

@@ -1,13 +0,0 @@
-module Predicator
-  module Nodes
-    class DateNode < BaseNode
-      def type
-        :date
-      end
-
-      def compare_to_date
-        value
-      end
-    end
-  end
-end

data/lib/predicator/nodes/fixnum_node.rb

@@ -1,9 +0,0 @@
-module Predicator
-  module Nodes
-    class FixnumNode < BaseNode
-      def type
-        :fixnum
-      end
-    end
-  end
-end

data/lib/predicator/nodes/float_node.rb

@@ -1,9 +0,0 @@
-module Predicator
-  module Nodes
-    class FloatNode < BaseNode
-      def type
-        :float
-      end
-    end
-  end
-end

data/lib/predicator/nodes/nil_class_node.rb

@@ -1,25 +0,0 @@
-module Predicator
-  module Nodes
-    class NilClassNode < BaseNode
-      def type
-        :nil
-      end
-
-      def compare_to_date
-        raise NilValueError
-      end
-
-      def compare_to_fixnum
-        raise NilValueError
-      end
-
-      def compare_to_float
-        raise NilValueError
-      end
-
-      def compare_to_string
-        raise NilValueError
-      end
-    end
-  end
-end

data/lib/predicator/nodes/string_node.rb

@@ -1,13 +0,0 @@
-module Predicator
-  module Nodes
-    class StringNode < BaseNode
-      def type
-        :string
-      end
-
-      def compare_to_date
-        Date.parse value
-      end
-    end
-  end
-end

data/lib/predicator/predicates.rb

@@ -1,14 +0,0 @@
-require "predicator/predicates/relation"
-require "predicator/predicates/equal"
-require "predicator/predicates/not_equal"
-require "predicator/predicates/greater_than"
-require "predicator/predicates/less_than"
-require "predicator/predicates/greater_than_or_equal"
-require "predicator/predicates/less_than_or_equal"
-require "predicator/predicates/between"
-require "predicator/predicates/true"
-require "predicator/predicates/false"
-require "predicator/predicates/and"
-require "predicator/predicates/or"
-require "predicator/predicates/not"
-require "predicator/predicates/method"

data/lib/predicator/predicates/and.rb

@@ -1,20 +0,0 @@
-module Predicator
-  module Predicates
-    class And
-      attr_reader :predicates
-
-      def initialize predicates
-        @predicates = predicates
-      end
-
-      def satisfied? context=Predicator::Context.new
-        predicates.all?{ |pred| pred.satisfied? context }
-      end
-
-      def == other
-        other.kind_of?(self.class) &&
-          other.predicates == predicates
-      end
-    end
-  end
-end

data/lib/predicator/predicates/between.rb

@@ -1,31 +0,0 @@
-module Predicator
-  module Predicates
-    class Between
-      attr_reader :value, :left, :right
-
-      def initialize value, left, right
-        @value, @left, @right = value, left, right
-      end
-
-      def satisfied? context=Predicator::Context.new
-        value_node = context.node_for value
-        left_node = context.node_for left
-        right_node = context.node_for right
-        method = "compare_to_#{value_node.type}"
-
-        left_value = left_node.send method
-        right_value = right_node.send method
-
-        (value_node.value >= left_value) &&
-          (value_node.value <= right_value)
-      end
-
-      def == other
-        other.kind_of?(self.class) &&
-          other.value == value &&
-          other.left == left &&
-          other.right == right
-      end
-    end
-  end
-end

data/lib/predicator/predicates/equal.rb

@@ -1,9 +0,0 @@
-module Predicator
-  module Predicates
-    class Equal < Predicator::Predicates::Relation
-      def compare_values lhs, rhs
-        lhs == rhs
-      end
-    end
-  end
-end

data/lib/predicator/predicates/false.rb

@@ -1,13 +0,0 @@
-module Predicator
-  module Predicates
-    class False
-      def satisfied? context=Predicator::Context.new
-        false
-      end
-
-      def == other
-        other.kind_of?(self.class)
-      end
-    end
-  end
-end

data/lib/predicator/predicates/greater_than.rb

@@ -1,9 +0,0 @@
-module Predicator
-  module Predicates
-    class GreaterThan < Predicator::Predicates::Relation
-      def compare_values lhs, rhs
-        lhs > rhs
-      end
-    end
-  end
-end

data/lib/predicator/predicates/greater_than_or_equal.rb

@@ -1,9 +0,0 @@
-module Predicator
-  module Predicates
-    class GreaterThanOrEqual < Predicator::Predicates::Relation
-      def compare_values lhs, rhs
-        lhs >= rhs
-      end
-    end
-  end
-end

data/lib/predicator/predicates/less_than.rb

@@ -1,9 +0,0 @@
-module Predicator
-  module Predicates
-    class LessThan < Predicator::Predicates::Relation
-      def compare_values lhs, rhs
-        lhs < rhs
-      end
-    end
-  end
-end

data/lib/predicator/predicates/less_than_or_equal.rb

@@ -1,9 +0,0 @@
-module Predicator
-  module Predicates
-    class LessThanOrEqual < Predicator::Predicates::Relation
-      def compare_values lhs, rhs
-        lhs <= rhs
-      end
-    end
-  end
-end

data/lib/predicator/predicates/method.rb

@@ -1,17 +0,0 @@
-module Predicator
-  module Predicates
-    class Method
-      attr_reader :value, :method
-
-      def initialize value, method
-        @value = value
-        @method = method
-      end
-
-      def satisfied? context=Predicator::Context.new
-        node = context.node_for value
-        node.send method
-      end
-    end
-  end
-end

data/lib/predicator/predicates/not.rb

@@ -1,20 +0,0 @@
-module Predicator
-  module Predicates
-    class Not
-      attr_reader :predicate
-
-      def initialize predicate
-        @predicate = predicate
-      end
-
-      def satisfied? context=Predicator::Context.new
-        !predicate.satisfied? context
-      end
-
-      def == other
-        other.kind_of?(self.class) &&
-          other.predicate == predicate
-      end
-    end
-  end
-end