gold-record 0.1.0

data/test/cases/acts_as_gold_record_test.rb

@@ -0,0 +1,32 @@
+require 'cases/helper'
+require 'models/label'
+require 'models/artist'
+require 'models/album'
+require 'models/song'
+require 'models/fan'
+
+class ActsAsGoldRecordTest < ActiveRecord::TestCase
+  def test_label_does_not_identify_as_gold_record
+    assert !Label.respond_to?(:gold_record?)
+  end
+  
+  def test_artist_identifies_as_gold_record
+    assert Artist.respond_to?(:gold_record?)
+    assert Artist.gold_record?
+  end
+  
+  def test_album_identifies_as_gold_record
+    assert Album.respond_to?(:gold_record?)
+    assert Album.gold_record?
+  end
+  
+  def test_song_identifies_as_gold_record
+    assert Song.respond_to?(:gold_record?)
+    assert Song.gold_record?
+  end
+  
+  def test_fan_identifies_as_gold_record
+    assert Fan.respond_to?(:gold_record?)
+    assert Fan.gold_record?
+  end
+end

data/test/cases/associations/belongs_to_integer_association_test.rb

@@ -0,0 +1,13 @@
+require 'cases/helper'
+require 'models/artist'
+
+class BelongsToIntegerAssociationTest < ActiveRecord::TestCase
+  fixtures :labels
+  fixtures :artists
+
+  def test_association_find
+    artist = artists(:beatles)
+    label = labels(:emi)
+    assert_equal label, artist.label
+  end
+end

data/test/cases/associations/belongs_to_uuid_association_test.rb

@@ -0,0 +1,13 @@
+require 'cases/helper'
+require 'models/artist'
+
+class BelongsToUuidAssociationTest < ActiveRecord::TestCase
+  fixtures :artists
+  fixtures :albums
+
+  def test_association_find
+    album = albums(:white_album)
+    artist = artists(:beatles)
+    assert_equal artist, album.artist
+  end
+end

data/test/cases/associations/habtm_integer_to_integer_association_test.rb

@@ -0,0 +1,23 @@
+require 'cases/helper'
+require 'models/record_store'
+require 'models/label'
+
+class HabtmIntegerToIntegerAssociationTest < ActiveRecord::TestCase
+  fixtures :record_stores
+  fixtures :labels
+
+  def test_association_find
+    record_store = record_stores(:amoeba)
+    labels = record_store.labels
+    assert_equal 4, labels.size
+    labels.each do |labels|
+      assert labels.instance_of?(Label)
+    end
+  end
+  
+  def test_empty_assocation_find
+    record_store = record_stores(:tower)
+    labels = record_store.labels
+    assert_equal 0, labels.size
+  end
+end

data/test/cases/associations/habtm_integer_to_uuid_association_test.rb

@@ -0,0 +1,23 @@
+require 'cases/helper'
+require 'models/record_store'
+require 'models/artist'
+
+class HabtmIntegerToIntegerAssociationTest < ActiveRecord::TestCase
+  fixtures :record_stores
+  fixtures :artists
+
+  def test_association_find
+    record_store = record_stores(:amoeba)
+    artists = record_store.artists
+    assert_equal 6, artists.size
+    artists.each do |artists|
+      assert artists.instance_of?(Artist)
+    end
+  end
+  
+  def test_empty_assocation_find
+    record_store = record_stores(:tower)
+    artists = record_store.artists
+    assert_equal 0, artists.size
+  end
+end

data/test/cases/associations/habtm_uuid_to_uuid_association_test.rb

@@ -0,0 +1,23 @@
+require 'cases/helper'
+require 'models/artist'
+require 'models/fan'
+
+class HabtmUuidToUuidAssociationTest < ActiveRecord::TestCase
+  fixtures :artists
+  fixtures :fans
+
+  def test_association_find
+    artist = artists(:beatles)
+    fans = artist.fans
+    assert_equal 8, fans.size
+    fans.each do |fans|
+      assert fans.instance_of?(Fan)
+    end
+  end
+  
+  def test_empty_assocation_find
+    artist = artists(:ll_cool_j)
+    fans = artist.fans
+    assert_equal 0, fans.size
+  end
+end

