cantango 0.8.0

data/lib/cantango/ability/role_helpers.rb

@@ -0,0 +1,26 @@
+module CanTango
+  class Ability
+    module RoleHelpers
+
+      include CanTango::Helpers::RoleMethods
+
+      # return list roles the user has
+      # TODO: should also fetch roles of all role_groups! (or is this responsibility of roles_list?)
+      def roles
+        raise "#{subject.inspect} should have a #{roles_list_meth} method" if !subject.respond_to?(roles_list_meth)
+        subj_roles = subject.send(roles_list_meth)
+        return [] if subj_roles.blank?
+        subj_roles.flatten
+      end
+
+      # return list of symbols for role groups the user belongs to
+      # TODO: use roles filter here? or better in #valid? of selector ?
+      def role_groups
+        raise "#{subject.inspect} should have a #{role_groups_list_meth} method" if !subject.respond_to?(role_groups_list_meth)
+        subj_role_groups = subject.send(role_groups_list_meth)
+       return [] if subj_role_groups.blank?
+        subj_role_groups.flatten
+      end
+    end
+  end
+end

data/lib/cantango/ability/scope.rb

@@ -0,0 +1,20 @@
+module CanTango
+  class Ability
+    class Scope
+      attr_accessor :ability
+
+      def initialize ability
+        @ability = ability
+      end
+
+      def can? *args
+        ability.can? *args
+      end
+
+      def cannot? *args
+        ability.cannot? *args
+      end
+    end
+  end
+end
+ 

data/lib/cantango/ability/user_helpers.rb

@@ -0,0 +1,22 @@
+module CanTango
+  class Ability
+    module UserHelpers
+      def user
+        return subject.user if subject.respond_to? :user
+        subject
+      end
+
+      def user_account
+        return subject.active_account if subject.respond_to? :active_account
+        subject
+      end
+
+      def user_key_field
+        key_field = config.user.unique_key_field
+        raise "\nModel <#{user.class}> has no ##{key_field} as defined in CanTango.config.user.unique_key_field" if !user.respond_to?(key_field)
+        key_field
+      end
+    end
+  end
+end
+

data/lib/cantango/api.rb

@@ -0,0 +1,5 @@
+module CanTango
+  module Api
+    autoload_modules :User, :UserAccount, :Options, :Common
+  end
+end

data/lib/cantango/api/aliases.rb

@@ -0,0 +1,8 @@
+$:.unshift File.dirname(__FILE__)
+require 'aliases/permit'
+require 'aliases/role_permit'
+require 'aliases/role_group_permit'
+require 'aliases/license'
+require 'aliases/user_permit'
+require 'aliases/account_permit'
+

data/lib/cantango/api/aliases/account_permit.rb

@@ -0,0 +1,8 @@
+module CanTango
+  class AccountPermit < CanTango::PermitEngine::AccountPermit
+    def initialize ability
+      super
+    end
+  end
+end
+

data/lib/cantango/api/aliases/license.rb

@@ -0,0 +1,7 @@
+module CanTango
+  class License < CanTango::PermitEngine::License
+    def initialize permit
+      super
+    end
+  end
+end

data/lib/cantango/api/aliases/permit.rb

@@ -0,0 +1,9 @@
+module CanTango
+  class Permit < CanTango::PermitEngine::Permit
+    def initialize ability
+      super
+    end
+  end
+end
+
+

data/lib/cantango/api/aliases/role_group_permit.rb

@@ -0,0 +1,7 @@
+module CanTango
+  class RoleGroupPermit < CanTango::PermitEngine::RoleGroupPermit
+    def initialize ability
+      super
+    end
+  end
+end

data/lib/cantango/api/aliases/role_permit.rb

@@ -0,0 +1,7 @@
+module CanTango
+  class RolePermit < CanTango::PermitEngine::RolePermit
+    def initialize ability
+      super
+    end
+  end
+end

data/lib/cantango/api/aliases/user_permit.rb

@@ -0,0 +1,8 @@
+module CanTango
+  class UserPermit < CanTango::PermitEngine::UserPermit
+    def initialize ability
+      super
+    end
+  end
+end
+

