sbf-dm-types 1.3.0.beta

data/spec/unit/bcrypt_hash_spec.rb

@@ -0,0 +1,155 @@
+require_relative '../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 String' do
+          expect(@result).to be_an_instance_of(String)
+        end
+
+        it 'returns a string that is 60 characters long' do
+          expect(@result.size).to eq 60
+        end
+      end
+
+      describe 'when argument is nil' do
+        before :all do
+          @input  = nil
+          @result = @bcrypt_hash.dump(@input)
+        end
+
+        it 'returns nil' do
+          expect(@result).to 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
+          expect(@result).to be_an_instance_of(BCrypt::Password)
+        end
+
+        it 'returns a string that matches original' do
+          expect(@result).to eq @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
+          expect(@result).to 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
+          expect(@result).to be_an_instance_of(BCrypt::Password)
+        end
+
+        it 'casts argument to value that matches input' do
+          expect(@result).to eq @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
+          expect(@result).to be_an_instance_of(BCrypt::Password)
+        end
+
+        it 'casts argument to value that matches input' do
+          expect(@result).to eq @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
+          expect(@result).to be_an_instance_of(BCrypt::Password)
+        end
+
+        it 'casts argument to value that matches input' do
+          expect(@result).to eq @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
+          expect(@result).to be_an_instance_of(BCrypt::Password)
+        end
+
+        it 'casts argument to value that matches input' do
+          expect(@result).to eq @input
+        end
+      end
+
+      describe 'when argument is nil' do
+        before :all do
+          @input  = nil
+          @result = @bcrypt_hash.typecast(@input)
+        end
+
+        it 'returns nil' do
+          expect(@result).to be_nil
+        end
+      end
+    end
+  end
+end

data/spec/unit/csv_spec.rb

