cascading_classes 0.3.0 → 0.6.0

data/spec/preset_classes/undefined.rb

@@ -0,0 +1,56 @@
+begin
+  require_relative '../helper_spec'
+rescue NameError
+  require File.expand_path('../helper_spec', __FILE__)
+end
+
+describe "null syntax" do
+  before do
+    Parent = Class.new{extend CC}
+    Child = Class.new(Parent)
+    GrandChild = Class.new(Child)
+  end
+
+  after do
+    Object.send :remove_const, :Parent
+    Object.send :remove_const, :Child
+    Object.send :remove_const, :GrandChild
+  end
+
+  describe "nulls" do
+    before do
+      @props = Parent.cascade do
+        future_string
+        future_int
+        future_float
+        future_sym
+        future_bool
+        future_hash
+        future_array
+        future_set
+      end
+    end
+
+    it "has ':Object' type" do
+      [:string, :int, :float, :sym, :bool, :hash, :array, :set].each do |type|
+        name = "future_#{type}".to_sym
+        @props[name][:type].must_equal :Object
+      end
+    end
+
+    it "is nil for parent class" do
+      [:string, :int, :float, :sym, :bool, :hash, :array, :set].each do |type|
+        name = "future_#{type}".to_sym
+        Parent.send(name).must_equal nil
+      end
+    end
+
+    it "is nil for subclasses" do
+      [:string, :int, :float, :sym, :bool, :hash, :array, :set].each do |type|
+        name = "future_#{type}".to_sym
+        Child.send(name).must_equal nil
+        GrandChild.send(name).must_equal nil
+      end
+    end
+  end
+end

data/spec/usage/block_spec.rb

@@ -0,0 +1,59 @@
+begin
+  require_relative '../helper_spec'
+rescue NameError
+  require File.expand_path('../helper_spec', __FILE__)
+end
+
+describe "options" do
+  before do
+    A = Class.new{extend CC}
+    B = Class.new(A)
+    C = Class.new(B)
+  end
+
+  after do
+    Object.send :remove_const, :A
+    Object.send :remove_const, :B
+    Object.send :remove_const, :C
+  end
+
+  describe "blocks are yielded to alone or evaluated with instance exec" do
+
+    it "has a global default" do
+      CC.block_inst_exec = true
+      CC.block_inst_exec?.must_equal true
+
+      CC.block_inst_exec = false
+      CC.block_inst_exec?.must_equal false
+    end
+    
+    it "defaults to global setting" do
+      props = A.cascade do
+        color
+      end
+      props[:color][:block_inst_exec].must_equal(CC.block_inst_exec?)
+    end
+
+    it "can be set in the 'cascade' block, overruling the global default" do
+      CC.block_inst_exec = true
+      props = A.cascade do
+        color :block_inst_exec => false
+      end
+      props[:color][:block_inst_exec].must_equal false
+    end
+
+    it "can be set in 'opts' hash of property method, overruling others" do
+      A.cascade do
+        color :block_inst_exec => false
+      end
+      A.color = "red"
+      who_am_i = self
+
+      who_is_self_1 = A.color(:inherit, 0){|me, parents| self}
+      who_is_self_2 = A.color(:inherit, 0, {:block_inst_exec => true}){|me, parents| self}
+      
+      who_is_self_1.must_equal who_am_i
+      who_is_self_2.must_equal A
+    end
+  end
+end

data/spec/usage/proc_spec.rb

