gibbler 0.7.0 → 0.7.1

data/tryouts/10_basic_tryouts.rb

@@ -1,153 +0,0 @@
-
-library :gibbler, 'lib'
-group "Gibbler Gazette"
-
-Gibbler.enable_debug if Tryouts.verbose > 3
-
-tryouts "Basic syntax with SHA1" do
-  
-  dream :exception, RuntimeError
-  drill "include Gibbler raises exception" do
-    a = Class.new
-    a.send :include, Gibbler
-  end
-  
-  dream :respond_to?, :gibbler
-  dream :gibbler, '52be7494a602d85ff5d8a8ab4ffe7f1b171587df' 
-  drill "Symbol can gibbler", :kimmy
-  
-  dream :respond_to?, :gibbler
-  dream :gibbler, 'c8027100ecc54945ab15ddac529230e38b1ba6a1' 
-  drill "String can gibbler" do
-    "kimmy"
-  end
-  
-  drill "String and Symbol return different digests", true do
-    :kimmy.gibbler != "kimmy"
-  end
-  
-  dream :respond_to?, :gibbler
-  dream :gibbler, '25ac269ae3ef18cdb4143ad02ca315afb5026de9' 
-  drill "Class can gibbler", Class
-  
-  dream :respond_to?, :gibbler
-  dream :gibbler, '4fdcadc66a38feb9c57faf3c5a18d5e76a6d29bf' 
-  drill "Empty Hash instance", Hash.new
-  
-  dream :gibbler, 'a9cad665549bd22a4346fcf602d9d3c3b0482bbe'
-  drill "Fixnum instance" do
-    1
-  end
-  
-  dream :gibbler, '608256db120251843843bba57e9b2c7adb7342aa'
-  drill "Bignum instance" do
-    100000000000
-  end
-  
-  dream :gibbler, "1d4b62e1e9f2c097b0cefb6877bf47c2015cdd21"
-  drill "Populated Hash instance" do
-    {
-      :a => [1,2,3, [4,5,6]],
-      :b => { :c => Class }
-    }
-  end
-  
-  dream :respond_to?, :gibbler
-  dream :gibbler, '48fda57c05684c9e5c3259557851943572183a21' 
-  drill "Empty Array instance", Array.new
-  
-  dream :gibbler, "3e1d79d113a409a96a13ca3879fc4c42027aa74b"
-  drill "Populated Array instance" do
-    [1, 2, :runtime, [3, "four", [Object, true]]]
-  end 
-  
-  drill "Knows when a Hash has not changed", false do
-    a = { :magic => true }
-    a.gibbler
-    a[:magic] = true
-    a.gibbled?
-  end
-  
-  drill "Knows when a Hash has changed", true do
-    a = { :magic => true }
-    a.gibbler
-    a[:magic] = false
-    a.gibbled?
-  end
-  
-  dream ["667ce086", "92d5f7cd"]
-  drill "Symbols digests don't cross streams" do
-    a, b = :something, :anything
-    a.gibbler
-    b.gibbler
-    [a.gibbler_cache.short, b.gibbler_cache.short]
-  end
-  
-  dream ["ce0c7694", "c13b2f02"]
-  drill "String digests don't cross streams" do
-    a, b = 'something', 'anything'
-    a.gibbler
-    b.gibbler
-    [a.gibbler_cache.short, b.gibbler_cache.short]
-  end
-  
-  drill "Symbol has list of attic vars", [:gibbler_cache] do
-    Symbol.attic_vars
-  end
-
-  drill "String has list of attic vars", [:gibbler_cache] do
-    String.attic_vars
-  end
-  
-  drill "Hash has list of attic vars", [:gibbler_cache] do
-    Hash.attic_vars
-  end
-  
-  drill "Freezing an object will update the digest", true do
-    a = { :a => 1 }
-    pre  = a.gibbler; 
-    a[:a] = 2 
-    post = a.freeze.gibbler
-    stash :pre, pre
-    stash :post, post
-    pre != post && post == a.gibbler_cache
-  end
-  
-  dream :gibbler, "6ea546919dc4caa2bab69799b71d48810a1b48fa"
-  drill "works on arbitrary objects" do
-    class ::FullHouse
-      include Gibbler::Complex
-      attr_accessor :roles
-    end
-    a = FullHouse.new
-    a.roles = [:jesse, :joey, :danny, :kimmy, :michelle, :dj, :stephanie]
-    a
-  end
-  
-  # TODO: Update for Attic 0.4
-  drill "doesn't reveal @__gibbler_digest__ instance variable", false do
-    a = {}
-    a.gibbler  # We need to gibbler first so it sets a value to the instance var
-    val = Tryouts.sysinfo.ruby[1] == 9 ? :'@__gibbler_digest__' : '@__gibbler_digest__'
-    stash :ivars, a.instance_variables
-    stash :smeths, Gibbler.singleton_methods
-    a.instance_variables.member? val
-  end
-  
-  drill "previous digest", 'c8027100ecc54945ab15ddac529230e38b1ba6a1' do
-    a = "kimmy"
-    a.gibbler
-    #stash :methods, a.methods.sort
-    #
-    #stash :string_methods, String.methods.sort
-    #stash :gstring_methods, Gibbler::String.methods.sort
-    #stash :class_methods, a.class.methods.sort
-    stash :ivars, a.instance_variables
-    a.gibbler_cache
-  end
-  
-end
-
-
-
-

