gorillib 0.0.8 → 0.1.0

data/spec/support/hashlike_fuzzing_helper.rb

@@ -0,0 +1,127 @@
+require 'stringio'
+
+::Enumerator = Enumerable::Enumerator if (RUBY_VERSION < '1.9') && (not defined?(::Enumerator))
+
+module HashlikeFuzzingHelper
+  
+  #
+  # Fuzz testing for hashlike behavior. This throws a whole bunch of
+  #
+  #
+
+  HASH_TO_TEST_FULLY_HASHLIKE = {
+    :a  => 100,  :b  => 200, :c => 300,
+    :nil_val => nil, :false_val => false, :true_val => true, :arr_val => [1,2,3],
+    [1, 2, [3, 4]] => [1, [2, 3, [4, 5, 6]]],
+    nil => :has_nil_key, false => :has_false_key, Object.new => :has_dummy_key,
+  }.freeze
+
+  #
+  # Inputs to throw at it
+  #
+
+  STRING_2X_PROC   = Proc.new{|k|   k.to_s * 2 }
+  TOTAL_K_PROC     = Proc.new{|k|   @total += self[k].to_i }
+  TOTAL_V_PROC     = Proc.new{|v|   @total += v.to_i }
+  TOTAL_KV_PROC    = Proc.new{|k,v| @total += v.to_i }
+  VAL_GTE_4_PROC   = Proc.new{|k,v| v.respond_to?(:to_i) && v.to_i >= 4   }
+  VAL_GTE_0_PROC   = Proc.new{|k,v| v.respond_to?(:to_i) && v && v.to_i >= 0   }
+  VAL_GTE_1E6_PROC = Proc.new{|k,v| v.respond_to?(:to_i) && v && v.to_i >= 1e6 }
+
+  INPUTS_FOR_ALL_HASHLIKES = [
+    [], [:a], [:b], [:z], [0], [1], [2], [100], [-1],
+    [:a, :b], [:a, 30], [:b, 50], [:z, :a], [:c, 70],
+    [TOTAL_KV_PROC], [TOTAL_K_PROC], [TOTAL_V_PROC],
+    [:a, STRING_2X_PROC], [:z, STRING_2X_PROC], [:z, 100, STRING_2X_PROC],
+    [:a, :b, :z], [:a, :b, :a, :c, :a],
+    [VAL_GTE_4_PROC], [VAL_GTE_0_PROC], [VAL_GTE_1E6_PROC],
+  ]
+
+  INPUTS_WHEN_INDIFFERENT_ACCESS = [
+    ['a'], [:a], ['z'], [:z],
+    [:a, :b], [:a, 'b'], ['a', 'b'], [:a, :z], [:z, :a], ['z', :a],
+    ['a', STRING_2X_PROC], ['z', STRING_2X_PROC], ['a', 100, STRING_2X_PROC],
+    [:b, 50], ['b', 50],
+    [:a, 'b', :z],
+  ]
+
+  INPUTS_WHEN_ARBITRARY_KEYS_ALLOWED = [
+    [], ['a'], ['b'], ['z'], [1], [0], [nil], [false], [''], [Object.new], [ [] ],
+    ['a', 'b'], ['a', 30], ['b', 50], ['z', 'a'], [nil, 60], [:c, 70], [Object.new, 70], [ [], [] ],
+    ['a', 'b', 'z'], ['a', 'b', 'a', :c, 'a'],
+    [[1, 2, [3, 4]]], [[1, [2, 3, [4, 5, 6]]]]
+  ]
+  
+  INPUTS_WHEN_FULLY_HASHLIKE = INPUTS_FOR_ALL_HASHLIKES + INPUTS_WHEN_ARBITRARY_KEYS_ALLOWED + INPUTS_WHEN_INDIFFERENT_ACCESS
+  
+  #
+  # Hacky methods to do comparison
+  #
+
+  def send_to obj, meth, input
+    if input.last.is_a?(Proc)
+      input, block = [input[0..-2], input.last]
+      obj.send(meth, *input, &block)
+    else
+      obj.send(meth, *input)
+    end
+  end
+
+  # workaround: some errors have slightly different strings than Hash does
+  def err_regex err
+    err_str = err.to_s
+    err_str = Regexp.escape(err_str)
+    if err.is_a?(TypeError)
+      err_str.gsub!(/nil/,   '(nil|NilClass)')
+      err_str.gsub!(/false/, '(false|FalseClass)')
+    elsif err.is_a?(ArgumentError)
+      err_str.gsub!(/arguments(\\ )*\\\(/, 'arguments\s*\(')
+      err_str.gsub!(/for\\ (\d\\\.\\\.\d)/, 'for [\d\.]+')
+    end
+    Regexp.new(err_str)
+  end
+
+  def behaves_the_same obj_1, obj_2, method_to_test, input
+    input.unshift(1) if [:cycle, :partition].include?(method_to_test) && input.last.is_a?(Proc)
+
+    # Hash in 1.8.7 behaves differently when arity mismatched to method
+    if ((RUBY_VERSION < '1.9') &&
+        [:reject!, :delete_if, :each_pair, :select, :reject].include?(method_to_test) &&
+        input.last.is_a?(Proc) && (input.last.arity == 1))
+      return
+    end
+    
+    old_stderr = $stderr
+    $stderr = StringIO.new('', 'w')
+    obj_1.should_receive(:warn){|str| stderr_output << str }.at_most(:once)
+    begin
+      expected = send_to(obj_1, method_to_test, input)
+    rescue Exception => e
+      expected = e
+    end
+    expected_stderr = $stderr.string
+
+    $stderr = StringIO.new('', 'w')
+    obj_1.should_receive(:warn){|str| stderr_output << str }.at_most(:once)
+    case expected
+    when Exception
+      lambda{ send_to(obj_2, method_to_test, input) }.should raise_error(expected.class, err_regex(expected))
+    when Enumerator
+      actual = send_to(obj_2, method_to_test, input)
+      actual.should be_a(Enumerator)
+      actual.inspect.gsub(/[\"\:]/, '').gsub(/0x[a-f\d]+/,'').should == expected.inspect.gsub(/[\"\:]/, '').gsub(/0x[a-f\d]+/,'')
+    else # run the method
+      actual = send_to(obj_2, method_to_test, input)
+      if expected.is_a?(Hash) && (RUBY_VERSION < '1.9')
+        actual.should be_hash_eql(expected)
+      elsif expected.is_a?(Array) && (RUBY_VERSION < '1.9')
+        actual.should be_array_eql(expected)
+      else
+        actual.should == expected
+      end
+    end
+    $stderr.string.sub(/.*\.rb:\d+:(?:in `send\w*':)? /, '').should == expected_stderr.sub(/.*\.rb:\d+:(?:in `send\w*':)? /, '')
+    $stderr = old_stderr
+  end
+
+end

data/spec/support/hashlike_helper.rb

@@ -0,0 +1,75 @@
+class ::Hash
+  alias_method(:key, :index) unless method_defined?(:key)
+  alias_method(:values_of, :values_at) unless method_defined?(:values_of)
+end
+
+module HashlikeHelper
+
+  BASE_HSH                     = { :a  => 100, :b  => 200, :c => 300, :nil_val => nil, :false_val => false }.freeze
+  HASH_TO_TEST_HASHLIKE_STRUCT = { :a  => 100, :b  => 200, :c => 300, :nil_val => nil, :false_val => false, :new_key => nil, }.freeze
+  BASE_HSH_WITH_ARRAY_VALS     = { :a => [100,111], :b => 200, :c => [1, [2, 3, [4, 5, 6]]] }.freeze
+  BASE_HSH_WITH_ARRAY_KEYS     = {[:a,:aa] => 100,  :b => 200, [:c,:cc] => [300,333],  [1, 2, [3, 4]] => [1, [2, 3, [4, 5, 6]]] }.freeze
+
+  HASH_TO_TEST_HL_V_A          = { :a  => 100, :b  => 200, :c => 300, :nil_val => nil, :false_val => false }.freeze
+
+  #
+  # Methods from Hash
+  #
+
+  # Test for all Hashlikes
+  HASHLIKE_METHODS = [
+    # defined by class
+    :[], :[]=, :delete, :keys,
+    # typically defined via EnumerateFromKeys, but Struct does its own thing
+    :each, :each_pair, :values, :values_at, :values_of, :length,
+    # defined by hashlike using above
+    :each_key, :each_value, :has_key?, :has_value?, :fetch, :key, :assoc,
+    :rassoc, :empty?, :update, :merge, :reject!, :reject, :select!, :select,
+    :delete_if, :keep_if, :clear, :to_hash, :invert, :flatten,
+    # aliases to the appropriate method
+    :store, :include?, :key?, :member?, :size, :value?, :merge!,
+  ]
+
+  if RUBY_VERSION < '1.9'
+    HASH_METHODS_MISSING_FROM_VERSION = [:flatten, :keep_if, :select!, :select, :rassoc, :assoc]
+  else
+    HASH_METHODS_MISSING_FROM_VERSION = []
+  end
+
+  # Should define specs for all of these
+  METHODS_TO_TEST = HASHLIKE_METHODS + Enumerable.public_instance_methods.map(&:to_sym) - HASH_METHODS_MISSING_FROM_VERSION
+
+  # *Only* these basic methods on hash should be missing from a Hashlike
+  OMITTED_METHODS_FROM_HASH = [
+    # not implemented in hashlike
+    :compare_by_identity, :compare_by_identity?,
+    :default, :default=, :default_proc, :default_proc=,
+    :rehash, :replace, :shift,
+    # obsolete
+    :index, :indexes, :indices,
+  ]
+
+  # fancy hash methods possibly require'd in other specs
+  FANCY_HASHLIKE_METHODS = [
+    :assert_valid_keys,
+    :nested_under_indifferent_access,
+    :stringify_keys, :stringify_keys!, :symbolize_keys, :symbolize_keys!,
+    :with_indifferent_access, :yaml_initialize
+  ]
+  FANCY_HASHLIKE_METHODS.each{|meth| OMITTED_METHODS_FROM_HASH << meth }
+
+  # ENUMERABLE_METHODS = [
+  #   :each_cons, :each_entry, :each_slice, :each_with_index, :each_with_object,
+  #   :entries, :to_a, :map, :collect, :collect_concat, :group_by, :flat_map,
+  #   :inject, :reduce, :chunk, :reverse_each, :slice_before, :drop, :drop_while,
+  #   :take, :take_while, :detect, :find, :find_all, :find_index, :grep,
+  #   :all?, :any?, :none?, :one?, :first, :count, :zip, :max, :max_by, :min,
+  #   :min_by, :minmax, :minmax_by, :sort, :sort_by,
+  #   :cycle, :partition,
+  # ]
+  #
+  # p Enumerable.public_instance_methods.map(&:to_sym) - ENUMERABLE_METHODS
+  # p ENUMERABLE_METHODS - Enumerable.public_instance_methods.map(&:to_sym)
+  # extra:   [:member?, :enum_slice, :reject, :select, :include?, :enum_cons, :enum_with_index]
+  # missing: [:each_entry, :each_with_object, :collect_concat, :flat_map, :chunk, :slice_before]
+end

data/spec/support/hashlike_struct_helper.rb

@@ -0,0 +1,37 @@
+StructUsingHashlike = Struct.new(:a, :b, :c, :nil_val, :false_val, :new_key) do
+  include Gorillib::Hashlike
+  include Gorillib::Struct::ActsAsHash
+
+  def to_s ; to_hash.to_s ; end
+  def inspect ; to_s ; end
+
+  # compares so nil key is same as missing key
+  def ==(othr)
+    self.each_pair{|k,v| return false unless (v == othr[k]) }
+    othr.each_pair{|k,v| return false unless (v == self[k]) }
+    true
+  end
+end
+
+module HashlikeFuzzingHelper
+  SPECIAL_CASES_FOR_HASHLIKE_STRUCT = Hash.new({}).merge({
+      :[]    => [
+        [0], [1], [2], [100], [-1], # numeric keys are interpreted as positional args
+        [:z], ['z'],                # Struct doesn't allow access to undefined keys
+        [:z,  STRING_2X_PROC],
+        ['z', STRING_2X_PROC],
+        [:z, 100, STRING_2X_PROC],
+      ],
+      :[]=   => [
+        [:z, :a], ['z', :a],        # Struct doesn't allow access to undefined keys
+        [:z, 100, STRING_2X_PROC],
+      ],
+      :store     => [
+        [:z, :a], ['z', :a],        # Struct doesn't allow access to undefined keys
+        [:z, 100, STRING_2X_PROC],
+      ],
+      :each_pair => [
+        [TOTAL_V_PROC],             # Struct behaves differently on arity 1
+      ],
+    })
+end

data/spec/support/hashlike_via_delegation.rb

@@ -0,0 +1,30 @@
+#
+# A minimal implementation of a Hashlike for testing
+#
+# Delegates the basic 4 methods Hashlike expects ([], []=, delete, keys) to an
+# actual hash.
+#
+class InternalHash < Object
+
+  include Gorillib::Hashlike
+
+  attr_reader :myhsh
+  def initialize
+    @myhsh = {}
+  end
+  def [](*args,&blk)     @myhsh.[](*args, &blk)     ; end
+  def []=(*args,&blk)    @myhsh.[]=(*args, &blk)    ; end
+  def delete(*args,&blk) @myhsh.delete(*args, &blk) ; end
+  def keys(*args,&blk)   @myhsh.keys(*args, &blk)   ; end
+
+  def dup
+    d = super
+    d.instance_variable_set("@myhsh", @myhsh.dup)
+    d
+  end
+
+  def hash_eql?(other_hsh)
+    other_hsh = other_hsh.myhsh if other_hsh.is_a?(self.class)
+    @myhsh == other_hsh
+  end
+end

data/spec/support/matchers/be_array_eql.rb

@@ -0,0 +1,12 @@
+RSpec::Matchers.define(:be_array_eql) do |other_arr|
+  diffable
+  if RUBY_VERSION < '1.9'
+    match do |obj|
+      obj.sort_by(&:inspect) == other_arr.sort_by(&:inspect)
+    end
+  else
+    match do |obj|
+      obj == other_arr
+    end
+  end
+end

data/spec/support/matchers/be_hash_eql.rb

@@ -0,0 +1,14 @@
+RSpec::Matchers.define(:be_hash_eql) do |othr|
+  diffable
+  match do |obj|
+    if obj.respond_to?(:hash_eql?)
+      obj.hash_eql?(othr)
+    else
+      # same = (obj.length == othr.length)
+      same = true
+      ( othr.each_pair{|k,v| same &&= (v == obj[k]) } &&
+        obj .each_pair{|k,v| same &&= (v == othr[k]) })
+      same
+    end
+  end
+end

data/spec/support/matchers/enumerate_method.rb

@@ -0,0 +1,10 @@
+RSpec::Matchers.define(:enumerate_method) do |obj, meth|
+  match do |enum|
+    if RUBY_VERSION < '1.9'
+      enum.is_a?(Enumerable::Enumerator)
+    else
+      enum.is_a?(Enumerator) &&
+        (enum.inspect == "#<Enumerator: #{obj.inspect}:#{meth}>")
+    end
+  end
+end

data/spec/support/matchers/evaluate_to_true.rb

@@ -0,0 +1,5 @@
+RSpec::Matchers.define(:evaluate_to_true) do |meth, *args|
+  match{|obj| obj.send(meth, *args) == true }
+  failure_message_for_should{|obj|     "expected #{obj.inspect} to #{meth} #{args.join(",")}"}
+  failure_message_for_should_not{|obj| "expected #{obj.inspect} to not #{meth} #{args.join(",")}"}
+end

metadata

@@ -2,7 +2,7 @@
 name: gorillib
 version: !ruby/object:Gem::Version 
   prerelease: 
-  version: 0.0.8
+  version: 0.1.0
 platform: ruby
 authors: 
 - Infochimps
@@ -10,7 +10,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2011-05-20 00:00:00 -05:00
+date: 2011-06-07 00:00:00 -07:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency 
@@ -203,17 +203,29 @@ files:
 - lib/gorillib/array/deep_compact.rb
 - lib/gorillib/array/extract_options.rb
 - lib/gorillib/base.rb
-- lib/gorillib/datetime/#flat.rb#
 - lib/gorillib/datetime/flat.rb
 - lib/gorillib/datetime/parse.rb
 - lib/gorillib/enumerable/sum.rb
 - lib/gorillib/hash/compact.rb
 - lib/gorillib/hash/deep_compact.rb
+- lib/gorillib/hash/deep_dup.rb
 - lib/gorillib/hash/deep_merge.rb
+- lib/gorillib/hash/indifferent_access.rb
 - lib/gorillib/hash/keys.rb
 - lib/gorillib/hash/reverse_merge.rb
 - lib/gorillib/hash/slice.rb
+- lib/gorillib/hash/tree_merge.rb
 - lib/gorillib/hash/zip.rb
+- lib/gorillib/hashlike.rb
+- lib/gorillib/hashlike/compact.rb
+- lib/gorillib/hashlike/deep_compact.rb
+- lib/gorillib/hashlike/deep_dup.rb
+- lib/gorillib/hashlike/deep_merge.rb
+- lib/gorillib/hashlike/hashlike_via_accessors.rb
+- lib/gorillib/hashlike/keys.rb
+- lib/gorillib/hashlike/reverse_merge.rb
+- lib/gorillib/hashlike/slice.rb
+- lib/gorillib/hashlike/tree_merge.rb
 - lib/gorillib/logger/log.rb
 - lib/gorillib/metaprogramming/aliasing.rb
 - lib/gorillib/metaprogramming/cattr_accessor.rb
@@ -226,11 +238,21 @@ files:
 - lib/gorillib/object/blank.rb
 - lib/gorillib/object/try.rb
 - lib/gorillib/object/try_dup.rb
+- lib/gorillib/receiver.rb
+- lib/gorillib/receiver/active_model_shim.rb
+- lib/gorillib/receiver/acts_as_hash.rb
+- lib/gorillib/receiver/acts_as_loadable.rb
+- lib/gorillib/receiver/tree_diff.rb
+- lib/gorillib/receiver/validations.rb
 - lib/gorillib/some.rb
 - lib/gorillib/string/constantize.rb
 - lib/gorillib/string/human.rb
 - lib/gorillib/string/inflections.rb
 - lib/gorillib/string/truncate.rb
+- lib/gorillib/struct/acts_as_hash.rb
+- lib/gorillib/struct/hashlike_iteration.rb
+- notes/fancy_hashes_and_receivers.textile
+- notes/hash_rdocs.textile
 - spec/array/compact_blank_spec.rb
 - spec/array/extract_options_spec.rb
 - spec/datetime/flat_spec.rb
@@ -239,10 +261,16 @@ files:
 - spec/hash/compact_spec.rb
 - spec/hash/deep_compact_spec.rb
 - spec/hash/deep_merge_spec.rb
+- spec/hash/indifferent_access_spec.rb
 - spec/hash/keys_spec.rb
 - spec/hash/reverse_merge_spec.rb
 - spec/hash/slice_spec.rb
 - spec/hash/zip_spec.rb
+- spec/hashlike/behave_same_as_hash_spec.rb
+- spec/hashlike/hashlike_behavior_spec.rb
+- spec/hashlike/hashlike_via_accessors_fuzzing_spec.rb
+- spec/hashlike/hashlike_via_accessors_spec.rb
+- spec/hashlike_spec.rb
 - spec/logger/log_spec.rb
 - spec/metaprogramming/aliasing_spec.rb
 - spec/metaprogramming/cattr_accessor_spec.rb
@@ -254,13 +282,25 @@ files:
 - spec/object/blank_spec.rb
 - spec/object/try_dup_spec.rb
 - spec/object/try_spec.rb
+- spec/receiver/acts_as_hash_spec.rb
+- spec/receiver_spec.rb
 - spec/spec_helper.rb
 - spec/string/constantize_spec.rb
 - spec/string/human_spec.rb
 - spec/string/inflections_spec.rb
 - spec/string/inflector_test_cases.rb
 - spec/string/truncate_spec.rb
+- spec/struct/acts_as_hash_fuzz_spec.rb
+- spec/struct/acts_as_hash_spec.rb
+- spec/support/hashlike_fuzzing_helper.rb
+- spec/support/hashlike_helper.rb
+- spec/support/hashlike_struct_helper.rb
+- spec/support/hashlike_via_delegation.rb
 - spec/support/kcode_test_helper.rb
+- spec/support/matchers/be_array_eql.rb
+- spec/support/matchers/be_hash_eql.rb
+- spec/support/matchers/enumerate_method.rb
+- spec/support/matchers/evaluate_to_true.rb
 has_rdoc: true
 homepage: http://infochimps.com/labs
 licenses: 
@@ -275,7 +315,7 @@ required_ruby_version: !ruby/object:Gem::Requirement
   requirements: 
   - - ">="
     - !ruby/object:Gem::Version 
-      hash: 991802759410469185
+      hash: 973162575614506299
       segments: 
       - 0
       version: "0"
@@ -301,10 +341,16 @@ test_files:
 - spec/hash/compact_spec.rb
 - spec/hash/deep_compact_spec.rb
 - spec/hash/deep_merge_spec.rb
+- spec/hash/indifferent_access_spec.rb
 - spec/hash/keys_spec.rb
 - spec/hash/reverse_merge_spec.rb
 - spec/hash/slice_spec.rb
 - spec/hash/zip_spec.rb
+- spec/hashlike/behave_same_as_hash_spec.rb
+- spec/hashlike/hashlike_behavior_spec.rb
+- spec/hashlike/hashlike_via_accessors_fuzzing_spec.rb
+- spec/hashlike/hashlike_via_accessors_spec.rb
+- spec/hashlike_spec.rb
 - spec/logger/log_spec.rb
 - spec/metaprogramming/aliasing_spec.rb
 - spec/metaprogramming/cattr_accessor_spec.rb
@@ -316,10 +362,22 @@ test_files:
 - spec/object/blank_spec.rb
 - spec/object/try_dup_spec.rb
 - spec/object/try_spec.rb
+- spec/receiver/acts_as_hash_spec.rb
+- spec/receiver_spec.rb
 - spec/spec_helper.rb
 - spec/string/constantize_spec.rb
 - spec/string/human_spec.rb
 - spec/string/inflections_spec.rb
 - spec/string/inflector_test_cases.rb
 - spec/string/truncate_spec.rb
+- spec/struct/acts_as_hash_fuzz_spec.rb
+- spec/struct/acts_as_hash_spec.rb
+- spec/support/hashlike_fuzzing_helper.rb
+- spec/support/hashlike_helper.rb
+- spec/support/hashlike_struct_helper.rb
+- spec/support/hashlike_via_delegation.rb
 - spec/support/kcode_test_helper.rb
+- spec/support/matchers/be_array_eql.rb
+- spec/support/matchers/be_hash_eql.rb
+- spec/support/matchers/enumerate_method.rb
+- spec/support/matchers/evaluate_to_true.rb