danwrong-evil 0.1.1 → 0.1.2

data/test/application/plugin_config_test.rb

@@ -0,0 +1,73 @@
+require File.join(File.dirname(__FILE__), '../test_helper')
+require 'evil/application'
+
+class PluginConfigTest < Test::Unit::TestCase
+  include Sinatra::Test
+  
+  context 'running the evil application' do
+    setup do
+      @app = Evil::Application
+    end
+  
+    context 'and some loaded plugins ' do
+      setup do
+        Evil::Plugin::Environment.stubs(:plugins).returns([
+          @plugin1 = Evil::Plugin::Base.new('Test Plugin') { |p|
+            p.configure do |c|
+              c.text :username
+              c.password :password
+            end
+          },
+          @plugin2 = Evil::Plugin::Base.new('Another Plugin') {}
+        ])
+      end
+      
+      context 'while logged in' do 
+        setup do
+          Factory.create(:whitelist)
+          @env = { 'rack.session' => { :identity_url => 'www.example.com' } }
+        end 
+      
+        context 'GET /admin/plugins/new' do
+          setup do
+            get '/admin/plugins/new', {}, @env
+          end
+      
+          should 'be successful' do
+            assert_equal 200, response.status
+          end
+        
+          should 'display a list of plugins that are configurable' do
+            assert_match /Test Plugin/, response.body
+            assert_match /Another Plugin/, response.body
+          end
+        end 
+      
+        context 'GET to /admin/plugins/name' do
+          setup do
+            get "/admin/plugins/#{URI.escape(@plugin1.name)}", {}, @env
+          end
+          
+          should 'be successful' do
+            assert_equal 200, response.status
+          end
+          
+          should 'render form elements' do
+            assert_match /name='config\[username\]'/, response.body
+            assert_match /name='config\[password\]'/, response.body
+          end
+        end
+        
+        context 'POST to /admin/plugins/name' do
+          should 'update plugins config then redirect to home' do
+            @plugin1.config.expects(:set).with({ 'username' => 'testies' })
+            post "/admin/plugins/#{URI.escape(@plugin1.name)}", { :config => { :username => 'testies' } }, @env
+            assert_equal 302, response.status
+          end
+        end
+      end
+    end
+    
+  end
+  
+end

data/test/application/template_test.rb

@@ -0,0 +1,119 @@
+require File.join(File.dirname(__FILE__), '../test_helper')
+require 'evil/application'
+
+class TemplateTest < Test::Unit::TestCase
+  include Sinatra::Test
+  
+  context 'running the evil application' do
+    setup do
+      @app = Evil::Application
+    end
+    
+    context 'while logged in' do 
+      setup do
+        Factory.create(:whitelist)
+        @env = { 'rack.session' => { :identity_url => 'www.example.com' } }
+      end
+    
+      context 'GET /admin/templates/id with existing template' do
+        setup do
+          @template = Factory.create(:template)
+          get "/admin/templates/#{@template.id}", {}, @env
+        end
+      
+        should 'be successful' do
+          assert_equal 200, response.status
+        end
+      end
+    
+      context 'GET /admin/templates/nothinghere with non-existing template' do
+        setup do
+          get '/admin/templates/nothinghere', {}, @env
+        end
+      
+        should 'be not found' do
+          assert_equal 404, response.status
+        end
+      end
+    
+      context 'GET /admin/templates/new' do
+        setup do
+          get '/admin/templates/new', {}, @env
+        end
+      
+        should 'be successful' do
+          assert_equal 200, response.status
+        end
+      end
+      
+      context 'POST /admin/templates/id with valid updated attributes' do
+        setup do
+          @template = Factory.create(:template)
+          post "/admin/templates/#{@template.id}", { :template => { :title => 'thing' } }, @env
+        end
+        
+        should 'redirect to admin home' do
+          assert_equal 302, response.status
+        end
+        
+        should 'update values' do
+          assert_equal 'thing', @template.reload.title
+        end
+      end
+      
+      should 'reload app on POST /admin/templates/id with valid updated attributes' do
+        @template = Factory.create(:template)
+        @app.expects(:reload!)
+        post "/admin/templates/#{@template.id}", { :template => { :title => 'thing' } }, @env
+      end
+      
+      context 'POST /admin/templates/id with invalid updated attributes' do
+        setup do
+          @template = Factory.create(:template)
+          post "/admin/templates/#{@template.id}", { :template => { :title => '' } }, @env
+        end
+        
+        should 'render form' do
+          assert_equal 200, response.status
+        end
+      end
+      
+      context 'POST /admin/templates with valid attributes' do
+        setup do
+          post "/admin/templates", { :template => { 
+            :title => 'just created',
+            :source => 'some stuff',
+            :ttl => 10
+          } }, @env
+        end
+        
+        should 'create record' do
+          assert Evil::Models::Template.find_by_title('just created')
+        end
+        
+        should 'redirect to admin home' do
+          assert_equal 302, response.status
+        end
+      end
+      
+      context 'POST /admin/templates with valid attributes' do
+        setup do
+          post "/admin/templates", { :template => { 
+            :title => nil,
+            :source => 'some stuff',
+            :ttl => 10
+          } }, @env
+        end
+        
+        should 'render form' do
+          assert_match /template\[source\]/, response.body
+        end
+        
+        should 'be successful' do
+          assert_equal 200, response.status
+        end
+      end
+    end
+  end
+  
+end