@@ -0,0 +1,60 @@
+begin
+  require_relative '../helper_spec'
+rescue NameError
+  require File.expand_path('../helper_spec', __FILE__)
+end
+
+describe "options" do
+  before do
+    A = Class.new{extend CC}
+    B = Class.new(A)
+    C = Class.new(B)
+  end
+
+  after do
+    Object.send :remove_const, :A
+    Object.send :remove_const, :B
+    Object.send :remove_const, :C
+  end
+
+  describe "proc values are called alone or evaluated with instance exec" do
+    it "has a global default" do
+      CC.proc_inst_exec = true
+      CC.proc_inst_exec?.must_equal true
+
+      CC.proc_inst_exec = false
+      CC.proc_inst_exec?.must_equal false
+    end
+
+    it "defaults to global setting" do
+      props = A.cascade do
+        color
+      end
+      props[:color][:proc_inst_exec].must_equal(CC.proc_inst_exec?)
+    end
+
+    it "can be set in the 'cascade' block, overruling the global default" do
+      CC.proc_inst_exec = true
+      props = A.cascade do
+        color :proc_inst_exec => false
+      end
+      props[:color][:proc_inst_exec].must_equal false
+    end
+
+    it "can be set in 'opts' hash of property method, overruling others" do
+      A.cascade do
+        color :default => :red, :proc_inst_exec => false
+      end
+      outside_context = self
+      who_is_self = nil
+
+      B.color = Proc.new{|me, parents| who_is_self = self; :orange}
+
+      B.color.must_equal :orange
+      who_is_self.must_equal(outside_context)
+
+      B.color(:undef, :undef, {:proc_inst_exec => true}).must_equal :orange
+      who_is_self.must_equal(B)
+    end
+  end
+end

data/todo

@@ -0,0 +1,6 @@
+
+in opts hash in property call:
+  :new => true
+  this returns the value of @props[:my_property][:new].call
+
+when setting properties, allow an option so that the property can never be inherited. IE: descendents will pass over it when blank

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: cascading_classes
 version: !ruby/object:Gem::Version
-  version: 0.3.0
+  version: 0.6.0
   prerelease: 
 platform: ruby
 authors:
@@ -9,13 +9,9 @@ authors:
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2011-08-09 00:00:00.000000000Z
+date: 2011-09-04 00:00:00.000000000Z
 dependencies: []
-description: ! 'Easily create properties whose values cascade down class trees.
-
-
-  Similar to active_support/core_ext/class/attribute.rb but better. Also, doesn''t
-  monkey-patch Class'
+description: 
 email: jeremy.gables@gmail.com
 executables: []
 extensions: []
@@ -23,13 +19,27 @@ extra_rdoc_files: []
 files:
 - README.md
 - Rakefile
+- todo
 - lib/cascading_classes.rb
 - lib/cascading_classes/cascading_classes.rb
 - lib/cascading_classes/dsl.rb
+- lib/cascading_classes/types.rb
+- lib/cascading_classes/parse_options.rb
 - spec/helper_spec.rb
-- spec/extended_spec.rb
-- spec/included_spec.rb
-- spec/alternative_syntax_spec.rb
+- spec/basics/basic_spec.rb
+- spec/basics/block_spec.rb
+- spec/basics/container_spec.rb
+- spec/basics/inherit_spec.rb
+- spec/basics/proc_spec.rb
+- spec/class_helper_methods/parents_for_spec.rb
+- spec/custom_classes/hash_like_spec.rb
+- spec/instances/basics.rb
+- spec/preset_classes/array_spec.rb
+- spec/preset_classes/hash_spec.rb
+- spec/preset_classes/strings.rb
+- spec/preset_classes/undefined.rb
+- spec/usage/block_spec.rb
+- spec/usage/proc_spec.rb
 homepage: http://github.com/gables/cascading_classes
 licenses: []
 post_install_message: 
@@ -53,9 +63,20 @@ rubyforge_project:
 rubygems_version: 1.8.5
 signing_key: 
 specification_version: 3
-summary: Easily create properties whose values cascade down class trees
+summary: Manage properties on class hierarchies
 test_files:
 - spec/helper_spec.rb
-- spec/extended_spec.rb
-- spec/included_spec.rb
-- spec/alternative_syntax_spec.rb
+- spec/basics/basic_spec.rb
+- spec/basics/block_spec.rb
+- spec/basics/container_spec.rb
+- spec/basics/inherit_spec.rb
+- spec/basics/proc_spec.rb
+- spec/class_helper_methods/parents_for_spec.rb
+- spec/custom_classes/hash_like_spec.rb
+- spec/instances/basics.rb
+- spec/preset_classes/array_spec.rb
+- spec/preset_classes/hash_spec.rb
+- spec/preset_classes/strings.rb
+- spec/preset_classes/undefined.rb
+- spec/usage/block_spec.rb
+- spec/usage/proc_spec.rb

data/spec/alternative_syntax_spec.rb

