ardm-types 1.2.2

data/spec/shared/flags_shared_spec.rb

@@ -0,0 +1,37 @@
+share_examples_for "A property with flags" do
+  before :all do
+    %w[ @property_klass ].each do |ivar|
+      raise "+#{ivar}+ should be defined in before block" unless instance_variable_defined?(ivar)
+    end
+
+    @flags = [ :one, :two, :three ]
+
+    class ::User
+      include DataMapper::Resource
+    end
+
+    @property = User.property :item, @property_klass[@flags], :key => true
+  end
+
+  describe ".generated_classes" do
+    it "should cache the generated class" do
+      @property_klass.generated_classes[@flags].should_not be_nil
+    end
+  end
+
+  it "should include :flags in accepted_options" do
+    @property_klass.accepted_options.should include(:flags)
+  end
+
+  it "should respond to :generated_classes" do
+    @property_klass.should respond_to(:generated_classes)
+  end
+
+  it "should respond to :flag_map" do
+    @property.should respond_to(:flag_map)
+  end
+
+  it "should be custom" do
+    @property.custom?.should be(true)
+  end
+end

data/spec/shared/identity_function_group.rb

@@ -0,0 +1,5 @@
+describe "identity function", :shared => true do
+  it "returns value unchanged" do
+    @result.should == @input
+  end
+end

data/spec/spec.opts

@@ -0,0 +1,4 @@
+--colour
+--loadby random
+--format profile
+--backtrace

data/spec/spec_helper.rb

@@ -0,0 +1,30 @@
+require 'dm-core/spec/setup'
+require 'dm-core/spec/lib/adapter_helpers'
+
+require 'dm-types'
+require 'dm-migrations'
+require 'dm-validations'
+
+Dir["#{Pathname(__FILE__).dirname.expand_path}/shared/*.rb"].each { |file| require file }
+
+DataMapper::Spec.setup
+
+Spec::Runner.configure do |config|
+  config.extend(DataMapper::Spec::Adapters::Helpers)
+end
+
+DEPENDENCIES = {
+  'bcrypt' => 'bcrypt-ruby',
+}
+
+def try_spec
+  begin
+    yield
+  rescue LoadError => error
+    raise error unless lib = error.message.match(/\Ano such file to load -- (.+)\z/)[1]
+
+    gem_location = DEPENDENCIES[lib] || raise("Unknown lib #{lib}")
+
+    warn "[WARNING] Skipping specs using #{lib}, please do: gem install #{gem_location}"
+  end
+end

data/spec/unit/bcrypt_hash_spec.rb

