striuct 0.3.3 → 0.3.4

data/lib/striuct/classmethods/prevent_conflicts.rb

@@ -1,89 +1,89 @@
-class Striuct; module ClassMethods
-  
-  # @group Prevent Naming Conflicts
-
-  NAMING_RISKS = {
-    conflict:      10,
-    no_identifier:  9,
-    bad_manners:    5,
-    no_ascii:       3,
-    strict:         0 
-  }.freeze
-
-  PROTECT_LEVELS = {
-    struct:      {error: 99, warn: 99},
-    warning:     {error: 99, warn:  5},
-    error:       {error:  9, warn:  5},
-    prevent:     {error:  5, warn:  1},
-    nervous:     {error:  1, warn:  1}
-  }.each(&:freeze).freeze
-
-  # @param [Object] name
-  # accpeptable the name into own member, under protect level of runtime
-  def cname?(name)
-    _check_safety_naming(keyable_for name){|r|r}
-  rescue Exception
-    false
-  end
-
-  private
-
-  # @param [Symbol] level
-  # @return [nil]
-  # change protect level for risk of naming members
-  def protect_level(level)
-    raise NameError unless PROTECT_LEVELS.has_key? level
-    
-    @protect_level = level
-    nil
-  end
-  
-  # @param [Symbol] name
-  # @return [void]
-  # @yieldreturn [Boolean]
-  def _check_safety_naming(name)
-    estimation = _estimate_naming name
-    risk    = NAMING_RISKS[estimation]
-    plevels = PROTECT_LEVELS[@protect_level]
-    caution = "undesirable naming '#{name}', because #{estimation}"
-
-    r = (
-      case
-      when risk >= plevels[:error]
-        raise NameError, caution unless block_given?
-        false
-      when risk >= plevels[:warn]
-        warn caution unless block_given?
-        false
-      else
-        true
-      end
-    )
-
-    yield r if block_given?
-  end
-  
-  # @param [Symbol] name
-  # @return [Symbol]
-  def _estimate_naming(name)
-    if (instance_methods + private_instance_methods).include? name
-      return :conflict
-    end
-
-    return :no_ascii unless name.encoding.equal? Encoding::ASCII
-
-    case name
-    when /[\W]/, /\A[^a-zA-Z_]/, :''
-      :no_identifier
-    when /\Aeach/, /\A__[^_]*__\z/, /\A_[^_]*\z/, /[!?]\z/, /\Ato_/
-      :bad_manners
-    when /\A[a-zA-Z_]\w*\z/
-      :strict
-    else
-      raise 'must not happen'
-    end
-  end
-  
-  # @endgroup
-
-end; end
+class Striuct; module ClassMethods
+  
+  # @group Prevent Naming Conflicts
+
+  NAMING_RISKS = {
+    conflict:      10,
+    no_identifier:  9,
+    bad_manners:    5,
+    no_ascii:       3,
+    strict:         0 
+  }.freeze
+
+  PROTECT_LEVELS = {
+    struct:      {error: 99, warn: 99},
+    warning:     {error: 99, warn:  5},
+    error:       {error:  9, warn:  5},
+    prevent:     {error:  5, warn:  1},
+    nervous:     {error:  1, warn:  1}
+  }.each(&:freeze).freeze
+
+  # @param [Object] name
+  # accpeptable the name into own member, under protect level of runtime
+  def cname?(name)
+    _check_safety_naming(keyable_for name){|r|r}
+  rescue Exception
+    false
+  end
+
+  private
+
+  # @param [Symbol] level
+  # @return [nil]
+  # change protect level for risk of naming members
+  def protect_level(level)
+    raise NameError unless PROTECT_LEVELS.has_key? level
+    
+    @protect_level = level
+    nil
+  end
+  
+  # @param [Symbol] name
+  # @return [void]
+  # @yieldreturn [Boolean]
+  def _check_safety_naming(name)
+    estimation = _estimate_naming name
+    risk    = NAMING_RISKS[estimation]
+    plevels = PROTECT_LEVELS[@protect_level]
+    caution = "undesirable naming '#{name}', because #{estimation}"
+
+    r = (
+      case
+      when risk >= plevels[:error]
+        raise NameError, caution unless block_given?
+        false
+      when risk >= plevels[:warn]
+        warn caution unless block_given?
+        false
+      else
+        true
+      end
+    )
+
+    yield r if block_given?
+  end
+  
+  # @param [Symbol] name
+  # @return [Symbol]
+  def _estimate_naming(name)
+    if (instance_methods + private_instance_methods).include? name
+      return :conflict
+    end
+
+    return :no_ascii unless name.encoding.equal? Encoding::ASCII
+
+    case name
+    when /[\W]/, /\A[^a-zA-Z_]/, :''
+      :no_identifier
+    when /\Aeach/, /\A__[^_]*__\z/, /\A_[^_]*\z/, /[!?]\z/, /\Ato_/
+      :bad_manners
+    when /\A[a-zA-Z_]\w*\z/
+      :strict
+    else
+      raise 'must not happen'
+    end
+  end
+  
+  # @endgroup
+
+end; end