@@ -1,173 +0,0 @@
-begin
-  require_relative 'helper_spec'
-rescue NameError
-  require File.expand_path('helper_spec', __FILE__)
-end
-
-describe "when a class extends CascadingClasses and an alternative syntax is used" do
-
-  # this is the same as:
-  #   class Parent
-  #     extend CascadingClasses
-  #   end
-  #
-  #   class Child < Parent; end
-  #
-  #   class GrandChild < Child; end
-  before do
-    Parent = Class.new{extend CC}
-    Child = Class.new(Parent)
-    GrandChild = Class.new(Child)
-  end
-
-  after do
-    Object.send :remove_const, :Parent
-    Object.send :remove_const, :Child
-    Object.send :remove_const, :GrandChild    
-  end
-
-  def standard
-    Parent.hair_color.must_equal "black"
-    Child.hair_color.must_equal "blond"
-    GrandChild.hair_color.must_equal "blond"  
-
-    Parent.eye_color.must_equal nil
-    Child.eye_color.must_equal "brown"
-    GrandChild.eye_color.must_equal "brown"
-
-    Parent.piercings.must_equal false
-    Child.piercings.must_equal false
-    GrandChild.piercings.must_equal false
-  end
-
-  describe "when an alternative syntax is given (0)" do
-    before do
-      Parent.cascade [:hair_color, "black"], :eye_color, [:piercings, false]
-
-      Child.hair_color = "blond"
-      Child.eye_color = "brown"
-    end
-
-    it "should give the same result" do
-      standard
-    end
-  end
-
-  describe "when an alternate syntax is given (1)" do
-    before do
-      Parent.all! [:hair_color, "black"], :eye_color, [:piercings, false]
-
-      Child.hair_color = "blond"
-      Child.eye_color = "brown"
-    end
-
-    it "should give the same result" do
-      standard
-    end
-  end
-
-  describe "when an alternative syntax is given (2)" do
-    before do
-      Parent.cascade :eye_color do
-        hair_color :begin => "black"
-        piercings :initial => false
-      end
-
-      Child.hair_color = "blond"
-      Child.eye_color = "brown"
-    end
-
-    it "should give the same result" do
-      standard
-    end
-  end
-
-  describe "when an alternative syntax is given (3)" do
-    before do
-      Parent.all! :eye_color do
-        hair_color :start => "black"
-        piercings :default => false
-      end
-
-      Child.hair_color = "blond"
-      Child.eye_color = "brown"
-    end
-
-    it "should give the same result" do
-      standard
-    end
-  end
-
-  describe "when an alternative syntax is given (3)" do
-    before do
-      Parent.all! :eye_color do
-        set_property :hair_color, :start => "black"
-        set_property :piercings, :initial => false
-      end      
-
-      Child.hair_color = "blond"
-      Child.eye_color = "brown"
-    end
-
-    it "should give the same result" do
-      standard
-    end
-  end
-
-  # getters/setters
-  describe "when an alternative getter/setter syntax is given" do
-    before do
-      Parent.cascade do
-        eye_color :getter => :eyes, :setter => :eyes=
-        hair_color :initial => "black", :getters => :hair, :setters => :hair=
-        piercings :start => false,
-                  :getter => [:has_piercings?, :piercings?],
-                  :setter => [:has_piercings=, :piercings=]
-      end
-
-      Child.hair = "blond"
-      Child.eyes = "brown"
-    end
-
-    it "should give the same result" do
-      Parent.hair.must_equal "black"
-      Child.hair.must_equal "blond"
-      GrandChild.hair.must_equal "blond"
-
-      Parent.eyes.must_equal nil
-      Child.eyes.must_equal "brown"
-      GrandChild.eyes.must_equal "brown"
-
-      Parent.has_piercings?.must_equal false
-      Child.piercings?.must_equal false
-      GrandChild.has_piercings?.must_equal false
-    end
-  end
-
-  describe "when an alternative syntax is given (2)" do
-    before do
-      Parent.cascade [:eye_color, nil, false, :eyes, :eyes=]
-      Parent.cascade [:hair_color, "black", false, :hair, :hair=]
-      Parent.cascade [:piercings, false, false,
-                       [:has_piercings?, :piercings?],
-                       [:has_piercings=, :piercings=] ]
-
-      Child.hair = "blond"
-      Child.eyes = "brown"
-    end
-
-    it "should give the same result" do
-      Parent.hair.must_equal "black"
-      Child.hair.must_equal "blond"
-      GrandChild.hair.must_equal "blond"
-
-      Parent.eyes.must_equal nil
-      Child.eyes.must_equal "brown"
-      GrandChild.eyes.must_equal "brown"
-
-      Parent.has_piercings?.must_equal false
-      Child.piercings?.must_equal false
-      GrandChild.has_piercings?.must_equal false
-    end
-  end
-end

