skylinecms 3.0.8 → 3.1.0

data/test/unit/test_content_object_test.rb

@@ -0,0 +1,69 @@
+require 'test_helper'
+require 'mocks/test_content_object.rb'
+
+class TestContentObjectTest < ActiveSupport::TestCase
+  context "test content object" do
+    setup do
+      upload = ActionController::TestUploadedFile.new((Skyline.root + "db/fixtures/files/test.gif").to_s, "image/gif")
+      @image = Skyline::MediaFile.new(:name => "test_img.gif", :parent_id => nil, :data => upload)
+      @image.save
+    end
+    should "be able to save without an image" do
+      test_content_object = Skyline::TestContentObject.new
+      test_content_object.header = "Test"
+      
+      test_content_object.save      
+      assert !test_content_object.new_record?
+    end
+    
+    should "create an object_ref when an image is linked" do
+      test_content_object = Skyline::TestContentObject.new
+      
+      test_content_object.image = @image
+      test_content_object.save
+      
+      ref = Skyline::ObjectRef.find_by_id(test_content_object.image_id)
+      
+      assert_valid ref
+    end
+    
+    should "remove object_ref on destroy" do
+      test_content_object = Skyline::TestContentObject.new
+      
+      test_content_object.image = @image
+      test_content_object.save
+      
+      old_image_id = test_content_object.image_id
+      
+      test_content_object.destroy
+      
+      ref = Skyline::ObjectRef.find_by_id(old_image_id)      
+      assert ref.nil?
+    end
+    
+    should "destroy the ObjectRef with image.destroy" do
+      test_content_object = Skyline::TestContentObject.new
+      
+      test_content_object.image = @image
+      test_content_object.save
+            
+      old_image_id = test_content_object.image_id
+      
+      test_content_object.image.destroy
+      
+      ref = Skyline::ObjectRef.find_by_id(old_image_id)
+      assert ref.nil?
+      
+    end
+    
+    should "be able to call image.dimension" do
+      test_content_object = Skyline::TestContentObject.new
+      
+      test_content_object.image = @image
+      assert test_content_object.save
+            
+      assert test_content_object.image.dimension.inspect            
+    end
+    
+  end
+end

data/test/unit/test_section_test.rb

