plist4r 0.2.2 → 1.0.0

data/spec/plist4r/mixin/data_methods_spec.rb

@@ -0,0 +1,96 @@
+
+require 'spec_helper'
+
+describe Plist4r::DataMethods, "#set_or_return" do
+  before(:each) do
+    class DataMethodsClass
+      include Plist4r::DataMethods
+    end
+    @data_methods = DataMethodsClass.new
+    @data_methods.instance_eval { @plist = Plist4r::Plist.new }
+    @integer_keys = ["IntegerKey1","IntegerKey2"]
+    @string_keys  = ["StringKey1","StringKey2"]
+    @valid_keys = { :integer => @integer_keys, :string  => @string_keys }
+    DataMethodsClass::ValidKeys = @valid_keys
+    @plist = @data_methods.instance_eval { @plist }
+  end
+  
+  it "should follow the default calling path when the supplied key is a known plist key" do
+    @key = @integer_keys.first
+    @integer_keys.stub(:include?).and_return(true)
+    @data_methods.stub(:set_or_return_of_type)
+    @valid_keys.should_receive(:each).and_yield(:integer,@integer_keys).and_yield(:string,@string_keys)
+    @integer_keys.should_receive(:include?).with(@key)
+    @string_keys.should_not_receive(:include?).with(@key)
+    @data_methods.should_receive(:set_or_return_of_type)
+    @data_methods.set_or_return(@key, "value")
+  end
+
+  it "should follow the alternate calling path when the supplied key is not a known plist key" do
+    @key = @integer_keys.first
+    @integer_keys.stub(:include?).and_return(false)
+    @string_keys.stub(:include?).and_return(false)
+    @data_methods.stub(:set_or_return_of_type)
+    @valid_keys.should_receive(:each).and_yield(:integer,@integer_keys).and_yield(:string,@string_keys)
+    @integer_keys.should_receive(:include?).with(@key)
+    @string_keys.should_receive(:include?).with(@key)
+    @plist.stub(:strict_keys).and_return(false)
+    @plist.should_receive(:strict_keys)
+    @data_methods.should_receive(:set_or_return_of_type)
+    @data_methods.set_or_return(@key, "value")
+  end
+  
+  it "should raise an error when strict_keys is true" do
+    @key = @integer_keys.first
+    @integer_keys.stub(:include?).and_return(false)
+    @string_keys.stub(:include?).and_return(false)
+    @data_methods.stub(:set_or_return_of_type)
+    @valid_keys.should_receive(:each).and_yield(:integer,@integer_keys).and_yield(:string,@string_keys)
+    @integer_keys.should_receive(:include?).with(@key)
+    @string_keys.should_receive(:include?).with(@key)
+    @plist.stub(:strict_keys).and_return(true)
+    @plist.should_receive(:strict_keys)
+    @data_methods.should_not_receive(:set_or_return_of_type)
+    lambda { @data_methods.set_or_return(@key, "value") }.should raise_error(Exception)
+  end
+  
+  after(:each) do
+    class DataMethodsClass
+      remove_const(:ValidKeys)
+    end
+  end
+end
+
+describe Plist4r::DataMethods, "#set_or_return_of_type" do
+  before(:each) do
+    class DataMethodsClass
+      include Plist4r::DataMethods
+
+      alias_method :validate_value_orig, :validate_value
+      def validate_value key_type, key, value
+      end
+    end
+    @data_methods = DataMethodsClass.new
+  end
+
+  it "should return the value of the stored @orig hash key, if the supplied value is nil" do
+    @data_methods.instance_eval { @orig = { "Key1" => "value1", "Key2" => "value2" } }
+    @data_methods.set_or_return_of_type(:key_type,"Key1").should == "value1"
+    @data_methods.set_or_return_of_type(:key_type,"Key2").should == "value2"
+  end
+  
+  it "should follow the alternate calling path when supplied value is not nil" do
+    @data_methods.instance_eval { @hash = {} }
+    @data_methods.set_or_return_of_type(:key_type,"Key1","value1")
+    @data_methods.set_or_return_of_type(:key_type,"Key2","value2")
+    
+    @data_methods.instance_eval { @hash["Key1"] }.should == "value1"
+    @data_methods.instance_eval { @hash["Key2"] }.should == "value2"
+  end
+  
+  after(:each) do
+    class DataMethodsClass
+      alias_method :validate_value, :validate_value_orig
+    end
+  end
+end

