pgn2 0.4.0

data/lib/pgn/position.rb

@@ -0,0 +1,129 @@
+module PGN
+  # {PGN::Position} encapsulates all of the information necessary to
+  # completely understand a chess position. It can be turned into a FEN string
+  # or perform a move.
+  #
+  # @!attribute board
+  #   @return [PGN::Board] the board for the position
+  #
+  # @!attribute player
+  #   @return [Symbol] the player who moves next
+  #   @example
+  #     position.player #=> :white
+  #
+  # @!attribute castling
+  #   @return [Array<String>] the castling moves that are still available
+  #   @example
+  #     position.castling #=> ["K", "k", "q"]
+  #
+  # @!attribute en_passant
+  #   @return [String] the en passant square if applicable
+  #
+  # @!attribute halfmove
+  #   @return [Integer] the number of halfmoves since the last pawn move or
+  #     capture
+  #
+  # @!attribute fullmove
+  #   @return [Integer] the number of fullmoves made so far
+  #
+
+  class Position
+    PLAYERS  = %i[white black].freeze
+    CASTLING = %w[K Q k q].freeze
+
+    attr_accessor :board
+    attr_accessor :player
+    attr_accessor :castling
+    attr_accessor :en_passant
+    attr_accessor :halfmove
+    attr_accessor :fullmove
+
+    # @return [PGN::Position] the starting position of a chess game
+    #
+    def self.start
+      PGN::Position.new(
+        PGN::Board.start,
+        PLAYERS.first
+      )
+    end
+
+    # @param board [PGN::Board] the board for the position
+    # @param player [Symbol] the player who moves next
+    # @param castling [Array<String>] the castling moves that are still
+    #   available
+    # @param en_passant [String, nil] the en passant square if applicable
+    # @param halfmove [Integer] the number of halfmoves since the last pawn
+    #   move or capture
+    # @param fullmove [Integer] the number of fullmoves made so far
+    #
+    # @example
+    #   PGN::Position.new(
+    #     PGN::Board.start,
+    #     :white,
+    #   )
+    #
+    def initialize(board, player, castling = CASTLING, en_passant = nil, halfmove = 0, fullmove = 1)
+      self.board      = board
+      self.player     = player
+      self.castling   = castling
+      self.en_passant = en_passant
+      self.halfmove   = halfmove
+      self.fullmove   = fullmove
+    end
+
+    # @param str [String] the move to make in SAN
+    # @return [PGN::Position] the resulting position
+    #
+    # @example
+    #   queens_pawn = PGN::Position.start.move("d4")
+    #
+    def move(str)
+      move       = PGN::Move.new(str, player)
+      calculator = PGN::MoveCalculator.new(board, move)
+
+      new_castling = castling - calculator.castling_restrictions
+      new_halfmove = if calculator.increment_halfmove?
+                       halfmove + 1
+                     else
+                       0
+                     end
+      new_fullmove = if calculator.increment_fullmove?
+                       fullmove + 1
+                     else
+                       fullmove
+                     end
+      no_move = str == '--'
+      PGN::Position.new(
+        no_move ? board : calculator.result_board,
+        next_player,
+        new_castling,
+        calculator.en_passant_square,
+        new_halfmove,
+        new_fullmove
+      )
+    end
+
+    # @return [Symbol] the next player to move
+    #
+    def next_player
+      (PLAYERS - [player]).first
+    end
+
+    def inspect
+      "\n" + board.inspect
+    end
+
+    # @return [PGN::FEN] a {PGN::FEN} object representing the current position
+    #
+    def to_fen
+      PGN::FEN.from_attributes(
+        board: board,
+        active: player == :white ? 'w' : 'b',
+        castling: castling.join(''),
+        en_passant: en_passant,
+        halfmove: halfmove.to_s,
+        fullmove: fullmove.to_s
+      )
+    end
+  end
+end

data/lib/pgn/version.rb