data/lib/cantango/api/common.rb

@@ -0,0 +1,10 @@
+module CanTango
+  module Api
+    module Common
+      def create_ability candidate, opts = {}
+        CanTango.config.ability.factory_build candidate, opts
+      end
+    end
+  end
+end
+

data/lib/cantango/api/options.rb

@@ -0,0 +1,16 @@
+module CanTango
+  module Api
+    module Options
+
+      def ability_options
+        opts = {}
+        opts.merge!(:session => session) if respond_to? :session
+        opts.merge!(:request => request) if respond_to? :request
+        opts.merge!(:params => params) if respond_to? :params
+        opts.merge!(:controller => controller) if respond_to? :controller
+        # puts "CanTango::Ability options:" << opts.keys.inspect
+        opts
+      end
+    end
+  end
+end

data/lib/cantango/api/user.rb

@@ -0,0 +1,20 @@
+module CanTango
+  module Api
+    module User
+      autoload_modules :Ability, :Can, :Scope
+
+      module All
+        def self.included base
+          [:Ability, :Can, :Scope].each do |api|
+            base.send :include, clazz(api)
+          end
+        end
+
+        def clazz api
+          ("CanTango::Api::User::" << api.to_s.camelize).constantize
+        end
+      end
+    end
+  end
+end
+

data/lib/cantango/api/user/ability.rb

@@ -0,0 +1,38 @@
+module CanTango
+  module Api
+    module User
+      module Ability
+        def user_ability user, options = {}
+          @current_ability ||= create_ability(user, ability_options.merge(options))
+        end
+
+        def current_ability user_type = :user
+          user_ability get_ability_user(user_type)
+        end
+
+        protected
+
+        include CanTango::Api::Common
+
+        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.config.guest.user
+
+            raise "You must set the guest_user to a Proc or lambda in CanTango.config" if !user
+            user.respond_to?(:call) ? user.call : user
+          end
+        end
+
+        include CanTango::Api::Options
+      end
+    end
+  end
+end

data/lib/cantango/api/user/can.rb

