#!/bin/env ruby
# encoding: utf-8

require 'test_helper'

class Superstore::PersistenceTest < Superstore::TestCase
  test 'instantiate removes unknowns' do
    assert_nil Issue.instantiate('theid', 'z' => 'nooo').attributes['z']
  end

  test 'encode_attributes' do
    klass = temp_object do
      string :description
    end

    assert_equal(
      {},
      klass.encode_attributes({})
    )

    assert_equal(
      {'description' => nil},
      klass.encode_attributes({'description' => nil})
    )

    assert_equal(
      {'description' => 'lol'},
      klass.encode_attributes({'description' => 'lol'})
    )
  end

  test "batch" do
    first_issue = second_issue = nil

    Issue.batch do
      assert Issue.batching?

      first_issue = Issue.create
      second_issue = Issue.create

      assert_raise(Superstore::RecordNotFound) { Issue.find(first_issue.id) }
      assert_raise(Superstore::RecordNotFound) { Issue.find(second_issue.id) }
    end

    assert !Issue.batching?
    assert_nothing_raised(Superstore::RecordNotFound) { Issue.find(first_issue.id) }
    assert_nothing_raised(Superstore::RecordNotFound) { Issue.find(second_issue.id) }
  end

  test 'persistence inquiries' do
    issue = Issue.new
    assert issue.new_record?
    assert !issue.persisted?

    issue.save
    assert issue.persisted?
    assert !issue.new_record?
  end

  test 'create' do
    issue = Issue.create { |i| i.description = 'foo' }
    assert_equal 'foo', issue.description
    assert_equal 'foo', Issue.find(issue.id).description
  end

  test 'read and write UTF' do
    utf = "\ucba1\ucba2\ucba3 ƒ´∑ƒ©√åµ≈√ˆअनुच्छेद´µøµø¬≤ 汉语漢語".force_encoding(Encoding::UTF_8)

    issue = Issue.create { |i| i.description = utf }
    assert_equal utf, issue.description
    reloaded = Issue.find(issue.id).description
    assert_equal utf, reloaded
  end

  test 'save' do
    issue = Issue.new
    issue.save

    assert_equal issue, Issue.find(issue.id)
  end

  test 'save!' do
    klass = temp_object do
      string :description
      validates :description, presence: true
    end

    record = klass.new(description: 'bad')
    record.save!

    assert_raise Superstore::RecordInvalid do
      record = klass.new
      record.save!
    end
  end

  test 'destroy' do
    issue = Issue.create
    issue.destroy

    assert issue.destroyed?
    assert !issue.persisted?
    assert !issue.new_record?
  end

  test 'update_attribute' do
    issue = Issue.create
    issue.update_attribute(:description, 'lol')

    assert !issue.changed?
    assert_equal 'lol', issue.description
  end

  test 'update' do
    issue = Issue.create
    issue.update(description: 'lol')

    assert !issue.changed?
    assert_equal 'lol', issue.description
  end

  test 'update!' do
    begin
      Issue.validates(:description, presence: true)

      issue = Issue.new(description: 'bad')
      issue.save!

      assert_raise Superstore::RecordInvalid do
        issue.update! description: ''
      end
    ensure
      Issue.reset_callbacks(:validate)
    end
  end

  test 'update nil attributes' do
    issue = Issue.create(title: 'I rule', description: 'lololol')

    issue.update title: nil

    issue = Issue.find issue.id
    assert_nil issue.title
  end

  test 'becomes' do
    klass = temp_object do
    end

    assert_kind_of klass, Issue.new.becomes(klass)
  end

  test 'reload' do
    persisted_issue = Issue.create
    fresh_issue = Issue.find(persisted_issue.id)
    fresh_issue.update_attribute(:description, 'say what')

    reloaded_issue = persisted_issue.reload
    assert_equal 'say what', persisted_issue.description
    assert_equal persisted_issue, reloaded_issue
  end

  test 'quote_columns' do
    klass = Class.new { include Superstore::Persistence }
    assert_equal %w{'a' 'b'}, klass.__send__(:quote_columns, %w{a b})
  end

  test 'delete' do
    klass = temp_object do
      string :name
    end

    record = klass.new(name: 'cool')
    record.save!

    id = record.id
    assert_equal id, klass.find(id).id

    klass.delete(id)

    assert_raise Superstore::RecordNotFound do
      klass.find(id)
    end
  end

  test 'delete multiple' do
    klass = temp_object do
      string :name
    end

    ids = []
    (1..10).each do
      record = klass.create!(name: 'cool')
      ids << record.id
    end

    klass.delete(ids)

    assert_equal [], klass.find(ids)
  end

end