data/spec/plist4r/mixin/haml4r/examples.rb

@@ -0,0 +1,261 @@
+
+require 'haml'
+require 'plist4r/mixin/haml4r/table'
+
+# def table
+#   t = Haml4r::Table.new :size => [0..5, 0..5]
+#   t.cell 0,0, "foo"
+#   t.cell 0,0
+# 
+#   t.cell 2,0, "pineapples"
+#   t.cell 4,0, "some_string"
+#   t.fill 0..5, 1..4, 0
+#   puts t.inspect
+# end
+# table
+
+
+
+def haml4r_table
+  # t = Haml4r::Table.new :size => [0..5, 0..5]
+  # t.cell 0,0, "foo"
+  # t.cell 0,0
+
+  # t.cell 2,0, "pineapples"
+  # t.cell 4,0, "some_string"
+  # t.fill 0..5, 1..4, 0
+  # puts t.inspect
+  # puts ""
+
+  # puts "col_range = #{t.col_range}"
+  # puts "row_range = #{t.row_range}"
+  # puts "size = #{t.size}.inspect"
+  # puts ""
+  
+  # puts "pad_all \"empty\""
+  # t.pad_all "empty"
+  # puts t.inspect
+  # puts ""
+  
+  # puts "crop 0..2, 0..2"
+  # t2 = t.crop 0..2, 0..2
+  # puts t2.inspect
+  # puts ""
+
+  # puts "fill 0..2, 1..2, \"fill\""
+  # t.fill 0..2, 1..2, "fill"
+  # puts t.inspect
+  # puts ""
+
+  # puts "fill_all, \"fill\""
+  # t2.fill_all "fill"
+  # puts t2.inspect
+  # puts ""
+
+  # puts "inverse_fill, 1..1, 1..1, \"inverse\""
+  # # t2.inverse_fill 1..1, 1..1, "inverse"
+  # t2.inverse_fill 1, 1, "inverse"
+  # puts t2.inspect
+  # puts ""
+
+  # puts "t3"
+  # fruit = %w[ apples strawberries banana grapefruit mango papaya]
+  # day = %w[ mon tues wed thurs fri sat]
+  # t3 = Haml4r::Table.new :size => [0..5, 0..5]
+  # (0..5).each do |col|
+  #   (0..2).each do |row|
+  #     t3.cell col,row, fruit[col]
+  #     # t3.cell col,row, "S " << (97+col).chr << " " << (97+row).chr
+  #   end
+  #   (3..5).each do |row|
+  #     t3.cell col,row, day[col]
+  #   end
+  # end
+  # puts t3.inspect
+  # puts ""
+
+  # puts "transpose"
+  # t3.transpose
+  # puts t3.inspect
+  # puts ""
+  # 
+  # puts "transpose 3..5, 3..5"
+  # t3.transpose 3..5, 3..5
+  # puts t3.inspect
+  # puts ""
+  # 
+  # puts "transpose 3..5, 3..5"
+  # t3.transpose 3..5, 3..5
+  # puts t3.inspect
+  # puts ""
+  # 
+  # puts "transpose 0..3, 0..2"
+  # t3.transpose 0..3, 0..2
+  # puts t3.inspect
+  # puts ""
+
+  # puts "col_replace 0, (row 3)"
+  # # t3.col_replace 0, t3.row(3)
+  # t3.col_replace 0..1, "col 0..1"
+  # # t3.col 0, t3.col(5)
+  # puts t3.inspect
+  # puts ""
+
+  # puts "row_replace 0, (col 5)"
+  # puts t3.col(5).transpose.inspect
+  # t3.row_replace 1, t3.col(5).transpose
+  # # t3.row_replace 1, "row 1"
+  # puts t3.inspect
+  # puts ""
+
+  # puts "translate 0..2, 0..2, [3,3]"
+  # t3.translate 0..2, 0..2, [3,3]
+  # puts t3.inspect
+  # puts ""
+
+  # puts "t3.cells(0..1, 2..2)"
+  # puts t3.cells(0..1,2..2).inspect
+  # puts ""
+
+  # puts "col_insert 3..4, 3..4, t3.cells(0..1, 2..2)"
+  # t3.col_insert 3..4, 3..4, t3.cells(0..1,2..2)
+  # puts t3.inspect
+  # puts ""
+
+end
+# haml4r_table
+
+def haml4r_haml_table_cells
+  # t = Haml4r::TableCells.new :size => [0..3, 0..5]
+  # puts t.inspect
+  # puts ""
+  # 
+  # puts "t.each content = Date::DAYNAMES[i]"
+  # i = 0
+  # require 'date'
+  # t.each 1..2, 1..3 do |c|
+  #   c.content = Date::DAYNAMES[i]
+  #   i +=1
+  # end
+  # puts t.inspect
+  # puts ""
+  # 
+  # t.cell(1,1).content = "foos"
+  # c = t.content
+  # puts "t.content => #{c.class}"
+  # puts c.inspect
+  # puts c.cell(0,0).class
+  # puts c.cell(1,1).class
+  # puts ""
+  # 
+  # puts "t.content = \"depeche mode\""
+  # t.content = "depeche mode"
+  # puts t.inspect
+  # puts t.cell(0,0).class
+  # puts t.cell(1,1).class
+  # puts ""
+end
+# haml4r_haml_table_cells
+
+def haml4r_haml_table_cell
+  # puts "table cell"
+  # c = Haml4r::TableCell.new
+  # puts c.inspect
+  # puts ""
+  # c.content = "jeremy"
+  # puts c.inspect
+  # puts ""
+end
+# haml4r_haml_table_cell
+
+def haml4r_haml_table_cell_spans
+  # t = Haml4r::TableCells.new :size => [0..3, 0..5]
+  # # puts t.inspect
+  # # puts ""
+  # 
+  # puts "t.each(1..2, 1..3) content = Date::DAYNAMES[i]"
+  # i = 0
+  # require 'date'
+  # t.each 1..2, 1..3 do |c|
+  #   c.content = Date::DAYNAMES[i]
+  #   i +=1
+  # end
+  # puts t.inspect
+  # puts ""
+  # 
+  # puts "t.span_cells 0..3, 4..5, :content => \"foos\""
+  # t.span_cells 0..3, 4..5, :content => "foos"
+  # puts t.inspect
+  # puts ""
+  # 
+  # puts "t.cell(0,4).content = \"bar\""
+  # t.cell(0,4).content = "bar"
+  # t.cell(0,4).css_class = "bar"
+  # t.cell(0,4).css_class += " of_trouble"
+  # puts t.inspect
+  # puts ""
+  # 
+  # puts "t.to_s"
+  # puts t
+  # puts ""
+end
+# haml4r_haml_table_cell_spans
+
+def haml4r_haml_table
+  t = Haml4r::Table.new :size => [1..3, 1..2]
+  
+  t.col_range.each do |col|
+    t.row_range.each do |row|
+      t.cell(col,row).content = "val#{col}#{row}"
+    end
+  end
+
+  t.col_header = Haml4r::TableSection.new
+  t.col_header.size [t.body.col_range,1..2]
+  t.col_header.span_cells 1..3, 1, :content => "Open"
+  t.col_header.col_range.each do |col|
+    t.col_header.cell(col,2).content = "x#{col}"
+  end
+  
+  t.row_header = Haml4r::TableSection.new
+  t.row_header.size [1,t.body.row_range]
+  t.row_header.row_range.each do |row|
+    t.row_header.cell(1,row).content = "y#{row}"
+  end
+  
+  puts t.inspect
+  puts ""
+  
+  puts "t.to_s"
+  puts t
+  puts ""
+end
+# haml4r_haml_table
+
+def haml4r_transpose_test
+  t = Haml4r::Table.new :size => [0..6, 2..8]
+  puts "strip = t.body.cells(1..5, 3..3) ; strip.span"
+  strip = t.body.cells(1..5, 3..3)
+  strip.span_cells
+  # strip.first.content = "foo"
+  strip.content = "foo"
+  strip.cell(6,3).content = "james"
+
+  strip.map!(1..6,3) do |c|
+    c.content += " bar"
+  end
+
+  puts t.inspect
+  puts ""
+
+  puts "t.body.transpose 1..5,3..3"
+  t.body.transpose 1..5, 3..3
+  # t.body.transpose 1..4, 3..3
+  # t.body.cell(1,7).content = "bar"
+  puts t.body.inspect
+  puts ""
+  
+end
+# haml4r_transpose_test
+
+

