aequitas 0.0.1

data/spec_legacy/fixtures/scm_operation.rb

@@ -0,0 +1,56 @@
+#
+# SCMs
+#
+# This example may look stupid (I am sure it is),
+# but it is way better than foobars and easier to read/add cases
+# compared to gardening examples because every software engineer has idea
+# about SCMs and not every software engineer does gardening often.
+#
+
+class ScmOperation
+  include DataMapper::Resource
+
+  #
+  # Property
+  #
+
+  property :id,                 Serial
+
+  # operation name
+  property :name,               String,  :auto_validation => false
+
+  property :committer_name,     String,  :auto_validation => false, :default => "Just another Ruby hacker"
+  property :author_name,        String,  :auto_validation => false, :default => "Just another Ruby hacker"
+  property :network_connection, Boolean, :auto_validation => false
+  property :message,            Text,    :auto_validation => false
+  property :clean_working_copy, Boolean, :auto_validation => false
+
+  #
+  # Validations
+  #
+
+  validates_presence_of :name
+end
+
+class SubversionOperation < ScmOperation
+  #
+  # Validations
+  #
+
+  validates_presence_of :network_connection, :when => [:committing, :log_viewing]
+end
+
+class GitOperation < ScmOperation
+  #
+  # Validations
+  #
+
+  validates_presence_of :author_name, :committer_name, :when => :committing
+
+  validates_presence_of :message,            :when => :committing
+  validates_presence_of :network_connection, :when => [:pushing, :pulling], :message => {
+    :pushing => "though git is advanced, it cannot push without network connectivity",
+    :pulling => "you must have network connectivity to pull from others"
+  }
+  validates_presence_of :clean_working_copy, :when => :pulling
+end

data/spec_legacy/fixtures/sms_message.rb

@@ -0,0 +1,22 @@
+module DataMapper
+  module Validation
+    module Fixtures
+
+      class SmsMessage
+        #
+        # Behaviors
+        #
+
+        include DataMapper::Resource
+
+        #
+        # Properties
+        #
+
+        property :id,   Serial
+        property :body, Text, :length => (1..500)
+      end
+
+    end
+  end
+end

data/spec_legacy/fixtures/udp_packet.rb

@@ -0,0 +1,49 @@
+# -*- coding: utf-8 -*-
+
+module DataMapper
+  module Validation
+    module Fixtures
+
+      class UDPPacket
+        #
+        # Behaviors
+        #
+
+        include DataMapper::Resource
+
+        #
+        # Properties
+        #
+
+        property :id,          Serial
+
+        property :source_port,      Integer, :auto_validation => false
+        property :destination_port, Integer, :auto_validation => false
+
+        property :length,           Integer, :auto_validation => false
+        property :checksum,         String,  :auto_validation => false
+        # consider that there are multiple algorithms
+        # available to the app, and it is allowed
+        # to be chosed
+        #
+        # yes, to some degree, this is a made up
+        # property ;)
+        property :checksum_algorithm, String, :auto_validation => false
+        property :data,               Text,   :auto_validation => false
+
+        #
+        # Volatile attributes
+        #
+
+        attr_accessor :underlying_ip_version
+
+        #
+        # Validations
+        #
+
+        validates_presence_of :checksum_algorithm, :checksum, :if => Proc.new { |packet| packet.underlying_ip_version == 6 }, :message => "Checksum is mandatory when used with IPv6"
+      end
+
+    end # Fixtures
+  end # Validations
+end # DataMapper

data/spec_legacy/integration/absent_field_validator/absent_field_validator_spec.rb

