arel-compat 0.4.0

data/lib/arel/engines/sql/relations/utilities/nil.rb

@@ -0,0 +1,6 @@
+module Arel
+  class Nil
+    def table_sql(formatter = nil); '' end
+    def name; '' end
+  end
+end

data/lib/arel/engines/sql/relations/utilities/recursion.rb

@@ -0,0 +1,13 @@
+module Arel
+  module Recursion
+    module BaseCase
+      def table
+        self
+      end
+
+      def table_sql(formatter = Sql::TableReference.new(self))
+        formatter.table self
+      end
+    end
+  end
+end

data/lib/arel/engines/sql/relations/writes.rb

@@ -0,0 +1,19 @@
+module Arel
+  class Deletion < Compound
+    def to_sql
+      compiler.delete_sql
+    end
+  end
+
+  class Insert < Compound
+    def to_sql(include_returning = true)
+      compiler.insert_sql(include_returning)
+    end
+  end
+
+  class Update < Compound
+    def to_sql
+      compiler.update_sql
+    end
+  end
+end

data/lib/arel/session.rb

@@ -0,0 +1,51 @@
+module Arel
+  class Session
+    class << self
+      attr_accessor :instance
+      alias_method :manufacture, :new
+
+      def start
+        if defined?(@started) && @started
+          yield
+        else
+          begin
+            @started = true
+            @instance = manufacture
+            singleton_class.class_eval do
+              undef :new
+              alias_method :new, :instance
+            end
+            yield
+          ensure
+            singleton_class.class_eval do
+              undef :new
+              alias_method :new, :manufacture
+            end
+            @started = false
+          end
+        end
+      end
+    end
+
+    module CRUD
+      def create(insert)
+        insert.call
+      end
+
+      def read(select)
+        (@read ||= Hash.new do |hash, select|
+          hash[select] = select.call
+        end)[select]
+      end
+
+      def update(update)
+        update.call
+      end
+
+      def delete(delete)
+        delete.call
+      end
+    end
+    include CRUD
+  end
+end

data/lib/arel/version.rb

@@ -0,0 +1,3 @@
+module Arel
+  VERSION = "0.4.0" unless defined?(Arel::VERSION)
+end

data/spec/algebra/unit/predicates/binary_spec.rb

@@ -0,0 +1,35 @@
+require 'spec_helper'
+
+module Arel
+  module Predicates
+    describe Binary do
+      before do
+        @relation = Arel::Table.new(:users)
+        @attribute1 = @relation[:id]
+        @attribute2 = @relation[:name]
+        class ConcreteBinary < Binary
+        end
+      end
+
+      describe '#bind' do
+        before do
+          @another_relation = @relation.alias
+        end
+
+        describe 'when both operands are attributes' do
+          it "manufactures an expression with the attributes bound to the relation" do
+            ConcreteBinary.new(@attribute1, @attribute2).bind(@another_relation). \
+              should == ConcreteBinary.new(@another_relation[@attribute1], @another_relation[@attribute2])
+          end
+        end
+
+        describe 'when an operand is a value' do
+          it "manufactures an expression with unmodified values" do
+            ConcreteBinary.new(@attribute1, "asdf").bind(@another_relation). \
+              should == ConcreteBinary.new(@attribute1.find_correlate_in(@another_relation), "asdf".find_correlate_in(@another_relation))
+          end
+        end
+      end
+    end
+  end
+end

data/spec/algebra/unit/predicates/equality_spec.rb

@@ -0,0 +1,29 @@
+require 'spec_helper'
+
+module Arel
+  module Predicates
+    describe Equality do
+      before do
+        @relation1 = Arel::Table.new(:users)
+        @relation2 = Arel::Table.new(:photos)
+        @attribute1 = @relation1[:id]
+        @attribute2 = @relation2[:user_id]
+      end
+
+      describe '==' do
+        it "obtains if attribute1 and attribute2 are identical" do
+          check Equality.new(@attribute1, @attribute2).should == Equality.new(@attribute1, @attribute2)
+          Equality.new(@attribute1, @attribute2).should_not == Equality.new(@attribute1, @attribute1)
+        end
+
+        it "obtains if the concrete type of the predicates are identical" do
+          Equality.new(@attribute1, @attribute2).should_not == Binary.new(@attribute1, @attribute2)
+        end
+
+        it "is commutative on the attributes" do
+          Equality.new(@attribute1, @attribute2).should == Equality.new(@attribute2, @attribute1)
+        end
+      end
+    end
+  end
+end

