cantango 0.8.0

data/spec/integration/cache_using_moneta_spec.rb

@@ -0,0 +1,46 @@
+require 'dummy_spec_helper'
+
+# Cutter::
+Cutter::Stamper.turn :off
+
+describe "Caching of the rules" do
+  
+  before(:all) do
+    @user = User.create! :name => 'stanislaw', :role => 'user', :email => 'stanislaw@mail.ru'
+    Article.create!(:title => 'one')
+  end
+
+  context 'CanTango::Ability::Cache::MonetaCache' do
+    before do
+      CanTango.configure do |config|
+        config.cache.store.default_class = CanTango::Ability::Cache::MonetaCache
+      end
+    end
+
+    it "should just response" do
+      get root_path
+      response.status.should be(200)
+    end
+
+    it "should populate session with cache_key" do
+      get '/login_user/stanislaw'
+      session[:cache_key].should be_nil
+      get '/articles'
+      session[:cache_key].should_not be_nil
+    end
+
+    context "current Ability" do
+      it "should have #cached_rules equal to #rules" do
+        get '/login_user/stanislaw'
+        get '/articles'
+        #puts response.body
+        response.body.should match(/Cached the rules!/)
+        response.body.should match(/Using cached rules: false/)
+        get '/articles'
+        response.body.should match(/Cached the rules!/)
+        response.body.should match(/Using cached rules: true/)
+        #puts response.body
+      end
+    end
+  end
+end

data/spec/integration/cache_using_session_spec.rb

@@ -0,0 +1,46 @@
+require 'dummy_spec_helper'
+
+# Cutter::
+Cutter::Stamper.turn :off
+
+describe "Caching of the rules" do
+  
+  before(:all) do
+    @user = User.create! :name => 'stanislaw', :role => 'user', :email => 'stanislaw@mail.ru'
+    Article.create!(:title => 'one')
+  end
+
+  context 'CanTango::Ability::Cache::Session::Cache' do
+    before do
+      CanTango.configure do |config|
+        config.cache.store.default_class = CanTango::Ability::Cache::SessionCache
+      end
+    end
+
+    it "should just response" do
+      get root_path
+      response.status.should be(200)
+    end
+
+    it "should populate session with cache_key" do
+      get '/login_user/stanislaw'
+      session[:cache_key].should be_nil
+      get '/articles'
+      session[:cache_key].should_not be_nil
+    end
+
+    context "current Ability" do
+      it "should have #cached_rules equal to #rules" do
+        get '/login_user/stanislaw'
+        get '/articles'
+        #puts response.body
+        response.body.should match(/Cached the rules!/)
+        response.body.should match(/Using cached rules: false/)
+        get '/articles'
+        response.body.should match(/Cached the rules!/)
+        response.body.should match(/Using cached rules: true/)
+        #puts response.body
+      end
+    end
+  end
+end

data/spec/integration/main_spec.rb

@@ -0,0 +1,16 @@
+require 'dummy_spec_helper'
+
+describe "" do
+  it "truth" do
+    Rails.application.should be_kind_of(Dummy::Application)
+  end
+
+  it "should get root page" do
+    get root_path
+    response.status.should be(200)
+  end
+
+  it "should" do
+    pending
+  end
+end

data/spec/integration/performance/ability_initialize_performance.rb

@@ -0,0 +1,54 @@
+require 'dummy_spec_helper'
+require 'integration/performance/helpers/ability'
+describe "CanTango::Ability performance" do
+
+  before(:each) do
+    @user = User.create! :name => 'stanislaw', :role => 'user', :email => 'stanislaw@mail.ru'
+    Article.create!(:title => 'one')
+  end
+
+  context "With cache disabled" do
+
+    describe 'Memory store' do
+      before do
+        CanTango.configure do |config|
+          config.cache.set :off
+        end
+      end
+
+      it "3 requests" do
+        get '/login_user/stanislaw'
+        puts "\n\nFirst Request with Rails autoloading of all CanTango(if running isolated)"
+        get "/articles"
+        puts "\n\nSecond Request (basic #initialize)"
+        get "/articles"
+        puts "\n\nThird Request"
+        get "/articles"
+      end
+    end
+  end
+
+  context "With cache enabled" do
+
+    describe 'Memory store' do
+      before do
+        CanTango.configure do |config|
+          config.cache.set :on
+          config.cache.store.default_type = :memory
+        end
+      end
+
+      it "3 requests" do
+        get '/login_user/stanislaw'
+        puts "\n\nFirst Request"
+        get "/articles"
+        puts "\n\nSecond Request"
+        get "/articles"
+        puts "\n\nThird Request"
+        get "/articles"
+      end
+    end
+  end
+end
+
+

