rapid 0.0.1

data/spec/models/authorized_object_spec.rb

@@ -0,0 +1,258 @@
+require "#{File.expand_path(File.dirname(__FILE__))}/helper"
+
+describe "Authorized Object" do  
+  with_rad_model
+  
+  before :all do
+    class ::AModel
+      include MongoMapper::Document
+      plugin MongoMapper::Plugins::AuthorizedObject
+      acts_as_authorized_object
+    end
+    
+    # MongoMapper.call_deferred
+  end
+  
+  after :all do
+    Object.send :remove_const, :AModel if Object.const_defined? :AModel
+  end
+  
+  before :each do 
+    set_default_space
+  end
+  
+  describe "Owner, Viewers, Collaborators" do
+    before :each do
+      @user = Factory.create :user, :name => 'auser'
+      User.current = nil
+    end
+    
+    it "should be abel to create objects (from error)" do
+      User.current = @user
+      o = AModel.new
+      o.save!
+    end 
+      
+    it "should by default set current user_name as owner_name if there is current user" do
+      o = AModel.new
+      o.owner_name.should be_nil
+    
+      User.current = @user
+      o = AModel.new
+      o.owner_name.should == 'auser'
+    end
+      
+    it "owner" do
+      o = AModel.new
+      o.owner = @user
+      o.owner_name.should == @user.name 
+      o.viewers.should == %w{manager user:auser}       
+      o.should be_valid
+    end
+      
+    it 'viewers' do
+      o = AModel.new
+      o.owner = @user
+      o.add_viewer :user
+      o.viewers.should == %w{manager member user user:auser}
+      o.should be_valid
+    
+      o.remove_viewer :user
+      o.viewers.should == %w{manager user:auser}
+      o.should be_valid
+    
+      o.add_viewer :member
+      o.viewers.should == %w{manager member user:auser}
+      o.should be_valid
+    
+      o.add_viewer :user
+      o.viewers.should == %w{manager member user user:auser}
+      o.should be_valid
+    end
+    
+    it "duplicate roles (from error)" do
+      o = AModel.new
+      o.owner = @user
+      o.save!
+      
+      o = AModel.first # don't use reload, it willn't catch this error
+      o.viewers.should == %w{manager user:auser}
+    end
+  
+    it "collaborators" do
+      o = AModel.new
+      o.owner = @user
+      o.add_collaborator :member
+      o.collaborators.should == %w{member}
+      o.should be_valid
+  
+      Space.current.custom_roles << 'director'
+      o.add_collaborator :director
+      o.collaborators.should == %w{member director}
+      o.should be_valid
+  
+      o.remove_collaborator :member
+      o.collaborators.should == %w{director}
+      o.should be_valid
+    end
+    
+    it "normalized_collaborators" do
+      o = AModel.new
+      o.owner = @user
+      o.add_collaborator :member
+      o.normalized_collaborators.should == %w{manager member user:auser}
+    end
+    
+    it "viewers and collaborators dependance" do
+      o = AModel.new
+      o.owner = @user
+      o.add_collaborator :user
+      o.collaborators.should == %w{user}
+      o.viewers.should == %w{manager member user user:auser}
+      o.should be_valid
+      
+      o.remove_viewer :member
+      o.viewers.should == %w{manager user user:auser}
+      o.collaborators.should == %w{user}
+      
+      o.remove_viewer :user
+      o.viewers.should == %w{manager user:auser}
+      o.collaborators.should == %w{}
+    end
+    
+    it "major viewers" do
+      o = AModel.new
+      o.owner = @user
+      o.add_viewer :member
+      o.add_viewer :director
+      o.viewers.should == %w{director manager member user:auser}
+      o.minor_viewers.should == %w{director member user:auser}
+    end
+    
+    it "collaborators should be able to change object (from error)" do
+      col = Factory.create :member, :name => 'collaborator'
+      
+      o = AModel.new
+      o.owner = @user      
+      col.can?(:update, o).should be_false
+      
+      o.add_collaborator :member
+      o.clear_cache
+      col.can?(:update, o).should be_true
+      @user.can?(:update, o).should be_true
+      
+      o.save!
+      o = AModel.find o.id
+      col.can?(:update, o).should be_true
+      @user.can?(:update, o).should be_true
+    end
+  end
+  
+  describe "Permissions" do
+    before :each do
+      Space.stub!(:permissions).and_return('manage' => %w{manager})
+    end
+    
+    describe "General" do
+      before :each do
+        Space.stub!(:permissions).and_return('manage' => %w{manager})
+      end
+            
+      it "should also works without mulititenancy" do
+        Space.current = nil
+        Account.current = nil
+        u = User.new
+        u.can?(:manage, AModel)
+      end
+      
+      it "should works for new user" do
+        u = User.new
+        u.can?(:manage, AModel)
+      end
+    
+      it 'permissions' do
+        u = Factory.create :user
+        u.can?(:manage, AModel).should be_false
+      
+        u = Factory.create :manager
+        u.can?(:manage, AModel).should be_true
+      end    
+    end
+    
+    describe "as Owner" do
+      before :each do
+        Space.stub!(:permissions).and_return('manage' => %w{manager owner})
+        @user = Factory.create :user
+        
+        @object = AModel.new
+        
+        @owned_object = AModel.new
+        @owned_object.owner = @user
+      end
+  
+      it "owner?" do
+        @user.should_not be_owner(@object)
+        @user.should be_owner(@owned_object)        
+      end
+  
+      it 'permissions for owner' do
+        @user.can?(:manage, @object).should be_false
+        @user.can?(:manage, @owned_object).should be_true
+      end
+    end
+    
+    describe "Special :view permission" do
+      before :each do 
+        Space.stub!(:permissions).and_return('view' => %w{manager}) # managers can see anything, always, it's hardcoded
+      end
+  
+      it "user (public) viewers" do
+        user = Factory.create :user
+  
+        o = AModel.new
+        o.stub!(:viewers){%w{user}}
+  
+        user.can?(:view, o).should be_true
+      end
+  
+      it "member viewers" do
+        Space.stub!(:permissions).and_return('view' => [])
+  
+        user = Factory.create :user
+        member = Factory.create :member
+        manager = Factory.create :manager
+        
+        o = AModel.new
+        o.stub!(:viewers).and_return(%w{member manager})
+  
+        user.can?(:view, o).should be_false
+        member.can?(:view, o).should be_true
+        manager.can?(:view, o).should be_true
+      end
+  
+      it "owner (private) viewers" do
+        Space.stub!(:permissions).and_return('view' => [])
+  
+        owner = Factory.create :user, :name => "aname"
+        user = Factory.create :user
+        member = Factory.create :member
+        manager = Factory.create :manager
+  
+        o = AModel.new
+        o.stub!(:owner_name){owner.name}
+        o.stub!(:viewers){%w{user:aname manager}}
+  
+        owner.can?(:view, o).should be_true
+        user.can?(:view, o).should be_false
+        member.can?(:view, o).should be_false
+        manager.can?(:view, o).should be_true
+      end
+  
+      it "should correct works with non authorized objects (from error)" do
+        user = Factory.create :user    
+        user.can?(:view, Object.new).should be_false
+      end
+    end
+    
+  end
+end

