dm-types 0.9.11 → 0.10.0

data/spec/integration/flag_spec.rb

@@ -1,33 +1,64 @@
-require 'pathname'
-require Pathname(__FILE__).dirname.parent.expand_path + 'spec_helper'
-
-describe DataMapper::Types::Flag do
-  before(:all) do
-    class ::Shirt
-      include DataMapper::Resource
-      property :id, Serial
-      property :sizes, DM::Flag[:xs, :small, :medium, :large, :xl, :xxl]
+require 'spec_helper'
+
+try_spec do
+
+  require 'spec/fixtures/tshirt'
+
+  describe DataMapper::Types::Fixtures::TShirt do
+    before do
+      @resource = DataMapper::Types::Fixtures::TShirt.new(
+        :writing     => 'Fork you',
+        :has_picture => true,
+        :picture     => :octocat,
+        :color       => :white,
+        :size        => [ :xs, :medium ]
+      )
     end
-    Shirt.auto_migrate!
-  end
 
-  it "should save with create({:flag_field => [:flags]})" do
-    lambda { Shirt.create(:sizes => [:medium, :large]) }.should_not raise_error
-    repository do
-      Shirt.get(1).sizes.should == [:medium, :large]
+    describe 'with multiple sizes' do
+      describe 'dumped and loaded' do
+        before do
+          @resource.save.should be_true
+          @resource.reload
+        end
+
+        it 'returns size as array' do
+          @resource.size.should == [ :xs, :medium ]
+        end
+      end
     end
-  end
 
-  it "should save with flag_field=[:flags]" do
-    shirt = Shirt.new
-    shirt.sizes = [:small, :xs]
-    lambda { shirt.save }.should_not raise_error
-    repository do
-      Shirt.get(2).sizes.should == [:xs, :small]
+    describe 'with a single size' do
+      before do
+        @resource.size = :large
+      end
+
+      describe 'dumped and loaded' do
+        before do
+          @resource.save.should be_true
+          @resource.reload
+        end
+
+        it 'returns size as array with a single value' do
+          @resource.size.should == [:large]
+        end
+      end
     end
-  end
 
-  it 'should immediately typecast supplied values' do
-    Shirt.new(:sizes => [:large, :xl]).sizes.should == [:large, :xl]
+    # Flag does not add any auto validations
+    describe 'without size' do
+      before do
+        @resource.should be_valid
+        @resource.size = nil
+      end
+
+      it 'is valid' do
+        @resource.should be_valid
+      end
+
+      it 'has no errors' do
+        @resource.errors.should be_blank
+      end
+    end
   end
 end

data/spec/integration/ip_address_spec.rb

@@ -1,26 +1,151 @@
-require 'pathname'
-require Pathname(__FILE__).dirname.parent.expand_path + 'spec_helper'
+require 'spec_helper'
 
-describe DataMapper::Types::IPAddress do
-  before(:all) do
-    class ::IPAddressTest
-      include DataMapper::Resource
+module IPAddressMatchers
+  def run_ipv6
+    simple_matcher('run IPv6') { |model| model.runs_ipv6? }
+  end
 
-      property :id, Serial
-      property :ip, IPAddress
-    end
-    IPAddressTest.auto_migrate!
+  def run_ipv4
+    simple_matcher('run IPv4') { |model| model.runs_ipv4? }
   end
+end
+
+try_spec do
+
+  require 'spec/fixtures/network_node'
 
-  it "should work" do
-    repository(:default) do
-      IPAddressTest.create(:ip => '127.0.0.1')
+  describe DataMapper::Types::Fixtures::NetworkNode do
+    before :all do
+      @resource = DataMapper::Types::Fixtures::NetworkNode.new(
+        :node_uuid        => '25a44800-21c9-11de-8c30-0800200c9a66',
+        :ip_address       => nil,
+        :cidr_subnet_bits => nil
+      )
     end
 
