cantango 0.8.0

data/spec/cantango/configuration/factory_spec.rb

@@ -0,0 +1,20 @@
+require 'rspec'
+require 'cantango'
+
+require 'cantango/configuration/shared/factory_ex'
+
+class MyFactory
+  include CanTango::Configuration::Factory 
+  include Singleton
+end
+
+describe CanTango::Configuration::Factory do
+  subject { MyFactory.instance }
+
+  specify { lambda { subject.default_factory}.should raise_error }
+
+  it_should_behave_like 'Factory' do
+  end
+end
+
+

data/spec/cantango/configuration/guest/find_guest_default_way_spec.rb

@@ -0,0 +1,33 @@
+require 'rspec'
+require 'cantango'
+
+class MyAccount
+  def self.guest
+    :guest_account
+  end
+end
+
+class MyUser
+  def self.guest
+    :guest
+  end
+end
+
+describe CanTango::Configuration::Guest do
+  describe 'default settings with class methods for #guest defined' do
+    before do
+      CanTango.config.user.base_class = MyUser
+      CanTango.config.user_account.base_class = MyAccount
+    end
+
+    subject { CanTango.config.guest }
+      its(:default_user?)     { should be_true }
+      its(:user)              { should == :guest }
+
+      its(:default_account?)  { should be_true }
+      its(:account)           { should == :guest_account }
+  end
+end
+
+
+

data/spec/cantango/configuration/guest_spec.rb

@@ -0,0 +1,62 @@
+require 'rspec'
+require 'cantango'
+require 'fixtures/models'
+
+describe CanTango::Configuration::Guest do
+  before do
+    CanTango.config.user.base_class = User
+    CanTango.config.user_account.base_class = UserAccount
+  end
+
+  subject { CanTango.config.guest }
+
+  describe 'default settings' do
+    it 'should not have defined UserAccount.guest' do
+      UserAccount.should_not respond_to(:guest)
+    end
+
+    it 'should not have defined User.guest' do
+      User.should_not respond_to(:guest)
+    end
+
+    its(:account) { should be_nil } # should be set to UserAccount.guest if defined
+    its(:user)    { should be_nil } # should set to User.guest if defined ?
+  end
+
+  describe 'set user' do
+    describe 'with obj arg' do
+      before :each do
+        subject.user = '2'
+      end
+
+      its(:user) { should == '2' }
+    end
+
+    describe 'with block arg' do
+      before :each do
+        subject.user { 2 }
+      end
+
+      its(:user) { should == 2 }
+    end
+
+    describe 'with Proc arg' do
+      before :each do
+        subject.user Proc.new { 2 }
+      end
+
+      its(:user) { should be_a Proc }
+    end
+  end
+
+  describe 'set user account' do
+    before :each do
+      subject.account = '2'
+    end
+
+    its(:account) { should == '2' }
+  end
+end
+
+
+

data/spec/cantango/configuration/hash_registry_spec.rb

@@ -0,0 +1,17 @@
+require 'rspec'
+require 'cantango'
+
+require 'cantango/configuration/shared/hash_registry_ex'
+
+class MyReg < CanTango::Configuration::HashRegistry
+end
+
+describe MyReg do
+  subject { MyReg.instance }
+
+  it_should_behave_like "Hash Registry" do
+  end
+end
+
+
+

data/spec/cantango/configuration/registry_spec.rb

@@ -0,0 +1,17 @@
+require 'rspec'
+require 'cantango'
+
+require 'cantango/configuration/shared/role_registry_ex'
+
+class MyRegi < CanTango::Configuration::Registry
+end
+
+describe MyRegi do
+  subject { MyRegi.instance }
+
+  it_should_behave_like "Registry" do
+  end
+end
+
+
+

data/spec/cantango/configuration/role_groups_spec.rb

