require 'shogi_server/player'
require 'shogi_server/pairing'
require 'shogi_server/league/floodgate'
+require 'test/mock_log_message'
-class MockLogger
- def debug(str)
- end
- def info(str)
- #puts str
- end
- def warn(str)
- end
- def error(str)
- end
-end
-
-$logger = MockLogger.new
-def log_message(msg)
- $logger.info(msg)
-end
+$topdir = File.expand_path File.dirname(__FILE__)
-def log_warning(msg)
- $logger.warn(msg)
+class SimplePlayer < ShogiServer::BasicPlayer
+ attr_accessor :status
+ def initialize
+ super
+ @status = "game_waiting"
+ @game_name = "floodgate-900-0"
+ end
end
class TestFloodgate < Test::Unit::TestCase
assert(!ShogiServer::League::Floodgate.game_name?("floodgat-900-0"))
end
-end
-
-class TestPairing < Test::Unit::TestCase
- def setup
- @pairing= ShogiServer::Pairing.new
- $pairs = []
- def @pairing.start_game(p1,p2)
- $pairs << [p1,p2]
- end
- @a = ShogiServer::BasicPlayer.new
- @a.name = "a"
- @a.win = 1
- @a.loss = 2
- @a.rate = 0
- @a.last_game_win = false
- @b = ShogiServer::BasicPlayer.new
- @b.name = "b"
- @b.win = 10
- @b.loss = 20
- @b.rate = 1500
- @b.last_game_win = true
- @c = ShogiServer::BasicPlayer.new
- @c.name = "c"
- @c.win = 100
- @c.loss = 200
- @c.rate = 1000
- @c.last_game_win = true
- @d = ShogiServer::BasicPlayer.new
- @d.name = "d"
- @d.win = 1000
- @d.loss = 2000
- @d.rate = 1800
- @d.last_game_win = true
- end
-
- def test_include_newbie
- assert(@pairing.include_newbie?([@a]))
- assert(!@pairing.include_newbie?([@b]))
- assert(@pairing.include_newbie?([@b,@a]))
- assert(!@pairing.include_newbie?([@b,@c]))
- end
-end
-
-class TestStartGame < Test::Unit::TestCase
- def setup
- @pairing= ShogiServer::StartGame.new
- $called = 0
- def @pairing.start_game(p1,p2)
- $called += 1
- end
- @a = ShogiServer::BasicPlayer.new
- @a.name = "a"
- @a.win = 1
- @a.loss = 2
- @a.rate = 0
- @b = ShogiServer::BasicPlayer.new
- @b.name = "b"
- @b.win = 10
- @b.loss = 20
- @b.rate = 1500
- @c = ShogiServer::BasicPlayer.new
- @c.name = "c"
- @c.win = 100
- @c.loss = 200
- @c.rate = 1000
- @d = ShogiServer::BasicPlayer.new
- @d.name = "d"
- @d.win = 1000
- @d.loss = 2000
- @d.rate = 2000
- end
-
- def test_match_two_players
- players = [@a,@b]
- @pairing.match(players)
- assert_equal(1, $called)
- end
-
- def test_match_one_player
- players = [@a]
- @pairing.match(players)
- assert_equal(0, $called)
- end
-
- def test_match_zero_player
- players = []
- @pairing.match(players)
- assert_equal(0, $called)
- end
-
- def test_match_three_players
- players = [@a,@b,@c]
- @pairing.match(players)
- assert_equal(1, $called)
- end
-
- def test_match_four_players
- players = [@a,@b,@c,@d]
- @pairing.match(players)
- assert_equal(2, $called)
+ def test_instance_game_name
+ fg = ShogiServer::League::Floodgate.new(nil, {:game_name => "floodgate-900-0"})
+ assert(fg.game_name?("floodgate-900-0"))
+ assert(!fg.game_name?("floodgate-3600-0"))
+ fg = ShogiServer::League::Floodgate.new(nil, {:game_name => "floodgate-3600-0"})
+ assert(!fg.game_name?("floodgate-900-0"))
+ assert(fg.game_name?("floodgate-3600-0"))
+ end
+
+ def test_select_players
+ league = ShogiServer::League.new(File.dirname(__FILE__))
+ league.event = "test"
+ league.setup_players_database
+
+ a = SimplePlayer.new
+ a.win = 1
+ a.loss = 2
+ a.rate = 0
+ a.name = "a"
+ a.player_id = "a+123"
+ b = SimplePlayer.new
+ b.win = 10
+ b.loss = 20
+ b.rate = 1500
+ b.name = "b"
+ b.player_id = "b+456"
+ c = SimplePlayer.new
+ c.win = 100
+ c.loss = 200
+ c.rate = 1000
+ c.name = "c"
+
+ league.add a
+ league.add b
+ league.add c
+
+ fg = ShogiServer::League::Floodgate.new(league, {:game_name => "floodgate-900-0"})
+
+ assert_equal([a,b], fg.select_players)
end
end
def test_match_odd
players = [@a, @b, @c]
@pairing.match(players)
- assert_equal([@a, @b], players)
+ assert_equal(2, players.size)
+ assert(players[0] != players[1])
end
end
def test_match
players = [@a, @b, @c]
@pairing.match(players)
- assert_equal([@b,@a,@c], players)
+ assert_equal(3, players.size)
+ assert(players.include? @a)
+ assert(players.include? @b)
+ assert(players.include? @c)
end
end
end
end
+class TestSwissPairing < Test::Unit::TestCase
+ def setup
+ srand(10)
+ @a = ShogiServer::BasicPlayer.new
+ @a.player_id = "a"
+ @a.rate = 0
+ @a.game_name = "floodgate-900-0"
+ @b = ShogiServer::BasicPlayer.new
+ @b.player_id = "b"
+ @b.rate = 1000
+ @b.game_name = "floodgate-900-0"
+ @c = ShogiServer::BasicPlayer.new
+ @c.player_id = "c"
+ @c.rate = 1500
+ @c.game_name = "floodgate-900-0"
+ @d = ShogiServer::BasicPlayer.new
+ @d.player_id = "d"
+ @d.rate = 2000
+ @d.game_name = "floodgate-900-0"
+
+ @players = [@a, @b, @c, @d]
+
+ @file = Pathname.new(File.join(File.dirname(__FILE__), "floodgate_history_900_0.yaml"))
+ @history = ShogiServer::League::Floodgate::History.factory @file
+
+ @swiss = ShogiServer::Swiss.new
+ end
+
+ def teardown
+ @file.delete if @file.exist?
+ end
+
+ def test_none
+ players = []
+ @swiss.match players
+ assert(players.empty?)
+ end
+
+ def test_all_win
+ ShogiServer::League::Floodgate::History.class_eval do
+ def last_win?(player_id)
+ true
+ end
+ end
+ @swiss.match @players
+ assert_equal([@d, @c, @b, @a], @players)
+ end
+
+ def test_all_lose
+ ShogiServer::League::Floodgate::History.class_eval do
+ def last_win?(player_id)
+ false
+ end
+ end
+ @swiss.match @players
+ assert_equal([@d, @c, @b, @a], @players)
+ end
+
+ def test_one_win
+ ShogiServer::League::Floodgate::History.class_eval do
+ def last_win?(player_id)
+ if player_id == "a"
+ true
+ else
+ false
+ end
+ end
+ end
+ @swiss.match @players
+ assert_equal([@a, @d, @c, @b], @players)
+ end
+
+ def test_two_win
+ ShogiServer::League::Floodgate::History.class_eval do
+ def last_win?(player_id)
+ if player_id == "a" || player_id == "d"
+ true
+ else
+ false
+ end
+ end
+ end
+ @swiss.match @players
+ assert_equal([@d, @a, @c, @b], @players)
+ end
+end
class TestFloodgateHistory < Test::Unit::TestCase
def setup
assert !@history.last_win?("foo")
assert !@history.last_lose?("hoge")
assert @history.last_lose?("foo")
+
+ assert_equal("foo", @history.last_opponent("hoge"))
+ assert_equal("hoge", @history.last_opponent("foo"))
+
+ games = @history.win_games("hoge")
+ assert_equal(1, games.size )
+ assert_equal("wdoor+floodgate-900-0-hoge-foo-2", games[0][:game_id])
+ games = @history.win_games("foo")
+ assert_equal(1, games.size )
+ assert_equal("wdoor+floodgate-900-0-hoge-foo-1", games[0][:game_id])
+ games = @history.loss_games("hoge")
+ assert_equal(1, games.size )
+ assert_equal("wdoor+floodgate-900-0-hoge-foo-1", games[0][:game_id])
+ games = @history.loss_games("foo")
+ assert_equal(1, games.size )
+ assert_equal("wdoor+floodgate-900-0-hoge-foo-2", games[0][:game_id])
end
end
OSDN Git Service