data/tryouts/11_basic_sha256_tryouts.rb

@@ -1,40 +0,0 @@
-
-library :gibbler, File.dirname(__FILE__), '..', 'lib'
-group "Gibbler Gazette"
-
-Gibbler.enable_debug if Tryouts.verbose > 3
-
-
-tryouts "Basic syntax with SHA256" do
-  
-  setup do
-    # NOTE: JRuby requires that we use OpenSSL::Digest::SHA256
-    if Tryouts.sysinfo.vm == :java 
-      require 'openssl'
-      Gibbler.digest_type = OpenSSL::Digest::SHA256
-    else
-      Gibbler.digest_type = Digest::SHA256
-    end
-    
-  end
-  
-  clean do
-    Gibbler.digest_type = Digest::SHA1
-  end
-  
-  dream :gibbler, '754f87ca720ec256633a286d9270d68478850b2abd7b0ae65021cb769ae70c08' 
-  drill "A Symbol can gibbler", :anything
-  
-  dream :gibbler, 'd345c0afb4e8da0133a3946d3bd9b2622b0acdd8d6cc1237470cc637a9e4777f' 
-  drill "Class can gibbler", Class
-  
-  dream :gibbler, 'b7b874a9bff7825caa57750a900652354ac601b77497b694d313f658c69d25b4' 
-  drill "TrueClass can gibbler", TrueClass
-  
-  dream :gibbler, '88d2bcbd68ce593fd2e0e06f276f7301357516291b95c0c53038e61a9bf091e5' 
-  drill "Empty Hash instance", {}
-  
-end
-
-
-

data/tryouts/14_extended_tryouts.rb

