interest 0.0.1

data/lib/generators/templates/migrations/blockings.rb

@@ -0,0 +1,14 @@
+class InterestBlockingsMigration < ActiveRecord::Migration
+  def change
+    create_table :blockings do |t|
+      t.belongs_to :blocker, polymorphic: true, null: false
+      t.belongs_to :blockee, polymorphic: true, null: false
+
+      t.timestamps
+    end
+
+    add_index :blockings, [:blocker_id, :blocker_type], name: :index_blockings_blocker
+    add_index :blockings, [:blockee_id, :blockee_type], name: :index_blockings_blockee
+    add_index :blockings, [:blocker_id, :blocker_type, :blockee_id, :blockee_type], unique: true, name: :index_blockings_uniqueness
+  end
+end

data/lib/generators/templates/migrations/followings.rb

@@ -0,0 +1,15 @@
+class InterestFollowingsMigration < ActiveRecord::Migration
+  def change
+    create_table :followings do |t|
+      t.belongs_to :follower, polymorphic: true, null: false
+      t.belongs_to :followee, polymorphic: true, null: false
+      t.string :status, null: false
+
+      t.timestamps
+    end
+
+    add_index :followings, [:follower_id, :follower_type], name: :index_followings_follower
+    add_index :followings, [:followee_id, :followee_type], name: :index_followings_followee
+    add_index :followings, [:follower_id, :follower_type, :followee_id, :followee_type], unique: true, name: :index_followings_uniqueness
+  end
+end

data/lib/generators/templates/models/blocking.rb

@@ -0,0 +1,3 @@
+class Blocking < ActiveRecord::Base
+  include Interest::Blockable::Blocking
+end

data/lib/generators/templates/models/following.rb

@@ -0,0 +1,4 @@
+class Following < ActiveRecord::Base
+  include Interest::Followable::Following
+  include Interest::FollowRequestable::FollowRequest
+end

data/lib/interest.rb

@@ -0,0 +1,49 @@
+require "interest/version"
+require "interest/base"
+require "interest/followable"
+require "interest/follow_requestable"
+require "interest/blockable"
+require "active_support"
+require "active_support/core_ext/string/inflections"
+require "active_record"
+
+module Interest
+  module Extension
+    extend ActiveSupport::Concern
+
+    included do
+      include Base
+      extend Followable::Extension
+      extend FollowRequestable::Extension
+      extend Blockable::Extension
+    end
+
+    module ClassMethods
+      def interest
+        acts_as_followable
+        acts_as_follow_requestable
+        acts_as_blockable
+      end
+    end
+  end
+
+  class << self
+    def following_class_name
+      "::Following"
+    end
+
+    def following_class
+      @following_class ||= following_class_name.constantize
+    end
+
+    def blocking_class_name
+      "::Blocking"
+    end
+
+    def blocking_class
+      @blocking_class ||= blocking_class_name.constantize
+    end
+  end
+end
+
+ActiveRecord::Base.__send__ :include, Interest::Extension

data/lib/interest/base.rb

@@ -0,0 +1,49 @@
+require "active_support"
+require "interest/followable"
+require "interest/follow_requestable"
+require "interest/blockable"
+
+module Interest
+  module Base
+    extend ActiveSupport::Concern
+
+    def followable?(other)
+      is_a?(Interest::Followable::Follower) and other.is_a?(Interest::Followable::Followee)
+    end
+
+    def follow_requestable?(other)
+      followable?(other) and is_a?(Interest::FollowRequestable::FollowRequester) and other.is_a?(Interest::FollowRequestable::FollowRequestee)
+    end
+
+    def blockable?(other)
+      is_a?(Interest::Blockable::Blocker) and other.is_a?(Interest::Blockable::Blockee)
+    end
+
+    def follower?
+      is_a? Interest::Followable::Follower
+    end
+
+    def followee?
+      is_a? Interest::Followable::Followee
+    end
+
+    def follow_requester?
+      is_a? Interest::FollowRequestable::FollowRequester
+    end
+
+    def follow_requestee?
+      is_a? Interest::FollowRequestable::FollowRequestee
+    end
+
+    def blocker?
+      is_a? Interest::Blockable::Blocker
+    end
+
+    def blockee?
+      is_a? Interest::Blockable::Blockee
+    end
+
+    module ClassMethods
+    end
+  end
+end