@@ -0,0 +1,26 @@
+module CanTango
+  module Api
+    module User
+      module Can
+        include Ability
+        # Example: generated from types of accounts! (see below)
+        # def admin_can?(*args)
+        #   current_ability(:admin).can?(*args)
+        # end
+        def self.included(base)
+          ::CanTango.config.users.registered.each do |user|
+            base.class_eval %{
+              def #{user}_can? *args
+                current_ability(:#{user}).can?(*args)
+              end
+
+              def #{user}_cannot? *args
+                current_ability(:#{user}).cannot?(*args)
+              end
+             }
+          end
+        end
+      end
+    end
+  end
+end

data/lib/cantango/api/user/scope.rb

@@ -0,0 +1,29 @@
+module CanTango
+  module Api
+    module User
+      module Scope
+
+        def scope_user scope, options = {}, &block
+          user = scoped_user(scope)
+          ab_scope = user_ability_scope(user, options)
+          yield ab_scope if block
+          ab_scope
+        end
+
+        def real_user scope, options = {}, &block
+          scope_user scope, options.merge(:masquerade => false), &block
+        end
+
+        protected
+
+        def user_ability_scope user, options = {}
+          CanTango::Ability::Scope.new user_ability(user, options)
+        end
+
+        def scoped_user scope
+          send(:"current_#{scope}")
+        end
+      end
+    end
+  end
+end

data/lib/cantango/api/user_account.rb

@@ -0,0 +1,20 @@
+module CanTango
+  module Api
+    module UserAccount
+      autoload_modules :Ability, :Can, :Scope
+
+      module All
+        def self.included base
+          [:Ability, :Can, :Scope].each do |api|
+            base.send :include, clazz(api)
+          end
+        end
+
+        def clazz api
+          ("CanTango::Api::UserAccount::" << api.to_s.camelize).constantize
+        end
+      end
+    end
+  end
+end
+

data/lib/cantango/api/user_account/ability.rb

@@ -0,0 +1,44 @@
+module CanTango
+  module Api
+    module UserAccount
+      module Ability
+        def user_account_ability user_account, options = {}
+          @current_ability ||= create_ability(user_account, ability_options.merge(options))
+        end
+
+        def current_account_ability user_type = :user
+          account_meth = :"current_#{user_type}_account"
+          return guest_user_account if !respond_to?(account_meth)
+
+          user_account = send(account_meth)
+          return guest_user_account if !user_account
+
+          user_account_ability user_account
+        end
+
+        protected
+
+        include CanTango::Api::Common
+
+        def get_ability_user_acount user_type
+          user_account_meth = :"current_#{user_type}_account"
+          return AbilityAccount.guest if !respond_to?(user_account_meth)
+
+          user_account = send user_account_meth
+          user_account ? user_account : AbilityAccount.guest
+        end
+
+        module AbilityAccount
+          def self.guest
+            account = CanTango.config.guest.account
+
+            raise "You must set the guest_account to a Proc or lambda in CanTango.config" if !account
+            account.respond_to?(:call) ? account.call : account
+          end
+        end
+
+        include CanTango::Api::Options
+      end
+    end
+  end
+end

data/lib/cantango/api/user_account/can.rb

@@ -0,0 +1,26 @@
+module CanTango
+  module Api
+    module UserAccount
+      module Can
+        include Ability
+        # Example: generated from types of accounts! (see below)
+        # def admin_account_can?(*args)
+        #   current_account_ability(:admin).can?(*args)
+        # end
+        def self.included(base)
+          ::CanTango.config.user_accounts.registered.each do |account|
+            base.class_eval %{
+              def #{account}_account_can? *args
+                current_account_ability(:#{account}).can?(*args)
+              end
+
+              def #{account}_account_cannot? *args
+                current_account_ability(:#{account}).cannot?(*args)
+              end
+             }
+          end
+        end
+      end
+    end
+  end
+end

data/lib/cantango/api/user_account/scope.rb

@@ -0,0 +1,29 @@
+module CanTango
+  module Api
+    module UserAccount
+      module Scope
+
+        def account_scope scope, options = {}, &block
+          account = scoped_account(scope)
+          ab_scope = account_ability_scope(account, options)
+          yield ab_scope if block
+          ab_scope
+        end
+
+        def as_real_account scope, options = {}, &block
+          scope_account scope, options.merge(:masquerade => false), &block
+        end
+
+        protected
+
+        def account_ability_scope account, options = {}
+          CanTango::Ability::Scope.new user_account_ability(account, options)
+        end
+
+        def scoped_acount scope
+          send(:"current_#{scope}_account")
+        end
+      end
+    end
+  end
+end

data/lib/cantango/cache.rb

@@ -0,0 +1,6 @@
+module CanTango
+  module Cache
+    autoload_modules :MonetaCache
+  end
+end
+

data/lib/cantango/cache/moneta_cache.rb

@@ -0,0 +1,68 @@
+module CanTango
+  module Cache
+    class MonetaCache
+      include Singleton
+
+      attr_reader :options
+
+      def configure_with options = {}
+        @options ||= options
+        @type ||= options[:type] || CanTango.config.cache.store.default_type
+      end
+
+      def load! key
+        cache[key]
+      end
+
+      def save! key, rules
+        cache.store key, rules
+      end
+
+      def delete key
+        cache.delete key
+      end
+
+      def cache
+        @cache ||= begin
+                     moneta = eval(factory_statement)
+                     moneta.clear
+                     moneta
+                   end
+      end
+
+      def factory_statement
+        %{
+          ::Moneta::Builder.build do
+            #{run_adapter}
+          end
+        }
+      end
+
+      def run_adapter
+        case type.to_sym
+        when :yaml
+          yaml_adapter
+        else
+          simple_adapter
+        end
+      end
+
+      def yaml_adapter
+        "run #{adapter}, #{options}"
+      end
+
+      def simple_adapter
+        "run #{adapter}"
+      end
+
+      def type
+        (@type == :yaml) ? :YAML : @type
+      end
+
+      def adapter
+        require "moneta/adapters/#{type}"
+        @adapter = "Moneta::Adapters::#{type.to_s.camelize}".constantize
+      end
+    end
+  end
+end