coral_core 0.2.30 → 0.4.0

data/lib/coral_core/mixin/macro/plugin_interface.rb

@@ -1,277 +0,0 @@
-
-# Should be included via extend
-#
-# extend Mixin::Macro::PluginInterface
-#
-
-coral_require(File.dirname(__FILE__), :object_interface)
-
-#---
-
-module Coral
-module Mixin
-module Macro
-module PluginInterface
-  
-  include Mixin::Macro::ObjectInterface
-  
-  #-----------------------------------------------------------------------------
-  # Plugin collections
-  
-  def plugin_collection(_type, _method_options = {})
-    _method_config = Config.ensure(_method_options)
-    _method_config.set(:plugin, true)
-    
-    _plural          = _method_config.init(:plural, "#{_type}s").get(:plural)
-    _search_proc     = _method_config.get(:search_proc)
-    _single_instance = _method_config.get(:single_instance, false)
-    _plugin_type     = _method_config.get(:plugin_type, _type)
-    
-    @@object_types[_type] = _method_config
-    
-    #---------------------------------------------------------------------------
-    
-    object_utilities
-      
-    #---
-    
-    unless respond_to? :each_plugin!
-      define_method :each_plugin! do |plugin_types = nil, providers = nil|
-        providers = [ providers ] if providers && ! providers.is_a?(Array)
-        
-        filter_proc = Proc.new {|type, config| config[:plugin] }
-        each_object_type!(plugin_types, filter_proc) do |type, plural, options|
-          send(plural).each do |provider, plugins|
-            unless providers && ! providers.include?(provider)
-              if plugins.is_a?(Hash)
-                plugins.each do |name, plugin|
-                  yield(type, provider, plugin)  
-                end
-              else
-                yield(type, provider, plugin)
-              end
-            end
-          end 
-        end  
-      end
-    end
-    
-    #---
-    
-    define_method "each_#{_type}!" do |providers = nil|
-      each_plugin!(_type, providers) do |type, provider, plugin|
-        yield(type, provider, plugin)    
-      end
-    end
-    
-    #---------------------------------------------------------------------------
-    
-    if _single_instance
-      define_method "#{_type}_config" do |provider|
-        Config.new(get([ _type, provider ], {}))
-      end
-      
-      #---
-      
-      define_method "#{_type}_setting" do |provider, property, default = nil, format = false|
-        get([ _type, provider, property ], default, format)
-      end
-      
-    #---------------------------------------------------------------------------  
-    else
-      define_method "#{_type}_config" do |provider, name = nil|
-        Config.new( name ? get([ _plural, provider, name ], {}) : get(_plural, provider, {}) )
-      end
-      
-      #---
-      
-      define_method "#{_type}_setting" do |provider, name, property, default = nil, format = false|
-        get([ _plural, provider, name, property ], default, format)
-      end
-    end
-   
-    #---------------------------------------------------------------------------
-    
-    define_method "#{_plural}" do |provider = nil|
-      ( provider ? _get([ _plural, provider ], {}) : _get(_plural, {}) )
-    end
-    
-    #---
-  
-    define_method "init_#{_plural}" do |providers = nil|
-      data = hash(_search_proc.call) if _search_proc
-      data = get_hash(_plural) unless data
-      
-      providers = [ providers ] if providers && ! providers.is_a?(Array)
-      
-      symbol_map(data).each do |provider, instance_settings|
-        if ! providers || providers.include?(provider)
-          if _single_instance
-            plugin = Coral.plugin(_plugin_type, provider, instance_settings)
-            plugin.plugin_parent = self
-          
-            _set([ _plural, provider ], plugin)
-          else
-            instance_settings.each do |name, options|
-              if name != :settings
-                options[:name] = name
-                plugin         = Coral.plugin(_plugin_type, provider, options)
-                plugin.plugin_parent = self
-          
-                _set([ _plural, provider, name ], plugin)
-              end
-            end
-          end
-        end
-      end
-    end
-  
-    #---
-
-    define_method "set_#{_plural}" do |data = {}|
-      data = Config.ensure(data).export
-    
-      send("clear_#{_plural}")
-      set(_plural, data)
-    
-      data.each do |provider, instance_settings|
-        if _single_instance
-          plugin = Coral.plugin(_plugin_type, provider, instance_settings)              
-          plugin.plugin_parent = self
-          
-          _set([ _plural, provider ], plugin)  
-        else
-          instance_settings.each do |name, options|
-            options[:name] = name
-            plugin         = Coral.plugin(_plugin_type, provider, options)
-            plugin.plugin_parent = self
-        
-            _set([ _plural, provider, name ], plugin)  
-          end
-        end
-      end
-      self
-    end
-    
-    #---
-    
-    define_method "clear_#{_plural}" do
-      _get(_plural).keys.each do |name|
-        send("delete_#{_type}", name)
-      end
-      self
-    end
-
-    #---------------------------------------------------------------------------
-    
-    if _single_instance
-      define_method "#{_type}" do |provider|
-        _get([ _plural, provider ])
-      end
-      
-      #---
-      
-      define_method "set_#{_type}" do |provider, options = {}|
-        options = Config.ensure(options).export
-      
-        set([ _plural, provider ], options)
-    
-        plugin = Coral.plugin(_plugin_type, provider, options)
-        plugin.plugin_parent = self
-        
-        _set([ _plural, provider ], plugin)
-        self
-      end
-          
-      #---
-
-      define_method "set_#{_type}_setting" do |provider, property, value = nil|
-        set([ _plural, provider, property ], value)
-        self
-      end
-    
-      #---
-
-      define_method "delete_#{_type}" do |provider|
-        plugin = send(_type, provider)
-    
-        delete([ _plural, provider ])
-        _delete([ _plural, provider ])
-    
-        Coral.remove_plugin(plugin)
-        self
-      end
-  
-      #---
-  
-      define_method "delete_#{_type}_setting" do |provider, property|
-        delete([ _plural, provider, property ])
-        self
-      end
-      
-      #---
-      
-      define_method "search_#{_type}" do |provider, keys, default = '', format = false|
-        plugin_config = send("#{_type}_config", provider)
-        search_object(plugin_config, keys, default, format)      
-      end
-      
-    #---------------------------------------------------------------------------
-    else
-      define_method "#{_type}" do |provider, name|
-        _get([ _plural, provider, name ])
-      end
-      
-      #---
-      
-      define_method "set_#{_type}" do |provider, name, options = {}|
-        options = Config.ensure(options).export
-      
-        set([ _plural, provider, name ], options)
-    
-        options[:name] = name
-        plugin         = Coral.plugin(_plugin_type, provider, options)
-        plugin.plugin_parent = self
-        
-        _set([ _plural, provider, name ], plugin)
-        self
-      end
-          
-      #---
-
-      define_method "set_#{_type}_setting" do |provider, name, property, value = nil|
-        set([ _plural, provider, name, property ], value)
-        self
-      end
-    
-      #---
-
-      define_method "delete_#{_type}" do |provider, name|
-        plugin = send(_type, provider, name)
-    
-        delete([ _plural, provider, name ])
-        _delete([ _plural, provider, name ])
-    
-        Coral.remove_plugin(plugin)
-        self
-      end
-  
-      #---
-  
-      define_method "delete_#{_type}_setting" do |provider, name, property|
-        delete([ _plural, provider, name, property ])
-        self
-      end
-      
-      #---
-      
-      define_method "search_#{_type}" do |provider, name, keys, default = '', format = false|
-        plugin_config = send("#{_type}_config", provider, name)
-        search_object(plugin_config, keys, default, format)      
-      end
-    end  
-  end
-end
-end
-end
-end

