functional-yahtzee 0.0.3

data/test/integration/scoring_test.rb

@@ -0,0 +1,20 @@
+require 'test_helper'
+require 'scoring'
+
+describe Yahtzee::Scoring do
+  subject { Yahtzee::Scoring }
+
+  describe "score(dice, placement)" do
+    describe "UpperCard Scoring" do
+      let(:score_card) { Yahtzee::ScoreCard.new }
+      let(:save_card)  { Yahtzee::ScoreCard.persist(score_card) }
+      it "must keep state" do
+        card = subject.score([1,1,3,4,5], :aces, &save_card)
+        card = subject.score([1,2,2,4,5], :twos, &save_card)
+        card.aces.must_equal 2
+        card.twos.must_equal 4
+      end
+    end
+  end
+end
+

data/test/test_helper.rb

@@ -0,0 +1,19 @@
+if RUBY_ENGINE == "ruby"
+  begin
+    require 'simplecov'
+    require 'coveralls'
+    SimpleCov.formatter = SimpleCov::Formatter::MultiFormatter[
+      Coveralls::SimpleCov::Formatter,
+      SimpleCov::Formatter::HTMLFormatter
+    ]
+    SimpleCov.start do
+      add_filter "/test/"
+    end
+  rescue LoadError
+    warn "unable to load Coveralls!"
+  end
+end
+require 'minitest/autorun'
+
+require_relative '../lib/yahtzee'
+

data/test/unit/dice_test.rb

@@ -0,0 +1,40 @@
+require 'test_helper'
+
+require 'dice'
+
+describe Yahtzee::Dice do
+  subject { Yahtzee::Dice }
+
+  describe ".reroll(keepers)" do
+    subject { Yahtzee::Dice.reroll([1,2,3]) }
+
+    it "must return the keepers + the new roll" do
+      subject.slice(0..2).must_equal([1,2,3])
+    end
+
+    it "must always return 5 digits" do
+      [[1,2,3],[1,2],[1,2,3,4], [1,2,3,4,5,6]].each do |keepers|
+        Yahtzee::Dice.reroll(keepers).count.must_equal 5
+      end
+    end
+  end
+
+  describe ".roll(num)" do
+    1.upto(5).each do |roll|
+      it "must retun #{roll} dice" do
+        subject.roll(roll).size.must_equal roll
+      end
+    end
+
+    it "wont allow rolls with more then 5 die" do
+      subject.roll(6).size.must_equal(5)
+    end
+
+    it "must only roll 1-6" do
+      subject.roll(6).each do |roll|
+        (1..6).include?(roll).must_equal true
+      end
+    end
+  end
+
+end

data/test/unit/game_test.rb

@@ -0,0 +1,27 @@
+require 'test_helper'
+require 'game'
+
+describe Yahtzee::Game do
+  subject { Yahtzee::Game }
+  
+  describe "first_roll" do
+    it "must roll the dice and return the roll" do
+      subject.first_roll.must_be_kind_of Array
+    end
+  end
+
+  describe "second_roll(keepers)" do
+    let(:keepers) { [1,2,3] }
+    it "must keep the die they want and reroll the rest" do
+      (subject.second_roll(keepers) & [1,2,3]).must_equal keepers
+    end
+  end
+
+  describe "third_roll(keepers)" do
+    let(:keepers) { [1,2,3,4] }
+    it "must keep the die they want and reroll the rest" do
+      (subject.third_roll(keepers) & [1,2,3,4]).must_equal keepers
+    end
+  end
+end
+

data/test/unit/probability_test.rb

@@ -0,0 +1,35 @@
+require 'test_helper'
+require 'probability'
+
+describe Yahtzee::Probability do
+  subject { Yahtzee::Probability }
+
+  describe "large_straight(dice, rolls_left)" do
+    it "must return 0.3333333333333333 with 2 rolls left" do
+      subject.large_straight([1,2,3,4,6], 2).must_equal(0.3333333333333333)
+    end
+
+    it "must return 0.16666666666666666 with 1 rolls left" do
+      subject.large_straight([1,2,3,4,6], 1).must_equal(0.16666666666666666)
+    end
+
+    it "must return 0.03333333333333333 with 1 rolls left" do
+      subject.large_straight([1,2,2,6,6], 1).must_equal(0.03333333333333333)
+    end
+  end
+
+  describe "small_straight(dice, rolls_left)" do
+    it "must return 0.16666666666666666 with 2 rolls left" do
+      subject.small_straight([1,2,3,5,6], 2).must_equal(0.16666666666666666)
+    end
+
+    it "must return 0.08333333333333333 with 1 rolls left" do
+      subject.small_straight([1,2,3,5,6], 1).must_equal(0.08333333333333333)
+    end
+
+    it "must return 0.03333333333333333 with 1 rolls left" do
+      subject.small_straight([1,2,5,5,6], 1).must_equal(0.03333333333333333)
+    end
+  end
+end
+

