muck-friends 0.1.1

data/test/rails_root/test/shoulda_macros/models.rb

@@ -0,0 +1,50 @@
+module ShouldaModelMacros
+
+  def self.should_whitelist(*attributes)
+    bad_scripts = [
+      %|';alert(String.fromCharCode(88,83,83))//\';alert(String.fromCharCode(88,83,83))//";alert(String.fromCharCode(88,83,83))//\";alert(String.fromCharCode(88,83,83))//--></SCRIPT>">'><SCRIPT>alert(String.fromCharCode(88,83,83))</SCRIPT>|,
+      %|'';!--"<XSS>=&{()}|,
+      %|<SCRIPT SRC=http://ha.ckers.org/xss.js></SCRIPT>|,
+      %|<IMG SRC="javascript:alert('XSS');">|,
+      %|<IMG SRC=javascript:alert('XSS')>|,
+      %|<IMG SRC=JaVaScRiPt:alert('XSS')>|,
+      %|<IMG SRC=JaVaScRiPt:alert('XSS')>|,
+      %|<IMG SRC=`javascript:alert("RSnake says, 'XSS'")`>|,
+      %|<IMG """><SCRIPT>alert("XSS")</SCRIPT>">|,
+      %|<IMG SRC=javascript:alert(String.fromCharCode(88,83,83))>|,
+      %|<A HREF="h
+      tt	p://6&#9;6.000146.0x7.147/">XSS</A>|,
+      %|<script>alert('message');</script>| ]
+      
+    klass = model_class
+    attributes.each do |attribute|
+      attribute = attribute.to_sym
+      should "white list #{attribute}" do
+        assert object = klass.find(:first), "Can't find first #{klass}"
+        bad_scripts.each do |bad_value|
+          object.send("#{attribute}=", bad_value)
+          object.save
+          clean_value = object.send("#{attribute}")
+          assert !clean_value.include?(bad_value), "#{attribute} is not white listed. #{bad_value} made it through"
+        end
+      end
+    end
+  end
+
+  def should_accept_nested_attributes_for(*attr_names)
+    klass = self.name.gsub(/Test$/, '').constantize
+ 
+    context "#{klass}" do
+      attr_names.each do |association_name|
+        should "accept nested attrs for #{association_name}" do
+          assert  klass.instance_methods.include?("#{association_name}_attributes="),
+                  "#{klass} does not accept nested attributes for #{association_name}"
+        end
+      end
+    end
+  end
+end
+
+class ActiveSupport::TestCase
+  extend ShouldaModelMacros
+end

data/test/rails_root/test/shoulda_macros/pagination.rb

@@ -0,0 +1,53 @@
+module ShouldaPaginationMacros
+  # Example:
+  #  context "a GET to index logged in as admin" do
+  #    setup do
+  #      login_as_admin 
+  #      get :index
+  #    end
+  #    should_paginate_collection :users
+  #    should_display_pagination
+  #  end
+  def self.should_paginate_collection(collection_name)
+    should "paginate #{collection_name}" do
+      assert collection = assigns(collection_name), 
+        "Controller isn't assigning to @#{collection_name.to_s}."
+      assert_kind_of WillPaginate::Collection, collection, 
+        "@#{collection_name.to_s} isn't a WillPaginate collection."
+    end
+  end
+  
+  def self.should_display_pagination
+    should "display pagination" do
+      assert_select "div.pagination", { :minimum => 1 }, 
+        "View isn't displaying pagination. Add <%= will_paginate @collection %>."
+    end
+  end
+  
+  # Example:
+  #  context "a GET to index not logged in as admin" do
+  #    setup { get :index }
+  #    should_not_paginate_collection :users
+  #    should_not_display_pagination
+  #  end
+  def self.should_not_paginate_collection(collection_name)
+    should "not paginate #{collection_name}" do
+      assert collection = assigns(collection_name), 
+        "Controller isn't assigning to @#{collection_name.to_s}."
+      assert_not_equal WillPaginate::Collection, collection.class, 
+        "@#{collection_name.to_s} is a WillPaginate collection."
+    end
+  end
+  
+  def self.should_not_display_pagination
+    should "not display pagination" do
+      assert_select "div.pagination", { :count => 0 }, 
+        "View is displaying pagination. Check your logic."
+    end
+  end
+end
+
+
+class ActiveSupport::TestCase
+  extend ShouldaPaginationMacros
+end

data/test/rails_root/test/shoulda_macros/plugins.rb

@@ -0,0 +1,34 @@
+module ShouldaPluginMacros
+
+  def self.should_act_as_taggable_on_steroids
+    klass = self.name.gsub(/Test$/, '').constantize
+
+    should "include ActsAsTaggableOnSteroids methods" do
+      assert klass.extended_by.include?(ActiveRecord::Acts::Taggable::ClassMethods)
+      assert klass.extended_by.include?(ActiveRecord::Acts::Taggable::SingletonMethods)
+      assert klass.include?(ActiveRecord::Acts::Taggable::InstanceMethods)
+    end
+
+    should_have_many :taggings, :tags
+  end
+
+
+  def self.should_act_as_list
+    klass = self.name.gsub(/Test$/, '').constantize
+
+    context "To support acts_as_list" do
+      should_have_db_column('position', :type => :integer)
+    end
+
+    should "include ActsAsList methods" do
+      assert klass.include?(ActiveRecord::Acts::List::InstanceMethods)
+    end
+
+    should_have_instance_methods :acts_as_list_class, :position_column, :scope_condition
+  end
+
+end
+
+ActiveSupport::TestCase.extend(ShouldaPluginMacros)
+Test::Unit::TestCase.extend(ShouldaPluginMacros)
+ActionController::TestCase.extend(ShouldaPluginMacros)

data/test/rails_root/test/test_helper.rb

@@ -0,0 +1,38 @@
+$:.reject! { |e| e.include? 'TextMate' }
+ENV["RAILS_ENV"] = "test"
+require File.expand_path(File.dirname(__FILE__) + "/../config/environment")
+require 'test_help'
+gem 'thoughtbot-factory_girl' # from github
+require 'factory_girl'
+require 'mocha'
+require 'authlogic/test_case'
+require 'redgreen' rescue LoadError
+require File.expand_path(File.dirname(__FILE__) + '/factories')
+require File.join(File.dirname(__FILE__), 'shoulda_macros', 'controller')
+require File.join(File.dirname(__FILE__), 'shoulda_macros', 'models')
+
+class ActiveSupport::TestCase 
+  self.use_transactional_fixtures = true
+  self.use_instantiated_fixtures  = false
+
+  include Authlogic::TestCase
+  
+  def login_as(user)
+    success = UserSession.create(user)
+    if !success
+      errors = user.errors.full_messages.to_sentence
+      message = 'User has not been activated' if !user.active?
+      raise "could not login as #{user.to_param}.  Please make sure the user is valid. #{message} #{errors}"
+    end
+    UserSession.find
+  end
+  
+  def assure_logout
+    user_session = UserSession.find
+    user_session.destroy if user_session
+  end
+  
+  def ensure_flash(val)
+    assert_contains flash.values, val, ", Flash: #{flash.inspect}"
+  end
+end

data/test/rails_root/test/unit/friend_mailer_test.rb

@@ -0,0 +1,37 @@
+require File.dirname(__FILE__) + '/../test_helper'
+require 'friend_mailer'
+
+class FriendMailerTest < ActiveSupport::TestCase
+
+  context "deliver emails" do
+
+    def setup
+      ActionMailer::Base.delivery_method = :test
+      ActionMailer::Base.perform_deliveries = true
+      ActionMailer::Base.deliveries = []
+      @expected = TMail::Mail.new
+      @expected.set_content_type "text", "plain", { "charset" => 'utf-8' }
+    end
+    
+    should "send follow email" do
+      inviter = Factory(:user)
+      invited = Factory(:user)
+      response = FriendMailer.deliver_follow(inviter, invited)
+      assert !ActionMailer::Base.deliveries.empty?, "No email was sent"
+      email = ActionMailer::Base.deliveries.last
+      assert_equal [invited.email], email.to
+      assert_equal [GlobalConfig.from_email], email.from
+    end
+    
+    should "send friend_request email" do
+      inviter = Factory(:user)
+      invited = Factory(:user)
+      response = FriendMailer.deliver_friend_request(inviter, invited)
+      assert !ActionMailer::Base.deliveries.empty?, "No email was sent"
+      email = ActionMailer::Base.deliveries.last
+      assert_equal [invited.email], email.to
+      assert_equal [GlobalConfig.from_email], email.from
+    end
+    
+  end  
+end

data/test/rails_root/test/unit/friend_test.rb

@@ -0,0 +1,186 @@
+require File.dirname(__FILE__) + '/../test_helper'
+
+# Used to test muck_friend
+class FriendTest < ActiveSupport::TestCase
+
+  context "A Friend instance" do    
+    should_belong_to :inviter
+    should_belong_to :invited
+  end
+  
+  context "friending" do
+    setup do
+      @aaron = Factory(:user)
+      @quentin = Factory(:user)
+      @friend_guy = Factory(:user)
+      @follower_guy = Factory(:user)
+    end
+
+    should "be able to start and stop following aaron" do
+      Friend.destroy_all
+      assert !@friend_guy.following?(@aaron)
+      assert_difference "Friend.count" do
+        Friend.add_follower(@friend_guy, @aaron)
+        @aaron.reload
+        @friend_guy.reload
+        assert @friend_guy.following?(@aaron)
+      end
+      assert_difference "Friend.count", -1 do
+        Friend.stop_following(@friend_guy, @aaron)
+        @aaron.reload and @friend_guy.reload
+        assert !@friend_guy.following?(@aaron)
+      end
+    end
+
+    should "not have any effect on friends" do
+      Friend.destroy_all
+      assert_no_difference "Friend.count" do        
+        assert !Friend.stop_following(@friend_guy, @aaron)
+      end
+      assert_no_difference "Friend.count" do        
+        assert !Friend.stop_being_friends(@friend_guy, @aaron)
+      end
+    end
+    
+    should "not create an association with the same user" do
+      Friend.destroy_all    
+      assert !Friend.add_follower(@quentin, @quentin)
+      assert_equal 0, Friend.count
+    end
+
+    should "create a new follower" do
+      Friend.destroy_all
+      assert Friend.add_follower(@quentin, @aaron)
+      assert_equal 1, Friend.count
+      assert !@quentin.reload.friend_of?(@aaron.reload)
+      assert @quentin.following?(@aaron)
+      assert @aaron.followed_by?(@quentin)
+    end
+
+    should "not find a following to turn into a friendship so just makes a follower" do
+      Friend.destroy_all
+      assert Friend.make_friends(@quentin, @aaron)
+      assert_equal 1, Friend.count
+      assert !@quentin.reload.friend_of?(@aaron.reload)
+      assert @quentin.following?(@aaron)
+      assert @aaron.followed_by?(@quentin)
+    end
+
+    should "turn a following into a friendship" do
+      Friend.destroy_all
+      assert Friend.add_follower(@quentin, @aaron)
+      assert_equal 1, Friend.count
+      assert Friend.make_friends(@aaron, @quentin)
+      assert_equal 2, Friend.count
+      @quentin.reload
+      @aaron.reload
+      assert @quentin.friend_of?(@aaron)
+      assert @aaron.friend_of?(@quentin)
+    end
+
+    should "turn a following into a friendship with reversed users" do
+      Friend.destroy_all
+      assert Friend.add_follower(@quentin, @aaron)
+      assert_equal 1, Friend.count
+      assert Friend.make_friends(@quentin, @aaron)
+      assert_equal 2, Friend.count
+      @quentin.reload
+      @aaron.reload
+      assert @quentin.friend_of?(@aaron)
+      assert @aaron.friend_of?(@quentin)
+    end
+
+    should "not find a friendship so can't stop being friends" do
+      Friend.destroy_all
+      assert !Friend.revert_to_follower(@quentin, @aaron)
+    end
+
+    should "revert to follower" do
+      Friend.destroy_all
+      assert Friend.add_follower(@quentin, @aaron)
+      assert Friend.make_friends(@quentin, @aaron)
+      assert_equal 2, Friend.count
+      @quentin.reload
+      @aaron.reload
+      assert Friend.revert_to_follower(@quentin, @aaron)
+      assert_equal 1, Friend.count
+      @quentin.reload
+      @aaron.reload
+      assert !@quentin.friend_of?(@aaron)
+      assert !@quentin.following?(@aaron)
+      assert @quentin.followed_by?(@aaron)
+      assert !@aaron.friend_of?(@quentin)
+      assert @aaron.following?(@quentin)
+      assert !@aaron.followed_by?(@quentin)
+    end
+
+    should "stop being friends" do
+      Friend.destroy_all
+      assert Friend.add_follower(@quentin, @aaron)
+      assert Friend.make_friends(@quentin, @aaron)
+      assert_equal 2, Friend.count
+      @quentin.reload
+      @aaron.reload
+      assert Friend.stop_being_friends(@quentin, @aaron)
+      @quentin.reload
+      @aaron.reload
+      assert !@quentin.friend_of?(@aaron)
+      assert !@quentin.following?(@aaron)
+      assert !@quentin.followed_by?(@aaron)
+      assert !@aaron.friend_of?(@quentin)
+      assert !@aaron.following?(@quentin)
+      assert !@aaron.followed_by?(@quentin)
+    end
+
+    should "block friend" do
+      Friend.destroy_all
+      assert Friend.add_follower(@quentin, @aaron)
+      assert Friend.make_friends(@quentin, @aaron)
+      Friend.block_user(@quentin, @aaron)
+      assert @quentin.blocked_users.include?(@aaron)
+      assert !@quentin.friend_of?(@aaron)
+      assert !@quentin.followed_by?(@aaron)
+      assert !@quentin.following?(@aaron)
+      assert !@aaron.friend_of?(@quentin)
+      assert !@aaron.followed_by?(@quentin)
+      assert !@aaron.following?(@quentin)
+    end
+    
+    should "block follower" do
+      Friend.destroy_all
+      assert Friend.add_follower(@quentin, @aaron)
+      Friend.block_user(@aaron, @quentin)
+      assert @aaron.blocked_users.include?(@quentin)
+      assert !@quentin.friend_of?(@aaron)
+      assert !@quentin.following?(@aaron)
+      assert !@aaron.friend_of?(@quentin)
+      assert !@aaron.following?(@quentin)
+      assert !@aaron.followed_by?(@quentin)
+    end
+    
+    should "ignore block user request" do
+      assert !Friend.block_user(nil, nil)
+    end
+    
+    context "activities" do
+      setup do
+        @temp_enable_friend_activity = GlobalConfig.enable_friend_activity
+        GlobalConfig.enable_friend_activity = true
+      end
+      teardown do
+        GlobalConfig.enable_friend_activity = @temp_enable_friend_activity
+      end
+      should "add follow activity" do
+        assert_difference "Activity.count", 1 do
+          Friend.add_follower(@quentin, @aaron)
+        end
+      end
+      should "add friends with activity" do
+        assert_difference "Activity.count", 1 do
+          Friend.make_friends(@quentin, @aaron)
+        end
+      end
+    end
+  end
+  
+end

data/test/rails_root/test/unit/user_test.rb

@@ -0,0 +1,170 @@
+require File.dirname(__FILE__) + '/../test_helper'
+
+# Used to test muck_friend_user
+class UserTest < ActiveSupport::TestCase
+
+  context "user instance with acts_as_muck_friend_user" do
+    should_have_many :friendships
+    should_have_many :follower_friends
+    should_have_many :following_friends
+    should_have_many :blocked_friends
+
+    should_have_many :friends
+    should_have_many :followers
+    should_have_many :followings
+    should_have_many :blocked_users
+
+    should_have_many :initiated_by_me
+    should_have_many :not_initiated_by_me
+    
+    should_have_many :friendships_initiated_by_me
+    should_have_many :friendships_not_initiated_by_me
+    
+    should_have_many :occurances_as_friend
+  end
+
+  context "user as friend" do
+    setup do
+      Friend.destroy_all
+      @aaron = Factory(:user)
+      @quentin = Factory(:user)
+      @friend_guy = Factory(:user)
+      @follower_guy = Factory(:user)
+    end
+
+    should "become friends" do
+      assert @aaron.follow(@quentin)
+      assert @quentin.become_friends_with(@aaron)
+      debugger
+      
+    end
+    
+    should "have friends" do
+      @aaron.follow(@quentin)
+      @quentin.become_friends_with(@aaron)
+      @friend_guy.follow(@quentin)
+      @quentin.become_friends_with(@friend_guy)
+      @quentin.reload
+      @aaron.reload
+      @friend_guy.reload
+      assert @quentin.friends.any?{|f| f.id == @aaron.id || f.id == @friend_guy.id}
+      assert @aaron.friends.any?{|f| f.id == @quentin.id}
+      assert @friend_guy.friends.any?{|f| f.id == @quentin.id}
+    end
+    
+    should "not have follower as friend" do
+      @follower_guy.follow(@quentin)
+      assert !@quentin.friends.any?{|f| f.id == @follower_guy.id}
+    end
+
+    should "have followers" do
+      @follower_guy.follow(@quentin)
+      assert @quentin.followers.any?{|f| f.id == @follower_guy.id}
+    end
+    
+    should "have people user follows (followings)" do
+      @follower_guy.follow(@quentin)
+      assert @follower_guy.followings.any?{|f| f.id == @quentin.id}
+    end
+    
+    should "be a friend" do
+      @quentin.follow(@aaron)
+      @quentin.follow(@friend_guy)
+      @aaron.become_friends_with(@quentin)
+      @friend_guy.become_friends_with(@quentin)
+      assert_equal @quentin.occurances_as_friend.count, 2
+    end
+    
+    should "find friendships initiated by me" do
+      @quentin.follow(@aaron)
+      @quentin.follow(@friend_guy)
+      assert_equal 2, @quentin.friendships_initiated_by_me.count
+      assert @quentin.friendships_initiated_by_me.any?{|f| f.id == @aaron.id || f.id == @friend_guy.id}
+    end
+    
+    should "find friendships not initiated by me" do
+      @aaron.follow(@quentin)
+      @friend_guy.follow(@quentin)
+      assert_equal 2, @quentin.friendships_not_initiated_by_me.count
+      assert @quentin.friendships_not_initiated_by_me.any?{|f| f.id == @aaron.id || f.id == @friend_guy.id}
+    end
+    
+    should "follow the user" do
+      @quentin.follow(@aaron)
+      assert @quentin.followings.any?{|f| f.id == @aaron.id}
+    end
+    
+    should "stop following the user" do
+      @quentin.follow(@aaron)
+      @quentin.stop_following(@aaron)
+      assert !@quentin.followings.any?{|f| f.id == @aaron.id}
+    end
+    
+    should "become friends" do
+      @quentin.follow(@aaron)
+      @aaron.become_friends_with(@quentin)
+      @quentin.reload
+      @aaron.reload
+      assert @aaron.friends.any?{|f| f.id == @quentin.id}
+      assert @quentin.friends.any?{|f| f.id == @aaron.id}
+    end
+
+    should "stop being friends" do
+      @temp_allow_following = GlobalConfig.allow_following
+      GlobalConfig.allow_following = false
+      @quentin.follow(@aaron)
+      @aaron.become_friends_with(@quentin)
+      @quentin.drop_friend(@aaron)
+      assert !@quentin.friend_of?(@aaron)
+      assert !@quentin.following?(@aaron)
+      assert !@quentin.followed_by?(@aaron)
+      assert !@aaron.friend_of?(@quentin)
+      assert !@aaron.following?(@quentin)
+      assert !@aaron.followed_by?(@quentin)
+      GlobalConfig.allow_following = @temp_allow_following
+    end
+
+    should "stop being friends but still allow follow" do
+      @temp_allow_following = GlobalConfig.allow_following
+      GlobalConfig.allow_following = true
+      @quentin.follow(@aaron)
+      @aaron.become_friends_with(@quentin)
+      @quentin.drop_friend(@aaron)
+      @quentin.reload
+      @aaron.reload
+      assert !@quentin.friend_of?(@aaron)
+      assert !@quentin.following?(@aaron)
+      assert @quentin.followed_by?(@aaron)
+      assert !@aaron.friend_of?(@quentin)
+      assert @aaron.following?(@quentin)
+      assert !@aaron.followed_by?(@quentin)
+      GlobalConfig.allow_following = @temp_allow_following
+    end
+    
+    should "not have a network" do
+      assert !@quentin.has_network?
+    end
+    
+    should "have a network" do
+      @quentin.follow(@aaron)
+      assert @quentin.has_network?
+    end
+    
+    should "block user" do
+      @quentin.follow(@aaron)
+      @aaron.block_user(@quentin)
+      assert !@aaron.friends.any?{|f| f.id == @quentin.id}
+      assert !@aaron.followers.any?{|f| f.id == @quentin.id}
+      assert !@quentin.followings.any?{|f| f.id == @aaron.id}
+    end
+    
+    should "unblock user" do
+      @quentin.follow(@aaron)
+      @aaron.block_user(@quentin)
+      @aaron.unblock_user(@quentin)
+      assert @aaron.followers.any?{|f| f.id == @quentin.id}
+      assert @quentin.followings.any?{|f| f.id == @aaron.id}
+    end
+  end
+
+end