@@ -0,0 +1,90 @@
+require 'spec_helper'
+require 'integration/absent_field_validator/spec_helper'
+
+describe 'DataMapper::Validations::Fixtures::Kayak' do
+  before :all do
+    DataMapper::Validations::Fixtures::Kayak.auto_migrate!
+
+    @kayak = DataMapper::Validations::Fixtures::Kayak.new
+    @kayak.should be_valid_for_sale
+  end
+
+  describe "with salesman being non blank" do
+    before :all do
+      @kayak.salesman = 'Joe'
+    end
+
+    it "is invalid" do
+      @kayak.should_not be_valid_for_sale
+    end
+
+    it "has meaningful error message" do
+      @kayak.errors.on(:salesman).should == [ 'Salesman must be absent' ]
+    end
+  end
+
+
+  describe "with salesman being nil" do
+    before :all do
+      @kayak.salesman = nil
+    end
+
+    it "is valid" do
+      @kayak.should be_valid_for_sale
+    end
+
+    it "has no error messages" do
+      @kayak.errors.on(:salesman).should be_nil
+    end
+  end
+
+
+  describe "with salesman being an empty string" do
+    before :all do
+      @kayak.salesman = ''
+    end
+
+    it "is valid" do
+      @kayak.should be_valid_for_sale
+    end
+
+    it "has no error messages" do
+      @kayak.errors.on(:salesman).should be_nil
+    end
+  end
+
+
+  describe "with salesman being a string of white spaces" do
+    before :all do
+      @kayak.salesman = '    '
+    end
+
+    it "is valid" do
+      @kayak.should be_valid_for_sale
+    end
+
+    it "has no error messages" do
+      @kayak.errors.on(:salesman).should be_nil
+    end
+  end
+end
+
+
+describe 'DataMapper::Validations::Fixtures::Pirogue' do
+  before :all do
+    DataMapper::Validations::Fixtures::Pirogue.auto_migrate!
+
+    @kayak = DataMapper::Validations::Fixtures::Pirogue.new
+    @kayak.should_not be_valid_for_sale
+  end
+
+  describe "by default" do
+    it "is invalid" do
+      @kayak.should_not be_valid_for_sale
+    end
+
+    it "has meaningful error message" do
+      @kayak.errors.on(:salesman).should == [ 'Salesman must be absent' ]
+    end
+  end
+end

data/spec_legacy/integration/absent_field_validator/spec_helper.rb

@@ -0,0 +1,7 @@
+# put validator specific fixture models and helpers here
+#
+# 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/acceptance_validator/acceptance_validator_spec.rb

@@ -0,0 +1,196 @@
+require 'spec_helper'
+require 'integration/acceptance_validator/spec_helper'
+
+describe 'DataMapper::Validations::Fixtures::BetaTesterAccount' do
+  before :all do
+    DataMapper::Validations::Fixtures::BetaTesterAccount.auto_migrate!
+  end
+
+  before do
+    @model = DataMapper::Validations::Fixtures::BetaTesterAccount.new(:user_agreement    => true,
+                                                                   :newsletter_signup => nil,
+                                                                   :privacy_agreement => "accept")
+    @model.should be_valid
+  end
+
+  describe "with a missing newsletter signup field" do
+    before do
+      @model.newsletter_signup = nil
+    end
+
+    it "is perfectly valid" do
+      @model.should be_valid
+    end
+  end
+
+  describe "with a blank newsletter signup field" do
+    before do
+      @model.newsletter_signup = ""
+    end
+
+    it "is NOT valid" do
+      @model.should_not be_valid
+    end
+  end
+
+  describe "with a blank user agreement field" do
+    before do
+      @model.user_agreement = ""
+    end
+
+    it "is NOT valid" do
+      @model.should_not be_valid
+    end
+  end
+
+  describe "with a nil user agreement field" do
+    before do
+      @model.user_agreement = nil
+    end
+
+    it "is NOT valid" do
+      @model.should_not be_valid
+    end
+  end
+
+  describe "with user agreement field having value of 1 (as integer)" do
+    before do
+      @model.user_agreement = 1
+    end
+
+    it "is valid" do
+      @model.should be_valid
+    end
+  end
+
+  describe "with user agreement field having value of 1 (as a string)" do
+    before do
+      @model.user_agreement = "1"
+    end
+
+    it "is valid" do
+      @model.should be_valid
+    end
+  end
+
+  describe "with user agreement field having value of 'true' (as a string)" do
+    before do
+      @model.user_agreement = 'true'
+    end
+
+    it "is valid" do
+      @model.should be_valid
+    end
+  end
+
+  describe "with user agreement field having value of true (TrueClass instance)" do
+    before do
+      @model.user_agreement = true
+    end
+
+    it "is valid" do
+      @model.should be_valid
+    end
+  end
+
+  describe "with user agreement field having value of 't' (The Lisp Way)" do
+    before do
+      @model.user_agreement = 't'
+    end
+
+    it "is valid" do
+      @model.should be_valid
+    end
+  end
+
+  describe "with user agreement field having value of 'f'" do
+    before do
+      @model.user_agreement = 'f'
+    end
+
+    it "is NOT valid" do
+      @model.should_not be_valid
+    end
+  end
+
+  describe "with user agreement field having value of false" do
+    before do
+      @model.user_agreement = false
+    end
+
+    it "is NOT valid" do
+      @model.should_not be_valid
+    end
+  end
+
+  describe "with privacy agreement field having value of 1" do
+    before do
+      @model.privacy_agreement = 1
+    end
+
+    it "is NOT valid" do
+      @model.should_not be_valid
+    end
+  end
+
+  describe "with privacy agreement field having value of true" do
+    before do
+      @model.privacy_agreement = true
+    end
+
+    it "is NOT valid" do
+      @model.should_not be_valid
+    end
+  end
+
+  describe "with privacy agreement field having value of '1'" do
+    before do
+      @model.privacy_agreement = '1'
+    end
+
+    it "is NOT valid" do
+      @model.should_not be_valid
+    end
+  end
+
+  describe "with privacy agreement field having value of 't'" do
+    before do
+      @model.privacy_agreement = 't'
+    end
+
+    it "is NOT valid" do
+      @model.should_not be_valid
+    end
+  end
+
+  describe "with privacy agreement field having value of 'accept'" do
+    before do
+      @model.privacy_agreement = 'accept'
+    end
+
+    it "is valid" do
+      @model.should be_valid
+    end
+  end
+
+  describe "with privacy agreement field having value of 'agreed'" do
+    before do
+      @model.privacy_agreement = 'agreed'
+    end
+
+    it "is valid" do
+      @model.should be_valid
+    end
+  end
+
+  describe "with privacy agreement field having value of 'ah, greed'" do
+    before do
+      @model.privacy_agreement = 'ah, greed'
+    end
+
+    it "is NOT valid" do
+      # greed is invalid? can't be
+      @model.should_not be_valid
+    end
+  end
+end