data/test/unit/score_card_test.rb

@@ -0,0 +1,77 @@
+require 'test_helper'
+require 'score_card'
+
+describe Yahtzee::ScoreCard do
+  subject { Yahtzee::ScoreCard }
+
+  describe ".upper_keys" do
+    subject { Yahtzee::ScoreCard.upper_keys }
+    it "must contain all the keys on the upper card" do
+      subject.must_equal [:aces, :twos, :threes, :fours, 
+                          :fives, :sixes]
+    end
+  end
+
+  describe ".lower_keys" do
+    subject { Yahtzee::ScoreCard.lower_keys }
+    it "must contain all the keys on the upper card" do
+      subject.must_equal [:yahtzee, :bonus_yahtzee_1, :bonus_yahtzee_2, 
+       :bonus_yahtzee_3, :three_of_a_kind,
+       :four_of_a_kind, :full_house, :small_straight,
+       :large_straight, :chance]
+    end
+  end
+
+  describe ".placement_keys" do
+    subject { Yahtzee::ScoreCard.placement_keys }
+    it "must include all the placement keys" do
+      subject.must_equal [:aces, :twos, :threes, :fours, :fives, 
+                          :sixes, :small_straight, :large_straight, 
+                          :full_house, :three_of_a_kind, :four_of_a_kind, 
+                          :yahtzee, :chance]
+    end
+  end
+
+  describe ".meta_keys" do
+    subject { Yahtzee::ScoreCard.placement_keys }
+    it "must include all the placement keys" do
+      subject.must_equal [:aces, :twos, :threes, :fours, :fives, 
+                          :sixes, :small_straight, :large_straight, 
+                          :full_house, :three_of_a_kind, :four_of_a_kind, 
+                          :yahtzee, :chance]
+    end
+  end
+
+  describe ".persist" do
+    subject { Yahtzee::ScoreCard.persist(score_card) }
+    let(:score_card) { Yahtzee::ScoreCard.new( yahtzee: 50 ) }
+
+    it "will return a new instance of ScoreCard with the old+new vals" do
+      old_id = score_card.object_id
+      score_card = subject.call(:small_straight, 30)
+      score_card.object_id.wont_equal old_id
+    end
+  end
+
+  describe "initialize" do
+    it "will update attrs when passed in" do
+      subject.new( {:aces => 4} ).aces.must_equal 4
+    end
+  end
+
+  describe "to_hash" do
+    it "must return a hash of the score card elements" do
+      subject.new({aces: 4}).to_hash.must_equal({
+        aces: 4, twos: nil, threes: nil,
+        fours: nil, fives: nil, sixes: nil,
+        upper_subtotal: nil,
+        upper_total: nil, small_straight: nil,
+        large_straight: nil, full_house: nil,
+        three_of_a_kind: nil, four_of_a_kind: nil,
+        yahtzee: nil, chance: nil, bonus_yahtzee_1: nil,
+        bonus_yahtzee_2: nil, bonus_yahtzee_3: nil,
+        lower_subtotal: nil, game_total: nil 
+      })
+    end
+  end
+end

data/test/unit/scoring/lower_card_test.rb