@@ -1,97 +0,0 @@
-
-library :gibbler, 'lib'
-group "Gibbler Gazette"
-
-Gibbler.enable_debug if Tryouts.verbose > 3
-Gibbler.digest_type = Digest::SHA1
-
-tryouts "Extended object tryouts" do
-
-  dream :gibbler, 'f2b0150c84c5c834406ec9cdec989a0fa938b4ad' 
-  drill "true can gibbler", true
-  
-  dream :gibbler, 'abee839edf5f9c101c505c28987ca35c31c7fc8d' 
-  drill "false can gibbler", false
-  
-  dream :gibbler, '583fb214ec50d2c4a123cc52de0c65e801d13516' 
-  drill "TrueClass can gibbler", TrueClass
-  
-  dream :gibbler, '11f262be475ddf38a25888e9f6ec82f384a7c58b' 
-  drill "FalseClass can gibbler", FalseClass
-  
-  dream :gibbler, '25ac269ae3ef18cdb4143ad02ca315afb5026de9' 
-  drill "Class can gibbler", Class
-  
-  dream :gibbler, '5620e4a8b10ec6830fece61d33f5d3e9a349b4c2' 
-  drill "Object can gibbler", Object
-  
-  dream :gibbler, '083feec632e6cd5347e3fb3c7048365c3a0d710e' 
-  drill "Class instance can gibbler", Class.new
-  
-  dream :gibbler, '7295241e929ffd7cc974cf8d4481291e070937fc' 
-  drill "Module can gibbler", Module
-  
-  dream :gibbler, '6b5a192fd377dfc5c2828a3ad6105b68b6db33d5' 
-  drill "Module instance can gibbler", Module.new
-  
-  dream :gibbler, '8640f7abcbcb80e3825ed827bf36819e26119e16' 
-  drill "Proc can gibbler", Proc
-  
-  dream :gibbler, 'd73ae2a7bc2058b05dbc1952d8abf004167109e0' 
-  drill "Range instance (..) can gibbler", 1..100
-  
-  dream :gibbler, '46c8a7d0163144819c440bf6734a8101cd72c04a' 
-  drill "Range instance (...) can gibbler", 1...100
-  
-  drill "Range (..) doesn't equal range (...)", true do
-     ('a'..'e').gibbler != ('a'...'e').gibbler
-  end
-  
-  dream '06fdf26b2a64e90cd35ea9162d9cc48c9f6bb13c'
-  drill "nil has a gibbler", nil.gibbler
-  
-  
-  dream :gibbler, '7295241e929ffd7cc974cf8d4481291e070937fc' 
-  drill "Module can gibbler", Module
-
-  dream :gibbler, '6b5a192fd377dfc5c2828a3ad6105b68b6db33d5' 
-  drill "Module instance can gibbler", Module.new
-
-  dream :gibbler, '25ac269ae3ef18cdb4143ad02ca315afb5026de9' 
-  drill "Class can gibbler", Class
-
-end
-
-
-tryouts "Proc" do
-  
-  setup do
-    class ::MyProc < Proc; end
-  end
-  
-  dream :gibbler, '12075835e94be34438376cd7a54c8db7e746f15d' 
-  drill "Proc.new can gibbler", Proc.new() { }
-  
-  dream :gibbler, '8640f7abcbcb80e3825ed827bf36819e26119e16' 
-  drill "Proc can gibbler", Proc
-    
-  dream :gibbler, '12075835e94be34438376cd7a54c8db7e746f15d' 
-  drill "proc can gibbler", proc {}
-
-  dream :gibbler, '12075835e94be34438376cd7a54c8db7e746f15d' 
-  drill "lambda can gibbler", lambda {}
-  
-  dream :gibbler, '12075835e94be34438376cd7a54c8db7e746f15d' 
-  drill "lambda gibbler is not aware of arity", lambda { |v| }
-  
-  dream :gibbler, '12075835e94be34438376cd7a54c8db7e746f15d' 
-  drill "proc gibbler is not aware of arity", proc { |v| }
-  
-  dream :gibbler, '12075835e94be34438376cd7a54c8db7e746f15d' 
-  drill "Proc gibbler is not aware of proc payload", proc { |v| 1; }
-  
-  dream :gibbler, "c979a45653acaddcb9c1581a7de49c94ac96e128"
-  drill "MyProc has a different digest" do
-    MyProc.new() { }
-  end
-end

data/tryouts/15_file_tryouts.rb

@@ -1,47 +0,0 @@
-require 'tempfile'
-
-library :gibbler, 'lib'
-group "Gibbler Gazette"
-
-Gibbler.enable_debug if Tryouts.verbose > 3
-Gibbler.digest_type = Digest::SHA1
-
-tryouts "File object tryouts" do
-  set :tempfile, "tryouts-9000-awesome.txt"
-  
-  clean do
-    File.unlink tempfile if File.exists? tempfile
-  end
-  
-  dream :gibbler, '33027386bd95e91efc4711648d488519062d828f' 
-  drill "File can gibbler" do
-    path = File.join(File.dirname(__FILE__), '..', 'CHANGES.txt')
-    File.new(File.expand_path(path))
-  end
-  
-  dream :gibbler, '4c131b7e5f9e7b841b4501d2d002785d3730ae19' 
-  drill "Gibbler is different for each path" do
-    path = File.join(File.dirname(__FILE__), '..', 'README.rdoc')
-    File.new(File.expand_path(path))
-  end
-  
-  ## JRuby doesn't like to use File.new with directories
-  ##dream :gibbler, '92cbcb7de73d7748b28d9e911f461013de34410f' 
-  ##drill "File gibbler cares about trailing slash (/tmp/)", File.new(__FILE__)
-   
-  dream :respond_to?, :gibbler
-  drill "TempFile can gibbler", Tempfile.new('gibbler')
-  
-  drill "TempFile digests change", false do
-    Tempfile.new('gibbler').gibbler == Tempfile.new('gibbler').gibbler
-  end
-  
-  dream :gibbler, '6d93f752fc23f36bffa5ddf9ee97d04be82efbdb'
-  drill "File doesn't care about file contents" do
-    f = File.open tempfile, 'w'
-    f.puts "World's Finest Number: " << "#{rand}"
-    f.close
-    stash :file_contents, File.read(tempfile)
-    File.new tempfile
-  end
-end