data/spec/algebra/unit/predicates/in_spec.rb

@@ -0,0 +1,12 @@
+require 'spec_helper'
+
+module Arel
+  module Predicates
+    describe In do
+      before do
+        @relation = Table.new(:users)
+        @attribute = @relation[:id]
+      end
+    end
+  end
+end

data/spec/algebra/unit/primitives/attribute_spec.rb

@@ -0,0 +1,181 @@
+require 'spec_helper'
+
+module Arel
+  describe Attribute do
+    before do
+      @relation = Table.new(:users)
+      @attribute = @relation[:id]
+    end
+
+    describe "#inspect" do
+      it "returns a simple, short inspect string" do
+        @attribute.inspect.should == "<Attribute id>"
+      end
+    end
+
+    describe Attribute::Transformations do
+      describe '#as' do
+        it "manufactures an aliased attributed" do
+          @attribute.as(:alias).should == Attribute.new(@relation, @attribute.name, :alias => :alias, :ancestor => @attribute)
+        end
+      end
+
+      describe '#bind' do
+        it "manufactures an attribute with the relation bound and self as an ancestor" do
+          derived_relation = @relation.where(@relation[:id].eq(1))
+          @attribute.bind(derived_relation).should == Attribute.new(derived_relation, @attribute.name, :ancestor => @attribute)
+        end
+
+        it "returns self if the substituting to the same relation" do
+          @attribute.bind(@relation).should == @attribute
+        end
+      end
+
+      describe '#to_attribute' do
+        describe 'when the given relation is the same as the attributes relation' do
+          it "returns self" do
+            @attribute.to_attribute(@relation).should == @attribute
+          end
+        end
+
+        describe 'when the given relation differs from the attributes relation' do
+          it 'binds to the new relation' do
+            @attribute.to_attribute(new_relation = @relation.alias).should == @attribute.bind(new_relation)
+          end
+        end
+      end
+    end
+
+    describe '#column' do
+      it "returns the corresponding column in the relation" do
+        @attribute.column.should == @relation.column_for(@attribute)
+      end
+    end
+
+    describe '#engine' do
+      it "delegates to its relation" do
+        Attribute.new(@relation, :id).engine.should == @relation.engine
+      end
+    end
+
+    describe Attribute::Congruence do
+      describe '/' do
+        before do
+          @aliased_relation = @relation.alias
+          @doubly_aliased_relation = @aliased_relation.alias
+        end
+
+        describe 'when dividing two unrelated attributes' do
+          it "returns 0.0" do
+            (@relation[:id] / @relation[:name]).should == 0.0
+          end
+        end
+
+        describe 'when dividing two matching attributes' do
+          it 'returns a the highest score for the most similar attributes' do
+            check((@aliased_relation[:id] / @relation[:id]).should == (@aliased_relation[:id] / @relation[:id]))
+            (@aliased_relation[:id] / @relation[:id]).should < (@aliased_relation[:id] / @aliased_relation[:id])
+          end
+        end
+      end
+    end
+
+    describe Attribute::Predications do
+      before do
+        @attribute = Attribute.new(@relation, :name)
+      end
+
+      describe '#eq' do
+        it "manufactures an equality predicate" do
+          @attribute.eq('name').should == Predicates::Equality.new(@attribute, 'name')
+        end
+      end
+
+      describe '#lt' do
+        it "manufactures a less-than predicate" do
+          @attribute.lt(10).should == Predicates::LessThan.new(@attribute, 10)
+        end
+      end
+
+      describe '#lteq' do
+        it "manufactures a less-than or equal-to predicate" do
+          @attribute.lteq(10).should == Predicates::LessThanOrEqualTo.new(@attribute, 10)
+        end
+      end
+
+      describe '#gt' do
+        it "manufactures a greater-than predicate" do
+          @attribute.gt(10).should == Predicates::GreaterThan.new(@attribute, 10)
+        end
+      end
+
+      describe '#gteq' do
+        it "manufactures a greater-than or equal-to predicate" do
+          @attribute.gteq(10).should == Predicates::GreaterThanOrEqualTo.new(@attribute, 10)
+        end
+      end
+
+      describe '#matches' do
+        it "manufactures a match predicate" do
+          @attribute.matches(/.*/).should == Predicates::Match.new(@attribute, /.*/)
+        end
+      end
+
+      describe '#in' do
+        it "manufactures an in predicate" do
+          @attribute.in(1..30).should == Predicates::In.new(@attribute, (1..30))
+        end
+      end
+    end
+
+    describe Attribute::Expressions do
+      before do
+        @attribute = Attribute.new(@relation, :name)
+      end
+
+      describe '#count' do
+        it "manufactures a count Expression" do
+          @attribute.count.should == Count.new(@attribute)
+        end
+      end
+
+      describe '#sum' do
+        it "manufactures a sum Expression" do
+          @attribute.sum.should == Sum.new(@attribute)
+        end
+      end
+
+      describe '#maximum' do
+        it "manufactures a maximum Expression" do
+          @attribute.maximum.should == Maximum.new(@attribute)
+        end
+      end
+
+      describe '#minimum' do
+        it "manufactures a minimum Expression" do
+          @attribute.minimum.should == Minimum.new(@attribute)
+        end
+      end
+
+      describe '#average' do
+        it "manufactures an average Expression" do
+          @attribute.average.should == Average.new(@attribute)
+        end
+      end
+    end
+
+    describe Attribute::Orderings do
+      describe '#asc' do
+        it 'manufactures an ascending ordering' do
+          @attribute.asc.should == Ascending.new(@attribute)
+        end
+      end
+
+      describe '#desc' do
+        it 'manufactures a descending ordering' do
+          @attribute.desc.should == Descending.new(@attribute)
+        end
+      end
+    end
+  end
+end

