require 'test_helper'

class TestRails < Test::Unit::TestCase
  context "Document" do
    setup do
      @klass = Doc('Post') do
        key :foo, String
      end
    end
    
    context "Class methods" do
      should "alias has_many to many" do
        @klass.should respond_to(:has_many)
      end

      should "alias has_one to one" do
        @klass.should respond_to(:has_one)
      end
      
      should "have column names" do
        @klass.column_names.sort.should == ['_id', 'foo']
      end

      should "implement human_name" do
        @klass.human_name.should == 'Post'
      end
    end
    
    context "Instance methods" do
      setup do
        @klass.class_eval do
          def bar=(value)
            write_attribute(:foo, value)
          end
          
          def bar_before_typecast
            read_attribute_before_typecast(:foo)
          end
          
          def bar
            read_attribute(:foo)
          end
        end
      end
      
      should "alias new_record? to new?" do
        @klass.new.should be_new_record
      end
      
      should "be able to read key with read_attribute" do
        @klass.new(:foo => 'Bar').bar.should == 'Bar'
      end
      
      should "be able to read key before typecast with read_attribute_before_typecast" do
        @klass.new(:foo => 21).bar_before_typecast.should == 21
        @klass.new(:foo => 21).bar.should == '21'
      end
      
      should "be able to write key with write_attribute" do
        @klass.new(:bar => 'Setting Foo').foo.should == 'Setting Foo'
      end
    end
  end
  
  context "EmbeddedDocument" do
    setup do
      @klass = EDoc('Post') { key :foo, String }
    end
    
    context "Class methods" do
      should "alias has_many to many" do
        @klass.should respond_to(:has_many)
      end

      should "alias has_one to one" do
        @klass.should respond_to(:has_one)
      end
      
      should "have column names" do
        @klass.column_names.sort.should == ['_id', 'foo']
      end

      should "implement human_name" do
        @klass.human_name.should == 'Post'
      end
    end
    
    context "Instance methods" do
      setup do
        @klass.class_eval do
          def bar=(value)
            write_attribute(:foo, value)
          end
          
          def bar_before_typecast
            read_attribute_before_typecast(:foo)
          end
          
          def bar
            read_attribute(:foo)
          end
        end
      end
      
      should "alias new_record? to new?" do
        @klass.new.should be_new_record
      end
      
      should "be able to read key with read_attribute" do
        @klass.new(:foo => 'Bar').bar.should == 'Bar'
      end
      
      should "be able to read key before typecast with read_attribute_before_typecast" do
        @klass.new(:foo => 21).bar_before_typecast.should == 21
        @klass.new(:foo => 21).bar.should == '21'
      end
      
      should "be able to write key with write_attribute" do
        @klass.new(:bar => 'Setting Foo').foo.should == 'Setting Foo'
      end
    end
  end
end