@@ -0,0 +1,142 @@
+require_relative '../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
+            expect(@result).to eq [ %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
+            expect(@result).to eq @input
+          end
+        end
+
+        describe 'when argument is an empty hash' do
+          before :all do
+            @input    = {}
+            @result   = @property.load(@input)
+          end
+
+          it 'returns nil' do
+            expect(@result).to be_nil
+          end
+        end
+
+        describe 'when argument is nil' do
+          before :all do
+            @input    = nil
+            @result   = @property.load(@input)
+          end
+
+          it 'returns nil' do
+            expect(@result).to 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
+            expect(@result).to 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
+            expect(@result).to 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
+            expect(@result).to 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
+            expect(@result).to eq "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
+            expect(@result).to eq @input
+          end
+        end
+
+        describe 'when value is nil' do
+          before :all do
+            @input  = nil
+            @result = @property.dump(@input)
+          end
+
+          it 'returns nil' do
+            expect(@result).to 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
+            expect(@result).to be_nil
+          end
+        end
+      end
+    end
+  end
+end

data/spec/unit/dirty_minder_spec.rb

@@ -0,0 +1,65 @@
+require_relative '../spec_helper'
+require 'dm-types/support/dirty_minder'
+
+describe DataMapper::Property::DirtyMinder, 'set!' do
+  let(:property_class) do
+    Class.new(DataMapper::Property::Object) do
+      include DataMapper::Property::DirtyMinder
+    end
+  end
+
+  let(:model) do
+    property_class = self.property_class
+    Class.new do
+      include DataMapper::Resource
+      property :id, DataMapper::Property::Serial
+      property :name, property_class
+
+      def self.name
+        'FredsClass'
+      end
+    end
+  end
+
+  let(:resource) { model.new }
+
+  let(:object) { model.properties[:name] }
+
+  subject { object.set!(resource, value) }
+
+  shared_examples 'a non hooked value' do
+    it 'does not extend value with hook' do
+      expect(value).not_to be_kind_of(DataMapper::Property::DirtyMinder::Hooker)
+    end
+  end
+
+  shared_examples 'a hooked value' do
+    it 'extends value with hook' do
+      expect(value).to be_kind_of(DataMapper::Property::DirtyMinder::Hooker)
+    end
+  end
+
+  before do
+    subject
+  end
+
+  context 'when setting nil' do
+    let(:value) { nil }
+    it_behaves_like 'a non hooked value'
+  end
+
+  context 'when setting a String' do
+    let(:value) { 'The fred' }
+    it_behaves_like 'a non hooked value'
+  end
+
+  context 'when setting an Array' do
+    let(:value) { ['The fred'] }
+    it_behaves_like 'a hooked value'
+  end
+
+  context 'when setting a Hash' do
+    let(:value) { {'The' => 'fred'} }
+    it_behaves_like 'a hooked value'
+  end
+end

data/spec/unit/enum_spec.rb

@@ -0,0 +1,126 @@
+require_relative '../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_behaves_like 'A property with flags'
+
+    describe '.dump' do
+      before do
+        @enum = User.property(:enum, DataMapper::Property::Enum[:first, :second, :third])
+      end
+
+      it 'returns the key of the value match from the flag map' do
+        expect(@enum.dump(:first)).to eq 1
+        expect(@enum.dump(:second)).to eq 2
+        expect(@enum.dump(:third)).to eq 3
+      end
+
+      describe 'when there is no match' do
+        it 'returns nil' do
+          expect(@enum.dump(:zero)).to 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
+        expect(@enum.load(1)).to eq :uno
+        expect(@enum.load(2)).to eq :dos
+        expect(@enum.load(3)).to eq :tres
+      end
+
+      describe 'when there is no key' do
+        it 'returns nil' do
+          expect(@enum.load(-1)).to 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
+            expect(@enum.typecast(:uno)).to eq :uno
+          end
+        end
+
+        describe 'when given a string' do
+          it 'uses Enum type' do
+            expect(@enum.typecast('uno')).to eq :uno
+          end
+        end
+
+        describe 'when given nil' do
+          it 'returns nil' do
+            expect(@enum.typecast( nil)).to eq 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
+            expect(@enum.typecast(1)).to eq 1
+          end
+        end
+
+        describe 'when given a float' do
+          it 'uses Enum type' do
+            expect(@enum.typecast(1.1)).to eq 1
+          end
+        end
+
+        describe 'when given nil' do
+          it 'returns nil' do
+            expect(@enum.typecast( nil)).to eq 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
+            expect(@enum.typecast(:uno)).to eq 'uno'
+          end
+        end
+
+        describe 'when given a string' do
+          it 'uses Enum type' do
+            expect(@enum.typecast('uno')).to eq 'uno'
+          end
+        end
+
+        describe 'when given nil' do
+          it 'returns nil' do
+            expect(@enum.typecast( nil)).to eq nil
+          end
+        end
+      end
+    end
+  end
+end

data/spec/unit/epoch_time_spec.rb

@@ -0,0 +1,74 @@
+require_relative '../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 { is_expected.to eq value.to_i }
+    end
+
+    describe 'with nil' do
+      let(:value) { nil }
+
+      it { is_expected.to eq value }
+    end
+  end
+
+  describe '#typecast' do
+    subject { @property.typecast(value) }
+
+    describe 'with a DateTime instance' do
+      let(:value) { DateTime.now }
+
+      it { is_expected.to eq Time.parse(value.to_s) }
+    end
+
+    describe 'with a number' do
+      let(:value) { Time.now.to_i }
+
+      it { is_expected.to eq ::Time.at(value) }
+    end
+
+    describe 'with a numeric string' do
+      let(:value) { Time.now.to_i.to_s }
+
+      it { is_expected.to eq ::Time.at(value.to_i) }
+    end
+
+    describe 'with a DateTime string' do
+      let(:value) { '2011-07-11 15:00:04 UTC' }
+
+      it { is_expected.to eq ::Time.parse(value) }
+    end
+  end
+
+  describe '#load' do
+    subject { @property.load(value) }
+
+    describe 'with a number' do
+      let(:value) { Time.now.to_i }
+
+      it { is_expected.to eq Time.at(value) }
+    end
+
+    describe 'with nil' do
+      let(:value) { nil }
+
+      it { is_expected.to eq value }
+    end
+  end
+end

data/spec/unit/file_path_spec.rb

@@ -0,0 +1,75 @@
+require_relative '../spec_helper'
+require_relative '../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 '.dump' do
+      describe 'when input is a string' do
+        it 'does not modify input' do
+          expect(@property.dump(@input)).to eq @input
+        end
+      end
+
+      describe 'when input is nil' do
+        it 'returns nil' do
+          expect(@property.dump(nil)).to be_nil
+        end
+      end
+
+      describe 'when input is a blank string' do
+        it 'returns nil' do
+          expect(@property.dump('')).to 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
+          expect(@property.load(@input)).to eq @path
+        end
+      end
+
+      describe 'when value is nil' do
+        it 'return nil' do
+          expect(@property.load(nil)).to be_nil
+        end
+      end
+
+      describe 'when value is a blank string' do
+        it 'returns nil' do
+          expect(@property.load('')).to be_nil
+        end
+      end
+    end
+
+    describe '.typecast' do
+      describe 'when a Pathname is given' do
+        it 'does not modify input' do
+          expect(@property.typecast(@path)).to eq @path
+        end
+      end
+
+      describe 'when a nil is given' do
+        it 'does not modify input' do
+          expect(@property.typecast(nil)).to eq nil
+        end
+      end
+
+      describe 'when a string is given' do
+        it 'returns Pathname for given path' do
+          expect(@property.typecast(@input)).to eq @path
+        end
+      end
+    end
+  end
+end