spontaneous 0.1.0.alpha1 → 0.2.0.alpha1

data/test/unit/test_piece.rb

@@ -1,15 +1,22 @@
 # encoding: UTF-8
 
-require 'test_helper'
+require File.expand_path('../../test_helper', __FILE__)
 
 
 class PieceTest < MiniTest::Spec
   include Spontaneous
 
+  def setup
+    @site = setup_site
+  end
+
+  def teardown
+    teardown_site
+  end
+
   context "Pieces" do
     setup do
       Content.delete
-      Spot::Schema.reset!
       class ::Piece < Spot::Piece; end
       class ::Page < Spot::Page; end
       class ::Fridge < ::Piece; end
@@ -27,13 +34,15 @@ class PieceTest < MiniTest::Spec
 
     context "as page content" do
       setup do
+        ::Page.box :things
+        ::Piece.box :things
         @page = ::Page.create
         @f1 = ::Piece.new
-        @page << @f1
+        @page.things << @f1
         @f2 = ::Piece.new
-        @f1 << @f2
+        @f1.things << @f2
         @f3 = ::Fridge.new
-        @f2 << @f3
+        @f2.things << @f3
 
         @page.save
         @f1.save
@@ -52,10 +61,19 @@ class PieceTest < MiniTest::Spec
         @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
+      should "have a link to their box" do
+        @f1.container.should == @page.things
+        @f2.container.should == @f1.things
+        @f3.container.should == @f2.things
+      end
+
+      should "have a link to their owner" do
+        @f1.owner.should == @page
+        @f2.owner.should == @f1
+        @f3.owner.should == @f2
+        @f1.parent.should == @page
+        @f2.parent.should == @f1
+        @f3.parent.should == @f2
       end
 
       should "know their depth in the piece tree" do

data/test/unit/test_plugins.rb