@@ -0,0 +1,247 @@
+require 'test_helper'
+require 'mocks/test_section.rb'
+
+class TestSectionTest < ActiveSupport::TestCase
+  context "test section" do
+    setup do
+      @small_image_html = "<img src='henk.jpg' skyline-ref-id='' skyline-referable-id='10'  skyline-referable-type='Skyline::MediaFile' width='200' height='200'/>"
+      @small_image_no_refs = "<img src=\"broken.jpg\" height=\"200\" width=\"200\" />"
+      
+      @small_link_html = "<a href=\"henk.html\" skyline-ref-id=\"\" skyline-referable-id=\"10\"  skyline-referable-type=\"Skyline::MediaFile\" class=\"myLink\">my link</a>"
+      @small_link_no_refs = "<a href=\"broken\" class=\"myLink\" >my link</a>"
+      
+      @big_html = "<div>
+                  <a href='henk' skyline-ref-id='' skyline-referable-id='10'  skyline-referable-type='Skyline::MediaFile' class='myLink'>
+                   <img src='henk.jpg' skyline-ref-id='' skyline-referable-id='10'  skyline-referable-type='Skyline::MediaFile' width='200' height='200'/>
+                   bla <span>henk</span>
+                 </a>
+                 <img src='peter.jpg' skyline-ref-id='' skyline-referable-id='12'  skyline-referable-type='Skyline::MediaFile' width='200' height='200'/>
+               </div>"      
+    end
+    
+    should "convert both body html fields to html with ref tags on save" do
+      @test_section = Skyline::TestSection.new(:body_a => @small_image_html, :body_b => @big_html)
+      @test_section.save
+    
+      outp = @test_section[:body_a]
+      assert_contains(outp, /\[REF:/)
+      
+      outp = @test_section[:body_b]
+      assert_contains(outp, /\[REF:/)
+    end
+    
+    should "create 4 InlineRef Objects on save with correct refering_id" do
+      @test_section = Skyline::TestSection.new(:body_a => @small_image_html, :body_b => @big_html)
+      @test_section.save
+      
+      @image_refs = @test_section.image_refs.all
+      @link_refs = @test_section.link_refs.all
+      
+      number_of_refs = @image_refs.size + @link_refs.size
+      assert_equal 4, number_of_refs
+    end
+     
+    should "convert REF tags back to html on calling body_a and body_b" do
+      @test_section = Skyline::TestSection.new(:body_a => @small_image_html, :body_b => @small_link_html)
+      @test_section.save
+      
+      assert_equal(@small_image_no_refs, @test_section.body_a)
+      assert_equal(@small_link_no_refs, @test_section.body_b)
+    end
+    
+    should "convert REF tags back to html with skyline attributes on calling body_a('edit') and body_b('edit')" do
+      @test_section = Skyline::TestSection.new(:body_a => @small_image_html, :body_b => @small_link_html)
+      @test_section.save
+      
+      assert_match(/skyline-ref-id/, @test_section.body_a(true))
+      assert_match(/skyline-referable-id/, @test_section.body_a(true))
+      assert_match(/skyline-referable-type/, @test_section.body_a(true))
+    end
+    
+     should "remove inline_ref when body_a is changed" do
+       @test_section = Skyline::TestSection.new(:body_a => @small_image_html, :body_b => @big_html)
+       @test_section.save
+           
+       @test_section.update_attributes(:body_a => @small_link_html)
+       
+       @image_refs = @test_section.image_refs.all
+       @link_refs = @test_section.link_refs.all
+      
+       number_of_refs = @image_refs.size + @link_refs.size
+       
+       assert_equal 4, number_of_refs
+     end
+    
+    should "convert html from [REF:id] tag after MediaFile has been deleted (referable_id = nil)" do
+      @test_section = Skyline::TestSection.new(:body_a => @small_image_html, :body_b => @big_html)
+      @test_section.save
+            
+      @ref_object = @test_section.image_refs.find(:first, :conditions => {:refering_column_name => "body_a"})
+      @ref_object.referable_id = nil
+      @ref_object.save
+      assert_equal(@small_image_no_refs, @test_section.body_a)
+    end
+    
+    should "remove ref objects when section is removed" do
+      @test_section = Skyline::TestSection.new(:body_a => @small_image_html, :body_b => @big_html)
+      @test_section.save
+      
+      @image_refs = @test_section.image_refs.all
+      @link_refs = @test_section.link_refs.all
+      
+      number_of_refs = @image_refs.size + @link_refs.size
+      
+      assert_equal 4, number_of_refs
+      
+      @test_section.destroy
+      
+      @image_refs = @test_section.image_refs.all
+      @link_refs = @test_section.link_refs.all
+      
+      number_of_refs = @image_refs.size + @link_refs.size
+      
+      assert_equal 0, number_of_refs
+    end
+    
+    should "remove all ref objects for body_a when body_a is changed to '' " do
+      @test_section = Skyline::TestSection.new(:body_a => @small_image_html, :body_b => @small_image_html)
+      @test_section.save
+      
+      @image_refs = @test_section.image_refs.all
+      @link_refs = @test_section.link_refs.all
+      
+      number_of_refs = @image_refs.size + @link_refs.size
+      assert_equal 2, number_of_refs
+            
+      @test_section.update_attributes(:body_a => "")
+      
+      @image_refs = @test_section.image_refs.all
+      @link_refs = @test_section.link_refs.all
+      
+      number_of_refs = @image_refs.size + @link_refs.size     
+      assert_equal 1, number_of_refs
+    end
+    
+    should "return last modification of body_a without the need to save" do
+      @test_section = Skyline::TestSection.new(:body_a => @small_image_html, :body_b => @small_image_html)
+      @test_section.save
+      
+      @test_section.body_a = @big_html      
+      assert_equal(@big_html, @test_section.body_a)
+    end
+    
+    should "create 4 InlineRef Objects on save with correct refering_id and clone" do
+      @test_section = Skyline::TestSection.new(:body_a => @small_image_html, :body_b => @big_html)
+      @test_section.save
+      
+      @cloned_section = @test_section.clone
+      @cloned_section.save
+           
+      @image_refs = @test_section.image_refs.all
+      @link_refs = @test_section.link_refs.all
+      
+      number_of_refs = @image_refs.size + @link_refs.size     
+      assert_equal 4, number_of_refs
+    end
+  end
+  
+  context "A test section" do
+    setup do 
+      @html = "bla bla bla <a href='' skyline-referable-id='1' skyline-referable-type='Skyline::MediaFile' >continuïteit</a> bla bla"
+      @section = Skyline::TestSection.new(:body_a => @html)
+      assert @section.save
+      assert_equal 1, @section.link_refs.size
+      assert @section[:body_a].match(/\[REF/)
+    end
+    
+    context "being saved with no changes to the body_a content" do
+      
+      should "not remove the refs for body_a" do
+        @section.body_b = "abcdef"
+        assert @section.save
+        assert_equal 1, @section.link_refs.size
+        assert @section[:body_a].match(/\[REF/)        
+      end
+      
+      should "should keep the same refs" do
+        refs_before = @section.link_refs
+        assert @section.save
+        refs_after = @section.link_refs(true) 
+        
+        assert_equal refs_before,refs_after
+      end
+    end
+    
+    context "being saved with invalid data" do
+      
+      setup do
+        @section.fail_validation = true
+        assert !@section.save
+      end
+      
+      should "not remove the refs for body_a" do
+        assert_equal 1, @section.link_refs.size
+        assert @section[:body_a].match(/\[REF/)        
+      end
+      
+    end
+  
+    context "being saved without the sklyine attributes" do
+      setup do
+        @html = "bla bla bla <a href='' skyline-referable-id='1' skyline-referable-type='Skyline::MediaFile' >continuïteit</a> bla bla"
+        @section = Skyline::TestSection.new(:body_a => @html)
+        assert @section.save
+        assert_equal 1, @section.link_refs.size
+        assert @section[:body_a].match(/\[REF/)      
+      end
+    
+    
+      should "should not have any link_refs anymore" do
+        @section.reload
+        assert !@section.body_a.match(/REF/)
+        @section.body_a = @section.body_a
+        assert @section.save
+        assert_equal 0, @section.link_refs.size        
+        assert !@section[:body_a].match(/\[REF/)
+      end
+    end
+    
+    context "being cloned" do
+      setup do
+        @html = "bla bla bla <a href='' skyline-referable-id='1' skyline-referable-type='Skyline::MediaFile' >continuïteit</a> bla bla"
+        @section = Skyline::TestSection.new(:body_a => @html)
+        assert @section.save
+        @section_refs = Skyline::InlineRef.hash_refs_for_object(@section,:body_a)        
+        assert_equal 1, @section.link_refs.size
+        assert_equal 1, @section_refs.keys.size
+        assert @section[:body_a].match(/\[REF/)
+        @section = Skyline::TestSection.find(@section.id)
+          
+        @clone = @section.clone
+        assert @clone.save
+        @clone_refs = Skyline::InlineRef.hash_refs_for_object(@clone,:body_a)
+        assert_equal 1, @clone_refs.keys.size
+      end
+      
+      should "keep it's own refs" do
+        assert_equal @section_refs.keys, Skyline::InlineRef.hash_refs_for_object(@section,:body_a).keys
+        @section_refs.keys.each do |k|
+          assert @section[:body_a].match(/\[REF:#{k}\]/)
+        end
+      end
+      
+      should "not share refs with clone" do
+        clone_keys = @clone_refs.keys
+        @section_refs.keys.each do |k|
+          assert !clone_keys.include?(k)
+        end
+        clone_keys.each do |k|
+          assert @clone[:body_a].match(/\[REF:#{k}\]/)
+        end
+      end
+      
+      
+      
+    end
+  end
+end

data/test/unit/user_preference_test.rb

@@ -0,0 +1,123 @@
+require 'test_helper'
+
+class UserPreferenceTest < ActiveSupport::TestCase
+  context "User preferences" do
+    setup do  
+      @user_preferences1 = Factory(:user_preference, :key => "a.", :encoded_value => 1.to_yaml)
+      @user_preferences2 = Factory(:user_preference, :key => "b.a.", :encoded_value => 2.to_yaml)
+      @user_preferences3 = Factory(:user_preference, :key => "b.b.", :encoded_value => 3.to_yaml)
+    end
+    
+    should "accept individual key=>value pairs" do
+      initial_count = Skyline::UserPreference.count
+      assert Skyline::UserPreference.set("t", 5)
+      assert_equal(initial_count + 1, Skyline::UserPreference.count)
+      assert Skyline::UserPreference.has_key?("t")
+      assert_equal(5, Skyline::UserPreference.get("t"))
+    end
+    
+    should "accept nested key=>value pairs and store individual values" do
+      initial_count = Skyline::UserPreference.count
+      assert Skyline::UserPreference.set("t",{"a" => 1, "b" => 2})
+      assert_equal(initial_count + 2,  Skyline::UserPreference.count)
+      assert Skyline::UserPreference.has_key?("t.a")
+      assert_equal(1, Skyline::UserPreference.get("t.a"))
+      assert_equal(2, Skyline::UserPreference.get("t.b"))
+      assert Skyline::UserPreference.has_key?("t.b")
+    end
+    
+    should "not accept nested key if key is value" do
+      assert Skyline::UserPreference.set("t",5)
+      assert_raise(ArgumentError){Skyline::UserPreference.set("t.a", 5)}
+    end
+    
+    should "should accept nested key if key is hash" do
+      assert Skyline::UserPreference.set("t",{"a" => 5})
+      assert Skyline::UserPreference.set("t.b", 6)
+    end
+    
+    should "overwrite individual key=>value pair" do
+      initial_count = Skyline::UserPreference.count
+      assert Skyline::UserPreference.set("a", 5)
+      assert_equal(initial_count, Skyline::UserPreference.count)
+      assert_equal(5, Skyline::UserPreference.get("a"))
+    end
+    
+    should "be able to return individual value" do
+      assert_equal(1, Skyline::UserPreference.get("a"))
+    end
+    
+    should "be able to return individual nested value" do
+      assert_equal(2, Skyline::UserPreference.get("b.a"))
+    end
+    
+    should "be able to return a hash of values" do
+      assert_equal({"a" => 2, "b" => 3},  Skyline::UserPreference.get("b"))
+    end
+    
+     should "accept nil as value" do
+      initial_count = Skyline::UserPreference.count
+      assert Skyline::UserPreference.set("t", nil)
+      assert_equal(initial_count + 1, Skyline::UserPreference.count)
+      assert_nil Skyline::UserPreference.get("t")
+      assert Skyline::UserPreference.has_key?("t")
+    end
+    
+    should "delete all nested preferences if value of parent is nil" do
+      initial_count = Skyline::UserPreference.count
+      assert Skyline::UserPreference.set("b", nil)
+      assert_equal(initial_count - 1, Skyline::UserPreference.count)
+      assert_nil Skyline::UserPreference.get("b")
+      assert !Skyline::UserPreference.has_key?("b.a")
+      assert !Skyline::UserPreference.has_key?("b.b")
+    end
+    
+    should "accept boolean as value and return boolean" do
+      assert Skyline::UserPreference.set("t", false)
+      assert_equal(false,  Skyline::UserPreference.get("t"))
+    end
+    
+    should "accept array as value and return array" do
+      assert Skyline::UserPreference.set("t", [1,2,3])
+      assert_equal([1,2,3],  Skyline::UserPreference.get("t"))      
+    end
+    
+    should "accept complex arrays and return correct values" do
+      test_time = Time.now
+      test_date = Date.today
+      assert Skyline::UserPreference.set("t", [1,{"a"=> {"a" => 1, "b" => 2, "c" => {"a" => 1, "b" => 2}}},"string", ["a","b","c"], test_date, test_time])
+      assert_equal([1, {"a"=> {"a" => 1, "b" => 2, "c" => {"a" => 1, "b" => 2}}},"string", ["a","b","c"], test_date, test_time],  Skyline::UserPreference.get("t"))
+    end
+    
+    should "return nil if a key does not exist" do
+      assert_nil Skyline::UserPreference.get("t.a")
+    end 
+    
+    should "return true if has_key? is queried on existing key" do
+      assert Skyline::UserPreference.has_key?("a")
+    end
+    
+    should "return true if has_key? is queried on key with children" do
+      assert Skyline::UserPreference.has_key?("b")
+    end
+    
+    should "return true if has_key? is queried on a nested key" do
+      assert Skyline::UserPreference.has_key?("b.a")
+    end
+    
+    should "return false if has_key? is queried on non existing key" do
+      assert !Skyline::UserPreference.has_key?("t")
+    end
+    
+    should "delete a key" do
+      Skyline::UserPreference.remove("a")
+      assert !Skyline::UserPreference.has_key?("a")
+    end
+    
+    should "delete a key and its children" do
+      Skyline::UserPreference.remove("b")
+      assert !Skyline::UserPreference.has_key?("b.a")
+      assert !Skyline::UserPreference.has_key?("b")
+    end
+  end
+end

data/test/unit/user_test.rb

@@ -0,0 +1,74 @@
+require 'test_helper'
+
+class UserTest < ActiveSupport::TestCase
+  
+  context "a user" do 
+    setup do
+      load File.dirname(__FILE__) + '/../../db/fixtures/roles_and_rights.rb' 
+    
+      @user = Factory(:user, :name => "Test User", :email => "test@test.com")
+      assert !@user.new_record?
+      @user.force_password!("qwedsa")
+    end
+  
+    should "be allowed a right with his role" do 
+      role = Skyline::Role.find_by_name("super")
+      
+      @user.grants.create(:role => role)    
+    
+      assert @user.allow?(:media_dir_create)
+    end
+  
+    should "be able to have multiple roles" do
+      role_1 = Skyline::Role.find_by_name("editor")
+      role_2 = Skyline::Role.find_by_name("admin")
+      
+      @user.grants.create(:role => role_1)    
+      @user.grants.create(:role => role_2)    
+    
+      assert_equal 2, @user.grants.size
+    end
+    
+    should "be allowed a right if it's in one of his multiple roles" do
+      role_1 = Skyline::Role.find_by_name("super")
+      role_2 = Skyline::Role.find_by_name("super")
+
+      @user.grants.create(:role => role_1)
+      @user.grants.create(:role => role_2)
+
+      assert @user.allow?(:media_dir_create)
+      assert @user.allow?(:user_create) # only as an admin
+    end
+    
+    context "that has been destroyed" do
+      setup do
+        @user = Factory(:user, :name => "destroyer", :email => "destroy@test.com")
+        assert !@user.new_record?
+        @user.force_password!("qwedsa")
+        role = Skyline::Role.find_by_name("admin")
+        @user.grants.create(:role => role)
+        
+        assert_equal 1, @user.grants.size
+        assert !@user.destroyed?
+        
+        assert_equal @user, Skyline::User.authenticate("destroy@test.com","qwedsa")
+        assert @user.destroy
+      end
+      
+      should "set the destroyed flag on #destroy" do
+        assert @user.is_destroyed?
+      end
+      should "not be removed from the database" do
+        assert Skyline::User.find_by_id_and_is_destroyed(@user.id,true)
+      end
+      should "not be able to authenticate" do
+        assert !Skyline::User.authenticate("destroy@test.com","qwedsa")
+      end
+      should "not have any grants" do
+        user = Skyline::User.find_by_id(@user.id)
+        assert_equal 0, user.grants.size
+      end
+    end
+    
+  end
+end

data/test/user_access_helper.rb

@@ -0,0 +1,36 @@
+module UserAccessHelper
+  module UserAssertion
+    def allow(http_method,path,params={})
+      send(http_method,path,params)
+      assert((response.success? || response.redirect?), "Response was #{response.inspect}")
+    end
+    
+    def deny(http_method,path,params={})
+      send(http_method,path,params)
+      assert_response :unauthorized
+    end
+  end
+  
+
+  def login(user,pw)
+    open_session do |s|
+      s.extend(UserAssertion)
+      s.post "/skyline/authentication", :email => user.email, :password => pw      
+    end    
+  end
+  
+  def build_complete_environment
+    @media_dir = Factory(:media_dir, :type => "Skyline::MediaDir")
+    assert !@media_dir.new_record?
+    
+    @media_sub_dir = Factory(:media_dir, :type => "Skyline::MediaDir", :directory => @media_dir)
+    assert !@media_sub_dir.new_record?
+    
+    @media_file = Factory(:media_file, :parent_id => @media_dir.id, :type => "Skyline::MediaFile")
+    assert !@media_file.new_record?
+    
+    @user = Factory(:user, :name => "Test User", :email => "test@test.com")
+    assert !@user.new_record?
+    @user.force_password!("qwedsa")
+  end
+end

data/vendor/digitpaint/personify/test/fixtures/multiple_tags.txt

@@ -0,0 +1,8 @@
+Lorem ipsum dolor sit amet, consectetuer adipiscing elit. In tristique sapien in tellus dapibus tincidunt. Ut eu tortor vitae quam eleifend lacinia. Nulla facilisi. Vivamus purus. Integer ultrices commodo pede. Sed rutrum, sapien vel tempor porta, turpis justo malesuada nisl, quis vestibulum leo augue laoreet [TAG3] lacus. Pellentesque mollis, ante ut sodales ullamcorper, erat tellus facilisis ipsum, et ornare urna nunc quis est. Etiam nibh elit, consectetuer nec, pretium eu, rutrum sed, arcu. Nunc sit amet metus nec orci consequat semper. Nullam iaculis felis vitae metus. Pellentesque molestie. Sed quis nisi ut eros placerat posuere. Aenean pellentesque nunc non arcu. Vivamus mauris. Nulla lorem. Curabitur tellus nisl, porta eget, vehicula eu, consequat id, tortor. Sed vitae est. Donec id diam eu tellus faucibus commodo. Aliquam vel turpis vel urna blandit malesuada. Nulla dui. "[TAG1]"
+
+Cras sit amet ante sit amet elit tincidunt fermentum. Vivamus hendrerit, nulla non elementum rutrum, nulla libero auctor nunc, vulputate malesuada nisi sapien non velit. Nam eu felis. Vivamus ac mi et ipsum egestas congue. Pellentesque eu odio vitae diam molestie venenatis. Sed eleifend nulla ut ipsum. Nam tincidunt ultrices neque. Duis erat. Sed ipsum arcu, laoreet eget, rutrum quis, accumsan at, arcu. Pellentesque eu ipsum a felis pulvinar laoreet.[TAG4] Sed viverra est vitae turpis. Maecenas tortor metus, aliquet et, ullamcorper auctor, mattis quis, leo. Lorem ipsum dolor sit amet, consectetuer adipiscing elit. [TAG3] Mauris ut eros sed ipsum facilisis nonummy. Fusce pretium, magna vestibulum semper nonummy, purus eros scelerisque mi, id luctus est nulla eget ante. Suspendisse quis nibh. Nullam pharetra tristique augue. Integer porta luctus ligula. Sed tincidunt.
+
+Fusce varius commodo lacus. Nullam tincidunt [TAG2] massa lobortis sapien. Sed turpis erat, hendrerit nec, fringilla eu, congue semper, tortor. Ut eget tellus sed mauris pellentesque imperdiet. Sed elementum dictum ipsum. Ut pharetra. Sed eleifend cras amet. 
+[TAG1][TAG1][TAG1][TAG1][TAG1][TAG1][TAG1][TAG1][TAG1][TAG1][TAG1][TAG1]
+
+[NONEXISTANT][NONEXISTANT][NONEXISTANT][NONEXISTANT][NONEXISTANT][NONEXISTANT]

data/vendor/digitpaint/personify/test/parse_runner.rb

@@ -0,0 +1,25 @@
+require File.dirname(__FILE__) + "/../vendor/treetop/lib/treetop"
+
+require '../lib/parser/personify_node_classes'
+Treetop.load "../lib/parser/personify"
+
+# STR = "a [TAG] is never [TAG] with [TAG2] and [troepie] bla"
+# STR = "[A1|B1|\"str\"] [A1|B1|str] [AB(T1)]"
+STR = "[AND(\"1\", 2,3)] <a href=\"http://mlr1.nl/r/[TOKEN]/539\"> financiële"
+@parser = PersonifyLanguageParser.new
+
+if result = @parser.parse(STR)
+  puts "done"
+  puts result  
+  puts result.inspect
+  puts result.eval(
+    :t1 => "tt",
+    :tag => "henk", 
+    :ab => Proc.new{|p| p.inspect },
+    :and => Proc.new{|*c| c.join(" & ") }
+    ).inspect
+else
+  puts "FAIL"
+  puts @parser.inspect
+  puts @parser.terminal_failures.join("\n")
+end