data/test/test_helper.rb

@@ -3,10 +3,35 @@ require 'rubygems'
 require 'evil'
 require 'test/unit'
 require 'shoulda'
+require 'factory_girl'
 require 'sinatra/test'
 require 'mocha'
 
 require 'redgreen' rescue nil
 
 Sinatra::Default.set :environment, 'test'
-Evil.app_root = File.join(File.dirname(__FILE__), 'example')
+Evil.app_root = File.dirname(__FILE__)
+FileUtils.rm(File.join(File.dirname(__FILE__), 'evil.db')) rescue nil
+Evil::Setup::Generator.new(Evil.app_root).create_database!
+
+Factory.sequence :number do |n|
+  n.to_i
+end
+
+Factory.define :whitelist, :class => Evil::Models::Whitelist do |f|
+  f.pattern 'www.example.com'
+end
+
+Factory.define :template, :class => Evil::Models::Template do |f|
+  f.ttl 10
+  f.position 1
+  f.title { "test#{Factory.next(:number)}" }
+  f.route { "/test#{Factory.next(:number)}/thing" }
+  f.source 'some stuff'
+end
+
+Factory.define :config_pair, :class => Evil::Models::ConfigPair do |f|
+  f.plugin 'Test'
+  f.key { "test#{Factory.next(:number)}" }
+  f.value 'test'
+end

data/test/units/models/template_test.rb

@@ -0,0 +1,16 @@
+require File.join(File.dirname(__FILE__), '../../test_helper')
+
+class TemplateTest < Test::Unit::TestCase
+  include Evil::Models
+  
+  context 'with a template with a liquid syntax error' do
+    setup do
+      @template = Factory.build(:template, :source => '{% amissing tag %} sdkljsdh slkjdh skjldh')
+    end
+    
+    should 'not be valid' do
+      assert !@template.valid?
+      assert !@template.errors[:source].nil?
+    end
+  end
+end

data/test/units/models/whitelist_test.rb

@@ -0,0 +1,31 @@
+require File.join(File.dirname(__FILE__), '../../test_helper')
+
+class WhitelistTest < Test::Unit::TestCase
+  include Evil::Models
+  
+  context 'with whitelist with a non wildcarded patterm' do
+    setup do
+      @wl = Factory.create(:whitelist)
+    end
+    
+    should 'only authorize that exact identity url' do
+      assert !Whitelist.authorize('wwwwww.example.com')
+      assert Whitelist.authorize('www.example.com')
+    end
+    
+    should 'ignore http://' do
+      assert Whitelist.authorize('http://www.example.com')
+    end
+  end
+  
+  context 'with whitelist with a wildcarded patterm' do
+    setup do
+      @wl = Factory.create(:whitelist, :pattern => '*.example2.com')
+    end
+    
+    should 'authorize any identity url ending in .example2.com' do
+      assert Whitelist.authorize('bob.example2.com')
+      assert Whitelist.authorize('www.example2.com')
+    end
+  end
+end