data/tryouts/16_uri_tryouts.rb

@@ -1,41 +0,0 @@
-require 'uri'
-
-library :gibbler, 'lib'
-group "Gibbler Gazette"
-
-Gibbler.enable_debug if Tryouts.verbose > 3
-Gibbler.digest_type = Digest::SHA1
-
-tryouts "URI object tryouts" do
-  
-  dream :gibbler, "9efe60a5db66aecf9b5fb8655b0bab0fcc7bd0c5"
-  drill "URI::HTTP can gibbler" do
-    uri = URI.parse "http://localhost:3114/spaceship"
-    uri
-  end
-  
-  dream :gibbler, "b75d3c34e60d6feafa796ddbb51e45710f6b106d"
-  drill "URI::HTTPS can gibbler" do
-    uri = URI.parse "https://localhost:3114/spaceship"
-    uri
-  end
-  
-  dream :gibbler, "191b0072b95ca0c79ed75e6deb5b28562dd9e5b9"
-  drill "URI::HTTP is trailing slash sensitive" do
-    uri = URI.parse "http://localhost:3114/spaceship/"
-    uri
-  end
-  
-  dream :gibbler, "d378372934326947113489d1f36f4853bef90a65"
-  drill "URI::Generic can gibbler" do
-    uri = URI.parse "localhost:3114/spaceship"
-    uri
-  end
-  
-  dream :gibbler, "9d0543b31afebac9e8d38c56a0cf12070779f790"
-  drill "URI::FTP can gibbler" do
-    uri = URI.parse "ftp://localhost:3114/spaceship"
-    uri
-  end
-  
-end

data/tryouts/20_time_tryouts.rb

@@ -1,35 +0,0 @@
-require 'date'
-
-library :gibbler, 'lib'
-group "Gibbler Gazette"
-
-Gibbler.enable_debug if Tryouts.verbose > 3
-Gibbler.digest_type = Digest::SHA1
-
-tryouts "Time tryouts" do
-  
-  dream :gibbler, 'c8403fc35481fdf7f6f4a0e7262b1c9610bdebaa'
-  drill "Date instance can gibbler", Date.parse('2009-08-25')
-  
-  dream :gibbler, '73b4635fc63b8dd32b622776201f98a37478be90'
-  drill "Time instance can gibbler", Time.parse('2009-08-25 16:43:53 UTC')
-  
-  dream :gibbler, 'd35546d6517c02f2a219ecfa2261a5274d217cb7'
-  drill "Time instance can gibbler with single digit values" do 
-    Time.parse('2009-01-01 01:01:01 UTC')
-  end
-  
-  dream :gibbler, 'ad64c7694a50becf55c53485dce5d0013ff65785'
-  drill "DateTime instance can gibbler", DateTime.parse('2009-08-25T17:00:40+00:00')
-  
-  dream Time.parse('2009-08-25 12:43:53 -04:00').gibbler
-  drill "Time digest is based on UTC" do
-    Time.parse('2009-08-25 16:43:53 UTC').gibbler
-  end
-  
-  dream DateTime.parse('2009-08-25T13:00:40-04:00').gibbler
-  drill "DateTime digest is based on UTC" do
-    DateTime.parse('2009-08-25T17:00:40+00:00').gibbler
-  end
-  
-end

data/tryouts/50_history_tryouts.rb