data/spec/extended_spec.rb

@@ -1,315 +0,0 @@
-begin
-  require_relative 'helper_spec'
-rescue NameError
-  require File.expand_path('helper_spec', __FILE__)
-end
-
-# require 'minitest/autorun'
-# require 'cascading_classes'
-
-# class << MiniTest::Spec
-  # alias_method :all, :it
-# end
-
-describe "when a class extends CascadingClasses" do
-
-  # this is the same as:
-  #   class Parent
-  #     extend CascadingClasses
-  #   end
-  #
-  #   class Child < Parent; end
-  #
-  #   class GrandChild < Child; end
-  before do
-    Parent = Class.new{extend CC}
-    Child = Class.new(Parent)
-    GrandChild = Class.new(Child)
-  end
-
-  after do
-    Object.send :remove_const, :Parent
-    Object.send :remove_const, :Child
-    Object.send :remove_const, :GrandChild
-  end
-
-  describe "when a parent has a default" do
-    before do
-      Parent.cascade [:eyes, "brown"]      
-    end
-
-    it "sets the property to the default" do
-      Parent.eyes.must_equal "brown"
-    end
-  end
-
-  describe "when a property is set from above" do
-    before do
-      Parent.cascade(:hair_color)
-
-      Parent.hair_color = :blond
-    end
-
-    it "should cascade down to its descendents" do
-      Parent.hair_color.must_equal :blond
-      Child.hair_color.must_equal :blond
-      GrandChild.hair_color.must_equal :blond
-    end    
-  end
-
-  describe "when a property is set from below" do
-    before do
-      Parent.cascade do
-        arms :default => 2
-        legs :default => 2
-      end
-
-      Child.arms = 3
-      GrandChild.legs = 1
-    end
-
-    all "descendents are influenced and no acestors are affected" do
-      Parent.arms.must_equal 2
-      Child.arms.must_equal 3
-      GrandChild.arms.must_equal 3
-
-      Parent.legs.must_equal 2
-      Child.legs.must_equal 2
-      GrandChild.legs.must_equal 1
-    end
-  end
-
-  describe "when a property has a default and has not been set by any descendent" do
-    before do
-      Parent.cascade [:eye_color, "red"]
-    end
-
-    all "descendents should reflect that default" do
-      Parent.eye_color.must_equal "red"
-      Child.eye_color.must_equal "red"
-      GrandChild.eye_color.must_equal "red"
-    end
-  end
-
-  describe "when a property has no default and has not been set by any ancestor" do
-    before do
-      Parent.cascade :has_house
-    end
-
-    all "descendents should reflect nil" do
-      Parent.has_house.must_equal nil
-      Child.has_house.must_equal nil
-      GrandChild.has_house.must_equal nil
-    end
-  end
-
-  describe "when a child sets a property when its parent has set it too" do
-    before do
-      Parent.all! :trigger
-
-      Parent.trigger = "silent"
-      Child.trigger = "loud"
-    end
-
-    all "cascading is scoped off the youngest child with a set property" do
-      Parent.trigger.must_equal "silent"
-      Child.trigger.must_equal "loud"
-      GrandChild.trigger.must_equal "loud"
-    end
-  end
-
-  describe "when a parent has a property with a default" do
-    before do
-      Parent.cascade [:time, 32]
-    end
-
-    it "won't matter whether the property is first accessed by the child" do
-      Child.time
-
-      Child.time.must_equal 32
-      Parent.time.must_equal 32
-    end    
-  end
-
-  describe "when a parent has a property with a default" do
-    before do
-      Parent.cascade [:time, 32]
-    end
-
-    it "won't matter if the property is first accessed by the parent" do
-      Parent.time
-  
-      Child.time.must_equal 32
-      Parent.time.must_equal 32
-    end 
-  end
-  
-  describe "when a property is set to false" do
-    before do
-      Parent.cascade [:has_time, false]
-    end
-
-    it "should return false, not nil" do
-      Parent.has_time.must_equal false
-    end
-  end
-
-  describe "when a property name is not allowed" do
-    before do
-      property = CascadingClasses.illegal_names.sample
-    end
-
-    it "should raise a NameError" do
-      res = begin
-        Parent.cascade property
-      rescue NameError
-        true
-      else
-        false
-      end
-      res.must_equal true
-    end
-  end
-
-  # getters/setters
-  describe "when a custom getter is given" do
-    before do
-      Parent.cascade do
-        eye_color :default => "brown", :getter => :color
-      end
-    end
-
-    it "is the only reader method" do
-      Parent.color.must_equal "brown"
-
-      Parent.send(:respond_to?, :eye_color).must_equal false
-    end
-  end
-
-  # :getters aliased to :getter
-  describe "when multiple getters are given" do
-    before do
-      Parent.cascade do
-        eye_color :default => "brown", :getters => [:color, :eyes]
-      end
-
-      it "those methods are the only readers" do
-        Parent.color.must_equal "brown"
-        Parent.eyes.must_equal "brown"
-
-        Parent.send(:respond_to?, :eye_color).must_equal false
-      end
-    end
-  end
-
-  describe "when a getter name is nil" do
-    before do
-      Parent.all! do
-        color :default => "red", :getter => nil
-      end
-    end
-
-    it "should not have a getter method" do
-      Parent.send(:respond_to?, :color).must_equal false
-    end
-  end
-
-  describe "when a getter name is false" do
-    before do
-      Parent.all!{
-        color :default => "red", :getter => false
-      }
-    end
-
-    it "should not have a getter method" do
-      Parent.send(:respond_to?, :color).must_equal false
-    end
-  end
-
-  describe "when a custom getter is given" do
-    before do
-      Parent.cascade do
-        eye_color :default => "black", :getter => :color
-      end
-    end
-
-    it "should also be the getter for child classes" do
-      Child.color.must_equal "black"
-
-      Child.send(:respond_to?, :eye_color).must_equal false
-    end
-  end
-
-  describe "when a custom setter is given" do
-    before do
-      Parent.cascade do
-        eye_color :default => "brown", :setter => :color=
-      end
-    end
-
-    it "is the only writer method" do
-      Parent.color = "blue"
-      Parent.eye_color.must_equal "blue"
-
-      Parent.send(:respond_to?, :eye_color=).must_equal false
-    end
-  end
-
-  # :setters aliased to :setters
-  describe "when multiple setters are given" do
-    before do
-      Parent.cascade do
-        eye_color :default => "brown", :setters => [:color=, :set_color]
-      end
-
-      it "those methods are the only readers" do
-        Parent.color = "blue"
-        Parent.color.must_equal "blue"
-
-        Parent.set_color "black"
-        Parent.color.must_equal "black"
-
-        Parent.send(:respond_to?, :eye_color=).must_equal false
-      end
-    end
-  end
-
-  describe "when a setter name is nil" do
-    before do
-      Parent.all!{
-        color :default => "red", :setter => nil
-      }
-    end
-
-    it "should not have a setter method" do
-      Parent.send(:respond_to?, :color=).must_equal false
-    end
-  end
-
-  describe "when a setter name is false" do
-    before do
-      Parent.all! do
-        color :default => "red", :setter => false
-      end
-    end
-
-    it "should not have a setter method" do
-      Parent.send(:respond_to?, :color=).must_equal false
-    end
-  end
-
-  describe "when a custom setter is given" do
-    before do
-      Parent.cascade do
-        eye_color :default => "black", :setter => :color=
-      end
-    end
-
-    it "should also be the getter for child classes" do
-      Child.color = "blue"      
-      Child.eye_color.must_equal "blue"
-
-      Child.send(:respond_to?, :eye_color=).must_equal false
-    end
-  end
-end