data/spec/models/file_audit_spec/100.txt

@@ -0,0 +1 @@
+1111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111

data/spec/models/file_audit_spec/302.txt

@@ -0,0 +1,3 @@
+1111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
+1111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
+1111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111

data/spec/models/file_audit_spec.rb

@@ -0,0 +1,168 @@
+require "#{File.expand_path(File.dirname(__FILE__))}/helper"
+
+describe "File Audit" do
+  with_rad_model
+  
+  DATA_DIR = "#{File.dirname(__FILE__)}/file_audit_spec"
+  
+  def open_small_file &block
+    File.open("#{DATA_DIR}/100.txt", &block)
+  end
+  
+  def open_big_file &block
+    File.open("#{DATA_DIR}/302.txt", &block)
+  end
+  
+  before :all do
+    class ::Amodel
+      include MongoMapper::Document
+      include Paperclip
+      
+      interpolation = "/system/:account/:space/:class/:id/:attachment"
+      has_attached_file :data, 
+        :path => (":crystal_root/public" + interpolation),
+        :url => (":crystal_root/public" + interpolation)
+      
+      validates_file :data
+      trace_file :data      
+      
+      def disable_file_audit?
+        false
+      end      
+    end    
+    
+    Paperclip.logger = Logger.new nil
+  end
+  
+  after :all do
+    Object.send :remove_const, :Amodel if Object.const_defined? :Amodel
+  end
+  
+  before :each do
+    set_default_space
+    User.current = @user = Factory.create(:user)
+  end
+  
+  it "should check max space files size" do
+    Account.current.max_account_files_size = 200
+    m = Amodel.new
+    
+    open_small_file do |f|
+      m.data = f
+      m.should be_valid
+    end
+    
+    open_big_file do |f|
+      m.data = f
+      m.should_not be_valid
+    end
+  end
+  
+  it "shouldn't count the same file when model updated" do
+    # assign file
+    m = nil
+    open_small_file{|f| m = Amodel.create :data => f}        
+    m.data_file_size.should == 100
+    m.data_old_file_size.should == 100
+    User.current.files_size.should == 100
+    Account.current.files_size.should == 100
+    
+    m.save!    
+    m.data_file_size.should == 100
+    m.data_old_file_size.should == 100
+    User.current.files_size.should == 100
+    Account.current.files_size.should == 100
+  end
+  
+  it "should check max user files size" do
+    Space.current.max_user_files_size = 200
+    m = Amodel.new
+    
+    open_small_file do |f|
+      m.data = f
+      m.should be_valid
+    end
+    
+    open_big_file do |f|
+      m.data = f
+      m.should_not be_valid
+    end
+  end
+  
+  it "should check max file size" do
+    Account.current.max_file_size = 200
+    m = Amodel.new
+    
+    open_small_file do |f|
+      m.data = f
+      m.should be_valid
+    end
+    
+    open_big_file do |f|
+      m.data = f
+      m.should_not be_valid
+    end
+  end
+  
+  it "should also decrease files size" do
+    # assign file
+    m, m2 = nil
+    open_small_file{|f| m = Amodel.create :data => f}    
+    open_big_file{|f| m2 = Amodel.create :data => f}
+    
+    User.current.files_size.should == 402
+    Account.current.files_size.should == 402
+    
+    # destroying file
+    m2.destroy
+    User.current.files_size.should == 100
+    Account.current.files_size.should == 100
+    User.current.reload; Account.current.reload
+    User.current.files_size.should == 100
+    Account.current.files_size.should == 100
+  end
+  
+  it "shoud trace file size" do
+    # assign file
+    m = nil
+    open_small_file{|f| m = Amodel.create :data => f}    
+    
+    m.data_file_size.should == 100
+    m.data_old_file_size.should == 100
+    User.current.files_size.should == 100
+    Account.current.files_size.should == 100
+    User.current.reload; Account.current.reload
+    User.current.files_size.should == 100
+    Account.current.files_size.should == 100    
+    
+    # update file
+    open_big_file{|f| m.data = f; m.save!}
+    
+    m.data_file_size.should == 302
+    m.data_old_file_size.should == 302
+    User.current.files_size.should == 302
+    Account.current.files_size.should == 302
+    User.current.reload; Account.current.reload
+    User.current.files_size.should == 302
+    Account.current.files_size.should == 302
+    
+    # assign another file
+    m2 = nil
+    open_small_file{|f| m2 = Amodel.create :data => f}
+    
+    m2.data_file_size.should == 100
+    m2.data_old_file_size.should == 100
+    User.current.files_size.should == 402
+    Account.current.files_size.should == 402
+    
+    # another user
+    User.current = Factory.create :user
+    m3 = nil
+    open_small_file{|f| m3 = Amodel.create :data => f}
+    
+    User.current.files_size.should == 100
+    @user.files_size.should == 402
+    Account.current.files_size.should == 502    
+  end
+  
+end

