module-cluster 1.4.1 → 1.4.2

data/lib/module-cluster/_private_/ModuleCluster/ClusterStack/Set/MultiSetProxy.rb

@@ -0,0 +1,359 @@
+
+class ModuleCluster::ClusterStack::Set::MultiSetProxy < Array
+
+  ################
+  #  initialize  #
+  ################
+
+  def initialize( *members )
+    super( members )
+  end
+
+  ##########
+  #  name  #
+  ##########
+
+  def name
+    return collect {  |this_set| this_set.name }.flatten
+  end
+
+  ###########
+  #  name=  #
+  ###########
+
+  def name=( set_name )
+
+    self.each do |this_set|
+      this_set.name = set_name
+    end
+
+    return set_name
+
+  end
+
+  #######################
+  #  dependency_module  #
+  #######################
+
+  def dependency_module
+    return collect { |this_set| this_set.dependency_module }.flatten
+  end
+
+  ########################
+  #  dependency_module=  #
+  ########################
+
+  def dependency_module=( set_dependency_module )
+
+    self.each do |this_set|
+      this_set.dependency_module = set_dependency_module
+    end
+
+    return set_dependency_module
+    
+  end
+
+  ############
+  #  method  #
+  ############
+  
+  def method
+    return collect { |this_set| this_set.method }.flatten
+  end
+
+  #############
+  #  method=  #
+  #############
+  
+  def method=( set_method )
+
+    self.each do |this_set|
+      this_set.method = set_method
+    end
+
+    return set_method
+
+  end
+
+  ##################################
+  #  module_class_instance_or_all  #
+  ##################################
+  
+  def module_class_instance_or_all
+    return collect { |this_set| this_set.module_class_instance_or_all }.flatten
+  end
+
+  ###################################
+  #  module_class_instance_or_all=  #
+  ###################################
+  
+  def module_class_instance_or_all=( symbol_module_class_instance_or_all )
+
+    self.each do |this_set|
+      this_set.module_class_instance_or_all = symbol_module_class_instance_or_all
+    end
+
+    return symbol_module_class_instance_or_all
+
+  end
+
+  #######################
+  #  include_or_extend  #
+  #######################
+  
+  def include_or_extend
+    return collect { |this_set| this_set.method }.flatten
+  end
+
+  ########################
+  #  include_or_extend=  #
+  ########################
+  
+  def include_or_extend=( symbol_include_or_extend )
+
+    self.each do |this_set|
+      this_set.method = symbol_include_or_extend
+    end
+
+    return symbol_include_or_extend
+
+  end
+  
+  #############
+  #  modules  #
+  #############
+
+  def modules
+    modules = Array.new
+    self.each do |this_set|
+      if this_set.is_a?( ::ModuleCluster::ClusterStack::Set::MultiSetProxy )
+        modules.concat( this_set.modules )
+      else
+        modules.push( this_set.modules )
+      end
+    end
+    return modules
+  end
+
+  ##############
+  #  modules=  #
+  ##############
+
+  def modules=( array_of_modules )
+
+    self.each do |this_set|
+      this_set.modules = array_of_modules
+    end
+
+    return array_of_modules
+
+  end
+
+  #######################################
+  #  runtime_includes_or_extends_block  #
+  #######################################
+  
+  def runtime_includes_or_extends_block
+    return collect { |this_set| this_set.runtime_includes_or_extends_block }.flatten
+  end
+
+  ########################################
+  #  runtime_includes_or_extends_block=  #
+  ########################################
+  
+  def runtime_includes_or_extends_block=( runtime_includes_or_extends_proc )
+
+    self.each do |this_set|
+      this_set.runtime_includes_or_extends_block = runtime_includes_or_extends_proc
+    end
+
+    return runtime_includes_or_extends_proc
+
+  end
+
+  ###############
+  #  suspended  #
+  ###############
+  
+  def suspended
+    return collect do |this_set|
+      if this_set.is_a?( ::ModuleCluster::ClusterStack::Set::MultiSetProxy )
+        this_set.suspended
+      else
+        this_set.suspended ? true : false
+      end
+    end.flatten
+  end
+
+  ################
+  #  suspended=  #
+  ################
+  
+  def suspended=( true_or_false )
+
+    self.each do |this_set|
+      this_set.suspended = true_or_false
+    end
+
+    return true_or_false
+
+  end
+
+  #############
+  #  suspend  #
+  #############
+
+  def suspend
+    self.suspended = true
+  end
+
+  ############
+  #  resume  #
+  ############
+
+  def resume
+    self.suspended = false
+  end
+
+  ################
+  #  suspended?  #
+  ################
+  
+  def suspended?
+    return suspended
+  end
+
+  ################
+  #  hooks_with  #
+  ################
+  
+  def hooks_with( descriptor_hash )
+    
+    matched_hooks = self.class.new
+    
+    # for each set
+    self.each do |this_set|
+      
+      if this_set.respond_to?( __method__ )
+        
+        matched_hooks.concat( this_set.hooks_with( descriptor_hash ) )
+      
+      else
+
+        # see if set matches descriptor
+        matched = false
+        descriptor_hash.each do |descriptor, description|
+          case descriptor
+
+            when :dependency_module
+              if description.is_a?( Array )
+                matched = description.include?( this_set.dependency_module )
+              else
+                matched = ( this_set.dependency_module == description )
+              end
+              break unless matched
+
+            when :method
+              if description.is_a?( Array )
+                matched = description.include?( this_set.method )
+              else
+                matched = ( this_set.method == description )
+              end
+              break unless matched
+
+            when :module_class_instance_or_all
+              case this_set.module_class_instance_or_all
+              when :all, :module_or_class_or_instance, :module_and_class_and_instance, 
+                   :module_class_or_instance, :module_class_and_instance, :module_class_instance
+                  matched = true
+                when :module_or_class, :module_and_class, :module_class
+                  case description
+                    when :module, :class
+                      matched = true
+                    else
+                      matched = false
+                  end
+                when :module_or_instance, :module_and_instance, :module_instance
+                  case description
+                    when :module, :instance
+                      matched = true
+                    else
+                      matched = false
+                  end
+                when :class_or_instance, :class_and_instance, :class_instance
+                  case description
+                    when :class, :instance
+                      matched = true
+                    else
+                      matched = false
+                  end
+                when :module, :class, :instance
+                  matched = ( this_set.module_class_instance_or_all == description )
+              end
+              break unless matched
+
+            when :include_or_extend
+              case this_set.include_or_extend
+                when :include_and_extend
+                  matched = true
+                else
+                  matched = ( this_set.include_or_extend == description )
+              end
+              break unless matched
+
+            when :modules
+              if description.is_a?( Array )
+                matched = this_set.modules.include?( *description )
+              else
+                matched = this_set.modules.include?( description )
+              end
+              break unless matched
+
+            when :runtime_includes_or_extends_block
+              break unless matched = ( this_set.runtime_includes_or_extends_block == description )
+
+            when :suspended
+              break unless matched = ( ( this_set.suspended ||= false ) == description )
+
+            when :name
+              if description.is_a?( Array )
+                matched = description.include?( this_set.name )
+              else
+                matched = ( this_set.name == description )
+              end
+              break unless matched
+
+          end
+        end
+        # if it does, add it to our return set
+        matched_hooks.push( this_set ) if matched
+      end
+      
+    end
+    
+    return matched_hooks
+    
+  end
+
+  ###########
+  #  hooks  #
+  ###########
+  
+  def hooks( hook_name )
+
+    matched_hooks = self.class.new
+    
+    # for each set
+    self.each do |this_set|
+      if this_set.is_a?( ::ModuleCluster::ClusterStack::Set::MultiSetProxy )
+        matched_hooks.concat( this_set.hooks( hook_name ) )
+      else
+        matched_hooks.push( this_set ) if this_set.name == hook_name
+      end
+    end
+
+    return matched_hooks
+    
+  end
+  
+end

