cascading_classes 0.3.0 → 0.6.0

data/spec/class_helper_methods/parents_for_spec.rb

@@ -0,0 +1,36 @@
+begin
+  require_relative '../helper_spec'
+rescue NameError
+  require File.expand_path('../helper_spec', __FILE__)
+end
+
+describe "parents_for()" do
+  before do
+    A = Class.new{extend CC}
+    B = Class.new(A)
+    C = Class.new(B)
+
+    A.cascade do
+      color :default => "red"
+    end
+
+    B.cascade do
+      score :default => 45.32
+    end
+  end
+
+  after do
+    Object.send :remove_const, :A
+    Object.send :remove_const, :B
+    Object.send :remove_const, :C
+  end
+
+  it "lists ancestors for given property" do
+    A.parents_for(:color).must_equal []
+    B.parents_for(:color).must_equal [A]
+    C.parents_for(:color).must_equal [B, A]
+
+    B.parents_for(:score).must_equal []
+    C.parents_for(:score).must_equal [B]
+  end
+end

data/spec/custom_classes/hash_like_spec.rb

@@ -0,0 +1,144 @@
+begin
+  require_relative '../helper_spec'
+rescue NameError
+  require File.expand_path('../helper_spec', __FILE__)
+end
+
+describe "custom hash-like class" do
+  before do
+    class MyCustom < Hash
+      def initialize(*arr)
+        return super unless arr.size > 0
+        [*arr].flatten.each_slice(2){|k,v| self[k] = v}
+      end
+    end
+
+    Parent = Class.new{include CC}
+    class Child < Parent; end
+    class GrandChild < Child; end
+
+    @props = Parent.cascade do
+      beta :default => MyCustom.new([:rank, 4], [:color, "red"]),
+           :new => proc{ MyCustom.new },
+           :blank => proc{|v| v.empty?}
+    end
+  end
+
+  after do
+    Object.send :remove_const, :MyCustom
+    Object.send :remove_const, :Parent
+    Object.send :remove_const, :Child
+    Object.send :remove_const, :GrandChild
+  end
+
+  describe "by default" do
+    it "is set to not inherit by default" do
+      @props[:beta][:inherit].must_equal false
+    end
+
+    it "descendents (including instances) do not inherit" do
+      Parent.new.beta.must_equal MyCustom.new
+      Child.beta.must_equal MyCustom.new
+      Child.new.beta.must_equal MyCustom.new
+      GrandChild.beta.must_equal MyCustom.new
+      GrandChild.new.beta.must_equal MyCustom.new
+    end
+
+    it "'Parent' has 'default' value" do
+      Parent.beta.must_equal MyCustom.new(:rank, 4, :color, "red")
+    end
+
+    it "has type ':MyCustom'" do
+      @props[:beta][:type].must_equal :MyCustom
+    end
+
+    it "has blank value of empty 'MyCustom' object" do
+      mc = MyCustom.new
+      mc.empty?.must_equal true
+
+      @props[:beta][:blank].call(mc).must_equal true
+    end
+
+    it "has new value of empty 'MyCustom' object" do
+      @props[:beta][:new].call.must_equal MyCustom.new
+    end
+
+    it "nonblank values never inherit" do
+      # ???
+    end
+  end
+
+  describe "property in instance of 'Parent' is blank" do
+    before do
+      @parent = Parent.new
+    end
+
+    it "can inherit one level up to 'Parent'" do
+      mc = MyCustom.new(:rank, 4); mc[:color] = "red"
+      blank_inherit_helper(@parent, :beta, 1, mc, MyCustom.new)
+    end
+  end
+
+  describe "'Child'" do
+    describe "property on 'Child' is blank" do
+      it "can inherit one level up to 'Parent'" do
+        mc = MyCustom.new([[:rank, 4], [:color, "red"]])
+        blank_inherit_helper(Child, :beta, 1, mc, MyCustom.new)
+      end
+
+      describe "property on instance of 'Child' is blank" do
+        before do
+          @child = Child.new
+        end
+
+        it "can inherit two levels up to 'Parent'" do
+          mc = MyCustom.new(:rank, 4, :color, "red")
+          blank_inherit_helper(@child, :beta, 2, mc, MyCustom.new)
+        end
+      end
+
+      describe "property on 'GrandChild' is blank" do
+        it "can inherit two levels up to 'Parent'" do
+          blank_inherit_helper(GrandChild, :beta, 2,
+                               MyCustom.new(:rank, 4, :color, "red"),
+                               MyCustom.new)
+        end
+      end
+    end
+
+    describe "property on 'Child' is nonblank" do
+      before do
+        Child.beta[:colors] = [:red, :yellow, :blue]
+      end
+
+      describe "property on instance of 'Child' is blank" do
+        before do
+          @child = Child.new
+        end
+
+        it "can inherit one level up to 'Child'" do
+          mc = MyCustom.new; mc[:colors] = [:red, :yellow, :blue]
+          blank_inherit_helper(@child, :beta, 1, mc, MyCustom.new)
+        end
+      end
+
+      describe "property on 'GrandChild' is blank" do
+        it "can inherit one level up to 'Child'" do
+          mc = MyCustom.new; mc[:colors] = [:red, :yellow, :blue]
+          blank_inherit_helper(GrandChild, :beta, 1, mc, MyCustom.new)
+        end
+
+        describe "property on instance of 'GrandChild' is blank" do
+          before do
+            @grandchild = GrandChild.new
+          end
+
+          it "can inherit two levels up to 'Child'" do
+            mc = MyCustom.new; mc[:colors] = [:red, :yellow, :blue]
+            blank_inherit_helper(@grandchild, :beta, 2, mc, MyCustom.new)
+          end
+        end
+      end
+    end
+  end
+end