@@ -1,42 +0,0 @@
-
-library :gibbler, File.dirname(__FILE__), '..', 'lib'
-library 'gibbler/history', File.dirname(__FILE__), '..', 'lib'
-
-group "History"
-
-tryouts "Basics" do
-  
-  dream "d7049916ddb25e6cc438b1028fb957e5139f9910"
-  drill "can convert short digest into long" do
-    a = { :magic => :original }
-    g = a.gibbler_commit.short
-      stash :short, g
-    a.gibbler_find_long g
-  end
-  
-  dream :class, Time
-  drill "can return most recent stamp" do
-    a = { :magic => :original }
-    a.gibbler_commit
-      stash :hist, a.gibbler_history
-    a.gibbler_stamp
-  end
-  
-  dream ["d7049916ddb25e6cc438b1028fb957e5139f9910", "0b11c377fccd44554a601e5d2b135c46dc1c4cb1"]
-  drill "can return history" do
-    a = { :magic => :original }
-    a.gibbler_commit
-    a[:magic] = :changed
-    a.gibbler_commit
-    a.gibbler_history
-  end
-  
-  dream ["d7049916", "0b11c377"]
-  drill "can return history (short)" do
-    a = { :magic => :original }
-    a.gibbler_commit
-    a[:magic] = :changed
-    a.gibbler_commit
-    a.gibbler_history(:short)
-  end
-end

data/tryouts/51_hash_history_tryouts.rb

@@ -1,91 +0,0 @@
-
-
-library :gibbler, File.dirname(__FILE__), '..', 'lib'
-library 'gibbler/history', File.dirname(__FILE__), '..', 'lib'
-
-group "History"
-
-Gibbler.enable_debug if Tryouts.verbose > 3
-
-
-tryouts "Hash History" do
-  
-  drill "Setup Hash class", Hash do
-    class ::Hash
-      include Gibbler::History
-    end
-  end
-  
-  drill "doesn't reveal self.__gibbler_history instance variable", false do
-    a = {}
-    a.gibbler  # We need to gibbler first so it sets a value to the instance var
-    val = Tryouts.sysinfo.ruby[1] == 9 ? :'self.__gibbler_history' : 'self.__gibbler_history'
-    a.instance_variables.member? val
-  end
-  
-  drill "can take a Hash snapshot", 'd7049916ddb25e6cc438b1028fb957e5139f9910' do
-    a = { :magic => :original }
-    a.gibbler_commit
-  end
-  
-  dream :class, Array
-  dream :size, 2
-  dream ['d7049916ddb25e6cc438b1028fb957e5139f9910', 'b668098e16d08898532bf3aa33ce2253a3a4150e']
-  drill "return a Hash history" do
-    a = { :magic => :original }
-    a.gibbler_commit
-    a[:magic] = :updated
-    a.gibbler_commit
-    a.gibbler_history
-  end
-  
-  dream 'd7049916ddb25e6cc438b1028fb957e5139f9910'
-  drill "can revert Hash" do
-    a = { :magic => :original }
-    a.gibbler_commit
-    a[:magic] = :updated
-    a.gibbler_revert!
-  end
-  
-  drill "knows a valid gibble", true do
-    a = { :magic => :original }
-    a.gibbler_commit
-    a.gibbler_valid? 'd7049916ddb25e6cc438b1028fb957e5139f9910'
-  end
-  
-  drill "knows an invalid gibble", false do
-    a = { :magic => :original }
-    a.gibbler_commit
-    a.gibbler_valid? '2222222222222222222222222222222222222222'
-  end
-  
-  dream Hash[:magic => :original]
-  drill "can revert to any valid gibble" do
-    a = { :magic => :original }
-    a.gibbler_commit
-    a[:magic] = :updated
-    a.gibbler_commit
-    a[:magic] = :changed
-    a.gibbler_commit
-    a.gibbler_revert! 'd7049916ddb25e6cc438b1028fb957e5139f9910'
-    a
-  end
-  
-  dream Hash[:magic => :original]
-  dream :gibbler, 'd7049916ddb25e6cc438b1028fb957e5139f9910'
-  drill "revert does nothing if digest is the same as current one" do
-    a = { :magic => :original }
-    a.gibbler_commit
-    a.gibbler_revert!
-    a
-  end
-  
-  dream 'd7049916ddb25e6cc438b1028fb957e5139f9910'
-  drill "can revert using short gibble" do
-    a = { :magic => :original }
-    a.gibbler_commit
-    a[:magic] = :updated
-    a.gibbler_revert! 'd7049916'
-  end
-  
-end

data/tryouts/52_array_history_tryouts.rb