data/lib/module-cluster/_private_/ModuleCluster/ClusterStack/Status.rb

@@ -0,0 +1,55 @@
+
+module ModuleCluster::ClusterStack::Status
+
+  ###############
+  #  all_hooks  #
+  ###############
+
+  def all_hooks
+    return @all_hooks ||= ::ModuleCluster::ClusterStack::Set::MultiSetProxy.new( all_include_hooks, all_extend_hooks )
+  end
+
+  #######################
+  #  all_include_hooks  #
+  #######################
+
+  def all_include_hooks
+    return @all_include_hooks ||= ::ModuleCluster::ClusterStack::Set::MultiSetProxy.new( prepend_include_hooks, include_hooks )
+  end
+
+  ######################
+  #  all_extend_hooks  #
+  #######################
+
+  def all_extend_hooks
+    return @all_extend_hooks ||= ::ModuleCluster::ClusterStack::Set::MultiSetProxy.new( prepend_extend_hooks, extend_hooks )
+  end
+
+  ###################
+  #  has_any_hook?  #
+  ###################
+
+  def has_any_hook?( description )
+    hooks = all_hooks.hooks_with( description )
+    return hooks ||= false
+  end
+
+  ###########################
+  #  has_any_include_hook?  #
+  ###########################
+
+  def has_any_include_hook?( description )
+    hooks = all_include_hooks.hooks_with( description )
+    return hooks ||= false
+  end
+
+  ##########################
+  #  has_any_extend_hook?  #
+  ##########################
+
+  def has_any_extend_hook?( description )
+    hooks = all_extend_hooks.hooks_with( description )
+    return hooks ||= false
+  end  
+  
+end

data/lib/module-cluster/_private_/ModuleCluster/ClusterStack/Suspend.rb

