require 'assert'
require 'mr/fake_record'

require 'much-plugin'

module MR::FakeRecord

  class UnitTests < Assert::Context
    desc "MR::FakeRecord"
    setup do
      @module = MR::FakeRecord
    end
    subject{ @module }

    should "use much-plugin" do
      assert_includes MuchPlugin, subject
    end

    should "extend the persistence transaction methods mixin" do
      metaclass = class << subject; self; end
      assert_includes MR::FakeRecord::Persistence::TransactionMethods, metaclass
    end

  end

  class MixedInTests < UnitTests
    desc "when mixed in"
    setup do
      @fake_record_class = Class.new do
        include MR::FakeRecord
        attribute :name,   :string
        attribute :active, :boolean
      end
    end
    subject{ @fake_record_class }

    should have_imeths :model_class

    should "be an MR record" do
      assert_includes MR::Record, subject
    end

    should "include the associations, attributes and persistence mixins" do
      assert_includes MR::FakeRecord::Associations, subject
      assert_includes MR::FakeRecord::Attributes,   subject
      assert_includes MR::FakeRecord::Persistence,  subject
    end

    should "allow reading and writing it's model class using `model_class`" do
      assert_nil subject.model_class
      model_class = Class.new
      subject.model_class(model_class)
      assert_equal model_class, subject.model_class
    end

    should "allow passing attributes to it's initialize" do
      fake_record = subject.new(:name => 'test')
      assert_equal 'test', fake_record.name
    end

  end

  class InitTests < MixedInTests
    desc "and init"
    setup do
      @fake_record = @fake_record_class.new({
        :name   => 'test',
        :active => true
      })
      @fake_record.save!
    end
    subject{ @fake_record }

    should have_imeths :==, :eql?, :hash, :inspect

    should "return a readable inspect" do
      object_hex = (subject.object_id << 1).to_s(16)
      expected = "#<#{subject.class}:0x#{object_hex} @active=true " \
                 "@id=#{subject.id} @name=\"test\">"
      assert_equal expected, subject.inspect
    end

    should "be comparable" do
      same_fake_record  = @fake_record_class.new(:id => @fake_record.id)
      assert_equal same_fake_record, subject
      other_fake_record = @fake_record_class.new.tap(&:save!)
      assert_not_equal other_fake_record, subject
    end

    should "demeter its fixnum hash value to its id" do
      assert_equal subject.id.hash, subject.hash
    end

    should "ensure it's attribute changed methods work after an empty save" do
      assert_not_nil subject.name
      assert_true subject.active
      subject.save! # empty save, nothing was changed
      subject.name = nil # set a previously set attribute to `nil`
      subject.active = true # set it to what it previous was
      assert subject.name_changed?
      assert_not subject.active_changed?
    end

  end

end