data/test/cases/associations/has_many_integer_assocation_test.rb

@@ -0,0 +1,16 @@
+require 'cases/helper'
+require 'models/artist'
+
+class HasManyIntegerAssociationTest < ActiveRecord::TestCase
+  fixtures :labels
+  fixtures :artists
+
+  def test_association_find
+    label = labels(:def_jam)
+    artists = label.artists
+    assert_equal 4, artists.size
+    artists.each do |artist|
+      assert artist.instance_of?(Artist)
+    end
+  end
+end

data/test/cases/associations/has_many_uuid_association_test.rb

@@ -0,0 +1,16 @@
+require 'cases/helper'
+require 'models/artist'
+
+class HasManyUuidAssociationTest < ActiveRecord::TestCase
+  fixtures :artists
+  fixtures :albums
+
+  def test_association_find
+    artist = artists(:beatles)
+    albums = artist.albums
+    assert_equal 3, albums.size
+    albums.each do |album|
+      assert album.instance_of?(Album)
+    end
+  end
+end

data/test/cases/coerce_id_test.rb

@@ -0,0 +1,20 @@
+require 'cases/helper'
+require 'models/artist'
+
+class CoerceIdTest < ActiveRecord::TestCase
+  def test_coerce_id_with_nil
+    assert_nil Artist.coerce_id(nil)
+  end
+
+  def test_coerce_id_with_bogus_data
+    assert_nil Artist.coerce_id("BOGUS")
+  end
+
+  def test_coerce_id_with_binary_uuid
+    assert_equal NULL_UUID_RAW, Artist.coerce_id(NULL_UUID_RAW)
+  end
+
+  def test_coerce_id_with_hex_uuid
+    assert_equal NULL_UUID_RAW, Artist.coerce_id(NULL_UUID.to_s)
+  end
+end

data/test/cases/find_test.rb

@@ -0,0 +1,67 @@
+require 'cases/helper'
+require 'models/artist'
+
+class FindTest < ActiveRecord::TestCase
+  fixtures :artists
+
+  def test_find_with_one_binary_uuid
+    artist = Artist.find identify(:michael_jackson)
+    assert artist.instance_of?(Artist)
+  end
+
+  def test_find_with_one_hex_uuid
+    artist = Artist.find identify_hex(:michael_jackson)
+    assert artist.instance_of?(Artist)
+  end
+
+  def test_find_with_multiple_binary_uuids
+    artists = Artist.find([
+      identify(:beatles),
+      identify(:ll_cool_j),
+      identify(:method_man),
+    ])
+    assert_equal 3, artists.size
+    artists.each do |artist|
+      assert artist.instance_of?(Artist)
+    end
+  end
+
+  def test_find_with_multiple_hex_uuids
+    artists = Artist.find([
+      identify_hex(:method_man),
+      identify_hex(:beatles),
+      identify_hex(:warren_g),
+    ])
+    assert_equal 3, artists.size
+    artists.each do |artist|
+      assert artist.instance_of?(Artist)
+    end
+  end
+
+  def test_find_with_multiple_mixed_uuids
+    artists = Artist.find([
+      identify_hex(:beatles),
+      identify(:michael_jackson),
+      identify_hex(:warren_g),
+    ])
+    assert_equal 3, artists.size
+    artists.each do |artist|
+      assert artist.instance_of?(Artist)
+    end
+  end
+
+  def test_find_with_duplicate_mixed_uuids
+    artists = Artist.find([
+      identify(:beatles),
+      identify(:method_man),
+      identify(:warren_g),
+      identify_hex(:beatles),
+      identify_hex(:method_man),
+      identify_hex(:warren_g),
+    ])
+    assert_equal 3, artists.size
+    artists.each do |artist|
+      assert artist.instance_of?(Artist)
+    end
+  end
+end

data/test/cases/generate_id_test.rb