@@ -0,0 +1,153 @@
+# encoding: UTF-8
+
+require File.expand_path('../../test_helper', __FILE__)
+
+class PluginsTest < MiniTest::Spec
+  include ::Rack::Test::Methods
+
+
+  def self.startup
+    # @revision_root = "#{Dir.mktmpdir}/spontaneous-tests/#{Time.now.to_i}"
+    # `mkdir -p #{@revision_root}/public`
+
+    @site = setup_site
+
+
+    klass =  Class.new(Spontaneous::Page)
+    Object.send(:const_set, :Page, klass)
+    klass =  Class.new(Spontaneous::Piece)
+    Object.send(:const_set, :Piece, klass)
+    klass =  Class.new(::Page) do
+      layout :from_plugin
+    end
+    Object.send(:const_set, :LocalPage, klass)
+    klass =  Class.new(::Piece) do
+      style :from_plugin
+    end
+    Object.send(:const_set, :LocalPiece, klass)
+
+    plugin_dir = File.expand_path("../../fixtures/plugins/schema_plugin", __FILE__)
+    plugin = Spontaneous.instance.load_plugin plugin_dir
+    plugin.init!
+    plugin.load!
+
+  end
+
+  def self.shutdown
+    teardown_site
+    Object.send(:remove_const, :Page) rescue nil
+    Object.send(:remove_const, :Piece) rescue nil
+    Object.send(:remove_const, :LocalPage) rescue nil
+    Object.send(:remove_const, :LocalPiece) rescue nil
+  end
+
+  def app
+    Spontaneous::Rack.application
+  end
+
+  context "Plugins:" do
+
+    setup do
+      Site.publishing_method = :immediate
+      State.delete
+      Content.delete
+      Change.delete
+      @site = Spontaneous.instance
+      page = ::Page.new
+      page.save
+
+    end
+
+    teardown do
+      State.delete
+      Content.delete
+      Change.delete
+    end
+
+    should "load their init.rb file" do
+      $set_in_init.should be_true
+    end
+
+    context "with static files" do
+      setup do
+        @static = %w(css/plugin.css js/plugin.js subdir/image.gif static.html)
+      end
+
+      should "be able to provide them under their namespace in editing mode" do
+        Spontaneous.mode = :back
+        @static.each do |file|
+          get "/schema_plugin/#{file}"
+          assert last_response.ok?, "Static file /schema_plugin/#{file} returned error code #{last_response.status}"
+          last_response.body.should == File.basename(file) + "\n"
+        end
+      end
+
+      should "be able to provide them under their namespace in public mode" do
+        Spontaneous.mode = :front
+        @static.each do |file|
+          get "/schema_plugin/#{file}"
+          assert last_response.ok?, "Static file /schema_plugin/#{file} returned error code #{last_response.status}"
+          last_response.body.should == File.basename(file) + "\n"
+        end
+      end
+
+      should "look for and parse sass templates" do
+        Spontaneous.mode = :back
+        get "/schema_plugin/subdir/sass.css"
+        assert last_response.ok?, "Static file /schema_plugin/subdir/sass.css returned error code #{last_response.status}"
+        last_response.body.should =~ /^\s+color: #005a55;/
+        last_response.body.should =~ /^\s+padding: 42px;/
+      end
+
+      context "during publishing" do
+        setup do
+
+          Content.delete_revision(1) rescue nil
+
+          Spontaneous.logger.silent! {
+            Site.publish_all
+          }
+        end
+
+        teardown do
+          FileUtils.rm_rf(@revision_root) rescue nil
+          Content.delete
+          State.delete
+          Content.delete_revision(1)
+        end
+
+        should "have their public files copied into the revision sandbox" do
+          @static.each do |file|
+            path = File.join(@site.revision_root, '00001', 'public', 'schema_plugin', file)
+            assert File.exists?(path), "File '#{path}' should exist"
+          end
+        end
+
+        should "have their SASS & Less templates rendered to static css" do
+          sass_files =['subdir/sass.css']
+          sass_files.each do |file|
+            path = File.join(@site.revision_root, '00001', 'public', 'schema_plugin', file)
+            assert File.exists?(path), "File '#{path}' should exist"
+            css = File.read(path)
+            css.should =~ /color:#005a55;?/
+            css.should =~ /padding:42px;?/
+          end
+        end
+      end
+    end
+
+
+    # context "Functional plugins" do
+    #   # do I need anything here?
+    # end
+
+    context "with schemas" do
+      should "make content classes available to rest of app" do
+        defined?(::SchemaPlugin).should == "constant"
+        ::SchemaPlugin::External.fields.length.should == 1
+        piece = ::SchemaPlugin::External.new(:a => "A Field")
+        piece.render.should == "plugins/templates/external.html.cut\n"
+      end
+    end
+  end
+end

data/test/unit/test_prototype_set.rb

@@ -1,7 +1,6 @@
-
 # encoding: UTF-8
 
-require 'test_helper'
+require File.expand_path('../../test_helper', __FILE__)
 
 
 class PrototypeSetTest < MiniTest::Spec
@@ -182,10 +181,69 @@ class PrototypeSetTest < MiniTest::Spec
       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