data/spec/helper_spec.rb

@@ -2,6 +2,38 @@ $:.unshift File.expand_path('../../lib', __FILE__)
 require 'cascading_classes'
 require 'minitest/autorun'
 
-class << MiniTest::Spec
-  alias_method :all, :it
+## class << MiniTest::Spec
+  ## alias_method :all, :it
+## end
+
+def blank_inherit_helper(obj, property, expected_depth, expected_val, empty)
+  obj.send("#{property}_is_blank?").must_equal true
+
+  dont_inherit = (expected_depth < 0) ? [0] : (0...expected_depth).to_a
+  dont_inherit << false << nil
+  dont_inherit.each do |i|
+    obj.send(property, i).must_equal empty
+    obj.send(property, :inherit => i).must_equal empty
+    obj.send(property, :inherit, i).must_equal empty
+  end
+  
+  do_inherit = (expected_depth < 0) ? [] : (expected_depth..(expected_depth+1)).to_a
+  do_inherit << true << -1
+  do_inherit.each do |i|
+    obj.send(property, i).must_equal(expected_val)
+    obj.send(property, :inherit => i).must_equal(expected_val)
+    obj.send(property, :inherit, i).must_equal(expected_val)
+  end
+end
+
+def nonblank_helper(obj, property, expected)
+  obj.send("#{property}_is_blank?").must_equal false
+
+  vals = [0, 1, 2, 3, -1, false, true, nil]
+  vals.each do |i|
+    obj.send(property, i).must_equal expected
+    obj.send(property, :inherit => i).must_equal expected
+    obj.send(property, :inherit, i).must_equal expected
+  end
 end
+

data/spec/instances/basics.rb