-    IPAddressTest.first.ip.should == IPAddr.new('127.0.0.1')
-  end
+    include IPAddressMatchers
+
+    describe 'with IP address fe80::ab8:e8ff:fed7:f8c9' do
+      before :all do
+        @resource.ip_address = 'fe80::ab8:e8ff:fed7:f8c9'
+      end
+
+      describe 'when dumped and loaded' do
+        before :all do
+          @resource.save.should be_true
+          @resource.reload
+        end
+
+        it 'is an IPv6 node' do
+          @resource.should run_ipv6
+        end
+      end
+    end
+
+    describe 'with IP address 127.0.0.1' do
+      before :all do
+        @resource.ip_address = '127.0.0.1'
+      end
+
+      describe 'when dumped and loaded' do
+        before :all do
+          @resource.save.should be_true
+          @resource.reload
+        end
+
+        it 'is an IPv4 node' do
+          @resource.should run_ipv4
+        end
+      end
+    end
+
+    describe 'with IP address 218.43.243.136' do
+      before :all do
+        @resource.ip_address = '218.43.243.136'
+      end
+
+      describe 'when dumped and loaded' do
+        before :all do
+          @resource.save.should be_true
+          @resource.reload
+        end
+
+        it 'is an IPv4 node' do
+          @resource.should run_ipv4
+        end
+      end
+    end
+
+    describe 'with IP address 221.186.184.68' do
+      before :all do
+        @resource.ip_address = '221.186.184.68'
+      end
+
+      describe 'when dumped and loaded' do
+        before :all do
+          @resource.save.should be_true
+          @resource.reload
+        end
+
+        it 'is an IPv4 node' do
+          @resource.should run_ipv4
+        end
+      end
+    end
 
-  it 'should immediately typecast supplied values' do
-    IPAddressTest.new(:ip => '10.0.0.1').ip.should == IPAddr.new('10.0.0.1')
+    describe 'with IP address given as CIDR' do
+      before :all do
+        @resource.ip_address = '218.43.243.0/24'
+      end
+
+      describe 'when dumped and loaded' do
+        before :all do
+          @resource.save.should be_true
+          @resource.reload
+        end
+
+        it 'is an IPv4 node' do
+          @resource.should run_ipv4
+        end
+
+        it 'includes IP address 218.43.243.2 in subnet hosts' do
+          @resource.ip_address.include?('218.43.243.2')
+        end
+      end
+    end
+
+    describe 'with a blank string used as IP address' do
+      before :all do
+        @resource.ip_address = ''
+      end
+
+      describe 'when dumped and loaded' do
+        before :all do
+          @resource.save.should be_true
+          @resource.reload
+        end
+
+        it 'has NO IP address' do
+          @resource.ip_address.should be_nil
+        end
+      end
+    end
+
+    describe 'with NO IP address' do
+      before :all do
+        @resource.ip_address = nil
+      end
+
+      describe 'when dumped and loaded' do
+        before :all do
+          @resource.save.should be_true
+          @resource.reload
+        end
+
+        it 'has no IP address assigned' do
+          @resource.ip_address.should be_nil
+        end
+      end
+    end
   end
 end

data/spec/integration/json_spec.rb

@@ -1,26 +1,69 @@
-require 'pathname'
-require Pathname(__FILE__).dirname.parent.expand_path + 'spec_helper'
+require 'spec_helper'
 
-describe DataMapper::Types::Json do
-  before(:all) do
-    class ::JsonTest
-      include DataMapper::Resource
+try_spec do
 
-      property :id, Serial
-      property :json, Json
+  require 'spec/fixtures/person'
+
+  describe DataMapper::Types::Fixtures::Person do
+    before :all do
+      @resource = DataMapper::Types::Fixtures::Person.new(:name => 'Thomas Edison')
     end
-    JsonTest.auto_migrate!
-  end
 
-  it "should work" do
-    repository(:default) do
-      JsonTest.create(:json => '[1, 2, 3]')
+    describe 'with no positions information' do
+      before :all do
+        @resource.positions = nil
+      end
+
+      describe 'when dumped and loaded again' do
+        before :all do
+          @resource.save.should be_true
+          @resource.reload
+        end
+
+        it 'has nil positions list' do
+          @resource.positions.should be_nil
+        end
+      end
     end
 
-    JsonTest.first.json.should == [1, 2, 3]
-  end
+    describe 'with a few items on the positions list' do
+      before :all do
+        @resource.positions = [
+          { :company => 'The Death Star, Inc', :title => 'Light sabre engineer'    },
+          { :company => 'Sane Little Company', :title => 'Chief Curiosity Officer' },
+        ]
+      end
+
+      describe 'when dumped and loaded again' do
+        before :all do
+          @resource.save.should be_true
+          @resource.reload
+        end
 
-  it 'should immediately typecast supplied values' do
-    JsonTest.new(:json => '[1, 2, 3]').json.should == [1, 2, 3]
+        it 'loads positions list to the state when it was dumped/persisted with keys being strings' do
+          @resource.positions.should == [
+            { 'company' => 'The Death Star, Inc',  'title' => 'Light sabre engineer'    },
+            { 'company'  => 'Sane Little Company', 'title' => 'Chief Curiosity Officer' },
+          ]
+        end
+      end
+    end
+
+    describe 'with positions information given as empty list' do
+      before :all do
+        @resource.positions = []
+      end
+
+      describe 'when dumped and loaded again' do
+        before :all do
+          @resource.save.should be_true
+          @resource.reload
+        end
+
+        it 'has empty positions list' do
+          @resource.positions.should == []
+        end
+      end
+    end
   end
 end

