$:.unshift File.join(File.dirname(__FILE__), "..")

require 'test/unit'
require 'shogi_server'
require 'shogi_server/game'

$league = ShogiServer::League.new(File.dirname(__FILE__))
$league.event = "TC_game_result"

module ShogiServer
  class BasicPlayer
    attr_accessor :sente, :status

    def write_safe(dummy)
    end
  end
end

class TestGameResult < Test::Unit::TestCase
  class DummyGame
    attr_accessor :game_name
    attr_reader :board

    def initialize
      @board = ""
    end
  end

  def setup
    @p1 = ShogiServer::BasicPlayer.new
    @p1.sente = true
    @p2 = ShogiServer::BasicPlayer.new
    @p2.sente = false
    @game = DummyGame.new
  end

  def test_game_result_win
    gr = ShogiServer::GameResultWin.new(@game, @p1, @p2)
    assert_equal(@p1.last_game_win, true)
    assert_equal(@p2.last_game_win, false)
    assert_equal(nil, gr.log_summary_type)
  end

  def test_game_result_abnormal_win
    gr = ShogiServer::GameResultAbnormalWin.new(@game, @p1, @p2)
    assert_equal(@p1.last_game_win, true)
    assert_equal(@p2.last_game_win, false)
    assert_equal("abnormal", gr.log_summary_type)
  end

  def test_game_result_kachi_win
    gr = ShogiServer::GameResultKachiWin.new(@game, @p1, @p2)
    assert_equal(@p1.last_game_win, true)
    assert_equal(@p2.last_game_win, false)
    assert_equal("kachi", gr.log_summary_type)
  end

  def test_game_result_illegal_kachi_win
    gr = ShogiServer::GameResultIllegalKachiWin.new(@game, @p1, @p2)
    assert_equal(@p1.last_game_win, true)
    assert_equal(@p2.last_game_win, false)
    assert_equal("illegal kachi", gr.log_summary_type)
  end

  def test_game_result_illegal_move_win
    gr = ShogiServer::GameResultIllegalMoveWin.new(@game, @p1, @p2)
    assert_equal(@p1.last_game_win, true)
    assert_equal(@p2.last_game_win, false)
    assert_equal("illegal move", gr.log_summary_type)
  end

  def test_game_result_uchifuzume_win
    gr = ShogiServer::GameResultUchifuzumeWin.new(@game, @p1, @p2)
    assert_equal(@p1.last_game_win, true)
    assert_equal(@p2.last_game_win, false)
    assert_equal("uchifuzume", gr.log_summary_type)
  end

  def test_game_result_oute_kaihi_more_win
    gr = ShogiServer::GameResultOuteKaihiMoreWin.new(@game, @p1, @p2)
    assert_equal(@p1.last_game_win, true)
    assert_equal(@p2.last_game_win, false)
    assert_equal("oute_kaihimore", gr.log_summary_type)
  end

  def test_game_result_outori_win
    gr = ShogiServer::GameResultOutoriWin.new(@game, @p1, @p2)
    assert_equal(@p1.last_game_win, true)
    assert_equal(@p2.last_game_win, false)
    assert_equal("outori", gr.log_summary_type)
  end

  def test_game_result_toryo_win
    gr = ShogiServer::GameResultToryoWin.new(@game, @p1, @p2)
    assert_equal(@p1.last_game_win, true)
    assert_equal(@p2.last_game_win, false)
    assert_equal("toryo", gr.log_summary_type)
  end

  def test_game_result_oute_sennichite_win
    gr = ShogiServer::GameResultOuteSennichiteWin.new(@game, @p1, @p2)
    assert_equal(@p1.last_game_win, true)
    assert_equal(@p2.last_game_win, false)
    assert_equal("oute_sennichite", gr.log_summary_type)
  end

  def test_game_result_draw
    gr = ShogiServer::GameResultDraw.new(@game, @p1, @p2)
    assert_equal(@p1.last_game_win, false)
    assert_equal(@p2.last_game_win, false)
    assert_equal(nil, gr.log_summary_type)
  end

  def test_game_result_sennichite_draw
    gr = ShogiServer::GameResultSennichiteDraw.new(@game, @p1, @p2)
    $cache_state = []
    def gr.log(s)
      $cache_state << s
    end
    assert_equal(@p1.last_game_win, false)
    assert_equal(@p2.last_game_win, false)
    assert_equal("sennichite", gr.log_summary_type)

    gr.delete_observers
    gr.process
    assert_equal("%SENNICHITE", $cache_state[0])
  end

  def test_game_result_timeout
    gr = ShogiServer::GameResultTimeoutWin.new(@game, @p2, @p1)
    $cache_state = []
    def gr.log(s)
      $cache_state << s
    end
    gr.delete_observers
    gr.process
    assert_equal("%TIME_UP", $cache_state[0])
  end
end