require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
module ICU
describe Tournament do
context "a basic tournament" do
it "has a name, start date, some players and some results" do
lambda do
t = Tournament.new('Bangor Bash', '2009-11-09')
t.add_player(Player.new('Bobby', 'Fischer', 1))
t.add_player(Player.new('Garry', 'Kasparov', 2))
t.add_player(Player.new('Mark', 'Orr', 3))
t.add_result(Result.new(1, 1, '=', :opponent => 2, :colour => 'W'))
t.add_result(Result.new(2, 2, 'L', :opponent => 3, :colour => 'W'))
t.add_result(Result.new(3, 3, 'W', :opponent => 1, :colour => 'W'))
t.validate!
end.should_not raise_error
end
end
context "documentation example" do
before(:each) do
@t = t = ICU::Tournament.new('Bangor Masters', '2009-11-09')
t.add_player(ICU::Player.new('Bobby', 'Fischer', 10))
t.add_player(ICU::Player.new('Garry', 'Kasparov', 20))
t.add_player(ICU::Player.new('Mark', 'Orr', 30))
t.add_result(ICU::Result.new(1, 10, 'D', :opponent => 30, :colour => 'W'))
t.add_result(ICU::Result.new(2, 20, 'W', :opponent => 30, :colour => 'B'))
t.add_result(ICU::Result.new(3, 20, 'L', :opponent => 10, :colour => 'W'))
t.validate!(:rerank => true)
@s = <<EOS
012 Bangor Masters
042 2009-11-09
001 10 Fischer,Bobby 1.5 1 30 w = 20 b 1
001 20 Kasparov,Garry 1.0 2 30 b 1 10 w 0
001 30 Orr,Mark 0.5 3 10 b = 20 w 0
EOS
end
it "should serialize to Krause" do
parser = ICU::Tournament::Krause.new
parser.serialize(@t).should == @s
end
end
context "name" do
before(:each) do
@t = Tournament.new('Edinburgh Masters', '2009-11-09')
end
it "must be specified in constructor" do
@t.name.should == 'Edinburgh Masters'
end
it "can be replaced by accessor" do
@t.name = 'Bangor Bashers'
@t.name.should == 'Bangor Bashers'
end
it "should not be blank or without letters" do
lambda { Tournament.new(' ', '2009-11-09') }.should raise_error(/invalid.*name/)
lambda { @t.name = '333' }.should raise_error(/invalid.*name/)
end
end
context "city" do
before(:each) do
@t = Tournament.new('Edinburgh Masters', '2009-11-09', :city => 'Edinburgh')
end
it "may be specified in constructor" do
@t.city.should == 'Edinburgh'
end
it "can be replaced by accessor" do
@t.city = 'Glasgow'
@t.city.should == 'Glasgow'
end
it "can be set to nil" do
@t.city = ''
@t.city.should be_nil
end
it "should not be without letters if set" do
lambda { @t.city = '123' }.should raise_error(/invalid.*city/)
end
end
context "federation" do
before(:each) do
@t = Tournament.new('Edinburgh Masters', '2009-11-09', :fed => 'SCO')
end
it "may be specified in constructor" do
@t.fed.should == 'SCO'
end
it "can be replaced by accessor" do
@t.fed = 'IRL'
@t.fed.should == 'IRL'
end
it "can be set to nil" do
@t.fed = ''
@t.fed.should be_nil
end
it "three letters will automatically be upcased" do
@t.fed = 'rus'
@t.fed.should == 'RUS'
end
it "should not be without letters if set" do
lambda { @t.fed = '123' }.should raise_error(/invalid.*federation/)
end
end
context "start date" do
before(:each) do
@t = Tournament.new('Edinburgh Masters', '2009-11-09')
end
it "must be specified in constructor" do
@t.start.should == '2009-11-09'
end
it "can be replaced by accessor" do
@t.start = '16th June 2010'
@t.start.should == '2010-06-16'
end
it "should be a valid date" do
lambda { Tournament.new('Edinburgh Masters', ' ') }.should raise_error(/invalid.*date/)
lambda { @t.start = 'X' }.should raise_error(/invalid.*date/)
end
end
context "finish date" do
before(:each) do
@t = Tournament.new('Edinburgh Masters', '2009-11-09', :finish => '12th November 2009')
end
it "may be specified in constructor" do
@t.finish.should == '2009-11-12'
end
it "can be replaced by accessor" do
@t.finish = '16th December 2009'
@t.finish.should == '2009-12-16'
end
it "can be set to nil" do
@t.finish = ''
@t.finish.should be_nil
end
it "should be a valid date" do
lambda { Tournament.new('Edinburgh Masters', '2009-11-09', :finish => 'next week') }.should raise_error(/invalid.*date/)
lambda { @t.finish = 'X' }.should raise_error(/invalid.*date/)
end
end
context "rounds" do
it "defaults to nil" do
Tournament.new('Edinburgh Masters', '2009-11-09').rounds.should be_nil
end
it "should be a positive integer or nil" do
Tournament.new('Edinburgh Masters', '2009-11-09', :rounds => 3).rounds.should == 3
Tournament.new('Edinburgh Masters', '2009-11-09', :rounds => ' 10 ').rounds.should == 10
Tournament.new('Edinburgh Masters', '2009-11-09', :rounds => nil).rounds.should be_nil
lambda { Tournament.new('Edinburgh Masters', '2009-11-09', :rounds => ' 0 ') }.should raise_error(/invalid.*rounds/)
end
end
context "last_round" do
before(:each) do
@t = Tournament.new('Edinburgh Masters', '2009-11-09')
@t.add_player(@mark = Player.new('Mark', 'Orr', 1))
@t.add_player(@gary = Player.new('Gary', 'Kasparov', 2))
@t.add_player(@boby = Player.new('Bobby', 'Fischer', 3))
end
it "depends on the players results" do
@t.last_round.should == 0
@t.add_result(Result.new(1, 1, 'W', :opponent => 2))
@t.last_round.should == 1
@t.add_result(Result.new(2, 2, 'D', :opponent => 3))
@t.last_round.should == 2
@t.add_result(Result.new(5, 3, 'L', :opponent => 1))
@t.last_round.should == 5
end
end
context "round date" do
before(:each) do
@t = Tournament.new('Edinburgh Masters', '2009-11-09')
end
it "should default to none" do
@t.round_dates.size.should == 0
end
it "can be added one by one in any order" do
@t.add_round_date('2009-11-11')
@t.add_round_date('09/11/2009')
@t.add_round_date('10th November 2009')
@t.round_dates.join('|').should == '2009-11-09|2009-11-10|2009-11-11'
end
end
context "site" do
it "defaults to nil" do
Tournament.new('Edinburgh Masters', '2009-11-09').site.should be_nil
end
it "should be a reasonably valid looking URL" do
Tournament.new('Edinburgh Masters', '2009-11-09', :site => 'https://www.bbc.co.uk').site.should == 'https://www.bbc.co.uk'
Tournament.new('Edinburgh Masters', '2009-11-09', :site => 'www.icu.ie/event.php?id=1').site.should == 'http://www.icu.ie/event.php?id=1'
lambda { Tournament.new('Edinburgh Masters', '2009-11-09', :site => 'X') }.should raise_error(/invalid.*site/)
end
end
context "type, arbiter, deputy and time control" do
before(:each) do
@t = Tournament.new('Edinburgh Masters', '2009-11-09', :type => 'Swiss', :arbiter => 'Gerry Graham', :deputy => 'Herbert Scarry', :time_control => '120 minutes')
end
it "may be specified in constructor" do
@t.type.should == 'Swiss'
@t.arbiter.should == 'Gerry Graham'
@t.deputy.should == 'Herbert Scarry'
@t.time_control.should == '120 minutes'
end
it "can be replaced by accessor" do
@t.type = 'all-play-all'
@t.type.should == 'all-play-all'
@t.arbiter = 'Michael Crowe'
@t.arbiter.should == 'Michael Crowe'
@t.deputy = 'Mark Orr'
@t.deputy.should == 'Mark Orr'
@t.time_control = '90 minutes'
@t.time_control.should == '90 minutes'
end
it "can be set to nil" do
@t.type = ''
@t.type.should be_nil
@t.arbiter = ''
@t.arbiter.should be_nil
@t.deputy = ''
@t.deputy.should be_nil
@t.time_control = ''
@t.time_control.should be_nil
end
it "should be valid" do
lambda { @t.type = '123' }.should raise_error(/invalid.*type/)
lambda { @t.arbiter = '123' }.should raise_error(/invalid.*arbiter/)
lambda { @t.deputy = '123' }.should raise_error(/invalid.*deputy/)
lambda { @t.time_control = 'abc' }.should raise_error(/invalid.*time.*control/)
end
end
context "tie breaks" do
before(:each) do
@t = Tournament.new('Edinburgh Masters', '2009-11-09')
end
it "should an empty tie breaks list by default" do
@t.tie_breaks.should be_an_instance_of(Array)
@t.tie_breaks.should be_empty
end
it "should be settable to one or more valid tie break methods" do
@t.tie_breaks = [:neustadtl]
@t.tie_breaks.join('|').should == "neustadtl"
@t.tie_breaks = [:neustadtl, :blacks]
@t.tie_breaks.join('|').should == "neustadtl|blacks"
@t.tie_breaks = ['Wins', 'Sonneborn-Berger', :harkness]
@t.tie_breaks.join('|').should == "wins|neustadtl|harkness"
@t.tie_breaks = []
@t.tie_breaks.join('|').should == ""
end
it "should rasie an error is not given an array" do
lambda { @t.tie_breaks = :neustadtl }.should raise_error(/array/i)
end
it "should rasie an error is given any invalid tie-break methods" do
lambda { @t.tie_breaks = ["My Bum"] }.should raise_error(/invalid/i)
lambda { @t.tie_breaks = [:neustadtl, "Your arse"] }.should raise_error(/invalid/i)
end
end
context "players" do
before(:each) do
@t = Tournament.new('Edinburgh Masters', '2009-11-09')
end
it "should have unique numbers" do
@t.add_player(Player.new('Mark', 'Orr', 1))
lambda { @t.add_player(Player.new('Bobby', 'Fischer', 1)) }.should raise_error(/player.*unique/)
end
it "can be added one at a time" do
@t.add_player(Player.new('Mark', 'Orr', -1))
@t.add_player(Player.new('Gary', 'Kasparov', -2))
@t.add_player(Player.new('Bobby', 'Fischer', -3))
@t.players.size.should == 3
@t.player(-1).first_name.should == 'Mark'
end
end
context "results" do
before(:each) do
@t = Tournament.new('Edinburgh Masters', '2009-11-09', :rounds => 3)
@t.add_player(@mark = Player.new('Mark', 'Orr', 1))
@t.add_player(@gary = Player.new('Gary', 'Kasparov', 2))
@t.add_player(@boby = Player.new('Bobby', 'Fischer', 3))
end
it "can be added one at a time" do
@t.add_result(Result.new(1, 1, 'W', :opponent => 2))
@t.add_result(Result.new(2, 2, 'D', :opponent => 3))
@t.add_result(Result.new(3, 3, 'L', :opponent => 1))
@mark.results.size.should == 2
@mark.points.should == 2.0
@gary.results.size.should == 2
@gary.points.should == 0.5
@boby.results.size.should == 2
@boby.points.should == 0.5
end
it "asymmetric results cannot be added" do
@t.add_result(Result.new(1, 1, 'W', :opponent => 2))
lambda { @t.add_result(Result.new(1, 2, 'D', :opponent => 1)) }.should raise_error(/result.*match/)
lambda { @t.add_result(Result.new(1, 2, 'L', :opponent => 1, :rateable => false)) }.should raise_error(/result.*match/)
end
it "should have a defined player" do
lambda { @t.add_result(Result.new(1, 4, 'L', :opponent => 1)) }.should raise_error(/player.*exist/)
end
it "should have a defined opponent" do
lambda { @t.add_result(Result.new(1, 1, 'W', :opponent => 4)) }.should raise_error(/opponent.*exist/)
end
it "should be consistent with the tournament's number of rounds" do
lambda { @t.add_result(Result.new(4, 1, 'W', :opponent => 2)) }.should raise_error(/round/)
end
end
context "finding players" do
before(:all) do
@t = Tournament.new('Bangor Bash', '2009-11-09')
@t.add_player(Player.new('Bobby', 'Fischer', 1, :fed => 'USA'))
@t.add_player(Player.new('Garry', 'Gary Kasparov', 2, :fed => 'RUS'))
@t.add_player(Player.new('Mark', 'Orr', 3, :fed => 'IRL'))
end
it "should find players based on loose equality" do
@t.find_player(Player.new('Mark', 'Orr', 4, :fed => 'IRL')).num.should == 3
@t.find_player(Player.new('Mark', 'Orr', 4, :fed => 'USA')).should be_nil
@t.find_player(Player.new('Mark', 'Sax', 4, :fed => 'IRL')).should be_nil
@t.find_player(Player.new('John', 'Orr', 4, :fed => 'IRL')).should be_nil
end
end
context "teams" do
before(:each) do
@t = Tournament.new('Bangor Bash', '2009-11-09')
end
it "should be able to create a new team, add it and retrieve it" do
team = Team.new('Wandering Dragons')
@t.add_team(team).should be_an_instance_of Team
@t.get_team(' wandering dragons ').should be_an_instance_of Team
@t.get_team('Blundering Bishops').should be_nil
end
it "should be able to create and add a new team and retrieve it" do
@t.add_team('Blundering Bishops').should be_an_instance_of Team
@t.get_team(' blundering bishops ').should be_an_instance_of Team
@t.get_team('Wandering Dragons').should be_nil
end
it "should throw and exception if there is an attempt to add a team with a name that matches an existing team" do
lambda { @t.add_team('Blundering Bishops') }.should_not raise_error
lambda { @t.add_team('Wandering Dragons') }.should_not raise_error
lambda { @t.add_team(' wandering dragons ') }.should raise_error(/similar.*exists/)
end
end
context "validation" do
before(:each) do
@t = Tournament.new('Edinburgh Masters', '2009-11-09')
@t.add_player(@mark = Player.new('Mark', 'Orr', 1))
@t.add_player(@gary = Player.new('Gary', 'Kasparov', 2))
@t.add_player(@boby = Player.new('Bobby', 'Fischer', 3))
@t.add_result(Result.new(1, 1, 'W', :opponent => 2))
@t.add_result(Result.new(2, 2, 'W', :opponent => 3))
@t.add_result(Result.new(3, 3, 'L', :opponent => 1))
@t.add_round_date('2009-11-09')
@t.add_round_date('2009-11-10')
@t.add_round_date('2009-11-11')
end
it "should be valid" do
@t.invalid.should be_false
end
it "should have side effect of setting number of rounds" do
@t.rounds.should be_nil
@t.invalid
@t.rounds.should == 3
end
it "should detect an inconsistent start date" do
@t.start = '2009-11-10'
lambda { @t.validate! }.should raise_error(/first round.*before.*start/)
end
it "should detect an inconsistent finish date" do
@t.finish = '2009-11-10'
lambda { @t.validate! }.should raise_error(/last round.*after.*end/)
end
it "should have side effect of setting missing finish date" do
@t.finish.should be_nil
@t.invalid
@t.finish.should == '2009-11-11'
end
it "should detect inconsistent round dates" do
@t.add_round_date('2009-11-12')
lambda { @t.validate! }.should raise_error(/round dates.*match.*rounds/)
end
it "should have the side effect of providing missing ranks if the rerank option is set" do
@t.players.select{ |p| p.rank }.size.should == 0
@t.invalid(:rerank => true)
@t.player(1).rank.should == 1
@t.player(2).rank.should == 2
@t.player(3).rank.should == 3
end
it "should have the side effect of correcting bad ranks if the rerank option is set" do
@t.player(1).rank = 2
@t.player(2).rank = 1
@t.player(3).rank = 3
@t.invalid(:rerank => true)
@t.player(1).rank.should == 1
@t.player(2).rank.should == 2
@t.player(3).rank.should == 3
end
it "should detect missranked players" do
@t.player(1).rank = 2
@t.player(2).rank = 1
@t.player(3).rank = 3
lambda { @t.validate! }.should raise_error(/player 2.*above.*player 1/)
end
it "should be valid if there are teams, every player is in one of them, and no team has an invalid member" do
team1 = Team.new('International Masters')
team2 = Team.new('World Champions')
@t.add_team(team1)
@t.add_team(team2)
@t.invalid.should match(/not.*member/)
team1.add_member(1)
team2.add_member(2)
team2.add_member(3)
@t.invalid.should be_false
team1.add_member(4)
@t.invalid.should match(/not.*valid/)
end
it "should not be valid if one player is in more than one team" do
team1 = Team.new('XInternational Masters')
team1.add_member(1)
team2 = Team.new('XWorld Champions')
team2.add_member(2)
team2.add_member(3)
@t.add_team(team1)
@t.add_team(team2)
@t.invalid.should be_false
team1.add_member(2)
@t.invalid.should match(/already.*member/)
end
end
context "renumbering" do
before(:each) do
@t = Tournament.new('Edinburgh Masters', '2009-11-09')
@t.add_player(@mark = Player.new('Mark', 'Orr', 20))
@t.add_player(@boby = Player.new('Bobby', 'Fischer', 10))
@t.add_player(@gary = Player.new('Gary', 'Kasparov', 30))
@t.add_result(Result.new(1, 20, 'W', :opponent => 10))
@t.add_result(Result.new(2, 30, 'W', :opponent => 10))
@t.add_result(Result.new(3, 20, 'W', :opponent => 30))
end
it "sample tournament is valid but unranked" do
@t.invalid.should be_false
@t.player(10).rank.should be_nil
@t.players.map{ |p| p.num }.join('|').should == '10|20|30'
@t.players.map{ |p| p.last_name }.join('|').should == 'Fischer|Orr|Kasparov'
end
it "should be renumberable by name in the absence of ranking" do
@t.renumber
@t.invalid.should be_false
@t.players.map{ |p| p.num }.join('|').should == '1|2|3'
@t.players.map{ |p| p.last_name }.join('|').should == 'Fischer|Kasparov|Orr'
end
it "should be renumberable by rank if the tournament is ranked" do
@t.rerank.renumber
@t.invalid.should be_false
@t.players.map{ |p| p.num }.join('|').should == '1|2|3'
@t.players.map{ |p| p.rank }.join('|').should == '1|2|3'
@t.players.map{ |p| p.last_name }.join('|').should == 'Orr|Kasparov|Fischer'
end
it "should be renumberable by name even if the tourament is ranked" do
@t.rerank.renumber(:name)
@t.invalid.should be_false
@t.players.map{ |p| p.num }.join('|').should == '1|2|3'
@t.players.map{ |p| p.last_name }.join('|').should == 'Fischer|Kasparov|Orr'
end
it "should be renumberable by order" do
@t.rerank.renumber(:order)
@t.invalid.should be_false
@t.players.map{ |p| p.num }.join('|').should == '1|2|3'
@t.players.map{ |p| p.last_name }.join('|').should == 'Fischer|Orr|Kasparov'
end
end
context "reranking" do
before(:each) do
@t = Tournament.new('Edinburgh Masters', '2009-11-09')
@t.add_player(@boby = Player.new('Bobby', 'Fischer', 1, :rating => 2600))
@t.add_player(@gary = Player.new('Gary', 'Kasparov', 2, :rating => 2700))
@t.add_player(@boby = Player.new('Micky', 'Mouse', 3))
@t.add_player(@boby = Player.new('Minnie', 'Mouse', 4, :rating => 1500))
@t.add_player(@boby = Player.new('Gearoidin', 'Ui Laighleis', 5, :rating => 1700))
@t.add_player(@mark = Player.new('Mark', 'Orr', 6, :rating => 2300))
@t.add_result(Result.new(1, 1, 'W', :opponent => 6, :colour => 'W'))
@t.add_result(Result.new(2, 1, 'W', :opponent => 3, :colour => 'B'))
@t.add_result(Result.new(3, 1, 'W', :opponent => 5, :colour => 'W'))
@t.add_result(Result.new(1, 2, 'W', :opponent => 5, :colour => 'B'))
@t.add_result(Result.new(2, 2, 'W', :opponent => 4, :colour => 'W'))
@t.add_result(Result.new(3, 2, 'W', :opponent => 3, :colour => 'B'))
@t.add_result(Result.new(1, 3, 'W', :opponent => 4, :colour => 'W'))
@t.add_result(Result.new(3, 4, 'W', :opponent => 6, :colour => 'W'))
@t.add_result(Result.new(2, 5, 'D', :opponent => 6, :colour => 'W'))
end
it "should initially be valid but unranked" do
@t.invalid.should be_false
@t.player(1).rank.should be_nil
end
it "should have correct default tie break scores" do
scores = @t.tie_break_scores
scores[1].should == 'Fischer, Bobby'
scores[5].should == 'Ui Laighleis, Gearoidin'
end
it "should have correct actual scores" do
@t.player(1).points.should == 3.0
@t.player(2).points.should == 3.0
@t.player(3).points.should == 1.0
@t.player(4).points.should == 1.0
@t.player(5).points.should == 0.5
@t.player(6).points.should == 0.5
end
it "should have correct Buchholz tie break scores" do
@t.tie_breaks = ["Buchholz"]
scores = @t.tie_break_scores
scores[1].should == 2.0
scores[2].should == 2.5
scores[3].should == 7.0
scores[4].should == 4.5
scores[5].should == 6.5
scores[6].should == 4.5
end
it "Buchholz should be sensitive to unplayed games" do
@t.player(1).find_result(1).opponent = nil
@t.player(6).find_result(1).opponent = nil
@t.tie_breaks = ["Buchholz"]
scores = @t.tie_break_scores
scores[1].should == 1.5 # 0.5 from Orr changed to 0
scores[2].should == 2.5 # didn't play Fischer or Orr so unaffected
scores[3].should == 6.5 # 3 from Fischer's changed to 2.5
scores[4].should == 5.0 # 0.5 from Orr changed to 1 (because Orr's unrated loss to Fischer now counts as a draw)
scores[5].should == 6.5 # 3 from Fischer changed to 2.5, 0.5 from Orr changed to 1 (cancels out)
scores[6].should == 1.5 # 3 from Fischer changed to 0
end
it "should have correct progressive tie break scores" do
@t.tie_breaks = [:progressive]
scores = @t.tie_break_scores
scores[1].should == 6.0
scores[2].should == 6.0
scores[3].should == 3.0
scores[4].should == 1.0
scores[5].should == 1.0
scores[6].should == 1.0
end
it "should have correct ratings tie break scores" do
@t.tie_breaks = ['ratings']
scores = @t.tie_break_scores
scores[1].should == 4000
scores[2].should == 3200
scores[3].should == 6800
scores[4].should == 5000
scores[5].should == 7600
scores[6].should == 5800
end
it "should have correct Neustadtl tie break scores" do
@t.tie_breaks = [:neustadtl]
scores = @t.tie_break_scores
scores[1].should == 2.0
scores[2].should == 2.5
scores[3].should == 1.0
scores[4].should == 0.5
scores[5].should == 0.25
scores[6].should == 0.25
end
it "Neustadtl should be sensitive to unplayed games" do
@t.player(1).find_result(1).opponent = nil
@t.player(6).find_result(1).opponent = nil
@t.tie_breaks = ["Neustadtl"]
scores = @t.tie_break_scores
scores[1].should == 1.5 # 0.5 from Orr changed to 0
scores[2].should == 2.5 # didn't play Fischer or Orr so unaffected
scores[3].should == 1.0 # win against Minnie unaffected
scores[4].should == 1.0 # 0.5 from Orr changed to 1 (because Orr's unrated loss to Fischer now counts as a draw)
scores[5].should == 0.5 # 0.25 from Orr changed to 0.5
scores[6].should == 0.25 # loss against Fisher and unplayed against Fisher equivalent
end
it "should have correct Harkness tie break scores" do
@t.tie_breaks = ['harkness']
scores = @t.tie_break_scores
scores[1].should == 0.5
scores[2].should == 1.0
scores[3].should == 3.0
scores[4].should == 1.0
scores[5].should == 3.0
scores[6].should == 1.0
end
it "should have correct Modified Median tie break scores" do
@t.tie_breaks = ['Modified Median']
scores = @t.tie_break_scores
scores[1].should == 1.5
scores[2].should == 2.0
scores[3].should == 4.0
scores[4].should == 1.5
scores[5].should == 3.5
scores[6].should == 1.5
end
it "should have correct tie break scores for number of blacks" do
@t.tie_breaks = ['Blacks']
scores = @t.tie_break_scores
scores[3].should == 0
scores[4].should == 2
end
it "number of blacks should should be sensitive to unplayed games" do
@t.player(2).find_result(1).opponent = nil
@t.player(4).find_result(1).opponent = nil
@t.tie_breaks = [:blacks]
scores = @t.tie_break_scores
scores[3].should == 0
scores[4].should == 1
end
it "should have correct tie break scores for number of wins" do
@t.tie_breaks = [:wins]
scores = @t.tie_break_scores
scores[1].should == 3
scores[6].should == 0
end
it "number of wins should should be sensitive to unplayed games" do
@t.player(1).find_result(1).opponent = nil
@t.player(6).find_result(1).opponent = nil
@t.tie_breaks = ['WINS']
scores = @t.tie_break_scores
scores[1].should == 2
scores[6].should == 0
end
it "should use names for tie breaking by default" do
@t.rerank
@t.player(1).rank.should == 1 # 3.0/"Fischer"
@t.player(2).rank.should == 2 # 3.0/"Kasparov"
@t.player(3).rank.should == 3 # 1.0/"Mouse,Mickey"
@t.player(4).rank.should == 4 # 1.0/"Mouse,Minnie"
@t.player(6).rank.should == 5 # 0.5/"Ui"
@t.player(5).rank.should == 6 # 0.5/"Orr"
end
it "should be configurable to use Buchholz" do
@t.tie_breaks = ['Buchholz']
@t.rerank
@t.player(2).rank.should == 1 # 3.0/2.5
@t.player(1).rank.should == 2 # 3.0/2.0
@t.player(3).rank.should == 3 # 1.0/7.0
@t.player(4).rank.should == 4 # 1.0/4.5
@t.player(5).rank.should == 5 # 0.5/6.5
@t.player(6).rank.should == 6 # 0.5/4.5
end
it "should be configurable to use Neustadtl" do
@t.tie_breaks = [:neustadtl]
@t.rerank
@t.player(2).rank.should == 1 # 3.0/2.5
@t.player(1).rank.should == 2 # 3.0/2.0
@t.player(3).rank.should == 3 # 1.0/1.0
@t.player(4).rank.should == 4 # 1.0/0.5
@t.player(6).rank.should == 5 # 0.5/0.25/"Orr"
@t.player(5).rank.should == 6 # 0.5/0.25/"Ui"
end
it "should be configurable to use number of blacks" do
@t.tie_breaks = [:blacks]
@t.rerank
@t.player(2).rank.should == 1 # 3.0/2
@t.player(1).rank.should == 2 # 3.0/1
@t.player(4).rank.should == 3 # 1.0/2
@t.player(3).rank.should == 4 # 1.0/1
@t.player(6).rank.should == 5 # 0.5/2
@t.player(5).rank.should == 6 # 0.5/1
end
it "should be configurable to use number of wins" do
@t.tie_breaks = [:wins]
@t.rerank
@t.player(1).rank.should == 1 # 3.0/3/"Fi"
@t.player(2).rank.should == 2 # 3.0/3/"Ka"
@t.player(3).rank.should == 3 # 1.0/1/"Mic"
@t.player(4).rank.should == 4 # 1.0/1/"Min"
@t.player(6).rank.should == 5 # 0.5/0/"Orr"
@t.player(5).rank.should == 6 # 0.5/0/"Ui"
end
it "should exhibit equivalence between Neustadtl and Sonneborn-Berger" do
@t.tie_breaks = ['Sonneborn-Berger']
@t.rerank
(1..6).inject(''){ |t,r| t << @t.player(r).rank.to_s }.should == '213465'
end
it "should be able to use more than one method" do
@t.tie_breaks = [:neustadtl, :buchholz]
@t.rerank
@t.player(2).rank.should == 1 # 3.0/2.5
@t.player(1).rank.should == 2 # 3.0/2.0
@t.player(3).rank.should == 3 # 1.0/1.0
@t.player(4).rank.should == 4 # 1.0/0.5
@t.player(5).rank.should == 5 # 0.5/0.25/6.5
@t.player(6).rank.should == 6 # 0.5/0.25/4.5
end
it "should be possible as a side effect of validation" do
@t.tie_breaks = [:buchholz]
@t.invalid(:rerank => true).should be_false
@t.player(2).rank.should == 1 # 3/3
@t.player(1).rank.should == 2 # 3/2
@t.player(3).rank.should == 3 # 1/7
@t.player(4).rank.should == 4 # 1/4
@t.player(5).rank.should == 5 # 1/6
@t.player(6).rank.should == 6 # 0/5
end
it "should be possible as a side effect of validation with multiple tie break methods" do
@t.tie_breaks = [:neustadtl, :buchholz]
@t.invalid(:rerank => true).should be_false
@t.player(2).rank.should == 1 # 3/3
@t.player(1).rank.should == 2 # 3/2
@t.player(3).rank.should == 3 # 1/7
@t.player(4).rank.should == 4 # 1/4
@t.player(5).rank.should == 5 # 1/6
@t.player(6).rank.should == 6 # 0/5
end
end
context "convenience file parser" do
before(:all) do
@s = File.dirname(__FILE__) + '/samples'
@c = ICU::Tournament
end
it "should parse a valid SwissPerfect file" do
t = nil
lambda { t = @c.parse_file!("#{@s}/sp/nccz.zip", 'SwissPerfect', :start => '2010-05-08') }.should_not raise_error
t.players.size.should == 77
t.start.should == '2010-05-08'
end
it "should parse a valid CSV file" do
t = nil
lambda { t = @c.parse_file!("#{@s}/fcsv/valid.csv", 'ForeignCSV') }.should_not raise_error
t.players.size.should == 16
end
it "should parse a valid Krause file" do
t = nil
lambda { t = @c.parse_file!("#{@s}/krause/valid.tab", 'Krause') }.should_not raise_error
t.players.size.should == 12
end
it "should ignore options where appropriate" do
t = nil
lambda { t = @c.parse_file!("#{@s}/krause/valid.tab", 'Krause', :start => '2010-05-08') }.should_not raise_error
t.start.should == '2008-02-01'
end
it "should raise exceptions for invalid files" do
lambda { @c.parse_file!("#{@s}/sp/notenoughfiles.zip", 'SwissPerfect', :start => '2010-05-08') }.should raise_error(/files/)
lambda { @c.parse_file!("#{@s}/krause/invalid.tab", 'Krause') }.should raise_error(/name/)
lambda { @c.parse_file!("#{@s}/fcsv/invalid.csv", 'ForeignCSV') }.should raise_error(/termination/)
end
it "should raise exceptions if the wrong type is used" do
lambda { @c.parse_file!("#{@s}/krause/valid.tab", 'ForeignCSV') }.should raise_error(/expected/)
lambda { @c.parse_file!("#{@s}/fcsv/valid.csv", 'SwissPerfect') }.should raise_error(/cannot/)
lambda { @c.parse_file!("#{@s}/sp/nccz.zip", 'Krause') }.should raise_error(/(invalid|conversion)/i)
end
it "should raise an exception if file does not exist" do
lambda { @c.parse_file!("#{@s}/nosuchfile.cvs", 'ForeignCSV') }.should raise_error(/no such file/i)
lambda { @c.parse_file!("#{@s}/nosuchfile.zip", 'SwissPerfect') }.should raise_error(/invalid/i)
lambda { @c.parse_file!("#{@s}/nosuchfile.tab", 'Krause') }.should raise_error(/no such file/i)
end
it "should raise an exception if an invalid type is used" do
lambda { @c.parse_file!("#{@s}/krause/valid.tab", 'NoSuchType') }.should raise_error(/invalid format/i)
end
end
context "type specific validation" do
before(:all) do
@t = Tournament.new('Bangor Bash', '2009-11-09')
@t.add_player(Player.new('Bobby', 'Fischer', 1))
@t.add_player(Player.new('Garry', 'Kasparov', 2))
@t.add_player(Player.new('Mark', 'Orr', 3))
@t.add_result(Result.new(1, 1, '=', :opponent => 2, :colour => 'W'))
@t.add_result(Result.new(2, 2, 'L', :opponent => 3, :colour => 'W'))
@t.add_result(Result.new(3, 3, 'W', :opponent => 1, :colour => 'W'))
end
it "should pass generic validation" do
@t.invalid.should be_false
end
it "should fail type-specific validation when the type supplied is inappropriate" do
@t.invalid(:type => String).should match(/invalid type/)
@t.invalid(:type => "AbCd").should match(/invalid type/)
end
end
end
end