aequitas 0.0.1

data/spec_legacy/integration/numeric_validator/lt_with_float_type_spec.rb

@@ -0,0 +1,37 @@
+require 'spec_helper'
+require 'integration/numeric_validator/spec_helper'
+
+describe 'DataMapper::Validations::Fixtures::BasketballCourt' do
+  before :all do
+    DataMapper::Validations::Fixtures::BasketballCourt.auto_migrate!
+
+    @model = DataMapper::Validations::Fixtures::BasketballCourt.valid_instance
+    @model.valid?
+  end
+
+  it_should_behave_like "valid model"
+
+
+  describe "with three point line distance of 6.8" do
+    before :all do
+      @model.three_point_line_distance = 6.8
+      @model.valid?
+    end
+
+    it_should_behave_like "valid model"
+  end
+
+
+  describe "with three point line distance of 10.0" do
+    before :all do
+      @model.three_point_line_distance = 10.0
+      @model.valid?
+    end
+
+    it_should_behave_like "invalid model"
+
+    it "has a meaningful error message" do
+      @model.errors.on(:three_point_line_distance).should == [ 'Three point line distance must be less than 7.24' ]
+    end
+  end
+end

data/spec_legacy/integration/numeric_validator/lte_with_float_type_spec.rb

@@ -0,0 +1,37 @@
+require 'spec_helper'
+require 'integration/numeric_validator/spec_helper'
+
+describe 'DataMapper::Validations::Fixtures::BasketballCourt' do
+  before :all do
+    DataMapper::Validations::Fixtures::BasketballCourt.auto_migrate!
+
+    @model = DataMapper::Validations::Fixtures::BasketballCourt.valid_instance
+    @model.valid?
+  end
+
+  it_should_behave_like "valid model"
+
+
+  describe "with length of 15.24" do
+    before :all do
+      @model.length = 15.24
+      @model.valid?
+    end
+
+    it_should_behave_like "valid model"
+  end
+
+
+  describe "with length of 20.0" do
+    before :all do
+      @model.length = 20.0
+      @model.valid?
+    end
+
+    it_should_behave_like "invalid model"
+
+    it "has a meaningful error message" do
+      @model.errors.on(:length).should == [ 'Length must be less than or equal to 15.24' ]
+    end
+  end
+end

data/spec_legacy/integration/numeric_validator/spec_helper.rb

@@ -0,0 +1,5 @@
+# make sure you check out spec/fixtures to see fixture models
+# already written
+#
+# DataMapper developers feels strongly against foobars in the spec
+# suite

data/spec_legacy/integration/primitive_validator/primitive_validator_spec.rb

@@ -0,0 +1,92 @@
+require 'spec_helper'
+require 'integration/primitive_validator/spec_helper'
+
+describe 'DataMapper::Validations::Fixtures::MemoryObject' do
+  include DataMapper::Validations::Fixtures
+
+  before :all do
+    DataMapper::Validations::Fixtures::MemoryObject.auto_migrate!
+
+    @model = DataMapper::Validations::Fixtures::MemoryObject.new
+  end
+
+  describe "with color given as a string" do
+    before :all do
+      @model.color = "grey"
+    end
+
+    it "is valid" do
+      @model.should be_valid
+    end
+  end
+
+
+  describe "with color given as an object" do
+    before :all do
+      # we have to go through the back door
+      # since writer= method does typecasting
+      # and Object is casted to String
+      @model.instance_variable_set(:@color,  Object.new)
+    end
+
+    it "is NOT valid" do
+      @model.should_not be_valid
+    end
+  end
+
+
+  describe "with mark flag set to true" do
+    before :all do
+      @model.marked = true
+    end
+
+    it "is valid" do
+      @model.should be_valid
+    end
+  end
+
+
+  describe "with mark flag set to false" do
+    before :all do
+      @model.marked = false
+    end
+
+    it "is valid" do
+      @model.should be_valid
+    end
+  end
+
+  describe "with mark flag set to an object" do
+    before :all do
+      # go through the back door to avoid typecasting
+      @model.instance_variable_set(:@marked, Object.new)
+    end
+
+    it "is NOT valid" do
+      @model.should_not be_valid
+    end
+  end
+
+
+  describe "with color set to nil" do
+    before :all do
+      # go through the back door to avoid typecasting
+      @model.color = nil
+    end
+
+    it "is valid" do
+      @model.should be_valid
+    end
+  end
+
+
+  describe "with mark flag set to nil" do
+    before :all do
+      @model.marked = nil
+    end
+
+    it "is valid" do
+      @model.should be_valid
+    end
+  end
+end

data/spec_legacy/integration/primitive_validator/spec_helper.rb