data/lib/striuct/classmethods/requiremnets.rb

@@ -1,12 +1,12 @@
-require_relative 'inner'
-require_relative 'named'
-require_relative 'object'
-require_relative 'length'
-require_relative 'to_struct'
-require_relative 'constructor'
-require_relative 'enum'
-require_relative 'default'
-require_relative 'adjustment'
-require_relative 'macro'
-require_relative 'prevent_conflicts'
+require_relative 'inner'
+require_relative 'named'
+require_relative 'object'
+require_relative 'length'
+require_relative 'to_struct'
+require_relative 'constructor'
+require_relative 'enum'
+require_relative 'default'
+require_relative 'adjustment'
+require_relative 'macro'
+require_relative 'prevent_conflicts'
 require_relative 'validation'

data/lib/striuct/classmethods/to_struct.rb

@@ -1,26 +1,24 @@
-class Striuct; module ClassMethods
-
-  # @group To Ruby's Struct Class
-
-  # @return [Class]
-  def to_struct_class
-    raise 'No defined members' if autonyms.empty?
-
-    struct_klass = Struct.new(*names)
-  
-    if name
-      tail_name = name.slice(/[^:]+\z/)
-      if ::Striuct::Structs.const_defined?(tail_name) && 
-          ((already = ::Striuct::Structs.const_get(tail_name)).members == members)
-          already
-      else
-        ::Striuct::Structs.const_set tail_name, struct_klass
-      end
-    else
-      struct_klass
-    end
-  end
-
-  # @endgroup
-
+class Striuct; module ClassMethods
+
+  # @group To Ruby's Struct Class
+
+  # @return [Class]
+  def to_struct_class
+    raise 'No defined members' if autonyms.empty?
+
+    struct_cls = ::Struct.new(*autonyms)
+    return struct_cls unless name
+
+    const_suffix = name.slice(/[^:]+\z/).to_sym
+    if ::Striuct::Structs.const_defined?(const_suffix, false) && 
+       (already_cls = ::Striuct::Structs.const_get(const_suffix, false)).members == autonyms
+       raise unless already_cls.superclass.equal? Struct
+       already_cls
+    else
+      ::Striuct::Structs.const_set const_suffix, struct_cls
+    end
+  end
+
+  # @endgroup
+
 end; end

data/lib/striuct/classmethods/validation.rb