@@ -0,0 +1,3 @@
+module PGN
+  VERSION = '0.4.0'.freeze
+end

data/lib/pgn.rb

@@ -0,0 +1,26 @@
+require 'pgn/board'
+require 'pgn/fen'
+require 'pgn/game'
+require 'pgn/move'
+require 'pgn/move_calculator'
+require 'pgn/parser'
+require 'pgn/position'
+require 'pgn/version'
+
+module PGN
+  # @param pgn [String] a pgn representation of one or more chess games
+  # @return [Array<PGN::Game>] a list of games
+  #
+  # @note The PGN spec specifies Latin-1 as the encoding for PGN files, so
+  #   this is default.
+  #
+  # @see http://www.chessclub.com/help/PGN-spec PGN Specification
+  #
+  def self.parse(pgn, encoding = Encoding::ISO_8859_1)
+    pgn.force_encoding(encoding) if encoding
+
+    PGN::Parser.new.parse(pgn).map do |game|
+      PGN::Game.new(game[:moves], game[:tags], game[:result], game[:pgn], game[:comment])
+    end
+  end
+end

data/pgn2.gemspec

@@ -0,0 +1,26 @@
+lib = File.expand_path('lib', __dir__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'pgn/version'
+
+Gem::Specification.new do |spec|
+  spec.name          = 'pgn2'
+  spec.version       = PGN::VERSION
+  spec.authors       = ['Stacey Touset', 'Murilo Vasconcelos']
+  spec.email         = ['stacey@touset.org', 'muriloime@gmail.com']
+  spec.description   = 'A PGN parser and FEN generator for Ruby'
+  spec.summary       = 'A PGN parser for Ruby'
+  spec.homepage      = 'https://github.com/muriloime/pgn'
+  spec.license       = 'MIT'
+
+  spec.files         = `git ls-files`.split($/)
+  spec.executables   = spec.files.grep(%r{^bin/}) { |f| File.basename(f) }
+  spec.test_files    = spec.files.grep(%r{^(test|spec|features)/})
+  spec.require_paths = ['lib']
+
+  spec.add_dependency 'whittle'
+
+  spec.add_development_dependency 'bundler', '~> 2.3'
+  spec.add_development_dependency 'pry'
+  spec.add_development_dependency 'rake'
+  spec.add_development_dependency 'rspec'
+end

data/spec/fen_spec.rb

@@ -0,0 +1,100 @@
+require "spec_helper"
+
+describe PGN::FEN do
+  describe "castling availability" do
+    it "should remove all castling availabilitiy after castling" do
+      pos = PGN::FEN.new("rnbqk2r/1p3pbp/p2p1np1/2pP4/P3PB2/2N2N2/1P3PPP/R2QKB1R b KQkq e3 0 8").to_position
+      next_pos = pos.move("O-O")
+      next_pos.to_fen.castling.should_not match(/k|q/)
+    end
+
+    it "should remove all castling availability after moving a king" do
+      pos = PGN::FEN.new("r1b1kb1r/pp2pppp/2n5/4P3/1nB5/P4N2/1P3PPP/RNBqK2R w KQkq - 0 9").to_position
+      next_pos = pos.move("Kxd1")
+      next_pos.to_fen.castling.should_not match(/K|Q/)
+    end
+
+    it "should remove only the one castling option after moving a rook" do
+      pos = PGN::FEN.new("r3k2r/1pp2pp1/p1pb1qn1/4p3/3PP1p1/8/PPPN1PPN/R1BQR1K1 b kq - 1 11").to_position
+      next_pos = pos.move("Rxh2")
+      next_pos.to_fen.castling.should_not match(/k/)
+      next_pos.to_fen.castling.should match(/q/)
+    end
+
+    it "should remove one castling option when a rook is taken" do
+      pos = PGN::FEN.new("rn1qkbnr/pbpppppp/1p6/8/6P1/2N4P/PPPPPP2/R1BQKBNR b KQkq - 2 3").to_position
+      next_pos = pos.move("Bxh1")
+      next_pos.to_fen.castling.should_not match(/K/)
+    end
+
+    it "should change to a hyphen once no side can castle" do
+      pos = PGN::FEN.new("r1bq1rk1/pp1nbppp/3ppn2/8/2PP1N2/P1N5/1P2BPPP/R1BQK2R w KQ - 2 9").to_position
+      pos.to_fen.castling.should_not == "-"
+      next_pos = pos.move("O-O")
+      next_pos.to_fen.castling.should == "-"
+    end
+  end
+
+  describe "en passant" do
+    it "should display the en passant square whenever a pawn moves two spaces" do
+      pos = PGN::FEN.new("rnbqkb1r/pppppppp/5n2/8/8/5N2/PPPPPPPP/RNBQKB1R w KQkq - 2 1").to_position
+      next_pos = pos.move("c4")
+      next_pos.to_fen.en_passant.should == "c3"
+    end
+
+    it "should be a hyphen if no pawn moved two spaces the previous move" do
+      pos = PGN::FEN.new("rnbqkb1r/pppppppp/5n2/8/2P5/5N2/PP1PPPPP/RNBQKB1R b KQkq c3 0 1").to_position
+      next_pos = pos.move("d6")
+      next_pos.to_fen.en_passant.should == "-"
+    end
+  end
+
+  describe "halfmove counter" do
+    it "should reset after a pawn advance" do
+      pos = PGN::FEN.new("2b2rk1/2pp1ppp/1p6/r3P2q/3Q4/2P5/PP3PPP/RN3RK1 w - - 3 15").to_position
+      pos.to_fen.halfmove.should == "3"
+      next_pos = pos.move("f4")
+      next_pos.to_fen.halfmove.should == "0"
+    end
+
+    it "should reset after a capture" do
+      pos = PGN::FEN.new("2r2rk1/1p2ppbp/1q1p1np1/pN4B1/Pnb1PP2/2N5/1PP1B1PP/R2Q1R1K w - - 5 14").to_position
+      pos.to_fen.halfmove.should == "5"
+      next_pos = pos.move("Bxc4")
+      next_pos.to_fen.halfmove.should == "0"
+    end
+
+    it "should not reset otherwise" do
+      pos = PGN::FEN.new("2k2b1r/p4p1p/q1p2p2/8/2br4/5P2/PPQB2PP/R1N1K2R w KQ - 0 17").to_position
+      pos.to_fen.halfmove.should == "0"
+      moves = %w{Qf5+ Rd7 Bc3 Bh6 Qa5 Re8+ Kf2 Be3+ Kg3 Rg8+ Kh4}
+      moves.each_with_index do |move, i|
+        pos = pos.move(move)
+        pos.to_fen.halfmove.should == (i+1).to_s
+      end
+    end
+  end
+
+  describe "fullmove counter" do
+    it "should not increase after white moves" do
+      pos = PGN::FEN.new("4br1k/ppqnr1b1/3p3p/P1pP1p2/2P1pB2/6PP/1P2BP1N/R2QR1K1 w - - 3 25").to_position
+      pos.to_fen.fullmove.should == "25"
+      next_pos = pos.move("Qd2")
+      next_pos.to_fen.fullmove.should == "25"
+    end
+
+    it "should increase after black moves" do
+      pos = PGN::FEN.new("4br1k/ppqnr1b1/3p3p/P1pP1p2/2P1pB2/6PP/1P1QBP1N/R3R1K1 b - - 4 25").to_position
+      pos.to_fen.fullmove.should == "25"
+      next_pos = pos.move("Kh7")
+      next_pos.to_fen.fullmove.should == "26"
+    end
+  end
+
+  describe "displaying FEN notation" do
+    it "should return a string on inspect" do
+      fen = PGN::FEN.start
+      fen.inspect.should be_a(String)
+    end
+  end
+end

data/spec/game_spec.rb

@@ -0,0 +1,21 @@
+require 'spec_helper'
+
+describe PGN::Game do
+  describe '#positions' do
+    it 'does not raise an error' do
+      tags   = { 'White' => 'Deep Blue', 'Black' => 'Kasparov' }
+      moves  = %w[e4 c5 c3 d5 exd5 Qxd5 d4 Nf6 Nf3 Bg4 Be2 e6 h3 Bh5 O-O Nc6 Be3 cxd4 cxd4 Bb4 a3 Ba5 Nc3 Qd6 Nb5 Qe7 Ne5 Bxe2 Qxe2 O-O Rac1 Rac8 Bg5 Bb6 Bxf6 gxf6 Nc4 Rfd8 Nxb6 axb6 Rfd1 f5 Qe3 Qf6 d5 Rxd5 Rxd5 exd5 b3 Kh8 Qxb6 Rg8 Qc5 d4 Nd6 f4 Nxb7 Ne5 Qd5 f3 g3 Nd3 Rc7 Re8 Nd6 Re1+ Kh2 Nxf2 Nxf7+ Kg7 Ng5+ Kh6 Rxh7+]
+      result = '1-0'
+      game = PGN::Game.new(moves, tags, result)
+      expect { game.positions }.not_to raise_error
+    end
+
+    it 'has fullmove 2 after 1.e4 c5' do
+      moves = %w[e4 c5]
+      game = PGN::Game.new(moves)
+      last_pos = game.positions.last
+
+      expect(last_pos.fullmove).to eq 2
+    end
+  end
+end

data/spec/parser_spec.rb

@@ -0,0 +1,143 @@
+require 'spec_helper'
+require 'pry'
+
+describe PGN do
+  describe '.parse' do
+    it 'should return a list of games' do
+      games = PGN.parse(File.read('./examples/immortal_game.pgn'))
+      expect(games.length).to eq 1
+      game = games.first
+      expect(game.result).to eq '1-0'
+      expect(game.tags['White']).to eq 'Adolf Anderssen'
+      expect(game.moves.last).to eq 'Be7#'
+    end
+
+    it 'should handle alternate castling notation' do
+      games = PGN.parse(File.read('./spec/pgn_files/alternate_castling.pgn'))
+      game = games.first
+      expect(game.tags['White']).to eq 'Somebody'
+      expect(game.result).to eq  '*'
+      expect(game.moves.last).to eq 'O-O-O'
+    end
+
+    it 'should handle annotations' do
+      games = PGN.parse(File.read('./spec/pgn_files/annotations.pgn'))
+      games.each do |game|
+        expect(game.tags['White']).to eq 'Fool'
+        expect(game.result).to eq  '0-1'
+        expect(game.moves.last).to eq  'Qh4#'
+      end
+    end
+
+    it 'should handle many games in order' do
+      games = PGN.parse(File.read('./spec/pgn_files/two_games.pgn'))
+      expect(games.first.moves(&:notation)).to eq ['f3', 'e5', 'g4', 'Qh4#']
+    end
+
+    it 'should handle comments' do
+      games = PGN.parse(File.read('./spec/pgn_files/comments.pgn'))
+      game = games.first
+      expect(game.tags['White']).to eq 'Scholar'
+      expect(game.result).to eq  '1-0'
+      expect(game.moves.last).to eq  'Qxf7#'
+    end
+
+    it 'should handle multiline comments' do
+      games = PGN.parse(File.read('./spec/pgn_files/multiline_comments.pgn'))
+      game = games.first
+      expect(game.tags['White']).to eq 'Scholar'
+      expect(game.result).to eq  '1-0'
+      expect(game.moves.last).to eq  'Qxf7#'
+    end
+
+    it 'should handle nested comments' do
+      games = PGN.parse(File.read('./spec/pgn_files/nested_comments.pgn'))
+      game = games.first
+      expect(game.result).to eq  '*'
+      expect(game.moves.last).to eq 'Nf6'
+    end
+
+    it 'handles two annotations' do
+      games = PGN.parse(File.read('./spec/pgn_files/two_annotations.pgn'))
+      game = games.first
+      expect(game.moves[1].annotation).to eq ['$2', '$11']
+    end
+
+    it 'returns empty array when no variations' do
+      games = PGN.parse(File.read('./spec/pgn_files/variations.pgn'))
+      game = games.first
+      expect(game.moves.first.variations).to eq []
+    end
+
+    it 'should handle variations' do
+      games = PGN.parse(File.read('./spec/pgn_files/variations.pgn'))
+      game = games.first
+      expect(game.tags['Black']).to eq 'Petrov'
+      expect(game.result).to eq  '*'
+      expect(game.moves.last).to eq 'Nf6'
+    end
+
+    it 'should handle variations longer than 1' do
+      games = PGN.parse(File.read('./spec/pgn_files/variations.pgn'))
+      game = games.first
+      # puts game.moves.map{|x| x.variations.to_a.count }
+      expect(game.moves[-2].variations.first).to eq %w[f4 exf4]
+    end
+
+    it 'should handle empty variation moves' do
+      games = PGN.parse(File.read('./spec/pgn_files/empty_variation_move.pgn'))
+      game = games.first
+      expect(game.result).to eq  '*'
+      expect(game.moves.last).to eq 'Ng5'
+    end
+
+    it 'should handle complex files' do
+      games = PGN.parse(File.read('./spec/pgn_files/test.pgn'))
+      game = games.first
+      expect(game.tags['Black']).to eq 'Gelfand, Boris'
+      expect(game.result).to eq '1-0'
+      expect(game.moves[13]).to eq  'Nfd7'
+      expect(game.moves[34]).to eq  'f3'
+      expect(game.moves[35].annotation).to eq ['$6']
+      expect(game.moves[35].comment).to eq 'Gelfand decide tomar medidas.'
+      expect(game.moves[35].variations.size).to eq 1
+      variation = game.moves[35].variations[0]
+      expect(variation.size).to eq 2
+      expect(variation[0]).to eq  'exf3'
+    end
+
+    it 'should handle files with starting position' do
+      games = PGN.parse(File.read('./spec/pgn_files/fen.pgn'))
+      game = games.first
+      first_pos = game.positions.first
+      last_pos = game.positions.last
+      expect(first_pos.to_fen.to_s).to eq game.tags['FEN']
+      expect(last_pos.to_fen.to_s).to eq '5rkn/5p1p/2b2NpP/8/2B5/1P6/2PP3P/1K6 b - - 0 4'
+    end
+
+    it 'returns original game pgn' do
+      games = PGN.parse(File.read('./spec/pgn_files/fen.pgn'))
+      game = games.first
+      expect(game.pgn).to eq "[Event \"Event 1\"]\n[FEN \"4brkn/4bp1p/3q2pP/8/2B3N1/1P4N1/2PP3P/1K2Q3 w - - 0 1\"]\n[PlyCount \"7\"]\n\n1. Qxe7 Qxe7 2. Ne4 Bc6 3. Nef6+ Qxf6 4. Nxf6# 1-0"
+    end
+
+    it 'returns original game pgn for second game' do
+      games = PGN.parse(File.read('./spec/pgn_files/two_games.pgn'))
+      game = games.last
+      expect(game.pgn).to eq "[White \"Fool 2\"]\n[Black \"Somebody else 2\"]\n\n1. e4 e5 0-1\n"
+    end
+
+    it 'parses empty game' do
+      games = PGN.parse(File.read('./spec/pgn_files/no_moves.pgn'))
+      game = games.first
+      expect { game.positions }.not_to raise_error
+      expect(game.moves).not_to be_empty
+    end
+
+    it 'gets game comment' do
+      games = PGN.parse(File.read('./spec/pgn_files/no_moves.pgn'))
+      game = games.last
+      expect(game.comment).to eq('{game comment}')
+    end
+  end
+end

data/spec/pgn_files/alternate_castling.pgn

@@ -0,0 +1,4 @@
+[White "Somebody"]
+[Black "Somebody Else"]
+
+1.e4 e5 2.Nf3 Nc6 3.Bb5 d6 4.0-0 Bg4 5.Nc3 Qe7 6.d3 0-0-0 *

data/spec/pgn_files/annotations.pgn

@@ -0,0 +1,9 @@
+[White "Fool"]
+[Black "Somebody else"]
+
+1. f3 e5 2. g4 $4 Qh4# 0-1
+
+[White "Fool"]
+[Black "Somebody else"]
+
+1. f3 e5 2. g4 ?? Qh4# 0-1

data/spec/pgn_files/comments.pgn

@@ -0,0 +1,8 @@
+[White "Scholar"]
+[Black "Somebody else"]
+
+{ This is a multi-line commment, 
+where a comment spans in multiple lines. }
+
+1. e4 e5 2. Qh5 Nc6 3. {White about to move} Bc4 {White 
+moves} Nf6 {I pity the fool!} 4. Qxf7# 1-0

data/spec/pgn_files/empty_variation_move.pgn

@@ -0,0 +1,11 @@
+[White "Somebody"]
+[Black "Somebody Else"]
+
+1. d4 e6 2. c4 d5 3. Nc3 c6 4. Nf3 Nf6 5. Bg5 Nbd7 6. e3 Qa5 7. a3 (7. cxd5
+Nxd5 8. Rc1 {Analyzer's primary variation: 8... Bb4 9. Qd2 e5 10. e4 Nxc3 11.
+bxc3 Ba3 12. Rb1 h6 13. Be3 O-O 14. Bc4 exd4 15. cxd4 Qxd2+ 16. Nxd2 a5 17. O-O
+b5 18. Be2 Rd8 19. d5 cxd5 20. exd5 Nc5 21. Rxb5 Rxd5 {+0.30/21} }) 7... Ne4 8.
+Rc1 Nxg5 9. Nxg5 dxc4 10. Bxc4 Qxg5 11. O-O Nf6 12. Qf3 Qg4 13.  Qxg4 Nxg4 14.
+Ne4 Be7 15. b4 O-O 16. Rce1 Nf6 17. Ng5 ({Better is} 17. Nxf6+ gxf6 {-4.08/31}
+(17... Bxf6) (17... gxf6)) (17. Nxf6+) 17... h6 18. Nf3 Ne4 ({Treatening} 18...
+-- 19. Ra1 b5 {-4.05/31}) 19. Bd3 Ng5 *

data/spec/pgn_files/fen.pgn

@@ -0,0 +1,5 @@
+[Event "Event 1"]
+[FEN "4brkn/4bp1p/3q2pP/8/2B3N1/1P4N1/2PP3P/1K2Q3 w - - 0 1"]
+[PlyCount "7"]
+
+1. Qxe7 Qxe7 2. Ne4 Bc6 3. Nef6+ Qxf6 4. Nxf6# 1-0

data/spec/pgn_files/multiline_comments.pgn

@@ -0,0 +1,5 @@
+[White "Scholar"]
+[Black "Somebody else"]
+
+1. e4 e5 2. Qh5 Nc6 3. Bc4 Nf6 {I pity
+the fool!} 4. Qxf7# 1-0

data/spec/pgn_files/nested_comments.pgn

@@ -0,0 +1,4 @@
+[White "Somebody"]
+[Black "Somebody Else"]
+
+1. e4 e5 2. Nf3 {this {is a} nested {comment}} 2... Nf6 *

data/spec/pgn_files/no_moves.pgn

@@ -0,0 +1,18 @@
+% BOOKTITLE = book title
+[Event "?"]
+[Date "????.??.??"]
+[Result "*"]
+[Annotator "Mumu"]
+[PlyCount "1"]
+
+1. -- {Trying to make a long comments in an empty game.it 
+goes in two lines } (1.
+-- {Just putting something here too.}) *
+
+[Event "?"]
+[Date "????.??.??"]
+[Result "*"]
+[Annotator "Mumu"]
+[PlyCount "1"]
+
+{game comment} *

data/spec/pgn_files/test.pgn

@@ -0,0 +1,55 @@
+[Event "Zurich Chess Challenge"]
+[Site "Zurich"]
+[Date "2014.01.30"]
+[Round "1"]
+[White "Carlsen, Magnus"]
+[Black "Gelfand, Boris"]
+[Result "1-0"]
+[ECO "D78"]
+[WhiteElo "2878"]
+[BlackElo "2777"]
+[Annotator "Iago Porto"]
+[PlyCount "73"]
+[EventDate "2014.01.30"]
+[EventCountry "SUI"]
+[SourceDate "2014.01.04"]
+
+{Esta es la primera partida de Carlsen como campeón del mundo. La voy a
+comentar para el blog porque me ha gustado una idea bastante inusual que
+ejecuta el jugador noruego. El análisis no pretende ser exhaustivo ni en ideas
+ni en variantes, sino tan sólo reflejar las ideas y posiciones que me han
+llamado la atención. He visto el análisis de Daniel King y estoy claramente
+influenciado por él. Sin embargo, cualquier error es mío.} 1. c4 g6 2. d4 Nf6
+3. Nf3 Bg7 4. g3 c6 5. Bg2 d5 6. Qa4 O-O 7. O-O Nfd7 {No me voy a meter en la
+apertura, no conozco nada de estas líneas, aunque es cierto que esta jugada
+choca.} 8. Qc2 Nf6 9. Bf4 Bf5 10. Qb3 Qb6 11. Nbd2 Ne4 12. e3 {Hasta este
+momento, la posición es bastante simétrica. El blanco tiene, en mi opinión,
+una ligerísima ventaja gracias a tener más presión central, aunque la posición
+no presenta ningún desbalance estratégico.} Qxb3 13. axb3 {Se ha creado un
+desbalance en la posición. El blanco obtiene la columna a para su torre a
+cambio de los peones doblados.} Na6 {Y ahora Carlsen debió de decir: "yo
+quiero que mi alfil de g2 juegue" y sus siguientes jugadas son implacables
+para lograr este objetivo.} 14. cxd5 cxd5 15. g4 $1 {Brillante sacrificio de
+peón.} Bxg4 16. Nxe4 dxe4 17. Nd2 f5 18. f3 {Finalmente se consigue el
+objetivo, el alfil de g2 juega y el blanco tiene una presión desagradable
+sobre el ala de dama negra. Me recuerda a un gambito Benko.} e5 $6 {Gelfand
+decide tomar medidas.} (18... exf3 19. Nxf3 {A pesar de tener un peón de menos,
+todas las piezas del blanco están muy activas y son mejores que las de su
+rival. El blanco debería estar mejor.}) 19. dxe5 exf3 20. Nxf3 {Con respecto a
+la variante anterior, aquí Gelfand devuelve el peón para lograr que las piezas
+blancas no están tan activas. Considero que el blanco está también mejor y no
+hay que olvidar que el peón de e5 está pasado.} Rae8 21. Ra5 Nb4 {Tratando de
+poner el caballo en juego vía c6, donde defenderá a7 y atacará e5.} 22. Nd4 {
+Evita la amenaza negra de Cc6.} b6 {Gelfand cede ante la presión.} 23. Rxa7
+Bxe5 {Se mantiene la igualdad de material, pero ahora el rey negro empieza a
+parecer débil.} 24. Bh6 Rf6 (24... Rf7 25. Ra4 {y cuando el caballo se vaya,
+Ad5 gana la torre de f7.}) 25. h3 Bh5 {Carlsen encierra un poco más el alfil
+blanco de negras.} 26. Nc2 $1 {Otra bonita combinación.} g5 (26... Nxc2 27.
+Bd5+ Kh8 28. Bg7# {En su análisis, Daniel King decía que la torre entra por la
+banda, pase de la muerte hacia atrás al alfil blanco, el portero la detiene
+pero queda muerta para que el alfil negro la empuje al jaque mate.}) 27. Bxg5
+Rg6 28. Rxf5 h6 29. Bxh6 Rxh6 30. Nxb4 $18 {Con material de más, a partir de
+ahora es cuestión de técnica.} Bxb2 31. Nd5 Kh8 32. Rb7 Bd1 33. b4 Rg8 34. Ne7
+Rd8 35. Be4 {El alfil se suma al ataque. El rey negro sigue débil.} Bf6 36.
+Rxb6 Kg7 37. Rf2 $1 {Preciso remate. El caballo de e7 no se puede comer porque}
+(37. Rf2 Bxe7 38. Rg2+ {y cae la torre de h6.}) 1-0 

