spontaneous 0.1.0.alpha1

data/test/unit/test_piece.rb

@@ -0,0 +1,80 @@
+# encoding: UTF-8
+
+require 'test_helper'
+
+
+class PieceTest < MiniTest::Spec
+  include Spontaneous
+
+  context "Pieces" do
+    setup do
+      Content.delete
+      Spot::Schema.reset!
+      class ::Piece < Spot::Piece; end
+      class ::Page < Spot::Page; end
+      class ::Fridge < ::Piece; end
+    end
+
+    teardown do
+      Object.send(:remove_const, :Page)
+      Object.send(:remove_const, :Piece)
+      Object.send(:remove_const, :Fridge)
+    end
+
+    should "not be pages" do
+      Piece.new.page?.should be_false
+    end
+
+    context "as page content" do
+      setup do
+        @page = ::Page.create
+        @f1 = ::Piece.new
+        @page << @f1
+        @f2 = ::Piece.new
+        @f1 << @f2
+        @f3 = ::Fridge.new
+        @f2 << @f3
+
+        @page.save
+        @f1.save
+        @f2.save
+        @f3.save
+
+        @page = ::Page[@page.id]
+        @f1 = ::Piece[@f1.id]
+        @f2 = ::Piece[@f2.id]
+        @f3 = Content[@f3.id]
+      end
+
+      should "have a link to the page" do
+        @f1.page.should == @page
+        @f2.page.should == @page
+        @f3.page.should == @page
+      end
+
+      should "have a link to their container" do
+        @f1.container.should == @page
+        @f2.container.should == @f1
+        @f3.container.should == @f2
+      end
+
+      should "know their depth in the piece tree" do
+        @f1.depth.should == 1
+        @f2.depth.should == 2
+        @f3.depth.should == 3
+      end
+
+      should "be available from their containing page" do
+        @page.content.length.should == 3
+        @page.content.should == [@f1, @f2, @f3]
+        @page.content.last.class.should == Fridge
+      end
+
+      should "have a link to their pieces" do
+        @f1.entry.should == @page.pieces.first
+        @f2.entry.should == @page.pieces.first.pieces.first
+      end
+    end
+  end
+end
+

data/test/unit/test_prototype_set.rb

@@ -0,0 +1,192 @@
+
+# encoding: UTF-8
+
+require 'test_helper'
+
+
+class PrototypeSetTest < MiniTest::Spec
+  class Super < Struct.new(:prototypes); end
+  context "Prototype Sets" do
+    setup do
+      @one = "One"
+      @two = "Two"
+      @three = "Three"
+      @one.stubs(:schema_id).returns("one_id")
+      @two.stubs(:schema_id).returns("two_id")
+      @three.stubs(:schema_id).returns("three_id")
+      @set = Spontaneous::Collections::PrototypeSet.new
+      @set['one'] = @one
+      @set[:two] = @two
+      @set[:three] = @three
+    end
+
+    should "return correct value for empty? test" do
+      @set.empty?.should be_false
+      Spontaneous::Collections::PrototypeSet.new.empty?.should be_true
+    end
+
+    should "return the last value" do
+      @set.last.should == "Three"
+    end
+
+    should "enable hash-like access by name" do
+      @set[:three].should == "Three"
+      @set['three'].should == "Three"
+    end
+
+    should "know the number of entries" do
+      @set.length.should == 3
+      @set.count.should == 3
+    end
+
+    should "enable array-like access by index" do
+      @set[2].should == "Three"
+    end
+
+    should "have a list of names" do
+      @set.keys.should == [:one, :two, :three]
+      @set.names.should == [:one, :two, :three]
+      @set.order.should == [:one, :two, :three]
+    end
+
+    should "have a list of values" do
+      @set.values.should == ['One', 'Two', 'Three']
+    end
+
+    should "test for keys" do
+      @set.key?(:one).should be_true
+      @set.key?(:two).should be_true
+    end
+
+    should "enable access by schema id" do
+      @set.sid("two_id").should == @two
+    end
+
+    should "have externally settable ordering" do
+      @set.order = [:three, :two]
+      @set.order.should == [:three, :two, :one]
+      @set.map { |val| val }.should == ['Three', 'Two', 'One']
+    end
+
+    should "allow multiple setting of the order" do
+      @set.order = [:three, :two]
+      @set.order.should == [:three, :two, :one]
+      @set.order = [:one, :three]
+      @set.order.should == [:one, :three, :two]
+    end
+
+    should "have a hash-like map function" do
+      @set.map { |val| val }.should == ["One", "Two", "Three"]
+    end
+
+    should "have a hash-like each function" do
+      keys = []
+      @set.each { |val| keys << val }
+      keys.should == ["One", "Two", "Three"]
+    end
+
+    should "allow access to values as method calls" do
+      @set.one.should == "One"
+      @set.three.should == "Three"
+      lambda { @set.nine }.must_raise(NoMethodError)
+    end
+
+    context "with superset" do
+      setup do
+        @superset = @set.dup
+        # give the superset a custom order to make sure it propagates to the child set
+        @superset.order = [:three, :one, :two]
+        @super = Super.new
+        @super.prototypes = @superset
+        @set = Spontaneous::Collections::PrototypeSet.new(@super, :prototypes)
+        @four = "Four"
+        @five = "Five"
+        @four.stubs(:schema_id).returns("four_id")
+        @five.stubs(:schema_id).returns("five_id")
+        @set[:four] = @four
+        @set[:five] = @five
+      end
+
+      teardown do
+      end
+
+      should "inherit values from a super-set" do
+        @set[:one].should == "One"
+        @set[:five].should == "Five"
+      end
+
+      should "test for keys" do
+        @set.key?(:one).should be_true
+        @set.key?(:five).should be_true
+      end
+
+      should "enable array-like access by index" do
+        @set[3].should == "Four"
+        @set[0].should == "Three"
+      end
+
+      should "have a list of names" do
+        @set.names.should == [:three, :one, :two, :four, :five]
+        @set.keys.should == [:three, :one, :two, :four, :five]
+      end
+
+      should "enable access by schema id" do
+        @set.sid("two_id").should == @two
+        @set.sid("four_id").should == @four
+      end
+
+      should "have externally settable ordering" do
+        @set.order = [:five, :three, :two]
+        @set.order.should == [:five, :three, :two, :one, :four]
+        @set.map { |val| val }.should == ['Five', 'Three', 'Two', 'One', 'Four']
+        @set.values.should == ['Five', 'Three', 'Two', 'One', 'Four']
+      end
+
+      should "have a hash-like map function" do
+        @set.map { |val| val }.should == ["Three", "One", "Two", "Four", "Five"]
+      end
+
+      should "have a hash-like each function" do
+        keys = []
+        @set.each { |val| keys << val }
+        keys.should == ["Three", "One", "Two", "Four", "Five"]
+      end
+
+      should "ignore a nil superobject" do
+        set = Spontaneous::Collections::PrototypeSet.new(nil, :prototypes)
+        set[:four] = @four
+        set[:five] = @five
+        set[:four].should == @four
+        set[:two].should be_nil
+        set.order.should == [:four, :five]
+      end
+
+      should "have a list of values" do
+        @set.values.should == ['Three', 'One', 'Two', 'Four', 'Five']
+      end
+
+      should "allow access to values as method calls" do
+        @set.two.should == "Two"
+        @set.five.should == "Five"
+      end
+
+      should "intelligently deal with sub-sets over-writing values" do
+        order = @set.order
+        @set.first.should == "Three"
+        @set[:three] = "One Hundred"
+        @set[:three].should == "One Hundred"
+        @set.first.should == "One Hundred"
+        @set.order.should == order
+      end
+
+      should "return the last value" do
+        @set.last.should == "Five"
+      end
+      should "know the number of entries" do
+        @set.length.should == 5
+        @set.count.should == 5
+      end
+    end
+  end
+end
+