@@ -0,0 +1,71 @@
+require 'test_helper'
+require 'scoring/lower_card'
+
+describe Yahtzee::Scoring::LowerCard do
+  subject { Yahtzee::Scoring::LowerCard }
+
+  describe "score_yahtzee(dice)" do
+    it "must score a yahtzee" do
+      subject.score_yahtzee([4,4,4,4,4]).must_equal 50
+      subject.score_yahtzee([4,4,4,4,6]).must_equal 0
+    end
+  end
+
+  describe "score_bonus_yahtzee(dice)" do
+    it "must score a bonus yahtzee" do
+      subject.score_bonus_yahtzee([4,4,4,4,4]).must_equal 100
+      subject.score_bonus_yahtzee([4,4,4,4,6]).must_equal 0
+    end
+
+    #1.upto(3) do |i|
+    #  it "must respond to score_bonus_yahtzee_#{i}" do
+    #    subject.send("score_bonus_yahtzee_#{i}",[4,4,4,4,4]).must_equal 100
+    #  end
+    #end
+  end
+
+  describe "score_small_straight(dice)" do
+    it "must score a small straight" do
+      subject.score_small_straight([1,2,3,4,6]).must_equal 30
+      subject.score_small_straight([1,2,3,5,6]).must_equal 0
+    end
+  end
+
+  describe "score_large_straight(dice)" do
+    it "must score a large straight" do
+      subject.score_large_straight([1,2,3,4,5]).must_equal 40
+      subject.score_large_straight([1,2,3,4,4]).must_equal 0
+    end
+  end
+  
+  describe "score_full_house(dice)" do
+    it "must return a score of 25 for a full house" do
+      subject.score_full_house([2,2,2,4,4]).must_equal 25
+    end
+
+    it "must return a score of 0 for no full-house" do
+      subject.score_full_house([1,2,4,4,4]).must_equal 0
+    end
+  end
+
+  describe "score_three_of_a_kind(dice)" do
+    it "must total matches 3 or over" do
+      subject.score_three_of_a_kind([1,2,4,4,4]).must_equal 12
+      subject.score_three_of_a_kind([1,2,2,4,4]).must_equal 0
+    end
+  end
+
+  describe "score_four_of_a_kind(dice)" do
+    it "must total matches 4 or over" do
+      subject.score_four_of_a_kind([1,4,4,4,4]).must_equal 16
+      subject.score_four_of_a_kind([1,2,2,4,4]).must_equal 0
+    end
+  end
+
+  describe "score_min_of_a_kind(dice, min)" do
+    it "must total matches of min or over" do
+      subject.score_min_of_a_kind([1,4,4,4,4], 4).must_equal 16
+      subject.score_min_of_a_kind([1,2,4,4,4], 3).must_equal 12
+    end
+  end
+end

data/test/unit/scoring/upper_card_test.rb

@@ -0,0 +1,53 @@
+require 'test_helper'
+require 'score_card'
+require 'scoring/upper_card'
+
+describe Yahtzee::Scoring::UpperCard do
+  subject { Yahtzee::Scoring::UpperCard }
+
+
+  describe "score_sums(dice, scoring_die)" do
+    it "must add up only the scoring_die" do
+      subject.score_sums([1,1,0,0,0], 1).must_equal 2
+      subject.score_sums([1,1,4,4,1], 1).must_equal 3
+    end
+  end
+
+  describe "scoring matching digits" do
+    describe "score_aces(dice)" do
+      it "must score only aces" do
+        subject.score_aces([1,2,3,4,5]).must_equal(1)
+      end
+    end
+
+    describe "score_twos(dice)" do
+      it "must score only twos" do
+        subject.score_twos([1,2,3,4,5]).must_equal(2)
+      end
+    end
+
+    describe "score_threes(dice)" do
+      it "must score only threes" do
+        subject.score_threes([1,2,3,4,5]).must_equal(3)
+      end
+    end
+
+    describe "score_fours(dice)" do
+      it "must score only fours" do
+        subject.score_fours([1,2,3,4,5]).must_equal(4)
+      end
+    end
+
+    describe "score_fives(dice)" do
+      it "must score only fives" do
+        subject.score_fives([1,2,3,4,5]).must_equal(5)
+      end
+    end
+
+    describe "score_sixes(dice)" do
+      it "must score only sixes" do
+        subject.score_sixes([1,2,3,4,6]).must_equal(6)
+      end
+    end
+  end
+end

data/test/unit/scoring_test.rb