@@ -0,0 +1,5 @@
+# make sure you check out spec/fixtures to see fixture models
+# already written
+#
+# DataMapper developers feels strongly against foobars in the spec
+# suite

data/spec_legacy/integration/pure_ruby_objects/plain_old_ruby_object_validation_spec.rb

@@ -0,0 +1,118 @@
+require 'spec_helper'
+
+module PureRubyObjects
+  # notice that it is a pure Ruby class, not a DataMapper resource
+  class Country
+    #
+    # Behaviors
+    #
+
+    include DataMapper::Validations
+
+    #
+    # Validations
+    #
+
+    validates_presence_of :name,       :when => [:default, :adding_to_encyclopedia]
+    validates_presence_of :population, :when => :adding_to_encyclopedia, :message => Proc.new { |record|
+      "population really needs to be specified when adding %s to encyclopedia" % [record.class.name]
+    }
+
+    validates_length_of  :name,       :in => (4..50)
+
+    #
+    # API
+    #
+
+    attr_accessor :name, :population
+
+    def initialize(name, population = nil)
+      @name       = name
+      @population = population
+    end
+  end
+end
+
+describe 'PureRubyObjects::Country' do
+  before do
+    # Powerset says so
+    @model = PureRubyObjects::Country.new("Italy", 58_147_733)
+  end
+
+  describe "without name" do
+    before do
+      @model.name = nil
+    end
+
+    it_should_behave_like "object invalid in default context"
+
+    it "is not valid in encyclopedia context" do
+      @model.should_not be_valid(:adding_to_encyclopedia)
+      @model.should_not be_valid_for_adding_to_encyclopedia
+    end
+  end
+
+
+  describe "without name and without population information" do
+    before do
+      @model.name       = nil
+      @model.population = nil
+    end
+
+    it_should_behave_like "object invalid in default context"
+
+    it "is not valid in encyclopedia context" do
+      @model.should_not be_valid(:adding_to_encyclopedia)
+      @model.should_not be_valid_for_adding_to_encyclopedia
+    end
+
+    it "has a meaningful error message" do
+      # trigger validation => have errors on the object
+      @model.valid_for_adding_to_encyclopedia?
+      @model.errors.on(:population).should == ["population really needs to be specified when adding PureRubyObjects::Country to encyclopedia"]
+    end
+  end
+
+
+  describe "with name and without population information" do
+    before do
+      @model.population = nil
+    end
+
+    it_should_behave_like "object valid in default context"
+
+    it "is not valid in encyclopedia context" do
+      @model.should_not be_valid(:adding_to_encyclopedia)
+      @model.should_not be_valid_for_adding_to_encyclopedia
+    end
+  end
+
+
+  describe "with name and population information" do
+    it_should_behave_like "object valid in default context"
+
+    it "is valid in encyclopedia context" do
+      @model.should be_valid(:adding_to_encyclopedia)
+      @model.should be_valid_for_adding_to_encyclopedia
+    end
+  end
+
+
+  describe "with a 2 characters long name" do
+    before do
+      @model.name = "It"
+      @model.valid?
+    end
+
+    it_should_behave_like "object invalid in default context"
+
+    it "has errors on name" do
+      @model.errors.on(:name).should_not be_empty
+    end
+
+    it "is valid in encyclopedia context" do
+      @model.should be_valid(:adding_to_encyclopedia)
+      @model.should be_valid_for_adding_to_encyclopedia
+    end
+  end
+end

data/spec_legacy/integration/required_field_validator/association_spec.rb

@@ -0,0 +1,69 @@
+require 'spec_helper'
+require 'integration/required_field_validator/spec_helper'
+
+describe 'required_field_validator/association_spec' do
+
+  before :all do
+
+    class ::Artist
+
+      include DataMapper::Resource
+
+      property :id,   Serial
+      property :name, String,  :auto_validation => false
+
+      has n, :albums
+
+      validates_presence_of :name
+
+    end
+
+    class ::Album
+
+      include DataMapper::Resource
+
+      property :id,        Serial
+      property :name,      String,  :auto_validation => false
+      property :artist_id, Integer, :index => :artist
+
+      belongs_to :artist
+
+      validates_presence_of :name, :artist
+
+    end
+
+    Artist.auto_migrate!
+    Album.auto_migrate!
+  end
+
+
+  describe 'Album' do
+
+    before do
+      @artist = Artist.create(:name => "Oceanlab")
+      @album  = @artist.albums.new(:name => "Sirens of the sea")
+    end
+
+    describe 'with a missing artist' do
+      before do
+        @album.artist = nil
+      end
+
+      it 'is not valid' do
+        @album.should_not be_valid
+      end
+
+      it 'has a meaninful error messages on association key property' do
+        @album.valid?
+        @album.errors.on(:artist).should == [ 'Artist must not be blank' ]
+      end
+    end
+
+    describe 'with specified artist and name' do
+      it 'is valid' do
+        @album.should be_valid
+      end
+    end
+  end
+
+end