data/spec/integration/performance/cache_performance.rb

@@ -0,0 +1,31 @@
+require 'dummy_spec_helper'
+require 'integration/performance/helpers/cache'
+
+describe "Caching of the rules" do
+  context "Ability's rules" do
+
+    before(:each) do
+      @user = User.create! :name => 'stanislaw', :role => 'user', :email => 'stanislaw@mail.ru'
+      Article.create!(:title => 'one')
+    end
+
+    describe 'Memory store' do
+      before do
+        CanTango.configure do |config|
+          config.cache.set :on
+          config.cache.store.default_type = :memory
+        end
+      end
+
+      it "3 requests" do
+        get '/login_user/stanislaw'
+        puts "\n\nFirst Request"
+        get "/articles"
+        puts "\n\nSecond Request"
+        get "/articles"
+        puts "\n\nThird Request"
+        get "/articles"
+      end
+    end
+  end
+end

data/spec/integration/performance/can_performance.rb

@@ -0,0 +1,54 @@
+require 'dummy_spec_helper'
+require 'integration/performance/helpers/rules'
+describe "CanTango::Ability performance" do
+
+  before(:each) do
+    @user = User.create! :name => 'stanislaw', :role => 'user', :email => 'stanislaw@mail.ru'
+    Article.create!(:title => 'one')
+  end
+
+  context "With cache disabled" do
+
+    describe 'Memory store' do
+      before do
+        CanTango.configure do |config|
+          config.cache.set :off
+        end
+      end
+
+      it "3 requests" do
+        get '/login_user/stanislaw'
+        puts "\n\nFirst Request"
+        get "/articles"
+        puts "\n\nSecond Request"
+        get "/articles"
+        puts "\n\nThird Request"
+        get "/articles"
+      end
+    end
+  end
+
+  context "With cache enabled" do
+
+    describe 'Memory store' do
+      before do
+        CanTango.configure do |config|
+          config.cache.set :on
+          config.cache.store.default_type = :memory
+        end
+      end
+
+      it "3 requests" do
+        get '/login_user/stanislaw'
+        puts "\n\nFirst Request"
+        get "/articles"
+        puts "\n\nSecond Request"
+        get "/articles"
+        puts "\n\nThird Request"
+        get "/articles"
+      end
+    end
+  end
+
+
+end

data/spec/integration/performance/helpers/ability.rb

@@ -0,0 +1,44 @@
+require 'cutter'
+Cutter::Stamper.scope :ability => "Ability#initialize" do |stan|
+  stan.msg :no_cache          => 'No caching, going through engines'
+  stan.msg :permissions_done  => "Permissions finished"
+  stan.msg :permits_done      => "Permits finished"
+  stan.msg :caching_done      => "Caching finished"
+end
+
+module CanTango
+  class PerformanceTestAbility < CanTango::Ability
+    def initialize candidate, options = {}
+
+      raise "Candidate must be something!" if !candidate
+      @candidate, @options = candidate, options
+      @session = options[:session] || {} # seperate session cache for each type of user?
+
+      if cached_rules?
+        @rules_cached = true
+        puts "Using Cache..."
+        return
+      end
+
+      stamper(:ability) {
+        raise "Candidate must be something!" if !candidate
+        @candidate, @options = candidate, options
+        @session = options[:session] || {} # seperate session cache for each type of user?
+      }
+
+      stamper(:ability) do |st| 
+        st.stamp(:no_cache)
+        with(:permissions)  {|permission| permission.evaluate! user }
+        st.stamp :permissions_done
+
+        with(:permits)      {|permit| break if permit.execute == :break }
+        st.stamp :permits_done
+
+        cache_rules!
+        st.stamp :caching_done
+      end
+    end
+  end
+end
+
+CanTango.config.ability.default_class = CanTango::PerformanceTestAbility

data/spec/integration/performance/helpers/ability_api.rb

