require File.expand_path('../../test_helper', __FILE__)

class TokenCredentialTest < ActiveSupport::TestCase
  def setup
    @credential = Tokens::Base.new
    @credential.code = 'AyCMIixa5C7BBqU-XFI7l7IaUFJ4zQZPmcK6oNb3FLo'
    @credential.user = users(:bill)
  end

  test 'setup' do
    assert @credential.valid?
  end

  test 'code required' do
    @credential.code = nil
    assert !@credential.valid?
  end

  test 'code uniqueness' do
    @credential.code = credentials(:john_token).code
    assert !@credential.valid?
  end

  test 'user presence' do
    @credential.user = nil
    assert !@credential.valid?
  end

  test 'spend does nothing' do
    credential = credentials(:jane_token)
    assert_equal Tokens::Base, credential.class, 'bad setup'

    assert_no_difference 'Credential.count' do
      credential.spend
    end
  end

  test 'random_for' do
    token = Tokens::Base.random_for users(:john)
    assert token.valid?, 'valid token'
    assert_equal users(:john), token.user
    assert_equal Tokens::Base, token.class
    assert !token.new_record?, 'saved token'
    assert_operator users(:john).credentials, :include?, token
  end

  test 'with_code' do
    john = 'YZ-Fo8HX6_NyU6lVZXYi6cMDLV5eAgt35UTF5l8bD6A'
    john2 = 'bDSU4tzfjuob79e3R0ykLcOGTBBYvuBWWJ9V06tQrCE'
    jane = '6TXe1vv7BgOw0BkJ1hzUKO6G08fLk4sVfJ3wPDZHS-c'
    bogus = 'AyCMIixa5C7BBqU-XFI7l7IaUFJ4zQZPmcK6oNb3FLo'
    assert_equal credentials(:john_token),
                 Tokens::Base.with_code(john).first
    assert_equal credentials(:jane_token),
                 Tokens::Base.with_code(jane).first!
    assert_equal credentials(:john_email_token),
                 Tokens::Base.with_code(john2).first
    assert_nil Tokens::Base.with_code(bogus).first
    assert_raise ActiveRecord::RecordNotFound do
      Tokens::Base.with_code('john@gmail.com').first!
    end
    assert_raise ActiveRecord::RecordNotFound do
      Tokens::Base.with_code(credentials(:jane_email).name).first!
    end
  end

  test 'with_param' do
    assert_equal credentials(:john_token), Tokens::Base.
        with_param(credentials(:john_token).to_param).first
    assert_equal credentials(:jane_token), Tokens::Base.
        with_param(credentials(:jane_token).to_param).first!
    assert_nil Tokens::Base.with_param('bogus token').first
    assert_raise ActiveRecord::RecordNotFound do
      Tokens::Base.with_param(nil).first!
    end
  end

  test 'class authenticate' do
    john = 'YZ-Fo8HX6_NyU6lVZXYi6cMDLV5eAgt35UTF5l8bD6A'
    jane = '6TXe1vv7BgOw0BkJ1hzUKO6G08fLk4sVfJ3wPDZHS-c'
    bogus = 'AyCMIixa5C7BBqU-XFI7l7IaUFJ4zQZPmcK6oNb3FLo'
    assert_equal users(:john), Tokens::Base.authenticate(john)
    assert_equal users(:jane), Tokens::Base.authenticate(jane)
    assert_equal :invalid, Tokens::Base.authenticate(bogus)
  end

  test 'class authenticate on expired tokens' do
    john = 'YZ-Fo8HX6_NyU6lVZXYi6cMDLV5eAgt35UTF5l8bD6A'
    jane = '6TXe1vv7BgOw0BkJ1hzUKO6G08fLk4sVfJ3wPDZHS-c'

    Tokens::Base.all.each do |token|
      token.updated_at = Time.now - 1.year
      token.class.stubs(:expires_after).returns 1.week
      token.save!
    end
    assert_difference 'Credential.count', -1,
                      'authenticate deletes expired credential' do
      assert_equal :invalid, Tokens::Base.authenticate(john),
                   'expired token'
    end
    assert_difference 'Credential.count', -1,
                      'authenticate deletes expired credential' do
      assert_equal :invalid, Tokens::Base.authenticate(jane),
                   'expired token'
    end
  end

  test 'class authenticate calls User#auth_bounce_reason' do
    john = 'YZ-Fo8HX6_NyU6lVZXYi6cMDLV5eAgt35UTF5l8bD6A'
    jane = '6TXe1vv7BgOw0BkJ1hzUKO6G08fLk4sVfJ3wPDZHS-c'
    bogus = 'AyCMIixa5C7BBqU-XFI7l7IaUFJ4zQZPmcK6oNb3FLo'

    with_blocked_credential credentials(:john_token), :reason do
      assert_equal :reason, Tokens::Base.authenticate(john)
      assert_equal users(:jane), Tokens::Base.authenticate(jane)
      assert_equal :invalid, Tokens::Base.authenticate(bogus)
    end
  end

  test 'instance authenticate' do
    assert_equal users(:john), credentials(:john_token).authenticate
    assert_equal users(:jane), credentials(:jane_token).authenticate
  end

  test 'instance authenticate with expired tokens' do
    token = Tokens::Base.with_code(credentials(:jane_token).code).first
    token.updated_at = Time.now - 1.year
    token.save!
    token.class.stubs(:expires_after).returns 1.week
    assert_equal :invalid, token.authenticate,
                 'expired token'
    assert_nil Tokens::Base.with_code(credentials(:jane_token).code).first,
               'expired token not destroyed'
  end

  test 'instance authenticate calls User#auth_bounce_reason' do
    with_blocked_credential credentials(:john_token), :reason do
      assert_equal :reason, credentials(:john_token).authenticate
      assert_equal users(:jane), credentials(:jane_token).authenticate
    end
  end
end