@@ -1,56 +1,56 @@
-class Striuct; module ClassMethods
-
-  # @group Validation
-  
-  # @param [Symbol, String] name
-  # inference checker is waiting yet
-  def inference?(name)
-    autonym = autonym_for name
-
-    @inferences.has_key? autonym
-  end
-
-  # @param [Symbol, String] name
-  def has_validator?(name)
-    autonym = autonym_for name
-
-    @conditions.has_key? autonym
-  end
-  
-  alias_method :has_condition?, :has_validator?
-  alias_method :restrict?, :has_validator?
-  
-  # @param [Symbol, String] name
-  def validator_for(name)
-    _condition_for autonym_for(name)
-  end
-  
-  alias_method :condition_for, :validator_for
-
-  # @param [Symbol, String] name
-  def safety_getter?(name)
-    autonym = autonym_for name
-
-    @getter_validations.has_key? autonym
-  end
-  
-  alias_method :safety_reader?, :safety_getter?
-  
-  # @param [Symbol, String] name
-  def safety_setter?(name)
-    autonym = autonym_for name
-
-    @setter_validations.has_key? autonym
-  end
-
-  alias_method :safety_writer?, :safety_setter?
-
-  private
-  
-  def _condition_for(name)
-    @conditions[name]
-  end
-
-  # @endgroup
-
+class Striuct; module ClassMethods
+
+  # @group Validation
+  
+  # @param [Symbol, String] name
+  # inference checker is waiting yet
+  def inference?(name)
+    autonym = autonym_for name
+
+    @inferences.has_key? autonym
+  end
+
+  # @param [Symbol, String] name
+  def has_validator?(name)
+    autonym = autonym_for name
+
+    @conditions.has_key? autonym
+  end
+  
+  alias_method :has_condition?, :has_validator?
+  alias_method :restrict?, :has_validator?
+  
+  # @param [Symbol, String] name
+  def validator_for(name)
+    _condition_for autonym_for(name)
+  end
+  
+  alias_method :condition_for, :validator_for
+
+  # @param [Symbol, String] name
+  def safety_getter?(name)
+    autonym = autonym_for name
+
+    @getter_validations.has_key? autonym
+  end
+  
+  alias_method :safety_reader?, :safety_getter?
+  
+  # @param [Symbol, String] name
+  def safety_setter?(name)
+    autonym = autonym_for name
+
+    @setter_validations.has_key? autonym
+  end
+
+  alias_method :safety_writer?, :safety_setter?
+
+  private
+  
+  def _condition_for(name)
+    @conditions[name]
+  end
+
+  # @endgroup
+
 end; end

data/lib/striuct/classmethods.rb

@@ -1 +1 @@
-require_relative 'classmethods/requiremnets'
+require_relative 'classmethods/requiremnets'

data/lib/striuct/instancemethods/README.md

@@ -1,5 +1,5 @@
-For developer
-==============
-
-* This dir's tree is diveded under roles/features.
-  Not under CONSTANT names.
+For developer
+==============
+
+* This dir's tree is diveded under roles/features.
+  Not under CONSTANT names.

data/lib/striuct/instancemethods/assign.rb

@@ -1,31 +1,31 @@
-require_relative 'subscript'
-
-class Striuct; module InstanceMethods 
-
-  # @group Assign
-  
-  alias_method :assign, :[]=
-  
-  # @param [Symbol, String] name
-  def assign?(name)
-    autonym = autonym_for name
-    
-    @db.has_key? autonym
-  end
-  
-  # @param [Symbol, String, Fixnum] key
-  def clear_at(key)
-    __subscript__(key){|autonym|__clear__ autonym}
-  end
-  
-  alias_method :unassign, :clear_at
-  alias_method :reset_at, :clear_at
-
-  # all members aren't assigned
-  def empty?
-    _autonyms.none?{|autonym|assign? autonym}
-  end
-
-  # @endgroup
-
+require_relative 'subscript'
+
+class Striuct; module InstanceMethods 
+
+  # @group Assign
+  
+  alias_method :assign, :[]=
+  
+  # @param [Symbol, String] name
+  def assign?(name)
+    autonym = autonym_for name
+    
+    @db.has_key? autonym
+  end
+  
+  # @param [Symbol, String, Fixnum] key
+  def clear_at(key)
+    __subscript__(key){|autonym|__clear__ autonym}
+  end
+  
+  alias_method :unassign, :clear_at
+  alias_method :reset_at, :clear_at
+
+  # all members aren't assigned
+  def empty?
+    _autonyms.none?{|autonym|assign? autonym}
+  end
+
+  # @endgroup
+
 end; end

data/lib/striuct/instancemethods/cast.rb

@@ -1,35 +1,35 @@
-class Striuct; module InstanceMethods 
-
-  # @group Cast
-
-  # @return [self]
-  def to_striuct
-    self
-  end
-
-  # @return [Struct]
-  def to_struct
-    self.class.to_struct_class.new(*values)
-  end
-  
-  # @return [Hash]
-  def to_h(reject_no_assign=false)
-    return @db.dup if reject_no_assign
-
-    {}.tap {|h|
-      each_pair do |autonym, val|
-        h[autonym] = val
-      end
-    }
-  end
-  
-  # @return [Array]
-  def values
-    each_value.to_a
-  end
-  
-  alias_method :to_a, :values
-
-  # @endgroup
-
+class Striuct; module InstanceMethods 
+
+  # @group Cast
+
+  # @return [self]
+  def to_striuct
+    self
+  end
+
+  # @return [Struct]
+  def to_struct
+    self.class.to_struct_class.new(*values)
+  end
+  
+  # @return [Hash]
+  def to_h(reject_no_assign=false)
+    return @db.dup if reject_no_assign
+
+    {}.tap {|h|
+      each_pair do |autonym, val|
+        h[autonym] = val
+      end
+    }
+  end
+  
+  # @return [Array]
+  def values
+    each_value.to_a
+  end
+  
+  alias_method :to_a, :values
+
+  # @endgroup
+
 end; end