@@ -0,0 +1,44 @@
+Cutter::Stamper.scope :call_on_ability => "Call on Ability" do |stan|
+  stan.msg :caching_done      => "Caching finished"
+end
+
+module CanTango
+  module Api
+    module User
+      module Ability
+        def user_ability user, options = {}
+          stamper(:call_on_ability) { 
+            @current_ability ||= ::CanTango::Ability.new(user, ability_options.merge(options)) 
+          }
+          @current_ability
+        end
+
+        def current_ability user_type = :user
+          user_ability get_ability_user(user_type)
+
+        end
+
+        protected
+
+        def get_ability_user user_type
+          user_meth = :"current_#{user_type}"
+          return AbilityUser.guest if !respond_to?(user_meth)
+
+          user = send user_meth
+          user ? user : AbilityUser.guest
+        end
+
+        module AbilityUser
+          def self.guest
+            user = CanTango::Configuration.guest.user
+
+            raise "You must set the guest_user to a Proc or lambda in CanTango::Configuration" if !user
+            procedure.respond_to?(:call) ? user.call : user
+          end
+        end
+
+        include CanTango::Api::Options
+      end
+    end
+  end
+end

data/spec/integration/performance/helpers/ability_raw.rb

@@ -0,0 +1,8 @@
+class CanTangoTest < CanTango::Ability
+  def initialize candidate, options = {}
+    stamper("raw CanTango::Ability#initialize performance") { 
+      super 
+    }
+  end
+end
+

data/spec/integration/performance/helpers/cache.rb

@@ -0,0 +1,37 @@
+require 'cutter'
+Cutter::Stamper.scope :cache_rules => "#cache_rules" do |stan|
+  stan.msg :no_cache          => 'No caching, going through engines'
+end
+
+module CanTango
+  class Ability
+    module Cache
+      def cache_rules!
+        stamper(:cache_rules) {
+        return if !caching_on?
+        invalidate_cache!
+        rules_compiled = compile_rules! rules
+        rules_cache.save cache_key, rules_compiled
+        session_check!
+        session[:cache_key] = cache_key
+        }
+      end
+
+      # No #stamper here.
+      # Wrapping decompilator in block causes decompiler (i.e. sourcify) is not working
+      def cached_rules
+        time_initial = time_now
+        puts "#cached_rules:"
+        rules_compiled = rules_cache.load(cache_key)
+        time = time_now - time_initial
+        puts "  loading rules from store: (#{time}ms)"
+        rules_raw = decompile_rules! rules_compiled
+        time = time_now - time_initial
+        puts "  decompiling rules: (#{time}ms)"
+
+        @rules ||= rules_raw
+      end
+
+    end
+  end
+end

data/spec/integration/performance/helpers/rules.rb

@@ -0,0 +1,12 @@
+module CanTango
+  class Ability
+    def can?(action, subject, *extra_args)
+      stamper("#can?") {
+      match = relevant_rules_for_match(action, subject).detect do |rule|
+        rule.matches_conditions?(action, subject, extra_args)
+      end
+      match ? match.base_behavior : false
+      }
+    end
+  end
+end

data/spec/integration/performance/integral_performance_caching_disabled.rb

@@ -0,0 +1,33 @@
+require 'dummy_spec_helper'
+
+require 'integration/performance/helpers/ability_api'
+
+describe "CanTango::Ability performance" do
+
+  before(:each) do
+    @user = User.create! :name => 'stanislaw', :role => 'user', :email => 'stanislaw@mail.ru'
+    Article.create!(:title => 'one')
+  end
+
+  context "With cache disabled" do
+
+    describe 'Memory store' do
+      before do
+        CanTango.configure do |config|
+          config.cache.set :off
+        end
+      end
+
+      it "3 requests" do
+        get '/login_user/stanislaw'
+        puts "\n\nFirst Request"
+        get "/articles"
+        puts "\n\nSecond Request"
+        get "/articles"
+        puts "\n\nThird Request"
+        get "/articles"
+      end
+    end
+  end
+
+end

data/spec/integration/performance/integral_performance_caching_enabled.rb

@@ -0,0 +1,33 @@
+require 'dummy_spec_helper'
+
+require 'integration/performance/helpers/ability_api'
+
+describe "CanTango::Ability performance" do
+
+  before(:each) do
+    @user = User.create! :name => 'stanislaw', :role => 'user', :email => 'stanislaw@mail.ru'
+    Article.create!(:title => 'one')
+  end
+
+  context "With cache enabled" do
+
+    describe 'Memory store' do
+      before do
+        CanTango.configure do |config|
+          config.cache.set :on
+          config.cache.store.default_type = :memory
+        end
+      end
+
+      it "3 requests" do
+        get '/login_user/stanislaw'
+        puts "\n\nFirst Request"
+        get "/articles"
+        puts "\n\nSecond Request"
+        get "/articles"
+        puts "\n\nThird Request"
+        get "/articles"
+      end
+    end
+  end
+end