data/spec_legacy/integration/acceptance_validator/spec_helper.rb

@@ -0,0 +1,7 @@
+# put validator specific fixture models and helpers here
+#
+# 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/automatic_validation/custom_messages_for_inferred_validation_spec.rb

@@ -0,0 +1,57 @@
+require 'spec_helper'
+require 'integration/automatic_validation/spec_helper'
+
+describe 'Inferred validations' do
+  it "allow overriding a single error message" do
+    custom_boat = Class.new do
+      include DataMapper::Resource
+
+      def self.name
+        'Boat'
+      end
+
+      property :id,   DataMapper::Property::Serial
+      property :name, String, :required => true, :message => "This boat must have name"
+    end
+    boat = custom_boat.new
+    boat.should_not be_valid
+    boat.errors.on(:name).should == [ 'This boat must have name' ]
+  end
+
+  it "should have correct error messages" do
+    custom_boat = Class.new do
+      include DataMapper::Resource
+
+      def self.name
+        'Boat'
+      end
+
+      property :id,   DataMapper::Property::Serial
+      property :name, String, :required => true, :length => 5..20, :format => /^[a-z]+$/,
+               :messages => {
+                 :presence => "This boat must have name",
+                 :length => "Name must have at least 4 and at most 20 chars",
+                 :format => "Please use only small letters"
+               }
+    end
+
+    boat = custom_boat.new
+    boat.should_not be_valid
+    boat.errors.on(:name).should == [ 'This boat must have name' ]
+
+    boat.name = "%%"
+    boat.should_not be_valid
+    boat.errors.on(:name).should == [
+      'Name must have at least 4 and at most 20 chars',
+      'Please use only small letters',
+    ]
+
+    boat.name = "%%asd"
+    boat.should_not be_valid
+    boat.errors.on(:name).should == [ 'Please use only small letters' ]
+
+    boat.name = "superboat"
+    boat.should be_valid
+    boat.errors.on(:name).should be_nil
+  end
+end