@@ -0,0 +1,199 @@
+
+module ModuleCluster::ClusterStack::Suspend
+
+  #######################
+  #  suspend_any_hooks  #
+  #######################
+  
+  def suspend_any_hooks
+    @all_hooks_suspended = true
+  end
+
+  ###############################
+  #  suspend_any_include_hooks  #
+  ###############################
+  
+  def suspend_any_include_hooks
+    @all_include_hooks_suspended = true
+  end
+
+  ##############################
+  #  suspend_any_extend_hooks  #
+  ##############################
+  
+  def suspend_any_extend_hooks
+    @all_extend_hooks_suspended = true
+  end
+
+  ###########################
+  #  suspend_include_hooks  #
+  ###########################
+  
+  def suspend_include_hooks
+    @include_hooks_suspended = true
+  end
+
+  ##########################
+  #  suspend_extend_hooks  #
+  ##########################
+  
+  def suspend_extend_hooks
+    @extend_hooks_suspended = true
+  end
+
+  ###################################
+  #  suspend_prepend_include_hooks  #
+  ###################################
+  
+  def suspend_prepend_include_hooks
+    @prepend_include_hooks_suspended = true
+  end
+
+  ##################################
+  #  suspend_prepend_extend_hooks  #
+  ##################################
+  
+  def suspend_prepend_extend_hooks
+    @prepend_extend_hooks_suspended = true
+  end
+
+  ######################
+  #  hooks_suspended?  #
+  ######################
+
+  def hooks_suspended?( action )
+    
+    return true if all_hooks_suspended?
+
+    case action
+      when :include
+        return true if all_include_hooks_suspended?
+        return true if include_hooks_suspended?
+      when :extend
+        return true if all_extend_hooks_suspended?
+        return true if extend_hooks_suspended?
+      when :prepend_include
+        return true if all_include_hooks_suspended?
+        return true if prepend_include_hooks_suspended?
+      when :prepend_extend
+        return true if all_extend_hooks_suspended?
+        return true if prepend_extend_hooks_suspended?
+    end
+    
+    return false
+    
+  end
+  
+  ##########################
+  #  all_hooks_suspended?  #
+  ##########################
+
+  def all_hooks_suspended?
+    return @all_hooks_suspended ||= false
+  end
+
+  ##################################
+  #  all_include_hooks_suspended?  #
+  ##################################
+
+  def all_include_hooks_suspended?
+    return ( @all_include_hooks_suspended ||= false ) || all_hooks_suspended?
+  end
+
+  #################################
+  #  all_extend_hooks_suspended?  #
+  #################################
+
+  def all_extend_hooks_suspended?
+    return ( @all_extend_hooks_suspended ||= false ) || all_hooks_suspended?
+  end
+
+  ##############################
+  #  include_hooks_suspended?  #
+  ##############################
+
+  def include_hooks_suspended?
+    return ( @include_hooks_suspended ||= false ) || all_include_hooks_suspended?
+  end
+
+  #############################
+  #  extend_hooks_suspended?  #
+  #############################
+
+  def extend_hooks_suspended?
+    return ( @extend_hooks_suspended ||= false ) || all_extend_hooks_suspended?
+  end
+
+  ######################################
+  #  prepend_include_hooks_suspended?  #
+  ######################################
+
+  def prepend_include_hooks_suspended?
+    return ( @prepend_include_hooks_suspended ||= false ) || all_include_hooks_suspended?
+  end
+
+  #####################################
+  #  prepend_extend_hooks_suspended?  #
+  #####################################
+
+  def prepend_extend_hooks_suspended?
+    return ( @prepend_extend_hooks_suspended ||= false ) || all_extend_hooks_suspended?
+  end
+
+  ######################
+  #  resume_any_hooks  #
+  ######################
+  
+  def resume_any_hooks
+    @all_hooks_suspended = false
+  end
+
+  ##############################
+  #  resume_any_include_hooks  #
+  ##############################
+  
+  def resume_any_include_hooks
+    @all_include_hooks_suspended = false
+  end
+
+  #############################
+  #  resume_any_extend_hooks  #
+  #############################
+  
+  def resume_any_extend_hooks
+    @all_extend_hooks_suspended = false
+  end
+
+  ##########################
+  #  resume_include_hooks  #
+  ##########################
+  
+  def resume_include_hooks
+    @include_hooks_suspended = false
+  end
+
+  #########################
+  #  resume_extend_hooks  #
+  #########################
+  
+  def resume_extend_hooks
+    @extend_hooks_suspended = false
+  end
+
+  ##################################
+  #  resume_prepend_include_hooks  #
+  ##################################
+  
+  def resume_prepend_include_hooks
+    @prepend_include_hooks_suspended = false
+  end
+
+  #################################
+  #  resume_prepend_extend_hooks  #
+  #################################
+  
+  def resume_prepend_extend_hooks
+    @prepend_extend_hooks_suspended = false
+  end
+
+end