data/spec/algebra/unit/primitives/expression_spec.rb

@@ -0,0 +1,45 @@
+require 'spec_helper'
+
+module Arel
+  describe Expression do
+    before do
+      @relation = Table.new(:users)
+      @attribute = @relation[:id]
+    end
+
+    describe "#inspect" do
+      it "returns a simple, short inspect string" do
+        @attribute.count.inspect.should == "<Arel::Count <Attribute id>>"
+      end
+    end
+
+    describe Expression::Transformations do
+      before do
+        @expression = Count.new(@attribute)
+      end
+
+      describe '#bind' do
+        it "manufactures an attribute with a rebound relation and self as the ancestor" do
+          derived_relation = @relation.where(@relation[:id].eq(1))
+          @expression.bind(derived_relation).should == Count.new(@attribute.bind(derived_relation), nil, @expression)
+        end
+
+        it "returns self if the substituting to the same relation" do
+          @expression.bind(@relation).should == @expression
+        end
+      end
+
+      describe '#as' do
+        it "manufactures an aliased expression" do
+          @expression.as(:alias).should == Expression.new(@attribute, :alias, @expression)
+        end
+      end
+
+      describe '#to_attribute' do
+        it "manufactures an attribute with the expression as an ancestor" do
+          @expression.to_attribute(@relation).should == Attribute.new(@relation, @expression.alias, :ancestor => @expression)
+        end
+      end
+    end
+  end
+end

data/spec/algebra/unit/primitives/value_spec.rb

@@ -0,0 +1,15 @@
+require 'spec_helper'
+
+module Arel
+  describe Value do
+    before do
+      @relation = Table.new(:users)
+    end
+
+    describe '#bind' do
+      it "manufactures a new value whose relation is the provided relation" do
+        Value.new(1, @relation).bind(another_relation = Table.new(:photos)).should == Value.new(1, another_relation)
+      end
+    end
+  end
+end

data/spec/algebra/unit/relations/alias_spec.rb

@@ -0,0 +1,16 @@
+require 'spec_helper'
+
+module Arel
+  describe Alias do
+    before do
+      @relation = Table.new(:users)
+    end
+
+    describe '==' do
+      it "obtains if the objects are the same" do
+        check Alias.new(@relation).should_not == Alias.new(@relation)
+        (aliaz = Alias.new(@relation)).should == aliaz
+      end
+    end
+  end
+end

data/spec/algebra/unit/relations/delete_spec.rb

@@ -0,0 +1,9 @@
+require 'spec_helper'
+
+module Arel
+  describe Deletion do
+    before do
+      @relation = Table.new(:users)
+    end
+  end
+end