+
+      should "return the first item in the local set" do
+        @set.local_first.should == "Four"
+      end
+
+      should "traverse the object list until it finds a local_first" do
+        a = Super.new
+        a.prototypes = @set
+        set1 = Spontaneous::Collections::PrototypeSet.new(a, :prototypes)
+        b = Super.new
+        b.prototypes = set1
+        set2 = Spontaneous::Collections::PrototypeSet.new(b, :prototypes)
+        set1.local_first.should == "Four"
+        set2.local_first.should == "Four"
+      end
+
+      should "return nil for local first if empty" do
+        a = Super.new
+        a.prototypes = Spontaneous::Collections::PrototypeSet.new(nil, :prototypes)
+        set1 = Spontaneous::Collections::PrototypeSet.new(a, :prototypes)
+        set1.local_first.should be_nil
+      end
+
+      should "correctly search the hierarchy" do
+        one = "One"
+        one.stubs(:default?).returns(false)
+        two = "Two"
+        two.stubs(:default?).returns(true)
+        three = "Three"
+        three.stubs(:default?).returns(false)
+        four = "Four"
+        four.stubs(:default?).returns(false)
+        five = "Five"
+        five.stubs(:default?).returns(false)
+        six = "Six"
+        six.stubs(:default?).returns(true)
+        a = Super.new
+        a.prototypes = Spontaneous::Collections::PrototypeSet.new(nil, :prototypes)
+        a.prototypes[:one] = one
+        a.prototypes[:two] = two
+        b = Super.new
+        b.prototypes = Spontaneous::Collections::PrototypeSet.new(a, :prototypes)
+        a.prototypes[:three] = three
+        a.prototypes[:four] = four
+        c = Super.new
+        c.prototypes = Spontaneous::Collections::PrototypeSet.new(b, :prototypes)
+
+        test = proc { |value|
+          value.default?
+        }
+
+        c.prototypes.hierarchy_detect(&test).should == "Two"
+
+        c.prototypes[:five] = five
+        c.prototypes[:six] = six
+
+        c.prototypes.hierarchy_detect(&test).should == "Six"
+      end
     end
   end
 end

data/test/unit/test_prototypes.rb

@@ -1,53 +1,62 @@
 # encoding: UTF-8
 
-require 'test_helper'
+require File.expand_path('../../test_helper', __FILE__)
 
 class PrototypesTest < MiniTest::Spec
+  def setup
+    @site = setup_site
+  end
+
+  def teardown
+    teardown_site
+  end
+
   context "Prototypes" do
     setup do
-      class ::ImageClass < Spontaneous::Content
+      class ::ImageClass < Spontaneous::Piece
         field :image
         field :description
 
-        def prototype
-          self.description = "An Image"
+        prototype do |piece|
+          piece.description = "An Image"
         end
 
-        def complex_prototype
-          self.description = "Complex"
+        prototype :complex do |piece|
+          piece.description = "Complex"
         end
       end
 
-      class ::PrototypeClass < Spontaneous::Content
+      class ::PrototypeClass < Spontaneous::Piece
         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
+        prototype do |piece|
+          piece.title = "Naughty"
+          piece.date  = "Yesterday"
+          piece.something = piece.something.value * 2
+          piece.images << ImageClass.new
         end
 
-        def careless_prototype
-          self.title = "Careless"
-          self.date  = "Whisper"
+        prototype :careless do |piece|
+          piece.title = "Careless"
+          piece.date  = "Whisper"
         end
 
-        def witless_prototype
-          self.title = "Witless"
-          self.date  = "Witness"
+        prototype :witless do |piece|
+          piece.title = "Witless"
+          piece.date  = "Witness"
         end
       end
 
+
     end
     teardown do
       Content.delete
-      Object.send(:remove_const, :ImageClass)
-      Object.send(:remove_const, :PrototypeClass)
+      Object.send(:remove_const, :ImageClass) rescue nil
+      Object.send(:remove_const, :PrototypeClass) rescue nil
     end
 
     should "call #prototype after creation of an object" do
@@ -97,6 +106,58 @@ class PrototypesTest < MiniTest::Spec
       content.title.value.should == ""
       content.date.value.should == ""
     end
+
+    should "inherit prototypes from supertype" do
+      class ::Prototype2Class < ::PrototypeClass; end
+
+      content = Prototype2Class.create(:witless)
+      content.title.value.should == "Witless"
+      content.date.value.should == "Witness"
+
+      Object.send(:remove_const, :Prototype2Class) rescue nil
+    end
+
+    should "allow overwriting of prototypes in subclasses" do
+      class ::Prototype2Class < ::PrototypeClass
+        prototype :witless do |piece|
+          piece.title = "Witless2"
+          piece.date  = "Witness2"
+        end
+      end
+
+      content = Prototype2Class.create(:witless)
+      content.title.value.should == "Witless2"
+      content.date.value.should == "Witness2"
+
+      Object.send(:remove_const, :Prototype2Class) rescue nil
+    end
+
+    should "allow calling of supertype prototype from within overridden prototype" do
+      class ::Prototype2Class < ::PrototypeClass
+        prototype :witless do |piece|
+          super(piece)
+          piece.date  = "Witness2"
+        end
+      end
+
+      content = Prototype2Class.create(:witless)
+      content.title.value.should == "Witless"
+      content.date.value.should == "Witness2"
+
+      Object.send(:remove_const, :Prototype2Class) rescue nil
+    end
+
+    should "raise error if definition does not accept exactly 1 argument" do
+      begin
+        class ::Prototype3Class < ::S::Piece
+          prototype {}
+        end
+        flunk("Defining prototypes with no arguments should raise error")
+      rescue => e
+        e.must_be_instance_of(Spontaneous::InvalidPrototypeDefinitionError)
+      end
+      Object.send(:remove_const, :Prototype3Class) rescue nil
+    end
   end
 end
 

