tictactoe-core 0.1.1

data/spec/tictactoe/game_spec.rb

@@ -0,0 +1,288 @@
+require 'tictactoe/game'
+
+RSpec.describe Tictactoe::Game do
+  class Human
+    attr_reader :mark
+
+    def initialize(mark, moves)
+      @mark = mark 
+      @moves = moves
+    end
+
+    def get_move(state)
+      @moves.pop
+    end
+  end
+
+  let(:moves){[]}
+
+  def create(board_size, x_type, o_type)
+    game = described_class.new(board_size, x_type, o_type)
+    game.register_human_factory(lambda{|mark| Human.new(mark, moves)})
+    game
+  end
+
+  def human_tick_playing_to(game, loc)
+    moves << loc
+    game.tick()
+  end
+  
+  def computer_tick(game)
+    game.tick()
+  end
+
+  def expect_amount_of_marks(game, mark, expected_count)
+    actual_count = game.marks.select{|m| m == mark}.count
+    expect(actual_count).to eq(expected_count)
+  end
+
+  it 'is not finished' do
+    game = create(3, :human, :human)
+    expect(game.is_finished?).to eq(false)
+  end
+
+  describe 'can be observed' do
+    it 'initial game size 3' do
+      game = create(3, :human, :human)
+      expect(game.marks).to eq([
+        nil, nil, nil,
+        nil, nil, nil,
+        nil, nil, nil
+      ])
+    end
+
+    it 'initial game size 4' do
+      game = create(4, :human, :human)
+      expect(game.marks).to eq([
+        nil, nil, nil, nil,
+        nil, nil, nil, nil,
+        nil, nil, nil, nil,
+        nil, nil, nil, nil
+      ])
+    end
+
+    it 'first play of x on size 3' do
+      game = create(3, :human, :human)
+      human_tick_playing_to(game, 0)
+      expect(game.marks).to eq([
+        :x,  nil, nil,
+        nil, nil, nil,
+        nil, nil, nil
+      ])
+    end
+    
+    it 'first play of o on size 3' do
+      game = create(3, :human, :human)
+      human_tick_playing_to(game, 0)
+      human_tick_playing_to(game, 1)
+      expect(game.marks).to eq([
+        :x,  :o,  nil,
+        nil, nil, nil,
+        nil, nil, nil
+      ])
+    end
+  end
+
+  describe 'available' do
+    it 'returns all the moves when no move has been made' do
+      game = create(3, :human, :human)
+      expect(game.available).to eq([
+        0, 1, 2,
+        3, 4, 5,
+        6, 7, 8
+      ])
+    end
+
+    it 'returns all the available moves for when there is one move made on 3 by 3' do
+      game = create(3, :human, :human)
+      human_tick_playing_to(game, 0)
+      expect(game.available).to eq([
+           1, 2,
+        3, 4, 5,
+        6, 7, 8
+      ])
+    end
+
+    it 'returns all the available moves for when there is one move made on 4 by 4' do
+      game = create(4, :human, :human)
+      human_tick_playing_to(game, 15)
+      expect(game.available).to eq([
+        0, 1, 2, 3,
+        4, 5, 6, 7,
+        8, 9,10,11,
+       12,13,14
+      ])
+    end
+  end
+
+  describe 'is not finished if no player has a line' do
+    it do
+      game = create(4, :human, :human)
+      human_tick_playing_to(game, 0)
+      human_tick_playing_to(game, 4)
+      human_tick_playing_to(game, 1)
+      human_tick_playing_to(game, 5)
+      human_tick_playing_to(game, 2)
+      human_tick_playing_to(game, 6)
+      expect(game.is_finished?).to eq(false)
+    end
+    
+    it do
+      game = create(3, :human, :human)
+      human_tick_playing_to(game, 0)
+      human_tick_playing_to(game, 3)
+      human_tick_playing_to(game, 1)
+      human_tick_playing_to(game, 4)
+      expect(game.is_finished?).to eq(false)
+    end
+  end
+
+  describe 'is finished when a player has a line' do
+    it do
+      game = create(3, :human, :human)
+      human_tick_playing_to(game, 0)
+      human_tick_playing_to(game, 3)
+      human_tick_playing_to(game, 1)
+      human_tick_playing_to(game, 4)
+      human_tick_playing_to(game, 2)
+      expect(game.is_finished?).to eq(true)
+      expect(game.winner).to eq(:x)
+    end
+
+    it do
+      game = create(3, :human, :human)
+      human_tick_playing_to(game, 3)
+      human_tick_playing_to(game, 0)
+      human_tick_playing_to(game, 4)
+      human_tick_playing_to(game, 1)
+      human_tick_playing_to(game, 8)
+      human_tick_playing_to(game, 2)
+      expect(game.is_finished?).to eq(true)
+      expect(game.winner).to eq(:o)
+    end
+
+    it do
+      game = create(4, :human, :human)
+      human_tick_playing_to(game, 0)
+      human_tick_playing_to(game, 4)
+      human_tick_playing_to(game, 1)
+      human_tick_playing_to(game, 5)
+      human_tick_playing_to(game, 2)
+      human_tick_playing_to(game, 6)
+      human_tick_playing_to(game, 3)
+      expect(game.is_finished?).to eq(true)
+      expect(game.winner).to eq(:x)
+    end
+  end
+
+  describe 'is finished when the board is full' do
+    it do
+      game = create(3, :human, :human)
+      human_tick_playing_to(game, 0)
+      human_tick_playing_to(game, 1)
+      human_tick_playing_to(game, 2)
+      human_tick_playing_to(game, 5)
+      human_tick_playing_to(game, 3)
+      human_tick_playing_to(game, 6)
+      human_tick_playing_to(game, 4)
+      human_tick_playing_to(game, 8)
+      human_tick_playing_to(game, 7)
+      expect(game.marks).to eq([
+        :x, :o, :x,
+        :x, :x, :o,
+        :o, :x, :o
+      ])
+      expect(game.is_finished?).to eq(true)
+    end
+  end
+
+  describe 'cannot play twice to the same move' do
+    it 'second play' do
+      game = create(3, :human, :human)
+      human_tick_playing_to(game, 0)
+      human_tick_playing_to(game, 0)
+      expect(game.marks).to eq([
+        :x,  nil, nil,
+        nil, nil, nil,
+        nil, nil, nil
+      ])
+    end
+  end
+
+  describe 'cannot be played when finished' do
+    it do
+      game = create(3, :human, :human)
+
+      human_tick_playing_to(game, 0)
+      human_tick_playing_to(game, 3)
+      human_tick_playing_to(game, 1)
+      human_tick_playing_to(game, 4)
+      human_tick_playing_to(game, 2)
+
+      human_tick_playing_to(game, 5)
+
+      expect(game.marks).to eq([
+        :x,  :x,  :x,
+        :o,  :o,  nil,
+        nil, nil, nil
+      ])
+    end
+  end
+
+  describe 'if the human has no move ignores the ticks' do
+    it do
+      game = create(3, :human, :human)
+      human_tick_playing_to(game, nil)
+      human_tick_playing_to(game, nil)
+      human_tick_playing_to(game, nil)
+      expect_amount_of_marks(game, :x, 0)
+    end
+
+    it do
+      game = create(3, :human, :human)
+      human_tick_playing_to(game, nil)
+      human_tick_playing_to(game, nil)
+      human_tick_playing_to(game, nil)
+      human_tick_playing_to(game, 0)
+      expect_amount_of_marks(game, :x, 1)
+      expect_amount_of_marks(game, :o, 0)
+    end
+
+    it do
+      game = create(3, :human, :human)
+      human_tick_playing_to(game, 0)
+      human_tick_playing_to(game, nil)
+      human_tick_playing_to(game, nil)
+      human_tick_playing_to(game, nil)
+      expect_amount_of_marks(game, :x, 1)
+      expect_amount_of_marks(game, :o, 0)
+    end
+  end
+
+  describe 'the computer plays' do
+    it 'the first turn' do
+      game = create(3, :computer, :human)
+      computer_tick(game)
+      expect_amount_of_marks(game, :x, 1)
+      expect_amount_of_marks(game, :o, 0)
+    end
+
+    it 'the second turn' do
+      game = create(3, :human, :computer)
+      human_tick_playing_to(game, 0)
+      computer_tick(game)
+      expect_amount_of_marks(game, :x, 1)
+      expect_amount_of_marks(game, :o, 1)
+    end
+
+    it 'four consecutive turns' do
+      game = create(3, :computer, :computer)
+      computer_tick(game)
+      computer_tick(game)
+      computer_tick(game)
+      computer_tick(game)
+      expect_amount_of_marks(game, :x, 2)
+      expect_amount_of_marks(game, :o, 2)
+    end
+  end
+end