data/test/units/plugin/base_test.rb

@@ -1,4 +1,17 @@
+require File.join(File.dirname(__FILE__), '../../test_helper')
+
 class BaseTest < Test::Unit::TestCase
+  should 'module eval given source when Evil::Plugin.evaluate called' do
+    Evil::Plugin::Environment.expects(:module_eval).with('some code')
+    Evil::Plugin.evaluate('some code')
+  end
+  
+  should 'not raise if Evil::Plugin.evaluate called with dodgy code' do
+    assert_nothing_raised do
+      Evil::Plugin.evaluate('some code that wont work')
+    end
+  end
+  
   should 'initialize with a name and a block that recieves the new instance' do
     plugin = Evil::Plugin::Base.new 'Test Plugin' do |p|
       assert_instance_of Evil::Plugin::Base, p
@@ -31,8 +44,20 @@ class BaseTest < Test::Unit::TestCase
     
   end
   
-  should 'create and register a tag instance when plugin initialize with a tag call' do
-    Evil::Plugin::Tag.expects(:from).returns(t = Class.new(Liquid::Tag))
+  should 'create and register a block tag instance when plugin initialize with a tag call' do
+    Evil::Plugin::BlockTag.expects(:from).returns(t = Class.new(Evil::Plugin::BlockTag))
+    Liquid::Template.expects(:register_tag).with(:thing, t)
+    
+    Evil::Plugin::Base.new 'Test Plugin' do |p|
+      p.tag :thing, :block => true do 
+        'a tag'
+      end
+    end
+    
+  end
+  
+  should 'create and register a singleton tag instance when plugin initialize with a tag call that passed the :block option' do
+    Evil::Plugin::SingletonTag.expects(:from).returns(t = Class.new(Evil::Plugin::SingletonTag))
     Liquid::Template.expects(:register_tag).with(:thing, t)
     
     Evil::Plugin::Base.new 'Test Plugin' do |p|

data/test/units/plugin/configuration_test.rb

@@ -0,0 +1,60 @@
+require File.join(File.dirname(__FILE__), '../../test_helper')
+
+class ConfigurationTest < Test::Unit::TestCase
+  include Evil::Plugin
+  
+  context 'with an instance of Config' do
+    setup do
+      Evil::Models::ConfigPair.destroy_all
+      
+      Factory.create(:config_pair, :key => 'boob', :value => 'test')
+      Factory.create(:config_pair, :key => 'beeb', :value => 'hello')
+      
+      @plugin = Base.new('Test') do |p|
+        p.configure do |c|
+          c.text :username
+          c.password :password
+        end
+      end
+      
+      @config = Configuration::Config.new(@plugin)
+    end
+    
+    should 'return a value for an existing key' do
+      assert_equal 'test', @config['boob']
+    end
+    
+    should 'also allow access through symbols' do
+      assert_equal 'test', @config[:boob]
+    end
+    
+    should 'return an empty string for unset values' do
+      assert_equal '', @config['nothinghere']
+    end
+    
+    should 'allow you to set values with a hash' do
+      @config.set( :new => 'blah' )
+      
+      assert_equal 'blah', @config[:new]
+    end
+    
+    should 'allow you to update values with a hash' do
+      @config.set( :beeb => 'not test' )
+      
+      assert_equal 'not test', @config[:beeb]
+    end
+    
+    should 'return empty strings for an unconfigured plugin' do
+      plugin2 = Base.new('Splange') do |p|
+        p.configure do |c|
+          c.text :username
+          c.password :password
+        end
+      end
+      
+      config2 = Configuration::Config.new(plugin2)
+      
+      assert_equal '', config2[:something]
+    end
+  end
+end

data/test/units/plugin/environment_test.rb

@@ -0,0 +1,13 @@
+require File.join(File.dirname(__FILE__), '../../test_helper')
+
+class EnvironmentTest < Test::Unit::TestCase
+  include Evil::Plugin
+  
+  should 'take a name and block and add to plugins array' do
+    Environment.plugin :test do
+    end
+    
+    assert_equal 1, Environment.plugins.size
+    assert_kind_of Base, Environment.plugins.first
+  end
+end