data/spec/pgn_files/two_annotations.pgn

@@ -0,0 +1,4 @@
+[Event "?"]
+[Site "?"]
+
+1. d4 2. d5 $2 $11 1/2-1/2

data/spec/pgn_files/two_games.pgn

@@ -0,0 +1,9 @@
+[White "Fool"]
+[Black "Somebody else"]
+
+1. f3 e5 2. g4 $4 Qh4# 0-1
+
+[White "Fool 2"]
+[Black "Somebody else 2"]
+
+1. e4 e5 0-1

data/spec/pgn_files/variations.pgn

@@ -0,0 +1,4 @@
+[White "Somebody"]
+[Black "Petrov"]
+
+1. e4 e5 2. Nf3 {comment} (2. Nc3 {other} d5 (2... f5) 3. exd5) (2. f4 exf4 {final variation}) 2... Nf6 *

data/spec/position_spec.rb

@@ -0,0 +1,54 @@
+require 'spec_helper'
+
+describe PGN::Position do
+
+  describe "start" do
+
+    it "should have fullmove 1" do
+      pos = PGN::Position.start
+      pos.fullmove.should == 1
+    end
+    
+  end
+  
+  context "disambiguating moves" do
+    describe "using SAN square disambiguation" do
+      pos = PGN::FEN.new("r1bqkb1r/pp1p1ppp/2n1pn2/8/3NP3/2N5/PPP2PPP/R1BQKB1R w KQkq - 3 6").to_position
+      next_pos = pos.move("Ndb5")
+
+      it "should move the specified piece" do
+        next_pos.board.at("d4").should be_nil
+      end
+
+      it "should not move the other piece" do
+        next_pos.board.at("c3").should == "N"
+      end
+    end
+
+    describe "using discovered check" do
+      pos = PGN::FEN.new("rnbqk2r/p1pp1ppp/1p2pn2/8/1bPP4/2N1P3/PP3PPP/R1BQKBNR w KQkq - 0 5").to_position
+      next_pos = pos.move("Ne2")
+
+      it "should move the piece that doesn't give discovered check" do
+        next_pos.board.at("g1").should be_nil
+      end
+
+      it "shouldn't move the other piece" do
+        next_pos.board.at("c3").should == "N"
+      end
+    end
+
+    describe "with two pawns on the same file" do
+      pos = PGN::FEN.new("r2q1rk1/4bppp/p3n3/1p2n3/4N3/1B2BP2/PP3P1P/R2Q1RK1 w - - 4 19").to_position
+      next_pos = pos.move("f4")
+
+      it "should move the pawn in front" do
+        next_pos.board.at("f3").should be_nil
+      end
+
+      it "should not move the other pawn" do
+        next_pos.board.at("f2").should == "P"
+      end
+    end
+  end
+end