@@ -1,44 +0,0 @@
-
-library :gibbler, File.dirname(__FILE__), '..', 'lib'
-library 'gibbler/history', File.dirname(__FILE__), '..', 'lib'
-
-group "History"
-
-Gibbler.enable_debug if Tryouts.verbose > 3
-
-
-tryouts "Array History" do
-  
-  drill "Setup Array class", Array do
-    class ::Array
-      include Gibbler::History
-    end
-  end
-  
-  drill "can take a Array snapshot", 'd95fcabb498ae282f356eba63da541e4f72c6efa' do
-    a = [:jesse]
-    a.gibbler_commit
-  end
-  
-  dream :class, Array
-  dream :size, 2
-  dream ['d95fcabb498ae282f356eba63da541e4f72c6efa', 'eebcb2e84e828b1a7207af4d588cf41fd4c6393a']
-  drill "return an Array history" do
-    a = [:jesse]
-    a.gibbler_commit
-    a << :joey
-    a.gibbler_commit
-    a.gibbler_history
-  end
-  
-  dream 'd95fcabb498ae282f356eba63da541e4f72c6efa'
-  drill "can revert Array" do
-    a = [:jesse]
-    stash :original, a.gibbler_commit
-    a << :joey
-    stash :updated, a.gibbler
-    a.gibbler_revert!
-  end
-  
-  
-end

data/tryouts/53_string_history_tryouts.rb

@@ -1,43 +0,0 @@
-library :gibbler, File.dirname(__FILE__), '..', 'lib'
-library 'gibbler/history', File.dirname(__FILE__), '..', 'lib'
-
-group "History"
-
-Gibbler.enable_debug if Tryouts.verbose > 3
-
-
-tryouts "String History" do
-  
-  drill "Setup String class", String do
-    class ::String
-      include Gibbler::History
-    end
-  end
-  
-  drill "can take a String snapshot", 'c8027100ecc54945ab15ddac529230e38b1ba6a1' do
-    a = "kimmy"
-    a.gibbler_commit
-  end
-  
-  dream :class, Array
-  dream :size, 2
-  dream ['c8027100ecc54945ab15ddac529230e38b1ba6a1', '692c05d3186baf2da36e87b7bc5fe53ef13b902e']
-  drill "return a String history" do
-    a = "kimmy"
-    a.gibbler_commit
-    a << " gibbler"
-    a.gibbler_commit
-    a.gibbler_history
-  end
-  
-  dream 'c8027100ecc54945ab15ddac529230e38b1ba6a1'
-  drill "can revert String" do
-    a = "kimmy"
-    stash :original, a.gibbler_commit
-    a << " gibbler"
-    stash :updated, a.gibbler
-    a.gibbler_revert!
-  end
-  
-end
-

data/tryouts/57_arbitrary_history_tryouts.rb

@@ -1,45 +0,0 @@
-library :gibbler, File.dirname(__FILE__), '..', 'lib'
-library 'gibbler/history', File.dirname(__FILE__), '..', 'lib'
-
-group "History"
-
-Gibbler.enable_debug if Tryouts.verbose > 3
-
-
-
-tryouts "Arbitrary Object History" do
-  
-  drill "Setup String class", 'FullHouse' do
-    class ::FullHouse
-      include Gibbler::Complex
-      include Gibbler::History
-      attr_accessor :roles
-    end
-    FullHouse.to_s
-  end
-  
-  drill "can take a FullHouse snapshot", '4192d4cb59975813f117a51dcd4454ac16df6703' do
-    a = FullHouse.new
-    a.gibbler_commit
-  end
-  
-  dream ['4192d4cb59975813f117a51dcd4454ac16df6703', '2c6957aa1e734d2a3a71caf569a7461a3bf26f11']
-  drill "return a FullHouse history" do
-    a = FullHouse.new
-    a.gibbler_commit
-    a.roles = [:jesse]
-    a.gibbler_commit
-    a.gibbler_history
-  end
-  
-  dream '4192d4cb59975813f117a51dcd4454ac16df6703'
-  drill "can revert FullHouse" do
-    a = FullHouse.new
-    stash :original, a.gibbler_commit
-    a.roles = [:jesse]
-    stash :updated, a.gibbler
-    a.gibbler_revert!
-  end
-  
-end
-