@@ -0,0 +1,169 @@
+require 'test_helper'
+require 'scoring'
+
+describe Yahtzee::Scoring do
+  subject { Yahtzee::Scoring }
+
+  describe "score(dice, placement)" do
+    let(:score_card) { Yahtzee::ScoreCard.new }
+    let(:writer)  { Yahtzee::ScoreCard.persist(score_card) }
+
+    describe "score_game_total(scores, &writer)" do
+      let(:scores) {{
+        upper_total: 119, lower_subtotal: 166
+      }}
+
+      it "must return a score card with the game total of 285 (119+166)" do
+        subject.score_game_total(scores, &writer).
+                game_total.must_equal 285
+      end
+    end
+    
+    describe "UpperCard Scoring" do
+      describe "Aces" do
+        it "must return a score card with aces: 2" do
+          subject.score([1,1,3,4,5], :aces, &writer).
+                  aces.must_equal 2
+        end
+      end
+
+      describe "Twos" do
+        it "must return a score card with twos: 4" do
+          subject.score([1,2,2,4,5], :twos, &writer).
+                  twos.must_equal 4
+        end
+      end
+
+      describe "Threes" do
+        it "must return a score card with threes: 6" do
+          subject.score([1,3,3,4,5], :threes, &writer).
+                  threes.must_equal 6
+        end
+      end
+
+      describe "Fours" do
+        it "must return a score card with fours: 8" do
+          subject.score([1,3,4,4,5], :fours, &writer).
+                  fours.must_equal 8
+        end
+      end
+
+      describe "Fives" do
+        it "must return a score card with fives: 10" do
+          subject.score([1,3,4,5,5], :fives, &writer).
+                  fives.must_equal 10
+        end
+      end
+
+      describe "Sixes" do
+        it "must return a score card with sixes: 12" do
+          subject.score([1,3,6,5,6], :sixes, &writer).
+                  sixes.must_equal 12
+        end
+      end
+
+      describe "Upper Subtotal" do
+        let(:scores) {{
+          aces: 2, twos: 4, threes: 6,
+          fours: 8, fives: 10, sixes: 12
+        }}
+
+        it "must return a score card with upper_subtotal: 42" do
+          subject.score_subtotal(scores, :upper_subtotal, &writer).
+                  upper_subtotal.must_equal 42
+        end
+      end
+
+      describe "score_upper_total(scores, &writer)" do
+        let(:scores) {{
+          aces: 4, twos: 8, threes: 12,
+          fours: 16, fives: 20, sixes: 24
+        }}
+
+        it "must a score card with an upper_total of 119 (84+35)" do
+          subject.score_upper_total(scores, &writer).
+                  upper_total.must_equal 119
+        end
+      end
+      describe "when the sum is not over 63" do
+        let(:scores) {{
+          aces: 2, twos: 4, threes: 6,
+          fours: 8, fives: 10, sixes: 12
+        }}
+        it "must return a score card with an upper_total of 42" do
+          subject.score_upper_total(scores, &writer).
+                  upper_total.must_equal 42
+        end
+      end
+    end
+
+    describe "LowerCard Scoring" do
+      describe "chance" do
+        it "must sum the dice" do
+          subject.score([1,2,3,4,5], :chance, &writer).
+                  chance.must_equal 15
+        end
+      end
+
+      describe "full_house" do
+        it "must return a score card with full_house: 25" do
+          subject.score([1,1,1,2,2], :full_house, &writer).
+                  full_house.must_equal 25
+        end
+      end
+
+      describe "small_straight" do
+        it "must return a score card with small_straight: 30" do
+          subject.score([1,2,3,4,6], :small_straight, &writer).
+                  small_straight.must_equal 30
+        end
+      end
+
+      describe "large_straight" do
+        it "must return a score card with large_straight: 40" do
+          subject.score([1,2,3,4,5], :large_straight, &writer).
+                  large_straight.must_equal 40
+        end
+      end
+
+      describe "three_of_a_kind" do
+        it "must return a score card with three_of_a_kind: 9" do
+          subject.score([1,2,3,3,3], :three_of_a_kind, &writer).
+                  three_of_a_kind.must_equal 9
+        end
+      end
+
+      describe "four_of_a_kind" do
+        it "must return a score card with four_of_a_kind: 16" do
+          subject.score([1,4,4,4,4], :four_of_a_kind, &writer).
+                  four_of_a_kind.must_equal 16
+        end
+      end
+
+      describe "yahtzee" do
+        it "must return a score card with yahtzee: 50" do
+          subject.score([1,1,1,1,1], :yahtzee, &writer).yahtzee.must_equal 50
+        end
+      end
+
+      describe "bonus_yahtzee_1" do
+        it "must return a score card with bonus_yahtzee_1: 100" do
+          subject.score([1,1,1,1,1], :bonus_yahtzee_1, &writer).
+                  bonus_yahtzee_1.must_equal 100
+        end
+      end
+
+      describe "Lower Subtotal" do
+        let(:scores) {{
+          full_house: 25, small_straight: 30, 
+          large_straight: 40, three_of_a_kind: 9,
+          four_of_a_kind: 12, yahtzee: 50
+        }}
+        it "must return a score card with lower_subtotal: 166" do
+          subject.score_subtotal(scores, :lower_subtotal, &writer).
+                  lower_subtotal.must_equal 166
+        end
+      end
+    end
+  end
+end