@@ -0,0 +1,155 @@
+require 'spec_helper'
+
+try_spec do
+  describe DataMapper::Property::BCryptHash do
+    before :all do
+      @clear_password   = 'DataMapper R0cks!'
+      @crypted_password = BCrypt::Password.create(@clear_password)
+
+      @nonstandard_type = 1
+
+      class ::TestType
+        @a = 1
+        @b = 'Hi There'
+      end
+      @nonstandard_type2 = TestType.new
+
+      class ::User
+        include DataMapper::Resource
+        property :id, Serial
+        property :password, BCryptHash
+      end
+
+      @bcrypt_hash = User.properties[:password]
+    end
+
+    describe '.dump' do
+      describe 'when argument is a string' do
+        before :all do
+          @input  = 'DataMapper'
+          @result = @bcrypt_hash.dump(@input)
+        end
+
+        it 'returns instance of BCrypt::Password' do
+          @result.should be_an_instance_of(BCrypt::Password)
+        end
+
+        it 'returns a string that is 60 characters long' do
+          @result.size.should == 60
+        end
+      end
+
+      describe 'when argument is nil' do
+        before :all do
+          @input  = nil
+          @result = @bcrypt_hash.dump(@input)
+        end
+
+        it 'returns nil' do
+          @result.should be_nil
+        end
+      end
+    end
+
+    describe '.load' do
+      describe 'when argument is a string' do
+        before :all do
+          @input  = 'DataMapper'
+          @result = @bcrypt_hash.load(@crypted_password)
+        end
+
+        it 'returns instance of BCrypt::Password' do
+          @result.should be_an_instance_of(BCrypt::Password)
+        end
+
+        it 'returns a string that matches original' do
+          @result.should == @clear_password
+        end
+      end
+
+      describe 'when argument is nil' do
+        before :all do
+          @input  = nil
+          @result = @bcrypt_hash.load(@input)
+        end
+
+        it 'returns nil' do
+          @result.should be_nil
+        end
+      end
+    end
+
+    describe '.typecast' do
+      describe 'when argument is a string' do
+        before :all do
+          @input  = 'bcrypt hash'
+          @result = @bcrypt_hash.typecast(@input)
+        end
+
+        it 'casts argument to BCrypt::Password' do
+          @result.should be_an_instance_of(BCrypt::Password)
+        end
+
+        it 'casts argument to value that matches input' do
+          @result.should == @input
+        end
+      end
+
+      describe 'when argument is a blank string' do
+        before :all do
+          @input  = ''
+          @result = @bcrypt_hash.typecast(@input)
+        end
+
+        it 'casts argument to BCrypt::Password' do
+          @result.should be_an_instance_of(BCrypt::Password)
+        end
+
+        it 'casts argument to value that matches input' do
+          @result.should == @input
+        end
+      end
+
+      describe 'when argument is integer' do
+        before :all do
+          @input  = 2249
+          @result = @bcrypt_hash.typecast(@input)
+        end
+
+        it 'casts argument to BCrypt::Password' do
+          @result.should be_an_instance_of(BCrypt::Password)
+        end
+
+        it 'casts argument to value that matches input' do
+          @result.should == @input
+        end
+      end
+
+      describe 'when argument is hash' do
+        before :all do
+          @input  = { :cryptic => 'obscure' }
+          @result = @bcrypt_hash.typecast(@input)
+        end
+
+        it 'casts argument to BCrypt::Password' do
+          @result.should be_an_instance_of(BCrypt::Password)
+        end
+
+        it 'casts argument to value that matches input' do
+          @result.should == @input
+        end
+      end
+
+      describe 'when argument is nil' do
+        before :all do
+          @input  = nil
+          @result = @bcrypt_hash.typecast(@input)
+        end
+
+        it 'returns nil' do
+          @result.should be_nil
+        end
+      end
+    end
+  end
+end

data/spec/unit/csv_spec.rb

@@ -0,0 +1,142 @@
+require 'spec_helper'
+
+try_spec do
+  describe DataMapper::Property::Csv do
+    supported_by :all do
+      before :all do
+        class ::User
+          include DataMapper::Resource
+          property :id, Serial
+          property :things, Csv
+        end
+
+        @property = User.properties[:things]
+      end
+
+      describe '.load' do
+        describe 'when argument is a comma separated string' do
+          before :all do
+            @input  = 'uno,due,tre'
+            @result = @property.load(@input)
+          end
+
+          it 'parses the argument using CVS parser' do
+            @result.should == [ %w[ uno due tre ] ]
+          end
+        end
+
+        describe 'when argument is an empty array' do
+          before :all do
+            @input    = []
+            @result   = @property.load(@input)
+          end
+
+          it 'does not change the input' do
+            @result.should == @input
+          end
+        end
+
+        describe 'when argument is an empty hash' do
+          before :all do
+            @input    = {}
+            @result   = @property.load(@input)
+          end
+
+          it 'returns nil' do
+            @result.should be_nil
+          end
+        end
+
+        describe 'when argument is nil' do
+          before :all do
+            @input    = nil
+            @result   = @property.load(@input)
+          end
+
+          it 'returns nil' do
+            @result.should be_nil
+          end
+        end
+
+        describe 'when argument is an integer' do
+          before :all do
+            @input    = 7
+            @result   = @property.load(@input)
+          end
+
+          it 'returns nil' do
+            @result.should be_nil
+          end
+        end
+
+        describe 'when argument is a float' do
+          before :all do
+            @input    = 7.0
+            @result   = @property.load(@input)
+          end
+
+          it 'returns nil' do
+            @result.should be_nil
+          end
+        end
+
+        describe 'when argument is an array' do
+          before :all do
+            @input  = [ 1, 2, 3 ]
+            @result = @property.load(@input)
+          end
+
+          it 'returns input as is' do
+            @result.should eql(@input)
+          end
+        end
+      end
+
+      describe '.dump' do
+        describe 'when value is a list of lists' do
+          before :all do
+            @input  = [ %w[ uno due tre ], %w[ uno dos tres ] ]
+            @result = @property.dump(@input)
+          end
+
+          it 'dumps value to comma separated string' do
+            @result.should == "uno,due,tre\nuno,dos,tres\n"
+          end
+        end
+
+        describe 'when value is a string' do
+          before :all do
+            @input  = 'beauty hides in the deep'
+            @result = @property.dump(@input)
+          end
+
+          it 'returns input as is' do
+            @result.should == @input
+          end
+        end
+
+        describe 'when value is nil' do
+          before :all do
+            @input  = nil
+            @result = @property.dump(@input)
+          end
+
+          it 'returns nil' do
+            @result.should be_nil
+          end
+        end
+
+        describe 'when value is a hash' do
+          before :all do
+            @input  = { :library => 'DataMapper', :language => 'Ruby' }
+            @result = @property.dump(@input)
+          end
+
+          it 'returns nil' do
+            @result.should be_nil
+          end
+        end
+      end
+    end
+  end
+end