@@ -0,0 +1,15 @@
+require 'rspec'
+require 'cantango'
+
+require 'cantango/configuration/shared/role_registry_ex'
+
+describe CanTango::Configuration::RoleGroups do
+  subject { CanTango.config.role_groups }
+
+  it_should_behave_like "Role Registry" do
+    let (:has)  { :in_role_group? }
+    let (:list) { :role_groups_list }
+  end
+end
+
+

data/spec/cantango/configuration/roles_spec.rb

@@ -0,0 +1,16 @@
+require 'rspec'
+require 'cantango'
+
+require 'cantango/configuration/shared/role_registry_ex'
+
+describe CanTango::Configuration::Roles do
+  subject { CanTango.config.roles }
+
+  it_should_behave_like "Role Registry" do
+    let (:has) { :has_role? }
+    let (:list) { :roles_list }
+  end
+end
+
+
+

data/spec/cantango/configuration/shared/factory_ex.rb

@@ -0,0 +1,40 @@
+class CustomFactory
+  attr_accessor :name, :options
+
+  def initialize name, options = {}
+    @name, @options = [name, options]
+  end
+end
+
+shared_examples_for 'Factory' do
+  describe 'configure factory' do
+    describe 'set factory' do
+      describe 'using non-callable' do
+       it 'should not allow factory to be defined' do
+          lambda { subject.factory {|name, opts| CustomFactory.new name, opts} }.should raise_error
+        end
+      end
+
+      describe 'using lambda' do
+        before :each do
+          subject.factory lambda {|name, opts| CustomFactory.new name, opts}
+        end
+
+        it 'should set it' do
+          subject.factory_build('hello', :works => true).name.should == 'hello'
+        end
+      end
+
+      describe 'using Proc' do
+        before :each do
+          subject.factory Proc.new {|name, opts| CustomFactory.new name, opts}
+        end
+
+        it 'should set it' do
+          subject.factory_build('hello', :works => true).name.should == 'hello'
+        end
+      end
+    end
+  end
+end
+

data/spec/cantango/configuration/shared/hash_registry_ex.rb

@@ -0,0 +1,65 @@
+shared_examples_for 'Hash Registry' do
+  let(:hash1) do
+    {:a => 1, :b => 2}
+  end
+
+  let(:hash2) do
+    {:c => 3}
+  end
+
+  describe 'default settings' do
+    its(:registered)  { should be_empty }
+
+    describe 'defaults' do
+      before do
+        subject.default = hash1
+      end
+
+      its(:default) { should include(hash1) }
+    end
+  end
+
+  describe 'register' do
+    before do
+      subject.register hash1
+      subject.register hash2
+    end
+    its(:registered) { should include(hash1) }
+    its(:registered) { should include(hash2) }
+  end
+
+  describe 'append <<' do
+    before do
+      subject << hash2
+      subject.register hash1
+      subject << hash2
+    end
+    its(:registered) { should include(hash1, hash2) }
+  end
+
+  describe 'get index []' do
+    before do
+      subject.register hash1
+      subject << hash2
+    end
+    
+    it 'should respond to :symbol keys' do
+      subject[:c].should == 3
+    end
+
+    it "should respond to 'string' keys" do
+      subject['c'].should == 3
+    end
+  end
+
+  describe 'set index []=' do
+    before do
+      subject.clean!
+      subject.register hash1
+      subject[:d] = 5
+    end
+    specify { subject[:d].should == 5 }
+
+  end
+end
+

data/spec/cantango/configuration/shared/registry_ex.rb

@@ -0,0 +1,39 @@
+shared_examples_for 'Registry' do
+  describe 'default settings' do
+    its(:registered)  { should_not be_empty }
+
+    it 'should register groups' do
+      subject.register(:a, :b)
+      subject.registered.should include(:a, :b)
+    end
+
+    it 'should set defaults' do
+      subject.default = :a, :b
+      subject.default.should include(:a, :b)
+    end
+  end
+
+  describe 'register' do
+    before do
+      subject.register :abc, :def
+    end
+    its(:registered) { should include(:abc, :def) }
+  end
+
+  describe 'append <<' do
+    before do
+      subject.clean!
+      subject.register :abc, :def
+      subject << :xyz
+    end
+    its(:registered) { should include(:abc, :def, :xyz) }
+  end
+
+  describe 'get index []' do
+    before do
+      subject.clean!
+      subject.register :abc, :def
+    end
+    specify {subject[0].should == :abc }
+  end
+end