data/spec/integration/slug_spec.rb

@@ -1,56 +1,55 @@
 # encoding: utf-8
 
-require 'pathname'
-require 'iconv'
-require Pathname(__FILE__).dirname.parent.expand_path + 'spec_helper'
+require 'spec_helper'
 
-describe DataMapper::Types::Slug do
+try_spec do
 
-  before(:all) do
-    class ::SlugTest
-      include DataMapper::Resource
+  require 'spec/fixtures/article'
 
-      property :id, Serial
-      property :name, Slug
+  describe DataMapper::Types::Fixtures::Article do
+    describe "persisted with title and slug set to 'New DataMapper Type'" do
+      before :all do
+        @input    = 'New DataMapper Type'
+        @resource = DataMapper::Types::Fixtures::Article.create(:title => @input, :slug => @input)
 
-    end
-    SlugTest.auto_migrate!
-  end
-
-  it "should create the permalink" do
-    repository(:default) do
-      SlugTest.create(:name => 'New DataMapper Type')
-    end
+        @resource.reload
+      end
 
-    SlugTest.first.name.should == "new-datamapper-type"
-  end
+      it 'has slug equal to "new-datamapper-type"' do
+        @resource.slug.should == 'new-datamapper-type'
+      end
 
-  it "should find by a slug" do
-    repository(:default) do
-      SlugTest.create(:name => "This Should Be a Slug")
+      it 'can be found by slug' do
+        DataMapper::Types::Fixtures::Article.first(:slug => 'new-datamapper-type').should == @resource
+      end
     end
-    slug = "this-should-be-a-slug"
 
-    slugged = SlugTest.first(:name => slug)
-    slugged.should_not be_nil
-    slugged.name.should == slug
-  end
+    [
+     ['Iñtërnâtiônàlizætiøn',      'internationalizaetion' ],
+     ["This is Dan's Blog",        'this-is-dans-blog'],
+     ['This is My Site, and Blog', 'this-is-my-site-and-blog'],
+     ['Google searches for holy grail of Python performance', 'google-searches-for-holy-grail-of-python-performance'],
+     ['iPhone dev: Creating length-controlled data sources', 'iphone-dev-creating-length-controlled-data-sources'],
+     ["Review: Nintendo's New DSi -- A Quantum Leap Forward", 'review-nintendos-new-dsi-a-quantum-leap-forward'],
+     ["Arriva BraiVe, è l'auto-robot che si 'guida' da sola'", 'arriva-braive-e-lauto-robot-che-si-guida-da-sola'],
+     ["La ley antipiratería reduce un 33% el tráfico online en Suecia", 'la-ley-antipirateria-reduce-un-33-percent-el-trafico-online-en-suecia'],
+     ["L'Etat américain du Texas s'apprête à interdire Windows Vista", 'letat-americain-du-texas-sapprete-a-interdire-windows-vista']
+    ].each do |title, slug|
+      describe "persisted with title '#{title}'" do
+        before :all do
+          @resource = DataMapper::Types::Fixtures::Article.new(:title => title)
+          @resource.save.should be_true
+          @resource.reload
+        end
 
-  [
-    ["Iñtërnâtiônàlizætiøn",      "internationalizaetion" ],
-    ["Hello World",               "hello-world"],
-    ["This is Dan's Blog",        "this-is-dans-blog"],
-    ["This is My Site, and Blog", "this-is-my-site-and-blog"]
-  ].each do |name, slug|
+        it "has slug equal to '#{slug}'" do
+          @resource.slug.should == slug
+        end
 
-      it "should sluggify #{name}" do
-        repository(:default) do
-          SlugTest.create(:name => name)
+        it 'can be found by slug' do
+          DataMapper::Types::Fixtures::Article.first(:slug => slug).should == @resource
         end
-        SlugTest.first(:name => slug).should_not be_nil
       end
     end
-
-
-
+  end
 end

data/spec/integration/uri_spec.rb

@@ -1,31 +1,136 @@
-require 'pathname'
-require Pathname(__FILE__).dirname.parent.expand_path + 'spec_helper'
+require 'spec_helper'
 
-describe DataMapper::Types::URI do
-  before(:all) do
-    class ::URITest
-      include DataMapper::Resource
+try_spec do
 