data/test/units/plugin/filesystem_test.rb

@@ -0,0 +1,22 @@
+require File.join(File.dirname(__FILE__), '../../test_helper')
+
+class FilesystemTest < Test::Unit::TestCase
+  include Evil::Plugin
+  
+  context 'given an instance of the filesystem' do
+    setup do
+      @template = Factory.create(:template, :title => 'boom', :source => 'boom source')
+      @fs = Filesystem.new
+    end
+    
+    should 'return source of a template with the given title' do
+      assert_equal 'boom source', @fs.read_template_file('boom')
+    end
+    
+    should 'raise an exception of template not found' do
+      assert_raises(Liquid::FileSystemError) do
+        @fs.read_template_file('nothinghere')
+      end
+    end
+  end
+end

data/test/units/plugin/tag_test.rb

@@ -2,9 +2,9 @@ require File.join(File.dirname(__FILE__), '../../test_helper')
 require 'liquid'
 
 class TagTest < Test::Unit::TestCase
-  context 'with a custom tag defined that returns a string' do
+  context 'with a custom block tag defined that returns a string' do
     setup do
-      Liquid::Template.register_tag('test', Evil::Plugin::Tag.from { |params|
+      Liquid::Template.register_tag('test', Evil::Plugin::BlockTag.from { |params|
         'hello'
       })
     end
@@ -18,7 +18,7 @@ class TagTest < Test::Unit::TestCase
   
   context 'with a custom tag defined that returns a parameter' do
     setup do
-      Liquid::Template.register_tag('test', Evil::Plugin::Tag.from { |params|
+      Liquid::Template.register_tag('test', Evil::Plugin::BlockTag.from { |params|
         params[:a]
       })
     end
@@ -38,7 +38,7 @@ class TagTest < Test::Unit::TestCase
   
   context 'with a custom tag defined that uses the body method' do
     setup do
-      Liquid::Template.register_tag('test', Evil::Plugin::Tag.from { |params|
+      Liquid::Template.register_tag('test', Evil::Plugin::BlockTag.from { |params|
         times = params[:times] || 1
         out = ''
         times.times { |i| out << body(:i => i) }
@@ -67,14 +67,14 @@ class TagTest < Test::Unit::TestCase
   
   context 'with 2 custom tags defined' do
     setup do
-      Liquid::Template.register_tag('test', Evil::Plugin::Tag.from { |params|
+      Liquid::Template.register_tag('test', Evil::Plugin::BlockTag.from { |params|
         times = params[:times] || 1
         out = ''
         times.times { |i| out << body(:i => i) }
         out
       })
       
-      Liquid::Template.register_tag('test2', Evil::Plugin::Tag.from { |params|
+      Liquid::Template.register_tag('test2', Evil::Plugin::BlockTag.from { |params|
         params[:a]
       })
     end
@@ -94,7 +94,7 @@ class TagTest < Test::Unit::TestCase
   
   context 'with a custom tag with more than one parameter defined' do
     setup do
-      Liquid::Template.register_tag('test', Evil::Plugin::Tag.from { |params|
+      Liquid::Template.register_tag('test', Evil::Plugin::BlockTag.from { |params|
         [params[:a], params[:b]].join('|')
       })
     end
@@ -105,4 +105,33 @@ class TagTest < Test::Unit::TestCase
       assert_equal 'g|a', template.render
     end
   end
+  
+  
+  context 'with a custom singleton tag defined that returns a string' do
+    setup do
+      Liquid::Template.register_tag('tests', Evil::Plugin::SingletonTag.from { |params|
+        'hello'
+      })
+    end
+    
+    should 'output the string' do
+      template = Liquid::Template.parse('{% tests %}')
+
+      assert_equal 'hello', template.render
+    end
+  end
+  
+  context 'with a custom singleton tag defined that uses a parameter' do
+    setup do
+      Liquid::Template.register_tag('tests', Evil::Plugin::SingletonTag.from { |params|
+        params[:thing]
+      })
+    end
+    
+    should 'output the parameter' do
+      template = Liquid::Template.parse('{% tests thing: "boo" %}')
+
+      assert_equal 'boo', template.render
+    end
+  end
 end