data/spec/cantango/configuration/shared/role_registry_ex.rb

@@ -0,0 +1,22 @@
+require 'cantango/configuration/shared/registry_ex'
+
+shared_examples_for 'Role Registry' do
+  it_should_behave_like "Registry"
+
+  describe 'default settings' do
+    its(:has_method) { should == has }
+    its(:list_method) { should == list }
+
+    its(:default_has_method) { should be_a Symbol }
+    its(:default_list_method) { should be_a Symbol }
+  end
+
+  describe "exclude" do
+    before do
+      subject.exclude :admin
+    end
+
+    its(:excluded) { should include(:admin) }
+  end
+end
+

data/spec/cantango/configuration/user_account_spec.rb

@@ -0,0 +1,26 @@
+require 'rspec'
+require 'cantango'
+
+class BaseAccount
+  def initialize
+  end
+end
+
+
+describe CanTango::Configuration::UserAccount do
+  before do
+    CanTango.config.user.base_class = User
+  end
+
+  subject { CanTango.config.user_account }
+
+  describe 'set base class' do
+    before do
+      subject.base_class = BaseAccount
+    end
+
+    its(:base_class) { should == BaseAccount }
+  end
+end
+
+

data/spec/cantango/configuration/user_spec.rb

@@ -0,0 +1,46 @@
+require 'rspec'
+require 'cantango'
+require 'fixtures/models'
+
+class BaseUser
+  def initialize
+  end
+end
+
+describe CanTango::Configuration::User do
+  before do
+    CanTango.config.user.base_class = User
+    CanTango.config.user_account.base_class = UserAccount
+  end
+
+  subject { CanTango.config.user }
+
+  describe 'default settings' do
+    its(:relations)         { should_not be_empty }
+    its(:unique_key_field)  { should == :email }
+    its(:base_class)        { should == ::User }
+  end
+
+  describe 'set base class' do
+    before do
+      subject.base_class = BaseUser
+    end
+
+    its(:base_class)        { should == BaseUser }
+  end
+
+  describe 'relations config' do
+    before do
+      subject.relations = :mine
+    end
+    its(:relations)         { should include(:mine) }
+  end
+
+  describe 'unique_key_field config' do
+    before do
+      subject.unique_key_field = :username
+    end
+    its(:unique_key_field)  { should == :username }
+  end
+end
+

data/spec/cantango/configuration_spec.rb

@@ -0,0 +1,42 @@
+require 'rspec'
+require 'cantango'
+require 'fixtures/models'
+
+@user = User.new('kris', 'kris@gmail.com')
+
+class CanTango::CustomAbility < CanTango::Ability
+  def initialize candidate, options = {}
+    'custom'
+  end
+end
+
+describe CanTango::Configuration do
+  describe 'clear!' do
+    subject { CanTango.config }
+
+    before do
+      subject.roles.exclude :user
+      subject.role_groups.exclude :admins
+
+      subject.clear!
+    end
+
+    specify { subject.roles.excluded.should be_empty }
+    specify { subject.role_groups.excluded.should be_empty }
+  end
+
+  describe "configure DSL" do
+    before(:all) {
+      CanTango.configure do |config|
+        CanTango.config.engines.available.each do |name|
+          config.engine(name).set :off
+        end
+     end
+    }
+
+    CanTango.config.engines.available.each do |name|
+      specify { CanTango.config.engine(name).on?.should be_false}
+      specify { CanTango.config.engine(name).off?.should be_true}
+    end
+  end
+end