data/spec/models/helper.rb

@@ -0,0 +1,11 @@
+dir = File.expand_path(File.dirname(__FILE__))
+lib_dir = File.expand_path("#{dir}/../../../../lib")
+$LOAD_PATH << lib_dir unless $LOAD_PATH.include? lib_dir
+
+# models
+require 'mongo_mapper'
+require 'mongo_mapper_ext'
+
+# spec & helpers
+require 'spec_ext'
+require 'rad/spec/model'

data/spec/models/space_key_spec.rb

@@ -0,0 +1,68 @@
+require "#{File.expand_path(File.dirname(__FILE__))}/helper"
+
+describe "SpaceKeys" do
+  with_rad_model
+  
+  before :all do
+    class ::AnUser
+      include MongoMapper::Document
+      plugin MongoMapper::Plugins::SpaceKeys
+      
+      space_key :roles, Array
+    end
+    # MongoMapper.call_deferred
+  end
+  
+  after :all do
+    Object.send :remove_const, :AnUser if Object.const_defined? :AnUser
+  end
+  
+  before :each do
+    set_default_space
+    @user = AnUser.new
+  end
+  
+  it "shouldn't save empty containers" do
+    @user.roles
+    @user.space_keys_containers.size.should == 0
+  end
+  
+  it "should correctly save" do
+    @user.roles = ['manager']
+    @user.space_keys_containers.size.should == 1
+    @user.save!
+    
+    @user = AnUser.find(@user.id)
+    @user.roles.should == ['manager']
+  end
+  
+  it "should clean empty containers" do
+    @user.roles = ['manager']
+    @user.space_keys_containers.size.should == 1
+    @user.roles = []
+    @user.space_keys_containers.size.should == 0
+  end
+  
+  it "should clean empty containers for saved objects" do
+    @user.roles = ['manager']
+    @user.save!
+    
+    @user = AnUser.find @user.id
+    @user.roles = []
+    @user.space_keys_containers.size.should == 0
+  end
+  
+  it "should works with many spaces" do
+    @user.roles = ['manager']
+    
+    previous_space = Space.current
+    space = Factory.build :space    
+    Space.current = space
+    
+    @user.roles.should == []
+    @user.roles = ['user']
+    
+    Space.current = previous_space
+    @user.roles.should == ['manager']
+  end
+end