@@ -0,0 +1,239 @@
+begin
+  require_relative '../helper_spec'
+rescue NameError
+  require File.expand_path('../helper_spec', __FILE__)
+end
+
+# todo: update --> when you do :inherit => false this means NO INHERITANCE
+
+# defaults: hash of defaults
+def getters(obj, defaults)
+  defaults.each do |key, val|
+    obj.send(key).must_equal val
+  end
+end
+
+def container_getters(obj, depth)
+  obj.urls(false).must_equal Array.new
+  obj.urls(nil).must_equal Array.new
+  0.upto(depth-1).each do |i|
+    obj.urls(i).must_equal Array.new
+  end
+  depth.upto(depth+1).each do |i|
+    obj.urls(i).must_equal ["www.google.com"]
+  end
+  obj.urls(-1).must_equal ["www.google.com"]
+  obj.urls(true).must_equal ["www.google.com"]
+
+  obj.name(false).must_equal Hash.new
+  obj.name(nil).must_equal Hash.new
+  0.upto(depth-1).each do |i|
+    obj.name(i).must_equal Hash.new
+  end
+  depth.upto(depth+1).each do |i|
+    obj.name(i).must_equal({:first => 'jon', :last => 'smith'})
+  end
+  obj.name(true).must_equal({:first => 'jon', :last => 'smith'})
+  obj.name(-1).must_equal({:first => 'jon', :last => 'smith'})
+end
+
+def setters(obj)
+  obj.color = "blue"
+  obj.color.must_equal "blue"
+
+  obj.setting = :rural
+  obj.setting.must_equal :rural
+
+  obj.score = 28.1
+  obj.score.must_equal 28.1
+
+  obj.num = 15
+  obj.num.must_equal 15
+
+  obj.available = false
+  obj.available.must_equal false
+
+  obj.urls << "www.yahoo.com" << "www.bing.com"
+  obj.urls.must_equal ["www.yahoo.com", "www.bing.com"]
+
+  obj.urls = ["www.nytimes.com"]
+  obj.urls.must_equal ["www.nytimes.com"]
+
+  obj.verify.must_equal false   # doesn't inherit name
+  obj.verify2.must_equal true   # inherits name
+
+  obj.name[:first] = 'thomas'
+  obj.name[:last] = 'smith'
+  obj.name.must_equal({:first => 'thomas', :last => 'smith'})
+
+  obj.verify.must_equal true
+  obj.verify2.must_equal true
+
+  obj.verify = Proc.new{|me| me.name[:first] !~ /mas/}
+  obj.verify2 = Proc.new{|me| me.name(true)[:first] !~ /mas/}
+
+  obj.verify.must_equal false
+  obj.verify2.must_equal false
+end
+
+describe "instances: via 'extend'" 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 "by default" do
+    before do
+      @props = A.cascade do
+        color :default => "red"
+        setting :default => :urban
+        score :default => 34.1
+        num :default => 3
+        available :default => true
+        urls :default => ["www.google.com"]
+        name :default => {:first => 'jon', :last => 'smith'}
+        verify :default => Proc.new{|me| me.name[:last] == 'smith'}
+      end
+    end
+
+    it "does not create properties for instances" do
+      a = A.new
+      [:color, :setting, :score, :num, :available,
+       :urls, :name, :verify].each do |t|
+        @props[t][:instances_too].must_equal false
+        a.respond_to?(:t).must_equal false
+      end
+    end
+  end
+
+  describe "extend: override default" do
+    before do
+      @props = A.cascade do
+        color :default => "red", :instances => true
+        setting :default => :urban, :instances => true
+        score :default => 34.1, :instances => true
+        num :default => 3, :instances => true
+        available :default => true, :instance => true
+        urls :default => ["www.google.com"], :instance => true
+        name :default => {:first => 'jon', :last => 'smith'}, :instance => true
+        verify :default => Proc.new{|me| me.name[:last] == 'smith'}, :instance => true
+        verify2 :default => Proc.new{|me| me.name(true)[:last] == 'smith'}, :instance => true
+      end
+    end
+
+    it "adds properties to instances" do
+      a = A.new
+      [:color, :setting, :score, :num, :available,
+       :urls, :name, :verify, :verify2].each do |t|
+        @props[t][:instances_too].must_equal true
+        a.respond_to?(t).must_equal true
+      end
+    end
+
+    it "inherits all non-container properties" do
+      [:color, :setting, :score, :num, :available, :verify, :verify2].each do |t|
+        @props[t][:inherit].must_equal true
+      end
+      @props[:urls][:inherit].must_equal false
+      @props[:name][:inherit].must_equal false
+
+      defaults = A.to_hash  # assumes 'to_hash' works; ie: likely testing it too
+      [:urls, :name, :verify, :verify2].each{|j| defaults.delete j}
+
+      getters(A.new, defaults)
+      getters(B.new, defaults)
+      getters(C.new, defaults)
+    end
+
+    it "inherits container properties only when explicitly told to do so" do
+      container_getters(A.new, 1)
+      container_getters(B.new, 2)
+      container_getters(C.new, 3)
+    end
+
+    it "has instance setters" do
+      setters(A.new)
+    end
+
+    it "has subclass instance setters" do
+      setters(B.new)
+      setters(C.new)
+    end
+  end
+end
+
+describe "instances: via 'include'" do
+  before do
+    A = Class.new{include 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 "defaults" do
+    before do
+      @props = A.cascade do
+        color :default => "red"
+        setting :default => :urban
+        score :default => 34.1
+        num :default => 3
+        available :default => true
+        urls :default => ["www.google.com"]
+        name :default => {:first => 'jon', :last => 'smith'}
+        verify :default => Proc.new{|me| me.name[:last] == 'smith'}
+        verify2 :default => Proc.new{|me| me.name(true)[:last] == 'smith'}
+      end 
+    end
+
+    it "adds properties to instances" do
+      a = A.new
+      [:color, :setting, :score, :num, :available,
+       :urls, :name, :verify, :verify2].each do |t|
+        @props[t][:instances_too].must_equal true
+        a.respond_to?(t).must_equal true
+      end
+    end
+
+    it "inherits all non-container properties" do
+      [:color, :setting, :score, :num, :available, :verify, :verify2].each do |t|
+        @props[t][:inherit].must_equal true
+      end
+      @props[:urls][:inherit].must_equal false
+      @props[:name][:inherit].must_equal false
+
+      defaults = A.to_hash  # assumes 'to_hash' works; ie: likely testing it too
+      [:urls, :name, :verify, :verify2].each{|j| defaults.delete j}
+
+      getters(A.new, defaults)
+      getters(B.new, defaults)
+      getters(C.new, defaults)
+    end
+
+    it "inherits container properties only when explicitly told to do so" do
+      container_getters(A.new, 1)
+      container_getters(B.new, 2)
+      container_getters(C.new, 3)
+    end
+
+    it "has instance setters" do
+      setters(A.new)
+    end
+
+    it "has subclass instance setters" do
+      setters(B.new)
+      setters(C.new)
+    end
+  end
+end