@@ -0,0 +1,25 @@
+require 'cases/helper'
+require 'models/artist'
+
+class GenerateIdTest < ActiveRecord::TestCase
+  fixtures :artists
+
+  def test_generate_id_for_new_record
+    artist = Artist.new
+    assert artist.new_record?
+    assert_nil artist.id
+    artist.generate_id!
+    assert artist.id.instance_of?(String)
+    assert_equal 16, artist.id.size
+  end
+
+  def test_generate_id_for_existing_record
+    artist = Artist.first
+    assert !artist.new_record?
+    assert artist.id.instance_of?(String)
+    assert_equal 16, artist.id.size
+    id = artist.id
+    artist.generate_id!
+    assert_equal artist.id, id
+  end
+end

data/test/cases/helper.rb

@@ -0,0 +1,85 @@
+$:.unshift(File.dirname(__FILE__) + '/../../lib')
+$:.unshift(File.dirname(__FILE__) + '/../../../activesupport/lib')
+
+require 'config'
+
+require 'rubygems'
+require 'test/unit'
+require 'stringio'
+
+require 'active_record'
+require 'active_record/test_case'
+require 'active_record/fixtures'
+require 'connection'
+
+require 'uuidtools'
+
+require 'gold_record'
+
+# Patch Fixtures
+Fixtures.send :include, GoldRecord::Fixtures
+
+# UUID composed of all null bytes
+NULL_UUID_RAW = ("\000" * 16).freeze
+NULL_UUID = UUIDTools::UUID.parse_raw(NULL_UUID_RAW)
+NULL_UUID_HEX = NULL_UUID.to_s
+
+# Show backtraces for deprecated behavior for quicker cleanup.
+ActiveSupport::Deprecation.debug = true
+
+# Quote "type" if it's a reserved word for the current connection.
+QUOTED_TYPE = ActiveRecord::Base.connection.quote_column_name('type')
+
+def current_adapter?(*types)
+  types.any? do |type|
+    ActiveRecord::ConnectionAdapters.const_defined?(type) &&
+      ActiveRecord::Base.connection.is_a?(ActiveRecord::ConnectionAdapters.const_get(type))
+  end
+end
+
+ActiveRecord::Base.connection.class.class_eval do
+  IGNORED_SQL = [/^PRAGMA/, /^SELECT currval/, /^SELECT CAST/, /^SELECT @@IDENTITY/, /^SELECT @@ROWCOUNT/, /^SAVEPOINT/, /^ROLLBACK TO SAVEPOINT/, /^RELEASE SAVEPOINT/, /SHOW FIELDS/]
+
+  def execute_with_query_record(sql, name = nil, &block)
+    $queries_executed ||= []
+    $queries_executed << sql unless IGNORED_SQL.any? { |r| sql =~ r }
+    execute_without_query_record(sql, name, &block)
+  end
+
+  alias_method_chain :execute, :query_record
+end
+
+# Make with_scope public for tests
+class << ActiveRecord::Base
+  public :with_scope, :with_exclusive_scope
+end
+
+unless ENV['FIXTURE_DEBUG']
+  module ActiveRecord::TestFixtures::ClassMethods
+    def try_to_load_dependency_with_silence(*args)
+      ActiveRecord::Base.logger.silence { try_to_load_dependency_without_silence(*args)}
+    end
+
+    alias_method_chain :try_to_load_dependency, :silence
+  end
+end
+
+class ActiveSupport::TestCase
+  include ActiveRecord::TestFixtures
+
+  self.fixture_path = FIXTURES_ROOT
+  self.use_instantiated_fixtures  = false
+  self.use_transactional_fixtures = true
+
+  def create_fixtures(*table_names, &block)
+    Fixtures.create_fixtures(ActiveSupport::TestCase.fixture_path, table_names, {}, &block)
+  end
+  
+  def identify(label)
+    Fixtures.identify(label)
+  end
+  
+  def identify_hex(label)
+    UUIDTools::UUID.parse_raw(identify(label)).to_s
+  end
+end

data/test/cases/to_param_test.rb