data/spec/models/user_spec.rb

@@ -0,0 +1,80 @@
+require "#{File.expand_path(File.dirname(__FILE__))}/helper"
+
+describe "User" do
+  with_rad_model
+  
+  it "blank user" do
+    user = Factory.build(:blank_user)
+    user.should_not be_valid
+    user.should be_inactive
+  end
+  
+  describe "Authentication by Password" do  
+    it "registering user" do
+      user = Factory.build(:new_user)
+      user.crypted_password.should_not be_blank
+      user.should be_valid
+      user.should be_inactive      
+      user.should be_authenticated_by_password(user.password)
+    end
+    
+    it "authentication" do
+      user = Factory.create :user
+      User.authenticate_by_password(user.name, user.password).should == user
+    end
+    
+    it "email uniquiness" do
+      user = Factory.build :user
+      user.email = "some@email.com"
+      user.save.should be_true
+      
+      user = Factory.build :user
+      user.email = "some@email.com"
+      user.save.should be_false
+      user.errors.on(:email).should_not be_blank
+    end
+    
+    it "update_password" do
+      user = Factory.create :user
+      user.update_password('new_password', 'new_password', 'invalid').should be_false
+      user.update_password('new_password', 'new_password', user.password).should be_true
+    end
+  end  
+  
+  describe "Authentication by OpenID" do
+    it "registering user" do
+      user = Factory.build(:blank_user)
+      user.open_ids << "open_id"
+      user.crypted_password.should be_blank
+      user.should be_valid
+      user.should be_inactive
+      
+      user.save.should be_true
+      user.reload
+      user.crypted_password.should be_blank
+    end
+    
+    it "authentication" do
+      user = Factory.create :open_id_user
+      User.authenticate_by_open_id(user.open_ids.first).should == user
+    end
+    
+    it "open_id uniquiness" do
+      user = Factory.build :open_id_user
+      user.open_ids = ['some_id']
+      user.save.should be_true
+      
+      user = Factory.build :open_id_user
+      user.open_ids = ['some_id']
+      user.save.should be_false
+      user.errors.on(:open_ids).should_not be_blank
+    end
+  end
+  
+  it "add password to OpenID" do
+    user = Factory.create :open_id_user
+    user.update_password('new_password', 'new_password', '').should be_true
+    user.save.should be_true
+    User.authenticate_by_password(user.name, user.password).should == user
+  end
+end

data/spec/mongo_mapper/basic_spec.rb

@@ -0,0 +1,41 @@
+require "#{File.dirname(__FILE__)}/helper"
+
+describe "Rad MongoMapper basics" do  
+  before :all do
+    MongoMapper.database = 'test'    
+  end
+  
+  after :all do
+    %w{ToRsonTest}.each{|n| Object.send :remove_const, n if Object.const_defined? n}
+  end
+  
+  it "to_rson" do
+    class ToRsonTest
+      include MongoMapper::Document      
+      plugin MongoMapper::Plugins::RadMicelaneous
+
+      key :name, String
+      key :text, String
+      validates_presence_of :name
+    end
+    ToRsonTest.delete_all
+    
+    ToRsonTest.create! :name => 'a'
+    ToRsonTest.create! :name => 'b'
+    
+    # model.to_rson
+    o = ToRsonTest.first
+    r = o.to_rson
+    r.delete 'id'
+    r.should == {"name" => "a", "text" => "null"}
+    
+    o.to_rson(:only => :name).should == {"name" => "a"}
+    
+    # collections.to_rson
+    r = ToRsonTest.all.to_rson
+    r.collect!{|h| h.delete('id'); h}
+    r.should == [{"name" => "a", "text" => "null"}, {"name" => "b", "text" => "null"}]
+    
+    ToRsonTest.all.to_rson(:only => :name).should == [{"name" => "a"}, {"name" => "b"}]
+  end
+end

data/spec/mongo_mapper/helper.rb

@@ -0,0 +1,10 @@
+dir = File.expand_path(File.dirname(__FILE__))
+lib_dir = File.expand_path("#{dir}/../../../lib")
+$LOAD_PATH << lib_dir unless $LOAD_PATH.include? lib_dir
+
+require 'crystal/support'
+require 'mongo_mapper'
+require 'rad/mongo_mapper/rad_micelaneous'
+
+# spec & helpers
+require 'spec_ext'

data/spec/spec.opts

@@ -0,0 +1,4 @@
+--colour
+--format progress
+--loadby mtime
+--reverse