data/spec/tictactoe/players/computer_spec.rb

@@ -0,0 +1,42 @@
+require 'tictactoe/players/computer'
+
+RSpec.describe Tictactoe::Players::Computer do
+  class IntelligenceSpy
+    attr_reader :received_state, :received_mark
+
+    def initialize(moves)
+      @moves = moves
+    end
+
+    def desired_moves(state, mark)
+      @received_state = state
+      @received_mark = mark
+      @moves
+    end
+  end
+
+  class ChooseFirst
+    def choose_one(list)
+      list.first
+    end
+  end
+
+  def create(mark, intelligence = IntelligenceSpy.new([1, 2, 3]), chooser = ChooseFirst.new)
+    described_class.new(mark, intelligence, chooser)
+  end
+
+  it 'has a mark' do
+    computer = create(:x)
+    expect(computer.mark).to eq(:x)   
+
+  end
+
+  it 'can make a move' do
+    intelligence =  IntelligenceSpy.new([1, 2, 3])
+    computer = create(:x, intelligence, ChooseFirst.new)
+
+    expect(computer.get_move(:state)).to eq (1)
+    expect(intelligence.received_state).to eq (:state)
+    expect(intelligence.received_mark).to eq (:x)
+  end
+end

data/spec/tictactoe/players/factory_spec.rb