data/lib/interest/blockable.rb

@@ -0,0 +1,25 @@
+require "interest/blockable/exceptions"
+require "interest/blockable/blocking"
+require "interest/blockable/blocker"
+require "interest/blockable/blockee"
+
+module Interest
+  module Blockable
+    module Extension
+      def acts_as_blocker
+        include Blocker
+        define_blocker_association_methods
+      end
+
+      def acts_as_blockee
+        include Blockee
+        define_blockee_association_methods
+      end
+
+      def acts_as_blockable
+        acts_as_blocker
+        acts_as_blockee
+      end
+    end
+  end
+end

data/lib/interest/blockable/blockee.rb

@@ -0,0 +1,40 @@
+require "active_support"
+require "interest/definition"
+
+module Interest
+  module Blockable
+    module Blockee
+      extend ActiveSupport::Concern
+
+      include Interest::Definition.instance_methods_for(:blockee, :blocker)
+
+      def blocked_by?(blocker)
+        blockee_collection_for(blockee).include? blocker
+      end
+
+      module ClassMethods
+        include Interest::Definition.class_methods_for(:blockee, :blocker)
+
+        def define_blockee_association_methods
+          has_many :blocker_relationships,
+            -> { uniq },
+            as:          :blockee,
+            dependent:   :destroy,
+            class_name:  Interest.blocking_class_name do
+              include Interest::Definition.collection_methods_for(:blocker)
+            end
+        end
+
+        def define_blockee_association_method(source_type)
+          association_method_name = blockee_association_method_name_for source_type
+
+          has_many association_method_name,
+            -> { uniq },
+            through:     :blocker_relationships,
+            source:      :blocker,
+            source_type: source_type
+        end
+      end
+    end
+  end
+end

data/lib/interest/blockable/blocker.rb

@@ -0,0 +1,69 @@
+require "active_support"
+require "active_record"
+require "interest/definition"
+require "interest/blockable/exceptions"
+require "interest/blockable/blockee"
+
+module Interest
+  module Blockable
+    module Blocker
+      extend ActiveSupport::Concern
+
+      include Interest::Definition.instance_methods_for(:blocker, :blocking)
+
+      def followable?(other)
+        super and not (other.blockee? and blocking?(other)) and not (blockee? and other.blocker? and other.blocking? self)
+      end
+
+      def blocking?(blockee)
+        blocker_collection_for(blockee).include? blockee
+      end
+
+      def block(blockee, raise_record_invalid = false)
+        blocking_relationships.create!(blockee: blockee)
+      rescue ActiveRecord::RecordInvalid => exception
+        raise_record_invalid ? (raise exception) : nil
+      rescue ActiveRecord::RecordNotUnique
+        blocking_relationships.find_by(blockee: blockee)
+      end
+
+      def block!(blockee)
+        block(blockee, true)
+      rescue ActiveRecord::RecordInvalid => exception
+        raise Interest::Blockable::Rejected.new(exception)
+      end
+
+      def unblock(blockee)
+        blocker_collection_for(blockee).delete blockee
+      end
+
+      def valid_blocking_for?(blockee)
+        not (self == blockee or not blockable?(blockee))
+      end
+
+      module ClassMethods
+        include Interest::Definition.class_methods_for(:blocker, :blocking)
+
+        def define_blocker_association_methods
+          has_many :blocking_relationships,
+            -> { uniq },
+            as:          :blocker,
+            dependent:   :destroy,
+            class_name:  Interest.blocking_class_name do
+              include Interest::Definition.collection_methods_for(:blockee)
+            end
+        end
+
+        def define_blocker_association_method(source_type)
+          association_method_name = blocker_association_method_name_for source_type
+
+          has_many association_method_name,
+            -> { uniq },
+            through:     :blocking_relationships,
+            source:      :blockee,
+            source_type: source_type
+        end
+      end
+    end
+  end
+end

data/lib/interest/blockable/blocking.rb