data/spec/plist4r/mixin/ruby_stdlib_spec.rb

@@ -0,0 +1,228 @@
+
+require 'spec_helper'
+
+describe Object, "#method_name" do
+  before(:each) do
+    class Object
+      def test_method_name
+        method_name
+      end
+    end
+    @object = Object.new
+  end
+  
+  it "should return the name of the current method" do
+    @object.test_method_name.should == "test_method_name"
+  end
+  
+  after(:all) do
+    class Object
+      undef :test_method_name
+    end
+  end
+end
+
+describe Object, "#deep_clone" do
+  before(:each) do
+    @object = Object.new
+    @object2 = Object.new
+    @mershal_dump = Marshal.dump(@object)
+    Marshal.stub!(:dump).and_return(@marshal_dump)
+    Marshal.stub!(:load).with(@marshal_dump).and_return(@object2)
+  end
+
+  it "should call Marshal.dump with @object" do
+    Marshal.should_receive(:dump).with(@object)
+    @object.deep_clone
+  end
+
+  it "should call Marshal.load with @marshal_dump" do
+    Marshal.should_receive(:load).with(@marshal_dump)
+    @object.deep_clone
+  end
+  
+  it "should return @object2" do
+    @object.deep_clone.should == @object2
+  end
+end
+
+describe Array, "#multidim?" do
+  before(:each) do
+    @empty_array = []
+    @flat_array = [1,2,3]
+    @mixed_array = [[1],2,[3]]
+    @multi_array = [[1],[2],[3]]    
+  end
+
+  it "should return false for an empty array" do
+    @empty_array.multidim?.should == false
+  end
+  
+  it "should return false for a flat array" do
+    @flat_array.multidim?.should == false
+  end
+
+  it "should return false for a mixed array" do
+    @mixed_array.multidim?.should == false
+  end
+
+  it "should return true for a multidimensional array" do
+    @multi_array.multidim?.should == true
+  end
+end
+
+describe Array, "#to_ranges" do
+  before(:each) do
+    @a1 = [3,4,5,1,6,9,8]
+    @r1 = [1..1,3..6,8..9]
+
+    @a2 = [19,3,18,15,17,2,16]
+    @r2 = [2..3,15..19]
+  end
+  
+  it "should convert an array of integers into an array of ranges" do
+    @a1.to_ranges.should == @r1
+    @a2.to_ranges.should == @r2
+  end
+end
+
+describe Hash, "#merge_array_of_hashes_of_arrays" do
+  before(:each) do
+    @aohoa1 = {}
+
+    @aohoa2 = [
+      { :array1 => [:a], :array2 => [:a,:b], :array3 => [:a,:b,:c] },
+      { :array1 => [:aa], :array2 => [:aa,:bb], :array3 => [:aa,:bb,:cc] },
+      { :array1 => [:aaa], :array2 => [:aaa,:bbb], :array3 => [:aaa,:bbb,:ccc] }
+    ]
+
+    @aohoa3 = { 
+      :array1 => [:a,:aa,:aaa], 
+      :array2 => [:a,:b,:aa,:bb,:aaa,:bbb], 
+      :array3 => [:a,:b,:c,:aa,:bb,:cc,:aaa,:bbb,:ccc]
+    }
+  end
+
+  it "should raise an error if the supplied argument is not an aohoa" do
+    @not_a_aohoa1 = false
+    lambda { @aohoa1.merge_array_of_hashes_of_arrays @not_a_aohoa1 }.should raise_error(Exception)
+
+    @not_a_aohoa2 = [
+      false,
+      { :array1 => [11], :array2 => [11,22], :array3 => [11,22,33], },
+      { :array1 => [111], :array2 => [111,222], :array3 => [111,222,333], },
+    ]
+    lambda { @aohoa1.merge_array_of_hashes_of_arrays @not_a_aohoa2 }.should raise_error(Exception)
+
+    @not_a_aohoa3 = [
+      { :array1 => [1], :array2 => [1,2], :array3 => [1,2,3], },
+      false,
+      { :array1 => [111], :array2 => [111,222], :array3 => [111,222,333], },
+    ]
+    lambda { @aohoa1.merge_array_of_hashes_of_arrays @not_a_aohoa3 }.should raise_error(Exception)
+
+    @not_a_aohoa4 = [
+      { :array1 => [1], :array2 => [1,2], :array3 => [1,2,3], },
+      { :array1 => [11], :array2 => [11,22], :array3 => [11,22,33], },
+      { :array1 => false, :array2 => [111,222], :array3 => [111,222,333], },
+    ]
+    lambda { @aohoa1.merge_array_of_hashes_of_arrays @not_a_aohoa4 }.should raise_error(Exception)
+  end
+  
+  it "should merge together 2 aohoa" do
+    @aohoa1.merge_array_of_hashes_of_arrays(@aohoa2).should == @aohoa3
+  end
+end
+
+describe Hash, "#merge_array_of_hashes_of_arrays!" do
+  before(:each) do
+    @aohoa1 = {}
+
+    @aohoa2 = [
+      { :array1 => [:a], :array2 => [:a,:b], :array3 => [:a,:b,:c] },
+      { :array1 => [:aa], :array2 => [:aa,:bb], :array3 => [:aa,:bb,:cc] },
+      { :array1 => [:aaa], :array2 => [:aaa,:bbb], :array3 => [:aaa,:bbb,:ccc] }
+    ]
+
+    @aohoa3 = { 
+      :array1 => [:a,:aa,:aaa], 
+      :array2 => [:a,:b,:aa,:bb,:aaa,:bbb], 
+      :array3 => [:a,:b,:c,:aa,:bb,:cc,:aaa,:bbb,:ccc]
+    }
+  end
+  
+  it "should call merge_array_of_hashes_of_arrays in place" do
+    @aohoa1 = {}
+    @aohoa1.merge_array_of_hashes_of_arrays!(@aohoa2)
+    @aohoa1.should == @aohoa3
+  end
+end
+
+describe Range, "#size" do
+  it "should return the size of @range" do
+    @range = 0..3
+    @range.size.should == 4
+
+    @range = 5..5
+    @range.size.should == 1
+  end
+end
+
+describe Range, "#&" do
+  it "should return the intersection of 2 discrete ranges" do
+    (1..3).&(5..9).should == nil
+    (1..3).&(4..9).should == nil
+    (1..3).&(3..9).should == (3..3)
+    (1..9).&(3..8).should == (3..8)
+    (1..6).&(3..9).should == (3..6)
+  end
+  
+  it "should raise an error when the supplied argument is not a Range" do
+    not_a_range = false
+    lambda { (1..3).&(not_a_range) }.should raise_error(Exception)
+  end
+end
+
+describe Range, "#include_range?" do
+  it "should return true if self wholely includes the supplied range" do
+    (1..3).include_range?(1..1).should == true
+    (1..3).include_range?(3..3).should == true
+    (1..3).include_range?(1..9).should == false
+    (1..9).include_range?(3..8).should == true
+    (1..6).include_range?(3..9).should == false
+  end
+  
+  it "should raise an error when the supplied argument is not a Range" do
+    not_a_range = false
+    lambda { (1..3).include_range?(not_a_range) }.should raise_error(Exception)
+  end
+end
+
+describe String, "#camelcase" do
+  it "should return the CamelCased version of string" do
+    "".camelcase.should == ""
+    "string".camelcase.should == "String"
+    "word1_word2".camelcase.should == "Word1Word2"
+    "Word1Word2".camelcase.should == "Word1Word2"
+  end
+end
+
+describe String, "#snake_case" do
+  it "should return the snake_cased version of string" do
+    "".snake_case.should == ""
+    "String".snake_case.should == "string"
+    "Word1Word2".snake_case.should == "word1_word2"
+    "word1_word2".snake_case.should == "word1_word2"
+  end
+end
+
+describe Float, "#round" do
+  it "should round self to the supplied number of decimal places" do
+    @f = 0.123456789
+    @f.round(0).to_s.should == "0.0"
+    @f.round(1).to_s.should == "0.1"
+    @f.round(2).to_s.should == "0.12"
+    @f.round(3).to_s.should == "0.123"
+  end
+end
+