data/lib/striuct/instancemethods/compare.rb

@@ -1,30 +1,30 @@
-class Striuct; module InstanceMethods
-
-  # @group Compare with other
-  
-  # @return [Boolean]
-  def ==(other)
-    __compare_all__? other, :==
-  end
-
-  alias_method :===, :==
-  
-  def eql?(other)
-    __compare_all__? other, :eql?
-  end
-
-  # @return [Integer]
-  def hash
-    @db.hash
-  end
-
-  private  
-
-  # @param [Symbol] method
-  def __compare_all__?(other, method)
-    other.instance_of?(self.class) && each_pair.all?{|k, v|v.__send__ method, other[k]}
-  end
-
-  # @endgroup
-
-end; end
+class Striuct; module InstanceMethods
+
+  # @group Compare with other
+  
+  # @return [Boolean]
+  def ==(other)
+    __compare_all__? other, :==
+  end
+
+  alias_method :===, :==
+  
+  def eql?(other)
+    __compare_all__? other, :eql?
+  end
+
+  # @return [Integer]
+  def hash
+    @db.hash
+  end
+
+  private  
+
+  # @param [Symbol] method
+  def __compare_all__?(other, method)
+    other.instance_of?(self.class) && each_pair.all?{|k, v|v.__send__ method, other[k]}
+  end
+
+  # @endgroup
+
+end; end

data/lib/striuct/instancemethods/default.rb

@@ -1,14 +1,14 @@
-class Striuct; module InstanceMethods 
-
-  # @group Default Value
-  
-  # @param [Symbol, String] name
-  def default?(name)
-    autonym = autonym_for name
-
-    default_for(autonym) == self[autonym]
-  end
-
-  # @endgroup
-
+class Striuct; module InstanceMethods 
+
+  # @group Default Value
+  
+  # @param [Symbol, String] name
+  def default?(name)
+    autonym = autonym_for name
+
+    default_for(autonym) == self[autonym]
+  end
+
+  # @endgroup
+
 end; end

data/lib/striuct/instancemethods/delegate_class_methods.rb

@@ -1,28 +1,28 @@
-require 'forwardable'
-
-class Striuct; module InstanceMethods
-  
-  extend Forwardable
-  
-  # Forwardable has public/protected class_macro
-  private_class_method(*Forwardable.instance_methods)
-
-  # @group Delegate Class Methods
-  
-  def_delegators :'self.class',
-    :_autonyms,
-    :keyable_for, :autonym_for, :aliases_for,
-    :validator_for, :condition_for,
-    :adjuster_for, :flavor_for,
-    :members, :keys, :names, :autonyms, :all_members, :aliases,
-    :has_member?, :member?, :has_key?, :key?,
-    :length, :size,
-    :restrict?, :has_validator?, :has_condition?,
-    :safety_getter?, :safety_reader?, :safety_setter?, :safty_writer?, :inference?,
-    :has_default?, :default_for, :has_adjuster?, :has_flavor?
-
-  private :_autonyms
-
-  # @endgroup
-  
-end; end
+require 'forwardable'
+
+class Striuct; module InstanceMethods
+  
+  extend Forwardable
+  
+  # Forwardable has public/protected class_macro
+  private_class_method(*Forwardable.instance_methods)
+
+  # @group Delegate Class Methods
+  
+  def_delegators :'self.class',
+    :_autonyms,
+    :keyable_for, :autonym_for, :aliases_for,
+    :validator_for, :condition_for,
+    :adjuster_for, :flavor_for,
+    :members, :keys, :names, :autonyms, :all_members, :aliases,
+    :has_member?, :member?, :has_key?, :key?,
+    :length, :size,
+    :restrict?, :has_validator?, :has_condition?,
+    :safety_getter?, :safety_reader?, :safety_setter?, :safty_writer?, :inference?,
+    :has_default?, :default_for, :has_adjuster?, :has_flavor?
+
+  private :_autonyms
+
+  # @endgroup
+  
+end; end