data/test/unit/test_prototypes.rb

@@ -0,0 +1,102 @@
+# encoding: UTF-8
+
+require 'test_helper'
+
+class PrototypesTest < MiniTest::Spec
+  context "Prototypes" do
+    setup do
+      class ::ImageClass < Spontaneous::Content
+        field :image
+        field :description
+
+        def prototype
+          self.description = "An Image"
+        end
+
+        def complex_prototype
+          self.description = "Complex"
+        end
+      end
+
+      class ::PrototypeClass < Spontaneous::Content
+        field :title, :string
+        field :date,  :string
+        field :something, :string, :default => "Here"
+
+        box :images
+
+        def prototype
+          self.title = "Naughty"
+          self.date  = "Yesterday"
+          self.something = self.something.value * 2
+          self.images << ImageClass.new
+        end
+
+        def careless_prototype
+          self.title = "Careless"
+          self.date  = "Whisper"
+        end
+
+        def witless_prototype
+          self.title = "Witless"
+          self.date  = "Witness"
+        end
+      end
+
+    end
+    teardown do
+      Content.delete
+      Object.send(:remove_const, :ImageClass)
+      Object.send(:remove_const, :PrototypeClass)
+    end
+
+    should "call #prototype after creation of an object" do
+      content = PrototypeClass.create
+      content.title.value.should == "Naughty"
+      content.date.value.should == "Yesterday"
+      content.images.entries.length.should == 1
+      content.images.first.description.value.should == "An Image"
+    end
+
+    should "already have default values in fields on calling prototype" do
+      content = PrototypeClass.create
+      content.something.value.should == "HereHere"
+    end
+
+    should "call appropriate prototype if passed a prototype name" do
+      content = PrototypeClass.create
+      content.title.value.should == "Naughty"
+      content.date.value.should == "Yesterday"
+
+      content = PrototypeClass.create(:careless)
+      content.title.value.should == "Careless"
+      content.date.value.should == "Whisper"
+
+      content = PrototypeClass.create(:witless)
+      content.title.value.should == "Witless"
+      content.date.value.should == "Witness"
+    end
+
+    should "not cause an error if an invalid prototype name is passed" do
+      content = PrototypeClass.create(:nothing)
+      content.title.value.should == ""
+      content.date.value.should == ""
+    end
+
+    should "allow boxes to define the prototype used when adding items" do
+      PrototypeClass.box :images2 do
+        allow :ImageClass, :prototype => :complex
+      end
+      content = PrototypeClass.create
+      content.images2 << ImageClass.new
+      content.images2.first.description.value.should == "Complex"
+    end
+
+    should "allow creation by-passing the prototype" do
+      content = PrototypeClass.create_without_prototype
+      content.title.value.should == ""
+      content.date.value.should == ""
+    end
+  end
+end
+