data/spec/unit/enum_spec.rb

@@ -0,0 +1,126 @@
+require 'spec_helper'
+
+try_spec do
+  describe DataMapper::Property::Enum do
+    before :all do
+      class ::User
+        include DataMapper::Resource
+        property :id, Serial
+      end
+
+      @property_klass = DataMapper::Property::Enum
+    end
+
+    it_should_behave_like "A property with flags"
+
+    describe '.dump' do
+      before do
+        @enum = User.property(:enum, DataMapper::Property::Enum[:first, :second, :third])
+      end
+
+      it 'should return the key of the value match from the flag map' do
+        @enum.dump(:first).should == 1
+        @enum.dump(:second).should == 2
+        @enum.dump(:third).should == 3
+      end
+
+      describe 'when there is no match' do
+        it 'should return nil' do
+          @enum.dump(:zero).should be_nil
+        end
+      end
+    end
+
+    describe '.load' do
+      before do
+        @enum = User.property(:enum, DataMapper::Property::Enum, :flags => [:uno, :dos, :tres])
+      end
+
+      it 'returns the value of the key match from the flag map' do
+        @enum.load(1).should == :uno
+        @enum.load(2).should == :dos
+        @enum.load(3).should == :tres
+      end
+
+      describe 'when there is no key' do
+        it 'returns nil' do
+          @enum.load(-1).should be_nil
+        end
+      end
+    end
+
+    describe '.typecast' do
+      describe 'of Enum created from a symbol' do
+        before :all do
+          @enum = User.property(:enum, DataMapper::Property::Enum, :flags => [:uno])
+        end
+
+        describe 'when given a symbol' do
+          it 'uses Enum type' do
+            @enum.typecast(:uno).should == :uno
+          end
+        end
+
+        describe 'when given a string' do
+          it 'uses Enum type' do
+            @enum.typecast('uno').should == :uno
+          end
+        end
+
+        describe 'when given nil' do
+          it 'returns nil' do
+            @enum.typecast( nil).should == nil
+          end
+        end
+      end
+
+      describe 'of Enum created from integer list' do
+        before :all do
+          @enum = User.property(:enum, DataMapper::Property::Enum, :flags => [1, 2, 3])
+        end
+
+        describe 'when given an integer' do
+          it 'uses Enum type' do
+            @enum.typecast(1).should == 1
+          end
+        end
+
+        describe 'when given a float' do
+          it 'uses Enum type' do
+            @enum.typecast(1.1).should == 1
+          end
+        end
+
+        describe 'when given nil' do
+          it 'returns nil' do
+            @enum.typecast( nil).should == nil
+          end
+        end
+      end
+
+      describe 'of Enum created from a string' do
+        before :all do
+          @enum = User.property(:enum, DataMapper::Property::Enum, :flags => ['uno'])
+        end
+
+        describe 'when given a symbol' do
+          it 'uses Enum type' do
+            @enum.typecast(:uno).should == 'uno'
+          end
+        end
+
+        describe 'when given a string' do
+          it 'uses Enum type' do
+            @enum.typecast('uno').should == 'uno'
+          end
+        end
+
+        describe 'when given nil' do
+          it 'returns nil' do
+            @enum.typecast( nil).should == nil
+          end
+        end
+      end
+    end
+  end
+end