data/test/unit/test_render.rb

@@ -1,16 +1,19 @@
 # encoding: UTF-8
 
-require 'test_helper'
+require File.expand_path('../../test_helper', __FILE__)
 
+require 'sinatra/base'
 
 class RenderTest < MiniTest::Spec
   include Spontaneous
 
   def setup
+    @site = setup_site
     @saved_engine_class = Spontaneous::Render.renderer_class
-    Schema.reset!
   end
+
   def teardown
+    teardown_site
     Spontaneous::Render.renderer_class = @saved_engine_class
   end
 
@@ -18,11 +21,17 @@ class RenderTest < MiniTest::Spec
     @template_root ||= File.expand_path(File.join(File.dirname(__FILE__), "../fixtures/templates"))
   end
 
-  context "First render step" do
+  context "Publish rendering step" do
     setup do
+      Content.delete
       self.template_root = template_root
       Spontaneous::Render.renderer_class = Spontaneous::Render::PublishingRenderer
 
+      class ::Page < Spontaneous::Page
+        field :title
+        box :sections1
+        box :sections2
+      end
       class ::TemplateClass < Content
         field :title do
           def to_epub
@@ -45,10 +54,65 @@ class RenderTest < MiniTest::Spec
       @content.style.should == TemplateClass.default_style
       @content.title = "The Title"
       @content.description = "The Description"
+      @root = ::Page.create(:title => "Home")
+      @section1 = ::Page.new(:title => "Section 1")
+      @section2 = ::Page.new(:title => "Section 2")
+      @section3 = ::Page.new(:title => "Section 3")
+      @section4 = ::Page.new(:title => "Section 4")
+      @root.sections1 << @section1
+      @root.sections1 << @section2
+      @root.sections2 << @section3
+      @root.sections2 << @section4
+
+      @root.sections2.entries.last.set_position(0)
+      @root.save.reload
     end
 
     teardown do
       Object.send(:remove_const, :TemplateClass) rescue nil
+      Object.send(:remove_const, :Page) rescue nil
+    end
+
+    should "render strings correctly" do
+      S::Render.render_string('#{title} {{ Time.now }}', @content, :html, {}).should == "The Title {{ Time.now }}"
+    end
+
+    should "use a cache for the site root" do
+      S::Render.with_publishing_renderer do
+        a = S::Render.render_string('#{root.object_id} #{root.object_id}', @content, :html, {})
+        a.should_not == "#{nil.object_id} #{nil.object_id}"
+        a.split.uniq.length.should == 1
+      end
+    end
+
+    should "iterate through the sections" do
+      template = '%%{ navigation(%s) do |section, active| }#{section.title}/#{active} %%{ end }'
+      a = S::Render.render_string(template % "", @section1, :html, {})
+      a.should == "Section 1/true Section 2/false Section 4/false Section 3/false "
+      a = S::Render.render_string(template % "1", @section2, :html, {})
+      a.should == "Section 1/false Section 2/true Section 4/false Section 3/false "
+      a = S::Render.render_string(template % ":section", @section1, :html, {})
+      a.should == "Section 1/true Section 2/false Section 4/false Section 3/false "
+    end
+
+    should "use a cache for navigation pages" do
+      a = b = c = nil
+      template = '%{ navigation do |section, active| }#{section.object_id} %{ end }'
+      a = S::Render.render_string(template, S::Content[@section1.id], :html, {}).strip
+      b = S::Render.render_string(template, S::Content[@section1.id], :html, {}).strip
+      a.should_not == b
+
+      S::Render.with_publishing_renderer do
+        template = '%{ navigation do |section, active| }#{section.object_id} %{ end }'
+        a = S::Render.render_string(template, S::Content[@section1.id], :html, {}).strip
+        b = S::Render.render_string(template, S::Content[@section1.id], :html, {}).strip
+        a.should == b
+      end
+      S::Render.with_publishing_renderer do
+        template = '%{ navigation do |section, active| }#{section.object_id} %{ end }'
+        c = S::Render.render_string(template, S::Content[@section1.id], :html, {}).strip
+      end
+      a.should_not == c
     end
 
     should "be able to render themselves to HTML" do