@@ -0,0 +1,48 @@
+require 'tictactoe/players/factory'
+
+RSpec.describe Tictactoe::Players::Factory do
+  class ComputerFake
+    attr_reader :mark
+
+    def initialize(mark)
+      @mark = mark
+    end
+  end
+
+  let(:computer_factory) do
+    lambda{|mark| ComputerFake.new(mark)}
+  end
+  let(:factory) do 
+    factory = described_class.new()
+    factory.register(:computer, computer_factory)
+    factory
+  end
+
+  it 'creates a computer player' do
+    computer_player = factory.create(:computer, :x)
+
+    expect(computer_player).to be_a(ComputerFake)
+    expect(computer_player.mark).to eq(:x)
+  end
+
+  class HumanFake
+    attr_reader :mark
+
+    def initialize(mark)
+      @mark = mark
+    end
+  end
+
+  it 'creates a human computer after being registered' do
+    human_factory = lambda{|mark| HumanFake.new(mark)}
+    factory.register(:human, human_factory)
+    human_player = factory.create(:human, :o)
+
+    expect(human_player).to be_a(HumanFake)
+    expect(human_player.mark).to eq(:o)
+  end
+
+  it 'raises a message when no factory is available for that type' do
+    expect{factory.create(:unknown_type, :o)}.to raise_error("No factory has been defined for type: unknown_type")
+  end
+end

data/spec/tictactoe/sequence_spec.rb