data/spec/unit/epoch_time_spec.rb

@@ -0,0 +1,74 @@
+require 'spec_helper'
+
+describe DataMapper::Property::EpochTime do
+  before :all do
+    class ::User
+      include DataMapper::Resource
+
+      property :id,   Serial
+      property :bday, EpochTime
+    end
+
+    @property = User.properties[:bday]
+  end
+
+  describe '#dump' do
+    subject { @property.dump(value) }
+
+    describe 'with a Time instance' do
+      let(:value) { Time.now }
+
+      it { should == value.to_i }
+    end
+
+    describe 'with nil' do
+      let(:value) { nil }
+
+      it { should == value }
+    end
+  end
+
+  describe '#typecast' do
+    subject { @property.typecast(value) }
+
+    describe 'with a DateTime instance' do
+      let(:value) { DateTime.now }
+
+      it { should == Time.parse(value.to_s) }
+    end
+
+    describe 'with a number' do
+      let(:value) { Time.now.to_i }
+
+      it { should == ::Time.at(value) }
+    end
+
+    describe 'with a numeric string' do
+      let(:value) { Time.now.to_i.to_s }
+
+      it { should == ::Time.at(value.to_i) }
+    end
+
+    describe 'with a DateTime string' do
+      let(:value) { '2011-07-11 15:00:04 UTC' }
+
+      it { should == ::Time.parse(value) }
+    end
+  end
+
+  describe '#load' do
+    subject { @property.load(value) }
+
+    describe 'with a number' do
+      let(:value) { Time.now.to_i }
+
+      it { should == Time.at(value) }
+    end
+
+    describe 'with nil' do
+      let(:value) { nil }
+
+      it { should == value }
+    end
+  end
+end

data/spec/unit/file_path_spec.rb

@@ -0,0 +1,87 @@
+require 'spec_helper'
+require './spec/fixtures/software_package'
+
+try_spec do
+  describe DataMapper::Property::FilePath do
+    before :all do
+      @property = DataMapper::TypesFixtures::SoftwarePackage.properties[:source_path]
+    end
+
+    before do
+      @input = '/usr/bin/ruby'
+      @path  = Pathname.new(@input)
+    end
+
+    describe '#valid?' do
+      describe "with a String" do
+        subject { @property.valid?(@input) }
+        it { subject.should be(true) }
+      end
+
+      describe "with a Pathname" do
+        subject { @property.valid?(@path) }
+        it { subject.should be(true) }
+      end
+    end
+
+    describe '.dump' do
+      describe 'when input is a string' do
+        it 'does not modify input' do
+          @property.dump(@input).should == @input
+        end
+      end
+
+      describe 'when input is nil' do
+        it 'returns nil' do
+          @property.dump(nil).should be_nil
+        end
+      end
+
+      describe 'when input is a blank string' do
+        it 'returns nil' do
+          @property.dump('').should be_nil
+        end
+      end
+    end
+
+    describe '.load' do
+      describe 'when value is a non-blank file path' do
+        it 'returns Pathname for a path' do
+          @property.load(@input).should == @path
+        end
+      end
+
+      describe 'when value is nil' do
+        it 'return nil' do
+          @property.load(nil).should be_nil
+        end
+      end
+
+      describe 'when value is a blank string' do
+        it 'returns nil' do
+          @property.load('').should be_nil
+        end
+      end
+    end
+
+    describe '.typecast' do
+      describe 'when a Pathname is given' do
+        it 'does not modify input' do
+          @property.typecast(@path).should == @path
+        end
+      end
+
+      describe 'when a nil is given' do
+        it 'does not modify input' do
+          @property.typecast(nil).should == nil
+        end
+      end
+
+      describe 'when a string is given' do
+        it 'returns Pathname for given path' do
+          @property.typecast(@input).should == @path
+        end
+      end
+    end
+  end
+end