-      property :id, Integer, :serial => true
-      property :uri, DM::URI
+  require 'spec/fixtures/bookmark'
+
+  describe DataMapper::Types::Fixtures::Bookmark do
+    describe 'without URI' do
+      before :all do
+        @uri = nil
+        @resource = DataMapper::Types::Fixtures::Bookmark.new(
+          :title  => 'Check this out',
+          :uri    => @uri,
+          :shared => false,
+          :tags   => %w[ misc ]
+        )
+
+        @resource.save.should be_true
+      end
+
+      it 'can be found by uri' do
+        DataMapper::Types::Fixtures::Bookmark.first(:uri => @uri).should == @resource
+      end
+
+      describe 'when reloaded' do
+        before :all do
+          @resource.reload
+        end
+
+        it 'has no uri' do
+          @resource.uri.should be_nil
+        end
+      end
     end
-    URITest.auto_migrate!
-  end
 
-  it "should work" do
-    repository(:default) do
-      URITest.create(:uri => 'http://localhost')
+    describe 'with a blank URI' do
+      before :all do
+        @uri = ''
+        @resource = DataMapper::Types::Fixtures::Bookmark.new(
+          :title  => 'Check this out',
+          :uri    => @uri,
+          :shared => false,
+          :tags   => %w[ misc ]
+        )
+
+        @resource.save.should be_true
+      end
+
+      it 'can be found by uri' do
+        DataMapper::Types::Fixtures::Bookmark.first(:uri => @uri).should == @resource
+      end
+
+      describe 'when reloaded' do
+        before :all do
+          @resource.reload
+        end
+
+        it 'is loaded as URI object' do
+          @resource.uri.should be_an_instance_of(Addressable::URI)
+        end
+
+        it 'has the same original URI' do
+          @resource.uri.to_s.should == @uri
+        end
+      end
     end
 
-    URITest.first.uri.should == Addressable::URI.parse('http://localhost')
-  end
+    describe 'with invalid URI' do
+      before :all do
+        @uri = 'this is def. not URI'
+        @resource = DataMapper::Types::Fixtures::Bookmark.new(
+          :title  => 'Check this out',
+          :uri    => @uri,
+          :shared => false,
+          :tags   => %w[ misc ]
+        )
+      end
 
-  it 'should immediately typecast supplied values' do
-    URITest.new(:uri => 'http://localhost').uri.should == Addressable::URI.parse('http://localhost')
-  end
+      it 'is perfectly valid (URI type does not provide auto validations)' do
+        @resource.save.should be_true
+      end
+    end
 
-  it "should correctly typecast nil values" do
-    URITest.new(:uri => nil).uri.should == nil
-  end
+    %w[
+      http://apple.com
+      http://www.apple.com
+      http://apple.com/
+      http://apple.com/iphone
+      http://www.google.com/search?client=safari&rls=en-us&q=LED&ie=UTF-8&oe=UTF-8
+      http://books.google.com
+      http://books.google.com/
+      http://db2.clouds.megacorp.net:8080
+      https://github.com
+      https://github.com/
+      http://www.example.com:8088/never/ending/path/segments/
+      http://db2.clouds.megacorp.net:8080/resources/10
+      http://www.example.com:8088/never/ending/path/segments
+      http://books.google.com/books?id=uSUJ3VhH4BsC&printsec=frontcover&dq=subject:%22+Linguistics+%22&as_brr=3&ei=DAHPSbGQE5rEzATk1sShAQ&rview=1
+      http://books.google.com:80/books?uid=14472359158468915761&rview=1
+      http://books.google.com/books?id=Ar3-TXCYXUkC&printsec=frontcover&rview=1
+      http://books.google.com/books/vp6ae081e454d30f89b6bca94e0f96fc14.js
+      http://www.google.com/images/cleardot.gif
+      http://books.google.com:80/books?id=Ar3-TXCYXUkC&printsec=frontcover&rview=1#PPA5,M1
+      http://www.hulu.com/watch/64923/terminator-the-sarah-connor-chronicles-to-the-lighthouse
+      http://hulu.com:80/browse/popular/tv
+      http://www.hulu.com/watch/62475/the-simpsons-gone-maggie-gone#s-p1-so-i0
+    ].each do |uri|
+      describe "with URI set to '#{uri}'" do
+        before :all do
+          @resource = DataMapper::Types::Fixtures::Bookmark.new(
+            :title  => 'Check this out',
+            :uri    => uri,
+            :shared => false,
+            :tags   => %w[ misc ]
+          )
 
+          @resource.save.should be_true
+        end
+
+        it 'can be found by uri' do
+          DataMapper::Types::Fixtures::Bookmark.first(:uri => uri).should_not be_blank
+        end
+
+        describe 'when reloaded' do
+          before :all do
+            @resource.reload
+          end
+
+          it 'has the same original URI' do
+            @resource.uri.to_s.should eql(uri)
+          end
+        end
+      end
+    end
+  end
 end