@@ -92,9 +156,9 @@ class RenderTest < MiniTest::Spec
         child = TemplateClass.new
         child.title = "Child2 Title"
         child.description = "Child2 Description"
-        @content << child
-        @content.pieces.last.style = TemplateClass.get_style(:this_template)
-        @content.pieces.last.hide!
+        @content.bits << child
+        @content.bits.last.style = TemplateClass.get_style(:this_template)
+        @content.bits.last.hide!
         @content.render.should == "<complex>\nThe Title\n<piece><html><title>Child Title</title><body>Child Description</body></html>\n</piece>\n</complex>\n"
       end
     end
@@ -130,7 +194,7 @@ class RenderTest < MiniTest::Spec
 
         class ::AnImage < Content; end
         AnImage.field :title
-        AnImage.template '<img>{{title}}</img>'
+        AnImage.template '<img>#{title}</img>'
 
         @root = TemplateClass.new
         @root.images.introduction = "Images below:"
@@ -160,7 +224,7 @@ class RenderTest < MiniTest::Spec
 
         class ::AnImage < Content; end
         AnImage.field :title
-        AnImage.template '<img>{{title}}</img>'
+        AnImage.template '<img>#{title}</img>'
 
         @root = TemplateClass.new
         @root.images_with_template.introduction = "Images below:"
@@ -274,6 +338,7 @@ class RenderTest < MiniTest::Spec
       end
     end
   end
+
   context "Request rendering" do
     setup do
       self.template_root = template_root
@@ -287,7 +352,7 @@ class RenderTest < MiniTest::Spec
       @page = PreviewRender.new(:title => "PAGE", :description => "DESCRIPTION")
       # @page.stubs(:id).returns(24)
       @page.save
-      @session = ::Rack::MockSession.new(Sinatra::Application)
+      @session = ::Rack::MockSession.new(::Sinatra::Application)
     end
 
     teardown do
@@ -300,6 +365,12 @@ class RenderTest < MiniTest::Spec
         PreviewRender.layout :preview_render
       end
 
+      should "something" do
+        @now = Time.now
+        ::Time.stubs(:now).returns(@now)
+        S::Render.render_string('#{title} {{ Time.now }}', @page, :html, {}).should == "PAGE #{@now.to_s}"
+      end
+
       should "render all tags & include preview edit markers" do
         @page.render.should == <<-HTML
 PAGE <p>DESCRIPTION</p>
@@ -354,6 +425,23 @@ PAGE <p>DESCRIPTION</p>
       end
     end
 
+    context "variables in templates" do
+      setup do
+        Spontaneous::Render.renderer_class = Spontaneous::Render::PublishingRenderer
+        PreviewRender.layout :variables
+        PreviewRender.style :variables
+
+        @page.layout = :variables
+        @first = PreviewRender.new(:title => "first")
+        @page.images << @first
+        @page.images.first.style = :variables
+      end
+
+      should "be passed to page content" do
+        @page.render(:html, :param => "param").should == "param\n<variable/param/>\n\nlocal\n"
+      end
+    end
   end
+
 end