require 'minitest/autorun'
require 'pirate_game'

class TestPirateGameClient < MiniTest::Unit::TestCase

  def setup
    @ts = Rinda::TupleSpace.new

    @client = PirateGame::Client.new(name: 'foo')

    @client.instance_variable_set :@mothership, @ts
  end

  def test_initialize
    assert_empty @client.log_book
    assert_nil @client.bridge
    assert_equal :select_game, @client.state
  end

  def test_set_state
    @client.set_state :pub

    assert_equal :pub, @client.state

    assert_raises RuntimeError do
      @client.set_state :foobar
    end

    assert_equal :pub, @client.state
  end

  def test_action_time_left
    assert_equal 0, @client.action_time_left

    @client.issue_command 'Test'

    assert_in_epsilon 8, @client.action_time_left, 0.1
  end

  def test_clicked
    make_services

    @client.clicked 'Test'

    tuple = @ts.read [:button, nil, nil, nil]

    assert_equal :button, tuple.shift
    assert_equal 'Test',  tuple.shift
    assert_includes (Time.now.to_i - 1..Time.now.to_i), tuple.shift
    assert_equal DRb.uri, tuple.shift
  end

  def test_issue_command
    @client.issue_command 'Test'

    assert @client.waiting?
    assert_match /Test/, @client.current_action

    @client.clicked 'Test'

    Thread.pass while @client.command_start

    refute @client.waiting?
    assert_nil @client.current_action
  end

  def test_start_stage
    assert_nil @client.bridge

    @client.start_stage(%w[foo bar], %w[foo bar baz buz])

    assert @client.bridge

    assert_includes @client.bridge.items, 'foo'
    assert_includes @client.bridge.items, 'bar'
    assert_equal 4, @client.bridge.stage_items.length
  end

  def test_renewer
    renewer = @client.renewer

    assert_equal 8, renewer.renew
  end

  def test_return_to_pub
    @client.start_stage(%w[foo bar], %w[foo bar baz buz])

    assert @client.bridge

    @client.return_to_pub

    assert_nil @client.bridge
  end

  def test_teammates
    make_services

    assert_includes @client.teammates, 'Davy'
    assert_includes @client.teammates, 'Eric'
  end

  def test_broadcast
    make_services

    @client.broadcast 'Hello'

    refute_empty @client.log_book

    assert_equal 2, @client.log_book.length
    assert_includes @client.log_book.collect{|msg, name| msg}, 'Hello'
    assert_includes @client.log_book.collect{|msg, name| name}, @client.name
  end

  def test_wait_for_action
    @client.clicked 'Test'

    @client.wait_for_action 'Test'

    action = @ts.read [:action, nil, nil, nil]

    action.shift

    assert_equal 'Test',  action.shift
    assert_kind_of Time,  action.shift
    assert_equal DRb.uri, action.shift
  end

  def test_wait_for_action_expired
    @client.completion_time = 0
    @client.wait_for_action 'Test'

    assert true, 'did not hang up'
  end

  def test_waiting_eh
    refute @client.waiting?

    @client.issue_command 'Test'

    assert @client.waiting?
  end

  def make_services
    def @client.registered_services
      [['Davy', DRb.uri], ['Eric', DRb.uri]]
    end
  end
end