data/lib/coral_core/mixin/settings.rb

@@ -1,46 +0,0 @@
-
-# Should be included via include
-#
-# include Mixin::Settings
-#
-
-module Coral
-module Mixin
-module Settings
-  
-  def settings(name)
-    return get_hash([ :settings, name ])
-  end
-    
-  #---
-
-  def set_settings(name, settings = {})
-    return set([ :settings, name ], settings)
-  end
-    
-  #---
-
-  def delete_settings(name)
-    return delete([ :settings, name ])
-  end
-    
-  #---
-   
-  def setting(name, key, default = '', format = false)
-    return get([ :settings, name, key ], default, format)
-  end
-     
-  #---
-
-  def set_setting(name, key, value = '')
-    return set([ :settings, name, key ], value)
-  end
-     
-  #---
-
-  def delete_setting(name, key)
-    return delete([ :settings, name, key ])
-  end
-end
-end
-end

data/lib/coral_core/mixin/sub_config.rb

@@ -1,208 +0,0 @@
-
-# Should be included via include
-#
-# include Mixin::SubConfig
-#
-
-module Coral
-module Mixin
-module SubConfig
-  
-  #-----------------------------------------------------------------------------
-  # Initialization
-  
-  def init_subconfig(reset = false)
-    return if @subconfig_initialized && ! reset
-    
-    unless @config
-      @config = Config.new
-    end
-    
-    @subconfig_initialized = true
-  end
-  protected :init_subconfig
-  
-  #-----------------------------------------------------------------------------
-  # Propety accessors / modifiers
-  
-  def name
-    return _get(:name)
-  end
-  
-  #---
-  
-  def name=name
-    _set(:name, string(name))
-  end
-  
-  #---
-  
-  def config
-    return @config
-  end
-  
-  #---
-  
-  def config=config
-    @config = config
-  end
-  
-  #---
-  
-  def directory
-    init_subconfig
-    
-    if config.is_a?(Config::Project)
-      return config.project.directory
-    else
-      return nil
-    end
-  end
-  
-  #---
-  
-  def directory=directory
-    init_subconfig
-    
-    if config.is_a?(Config::Project)
-      config.set_location(directory)
-    end
-  end
-     
-  #-----------------------------------------------------------------------------
-
-  def _get(keys, default = nil, format = false)
-    return fetch(@properties, array(keys).flatten, default, format)
-  end
-  protected :_get
-  
-  #---
-  
-  def get(keys, default = nil, format = false)
-    init_subconfig
-    return config.get(keys, default, format)
-  end
-  
-  #---
-  
-  def _init(keys, default = nil)
-    return _set(keys, _get(keys, default))
-  end
-  protected :_init
-
-  #---
- 
-  def _set(keys, value = '')
-    modify(@properties, array(keys).flatten, value)
-    return self
-  end
-  protected :_set
-  
-  #---
-    
-  def set(keys, value = '')
-    init_subconfig
-    config.set(keys, value)
-    return self
-  end
-  
-  #---
- 
-  def _delete(keys, default = nil)
-    existing = modify(@properties, array(keys).flatten, nil)
-    return existing[:value] if existing[:value]
-    return default 
-  end
-  protected :_delete
-  
-  #---
-   
-  def delete(keys, default = nil)
-    init_subconfig
-    config.delete(keys, default)
-    return self
-  end
- 
-  #---
- 
-  def _clear
-    @properties = {}
-    return self
-  end
-  protected :_clear
-  
-  #---
-  
-  def clear
-    init_subconfig
-    config.clear
-    return self
-  end
-  
-  #-----------------------------------------------------------------------------
-  # Import / Export
-  
-  def _import(properties, options = {})
-    return import_base(properties, options)
-  end
-  protected :_import
-  
-  #---
-  
-  def import(properties, options = {})
-    init_subconfig
-    config.import(properties, options)
-    return self
-  end
-  
-  #---
-  
-  def _defaults(defaults, options = {})
-    config = new(options).set(:import_type, :default)
-    return import_base(defaults, config)
-  end
-  protected :_defaults
-  
-  #---
-  
-  def defaults(defaults, options = {})
-    init_subconfig
-    config.defaults(defaults, options)
-    return self
-  end
-  
-  #---
-  
-  def _export
-    return @properties
-  end
-  protected :_export
-  
-  #---
-  
-  def export
-    init_subconfig
-    return config.export
-  end
-      
-  #-----------------------------------------------------------------------------
-  # Configuration loading saving
-    
-  def load(options = {})
-    if config.respond_to?(:load)
-      config.load(options)
-    end
-    return self  
-  end
-    
-  #---
-    
-  def save(options = {})
-    if config.respond_to?(:save)
-      config.save(options)
-    end
-    return self  
-  end  
-end
-end
-end