@@ -0,0 +1,20 @@
+require 'cases/helper'
+require 'models/artist'
+
+class ToParamTest < ActiveRecord::TestCase
+  fixtures :artists
+
+  def test_to_param_returns_nil_for_new_record
+    artist = Artist.new
+    assert artist.new_record?
+    param = artist.to_param
+    assert_nil param
+  end
+
+  def test_to_param_returns_a_hex_string
+    artist = Artist.first
+    param = artist.to_param
+    assert param.instance_of?(String)
+    assert param.match(/\A[0-9a-f\-]{36}\z/)
+  end
+end

data/test/cases/to_uuid_test.rb

@@ -0,0 +1,25 @@
+require 'cases/helper'
+require 'models/artist'
+
+class ToUuidTest < ActiveRecord::TestCase
+  fixtures :artists
+
+  def test_to_uuid_returns_nil_for_new_record
+    artist = Artist.new
+    assert artist.new_record?
+    uuid = artist.to_uuid
+    assert_nil uuid
+  end
+
+  def test_to_uuid_returns_a_uuid
+    artist = Artist.first
+    uuid = artist.to_uuid
+    assert uuid.instance_of?(UUIDTools::UUID)
+  end
+
+  def test_to_uuid_returns_the_correct_uuid
+    artist = Artist.first
+    uuid = artist.to_uuid
+    assert_equal artist.id, uuid.raw
+  end
+end

data/test/cases/zzz_migration_test.rb

@@ -0,0 +1,97 @@
+# The filename begins with "zzz" to ensure this is the last test.
+require 'cases/helper'
+require 'models/label'
+require 'models/artist'
+require 'models/record_store'
+
+if ActiveRecord::Base.connection.supports_migrations?
+
+class MigrationTest < ActiveRecord::TestCase
+  fixtures :labels
+  fixtures :artists
+  fixtures :record_stores
+
+  def test_migrations
+    migrate_up
+    reset
+    run_tests
+    
+    migrate_down
+    reset
+    run_tests
+  end
+
+private
+
+  def run_tests
+    artist = artists(:beatles)
+    label = labels(:emi)
+    assert_equal label, artist.label
+    
+    label = labels(:def_jam)
+    artists = label.artists
+    assert_equal 4, artists.size
+    artists.each do |artist|
+      assert artist.instance_of?(Artist)
+    end
+    
+    record_store = record_stores(:amoeba)
+    labels = record_store.labels
+    assert_equal 4, labels.size
+    labels.each do |labels|
+      assert labels.instance_of?(Label)
+    end
+    
+    record_store = record_stores(:amoeba)
+    artists = record_store.artists
+    assert_equal 6, artists.size
+    artists.each do |artists|
+      assert artists.instance_of?(Artist)
+    end
+  end
+
+  def reset
+    [Label, Artist, RecordStore].each do |model|
+      model.reset_column_information
+    end
+    ActiveRecord::Base.connection.clear_query_cache
+  end
+  
+  def migrate_up
+    # Change each int(11) id column to binary(16).
+    # This preserves the column’s original value as a right-padded 16-byte string.
+    [:labels, :record_stores].each do |table|
+      ActiveRecord::Base.connection.change_integer_primary_key_to_uuid(table)
+    end
+
+    # Change association columns to binary(16).
+    [
+      [:artists, :label_id, :id],
+      [:labels_record_stores, :label_id, false],
+      [:labels_record_stores, :record_store_id, false],
+      [:artists_record_stores, :record_store_id, false],
+    ].each do |table, column, primary_key|
+      ActiveRecord::Base.connection.change_integer_to_uuid(table, column, primary_key)
+    end
+  end
+  
+  def migrate_down    
+    # Change each binary(16) id column to int(11).
+    # MySQL casts the string value to an integer.
+    [:labels, :record_stores].each do |table|
+      ActiveRecord::Base.connection.change_uuid_to_integer_primary_key(table)
+    end
+
+    # Change association columns to int(11).
+    [
+      [:artists, :label_id, :id],
+      [:labels_record_stores, :label_id, false],
+      [:labels_record_stores, :record_store_id, false],
+      [:artists_record_stores, :record_store_id, false],
+    ].each do |table, column, primary_key|
+      ActiveRecord::Base.connection.change_uuid_to_integer(table, column, primary_key)
+    end
+  end
+end
+
+end