@@ -0,0 +1,20 @@
+require 'tictactoe/sequence'
+
+RSpec.describe Tictactoe::Sequence do
+  it 'has the first value' do
+    expect(described_class.new([:x, :o]).first.value).to eq(:x)
+  end
+
+  it 'has the second value' do
+    expect(described_class.new([:x, :o]).first.next.value).to eq(:o)
+  end
+
+  it 'cycles when reaches the end' do
+    expect(described_class.new([:x, :o]).first.next.next.value).to eq(:x)
+  end
+
+  it 'can handle 3 nodes' do
+    expect(described_class.new([0, 1, 2]).first.next.next.value).to eq(2)
+    expect(described_class.new([0, 1, 2]).first.next.next.next.value).to eq(0)
+  end
+end

data/spec/tictactoe/state_spec.rb

@@ -0,0 +1,136 @@
+require 'spec_helper'
+require 'tictactoe/state'
+require 'tictactoe/boards/three_by_three_board'
+
+RSpec.describe Tictactoe::State do
+  def look_at(state, location)
+    state.marks[location]
+  end
+
+  def expect_state(marks)
+    expect(@state.marks).to eq(marks)
+  end
+
+  def expect_finished(expected)
+    finished = @state.when_finished{true} || false
+    expect(finished).to eq(expected)
+  end
+
+  def expect_winner(expected)
+    actual_winner = @state.when_finished{|winner| winner}
+    expect(actual_winner).to eq(expected)
+  end
+
+  describe "given a 3x3 board" do
+    before(:each) do
+      @board = Tictactoe::Boards::ThreeByThreeBoard.new
+      @state = described_class.new(@board)
+    end
+
+    it "can make a move" do
+      next_state = @state.make_move(3, :mark)
+      expect(look_at(next_state, 3)).to eq(:mark)
+      expect(next_state.available_moves).not_to include(3)
+      expect(next_state.played_moves).to eq(1)
+    end
+
+    it "is immutable" do
+      @state.make_move(2, :mark)
+      expect(look_at(@state, 2)).to eq(nil)
+      expect(@state.available_moves).to include(2)
+    end
+
+    it 'can access to the board marks' do
+      expect(@state.marks).to eq([
+        nil, nil, nil,
+        nil, nil, nil,
+        nil, nil, nil,
+      ])
+    end
+
+    describe "with no moves" do
+      it "should have an empty state" do
+        expect_state([nil, nil, nil, nil, nil, nil, nil, nil, nil])
+      end
+
+      it "should not be finished" do
+        expect_finished(false)
+      end
+
+      it "should have no winner" do
+        expect_winner(nil)
+      end
+    end
+
+    describe "with the first move" do
+      before(:each) do
+        @loc = 0
+        @state = @state.make_move(@loc, :X)
+      end
+
+      it "should contain that move" do
+        expect(look_at(@state, @loc)).to eq(:X)
+      end
+    end
+
+    Tictactoe::Boards::ThreeByThreeBoard.new.lines.each do |line|
+      describe "with a line for player a" do
+        before(:each) do
+          line.each do |l|
+            @state = @state.make_move(l, :X)
+          end
+        end
+
+        it "should be finished" do
+          expect_finished(true)
+        end
+
+        it "should have won" do
+          expect_winner(:X)
+        end
+      end
+    end
+
+    def set_state(*marks)
+      marks.each_with_index do |mark, location|
+        @state = @state.make_move(location, mark)
+      end
+    end
+
+    describe "with three moves not in line for player a" do
+      before(:each) do
+        set_state(
+          :X,  :X,  nil,
+          :X,  nil, nil,
+          nil, nil, nil
+        )
+      end
+
+      it "should not be finished" do
+        expect_finished(false)
+      end
+
+      it "should have no winner" do
+        expect_winner(nil)
+      end
+    end
+
+    describe "with a full board but no winner" do
+      before(:each) do
+        set_state(
+          :O, :X, :X,
+          :X, :X, :O,
+          :O, :O, :X
+        )
+      end
+
+      it "should be finished" do
+        expect_finished(true)
+      end
+
+      it "should have no winner" do
+        expect_winner(nil)
+      end
+    end
+  end
+end