@@ -0,0 +1,48 @@
+require "active_support"
+
+module Interest
+  module Blockable
+    module Blocking
+      extend ActiveSupport::Concern
+
+      included do
+        belongs_to :blocker, polymorphic: true
+        belongs_to :blockee, polymorphic: true
+
+        validates :blocker, presence: true
+        validates :blockee, presence: true
+
+        validate :validate_blocking_relationships, if: :should_validate_blocking_relationships?
+
+        scope :between, ->(a, b) {
+          a_to_b = where(blocker: a, blockee: b).where_values.reduce(:and)
+          b_to_a = where(blocker: b, blockee: a).where_values.reduce(:and)
+
+          where a_to_b.or(b_to_a)
+        }
+
+        after_create :destroy_following_relationships
+      end
+
+      def destroy_following_relationships
+        Interest.following_class.destroy_relationships_between blocker, blockee
+      end
+
+      def should_validate_blocking_relationships?
+        blocker.is_a?(ActiveRecord::Base) and blockee.is_a?(ActiveRecord::Base)
+      end
+
+      def validate_blocking_relationships
+        errors.add :blocker, :invalid unless blocker.blocker?
+        errors.add :blockee, :invalid unless blockee.blockee?
+        errors.add :blockee, :rejected if blocker.blocker? and not blocker.valid_blocking_for?(blockee)
+      end
+
+      module ClassMethods
+        def destroy_relationships_between(a, b)
+          between(a, b).destroy_all
+        end
+      end
+    end
+  end
+end

data/lib/interest/blockable/exceptions.rb

@@ -0,0 +1,12 @@
+require "interest/exception"
+
+module Interest
+  module Blockable
+    module Exceptions
+      class Exception < Interest::Exception; end
+      class Rejected < Exception; end
+    end
+
+    include Exceptions
+  end
+end

data/lib/interest/definition.rb

@@ -0,0 +1,45 @@
+require "active_support"
+require "active_support/core_ext/string/inflections"
+require "interest/utils"
+
+module Interest
+  module Definition
+    class << self
+      def instance_methods_for(source, target)
+        Module.new do
+          define_method :"#{source}_collection_for" do |record|
+            __send__ self.class.__send__(:"#{source}_association_method_name_for", record)
+          end
+
+          define_method :method_missing do |name, *args, &block|
+            return super(name, *args, &block) unless matches = /\A#{target}_(?<type>.+)\Z/.match(name.to_s)
+
+            self.class.__send__ :"define_#{source}_association_method", Interest::Utils.source_type_of(matches[:type])
+
+            __send__ name, *args, &block
+          end
+
+          define_method :respond_to_missing? do |name, include_private = false|
+            !! (super(name, include_private) or /\A#{target}_.+\Z/ =~ name.to_s)
+          end
+        end
+      end
+
+      def class_methods_for(source, target)
+        Module.new do
+          define_method :"#{source}_association_method_name_for" do |record|
+            :"#{target}_#{Interest::Utils.symbolic_name_of record}"
+          end
+        end
+      end
+
+      def collection_methods_for(target)
+        Module.new do
+          define_method :of do |*args|
+            where :"#{target}_type" => args.map(&Interest::Utils.method(:source_type_of))
+          end
+        end
+      end
+    end
+  end
+end

data/lib/interest/exception.rb

@@ -0,0 +1,10 @@
+module Interest
+  class Exception < StandardError
+    attr_accessor :original_exception
+
+    def initialize(original_exception)
+      self.original_exception = original_exception
+      super()
+    end
+  end
+end

data/lib/interest/follow_requestable.rb

@@ -0,0 +1,25 @@
+require "interest/follow_requestable/exceptions"
+require "interest/follow_requestable/follow_requester"
+require "interest/follow_requestable/follow_requestee"
+require "interest/follow_requestable/follow_request"
+
+module Interest
+  module FollowRequestable
+    module Extension
+      def acts_as_follow_requester
+        include FollowRequester
+        define_follow_requester_association_methods
+      end
+
+      def acts_as_follow_requestee
+        include FollowRequestee
+        define_follow_requestee_association_methods
+      end
+
+      def acts_as_follow_requestable
+        acts_as_follow_requester
+        acts_as_follow_requestee
+      end
+    end
+  end
+end

data/lib/interest/follow_requestable/exceptions.rb

@@ -0,0 +1,12 @@
+require "interest/exception"
+
+module Interest
+  module FollowRequestable
+    module Exceptions
+      class Exception < Interest::Exception; end
+      class Rejected < Exception; end
+    end
+
+    include Exceptions
+  end
+end