data/spec_legacy/integration/required_field_validator/boolean_type_value_spec.rb

@@ -0,0 +1,164 @@
+require 'spec_helper'
+require 'integration/required_field_validator/spec_helper'
+
+describe 'required_field_validator/boolean_type_value_spec' do
+
+  # keep in mind any ScmOperation has a default value for brand property
+  # so it is used
+  describe 'GitOperation' do
+    before :all do
+      GitOperation.auto_migrate!
+    end
+
+    before do
+      @operation = GitOperation.new(:network_connection => true,
+                                    :clean_working_copy => true,
+                                    :message            => "I did it! I did it!! Hell yeah!!!")
+    end
+
+    describe "without operation name" do
+      before do
+        @operation.name = nil
+      end
+      it_should_behave_like "unnamed SCM operation"
+    end
+
+
+
+    describe "without network connection" do
+      before do
+        # now note that false make sense from readability
+        # point of view but is incorrect from validator
+        # point of view ;)
+        @operation.network_connection = nil
+      end
+
+      it "is valid for committing" do
+        @operation.should be_valid_for_committing
+        @operation.errors.on(:network_connection).should be_nil
+      end
+
+      it "is not valid for pushing" do
+        @operation.should_not be_valid_for_pushing
+        # Note: the previous API supported error messages as Hashes (context)
+        #   I will remove that capability, such that a Rule only stores the
+        #   message for the context to which the Rule is bound
+        #   This will provide the same information, but with a simpler API
+        # @operation.errors.on(:network_connection).
+        #   first.should == 'though git is advanced, it cannot push without network connectivity'
+        @operation.errors.on(:network_connection).
+          first[:pushing].should == 'though git is advanced, it cannot push without network connectivity'
+      end
+
+      it "is not valid for pulling" do
+        @operation.should_not be_valid_for_pulling
+        # NOTE: See previous spec, above
+        @operation.errors.on(:network_connection).
+          first[:pulling].should == 'you must have network connectivity to pull from others'
+        # @operation.errors.on(:network_connection).
+        #   first.should == 'you must have network connectivity to pull from others'
+      end
+
+      it "is not valid in default context" do
+        @operation.should_not be_valid
+      end
+    end
+
+    describe "with a network connection" do
+      before do
+        @operation.network_connection = false
+      end
+
+      it "is valid for committing" do
+        @operation.should be_valid_for_committing
+      end
+
+      it "is valid for pushing" do
+        @operation.should be_valid_for_pushing
+      end
+
+      it "is valid for pulling" do
+        @operation.should be_valid_for_pulling
+      end
+
+      it "is not valid in default context" do
+        @operation.should_not be_valid
+      end
+    end
+
+
+    describe "WITHOUT a clean working copy" do
+      before do
+        @operation.clean_working_copy = nil
+      end
+
+      it "is valid for committing" do
+        @operation.should be_valid_for_committing
+      end
+
+      it "is valid for pushing" do
+        @operation.should be_valid_for_pushing
+      end
+
+      it "is not valid for pulling" do
+        @operation.should_not be_valid_for_pulling
+      end
+
+      it "is not valid in default context" do
+        @operation.should_not be_valid
+      end
+    end
+
+    describe "with a clean working copy" do
+      before do
+        @operation.clean_working_copy = true
+      end
+
+      it "is valid for committing" do
+        @operation.should be_valid_for_committing
+      end
+
+      it "is valid for pushing" do
+        @operation.should be_valid_for_pushing
+      end
+
+      it "is valid for pulling" do
+        @operation.should be_valid_for_pulling
+      end
+
+      it "is not valid in default context" do
+        @operation.should_not be_valid
+      end
+    end
+  end
+
+
+  describe 'SubversionOperation' do
+    before do
+      SubversionOperation.auto_migrate!
+
+      @operation = SubversionOperation.new :name    => "ci", :network_connection => true,
+                                           :message => "v1.5.8", :clean_working_copy => true
+    end
+
+    describe "without operation name" do
+      before do
+        @operation.name = nil
+      end
+      it_should_behave_like "unnamed SCM operation"
+    end
+
+    describe "without network connection" do
+      before do
+        @operation.network_connection = nil
+      end
+
+      it "virtually useless" do
+        @operation.should_not be_valid_for_committing
+        @operation.should_not be_valid_for_log_viewing
+      end
+    end
+  end
+
+
+end