Reformat do_castling()
[stockfish] / src / position.cpp
1 /*
2   Stockfish, a UCI chess playing engine derived from Glaurung 2.1
3   Copyright (C) 2004-2008 Tord Romstad (Glaurung author)
4   Copyright (C) 2008-2014 Marco Costalba, Joona Kiiski, Tord Romstad
5
6   Stockfish is free software: you can redistribute it and/or modify
7   it under the terms of the GNU General Public License as published by
8   the Free Software Foundation, either version 3 of the License, or
9   (at your option) any later version.
10
11   Stockfish is distributed in the hope that it will be useful,
12   but WITHOUT ANY WARRANTY; without even the implied warranty of
13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14   GNU General Public License for more details.
15
16   You should have received a copy of the GNU General Public License
17   along with this program.  If not, see <http://www.gnu.org/licenses/>.
18 */
19
20 #include <algorithm>
21 #include <cassert>
22 #include <cstring>
23 #include <iomanip>
24 #include <sstream>
25
26 #include "bitcount.h"
27 #include "movegen.h"
28 #include "notation.h"
29 #include "position.h"
30 #include "psqtab.h"
31 #include "rkiss.h"
32 #include "thread.h"
33 #include "tt.h"
34
35 using std::string;
36
37 static const string PieceToChar(" PNBRQK  pnbrqk");
38
39 CACHE_LINE_ALIGNMENT
40
41 Value PieceValue[PHASE_NB][PIECE_NB] = {
42 { VALUE_ZERO, PawnValueMg, KnightValueMg, BishopValueMg, RookValueMg, QueenValueMg },
43 { VALUE_ZERO, PawnValueEg, KnightValueEg, BishopValueEg, RookValueEg, QueenValueEg } };
44
45 static Score psq[COLOR_NB][PIECE_TYPE_NB][SQUARE_NB];
46
47 namespace Zobrist {
48
49   Key psq[COLOR_NB][PIECE_TYPE_NB][SQUARE_NB];
50   Key enpassant[FILE_NB];
51   Key castling[CASTLING_RIGHT_NB];
52   Key side;
53   Key exclusion;
54 }
55
56 Key Position::exclusion_key() const { return st->key ^ Zobrist::exclusion;}
57
58 namespace {
59
60 // min_attacker() is a helper function used by see() to locate the least
61 // valuable attacker for the side to move, remove the attacker we just found
62 // from the bitboards and scan for new X-ray attacks behind it.
63
64 template<int Pt> FORCE_INLINE
65 PieceType min_attacker(const Bitboard* bb, const Square& to, const Bitboard& stmAttackers,
66                        Bitboard& occupied, Bitboard& attackers) {
67
68   Bitboard b = stmAttackers & bb[Pt];
69   if (!b)
70       return min_attacker<Pt+1>(bb, to, stmAttackers, occupied, attackers);
71
72   occupied ^= b & ~(b - 1);
73
74   if (Pt == PAWN || Pt == BISHOP || Pt == QUEEN)
75       attackers |= attacks_bb<BISHOP>(to, occupied) & (bb[BISHOP] | bb[QUEEN]);
76
77   if (Pt == ROOK || Pt == QUEEN)
78       attackers |= attacks_bb<ROOK>(to, occupied) & (bb[ROOK] | bb[QUEEN]);
79
80   attackers &= occupied; // After X-ray that may add already processed pieces
81   return (PieceType)Pt;
82 }
83
84 template<> FORCE_INLINE
85 PieceType min_attacker<KING>(const Bitboard*, const Square&, const Bitboard&, Bitboard&, Bitboard&) {
86   return KING; // No need to update bitboards: it is the last cycle
87 }
88
89 } // namespace
90
91
92 /// CheckInfo c'tor
93
94 CheckInfo::CheckInfo(const Position& pos) {
95
96   Color them = ~pos.side_to_move();
97   ksq = pos.king_square(them);
98
99   pinned = pos.pinned_pieces(pos.side_to_move());
100   dcCandidates = pos.discovered_check_candidates();
101
102   checkSq[PAWN]   = pos.attacks_from<PAWN>(ksq, them);
103   checkSq[KNIGHT] = pos.attacks_from<KNIGHT>(ksq);
104   checkSq[BISHOP] = pos.attacks_from<BISHOP>(ksq);
105   checkSq[ROOK]   = pos.attacks_from<ROOK>(ksq);
106   checkSq[QUEEN]  = checkSq[BISHOP] | checkSq[ROOK];
107   checkSq[KING]   = 0;
108 }
109
110
111 /// Position::init() initializes at startup the various arrays used to compute
112 /// hash keys and the piece square tables. The latter is a two-step operation:
113 /// Firstly, the white halves of the tables are copied from PSQT[] tables.
114 /// Secondly, the black halves of the tables are initialized by flipping and
115 /// changing the sign of the white scores.
116
117 void Position::init() {
118
119   RKISS rk;
120
121   for (Color c = WHITE; c <= BLACK; ++c)
122       for (PieceType pt = PAWN; pt <= KING; ++pt)
123           for (Square s = SQ_A1; s <= SQ_H8; ++s)
124               Zobrist::psq[c][pt][s] = rk.rand<Key>();
125
126   for (File f = FILE_A; f <= FILE_H; ++f)
127       Zobrist::enpassant[f] = rk.rand<Key>();
128
129   for (int cf = NO_CASTLING; cf <= ANY_CASTLING; ++cf)
130   {
131       Bitboard b = cf;
132       while (b)
133       {
134           Key k = Zobrist::castling[1ULL << pop_lsb(&b)];
135           Zobrist::castling[cf] ^= k ? k : rk.rand<Key>();
136       }
137   }
138
139   Zobrist::side = rk.rand<Key>();
140   Zobrist::exclusion  = rk.rand<Key>();
141
142   for (PieceType pt = PAWN; pt <= KING; ++pt)
143   {
144       PieceValue[MG][make_piece(BLACK, pt)] = PieceValue[MG][pt];
145       PieceValue[EG][make_piece(BLACK, pt)] = PieceValue[EG][pt];
146
147       Score v = make_score(PieceValue[MG][pt], PieceValue[EG][pt]);
148
149       for (Square s = SQ_A1; s <= SQ_H8; ++s)
150       {
151          psq[WHITE][pt][ s] =  (v + PSQT[pt][s]);
152          psq[BLACK][pt][~s] = -(v + PSQT[pt][s]);
153       }
154   }
155 }
156
157
158 /// Position::operator=() creates a copy of 'pos'. We want the new born Position
159 /// object to not depend on any external data so we detach state pointer from
160 /// the source one.
161
162 Position& Position::operator=(const Position& pos) {
163
164   std::memcpy(this, &pos, sizeof(Position));
165   startState = *st;
166   st = &startState;
167   nodes = 0;
168
169   assert(pos_is_ok());
170
171   return *this;
172 }
173
174
175 /// Position::clear() erases the position object to a pristine state, with an
176 /// empty board, white to move, and no castling rights.
177
178 void Position::clear() {
179
180   std::memset(this, 0, sizeof(Position));
181   startState.epSquare = SQ_NONE;
182   st = &startState;
183
184   for (int i = 0; i < PIECE_TYPE_NB; ++i)
185       for (int j = 0; j < 16; ++j)
186           pieceList[WHITE][i][j] = pieceList[BLACK][i][j] = SQ_NONE;
187 }
188
189
190 /// Position::set() initializes the position object with the given FEN string.
191 /// This function is not very robust - make sure that input FENs are correct,
192 /// this is assumed to be the responsibility of the GUI.
193
194 void Position::set(const string& fenStr, bool isChess960, Thread* th) {
195 /*
196    A FEN string defines a particular position using only the ASCII character set.
197
198    A FEN string contains six fields separated by a space. The fields are:
199
200    1) Piece placement (from white's perspective). Each rank is described, starting
201       with rank 8 and ending with rank 1. Within each rank, the contents of each
202       square are described from file A through file H. Following the Standard
203       Algebraic Notation (SAN), each piece is identified by a single letter taken
204       from the standard English names. White pieces are designated using upper-case
205       letters ("PNBRQK") whilst Black uses lowercase ("pnbrqk"). Blank squares are
206       noted using digits 1 through 8 (the number of blank squares), and "/"
207       separates ranks.
208
209    2) Active color. "w" means white moves next, "b" means black.
210
211    3) Castling availability. If neither side can castle, this is "-". Otherwise,
212       this has one or more letters: "K" (White can castle kingside), "Q" (White
213       can castle queenside), "k" (Black can castle kingside), and/or "q" (Black
214       can castle queenside).
215
216    4) En passant target square (in algebraic notation). If there's no en passant
217       target square, this is "-". If a pawn has just made a 2-square move, this
218       is the position "behind" the pawn. This is recorded regardless of whether
219       there is a pawn in position to make an en passant capture.
220
221    5) Halfmove clock. This is the number of halfmoves since the last pawn advance
222       or capture. This is used to determine if a draw can be claimed under the
223       fifty-move rule.
224
225    6) Fullmove number. The number of the full move. It starts at 1, and is
226       incremented after Black's move.
227 */
228
229   char col, row, token;
230   size_t idx;
231   Square sq = SQ_A8;
232   std::istringstream ss(fenStr);
233
234   clear();
235   ss >> std::noskipws;
236
237   // 1. Piece placement
238   while ((ss >> token) && !isspace(token))
239   {
240       if (isdigit(token))
241           sq += Square(token - '0'); // Advance the given number of files
242
243       else if (token == '/')
244           sq -= Square(16);
245
246       else if ((idx = PieceToChar.find(token)) != string::npos)
247       {
248           put_piece(sq, color_of(Piece(idx)), type_of(Piece(idx)));
249           ++sq;
250       }
251   }
252
253   // 2. Active color
254   ss >> token;
255   sideToMove = (token == 'w' ? WHITE : BLACK);
256   ss >> token;
257
258   // 3. Castling availability. Compatible with 3 standards: Normal FEN standard,
259   // Shredder-FEN that uses the letters of the columns on which the rooks began
260   // the game instead of KQkq and also X-FEN standard that, in case of Chess960,
261   // if an inner rook is associated with the castling right, the castling tag is
262   // replaced by the file letter of the involved rook, as for the Shredder-FEN.
263   while ((ss >> token) && !isspace(token))
264   {
265       Square rsq;
266       Color c = islower(token) ? BLACK : WHITE;
267
268       token = char(toupper(token));
269
270       if (token == 'K')
271           for (rsq = relative_square(c, SQ_H1); type_of(piece_on(rsq)) != ROOK; --rsq) {}
272
273       else if (token == 'Q')
274           for (rsq = relative_square(c, SQ_A1); type_of(piece_on(rsq)) != ROOK; ++rsq) {}
275
276       else if (token >= 'A' && token <= 'H')
277           rsq = File(token - 'A') | relative_rank(c, RANK_1);
278
279       else
280           continue;
281
282       set_castling_right(c, rsq);
283   }
284
285   // 4. En passant square. Ignore if no pawn capture is possible
286   if (   ((ss >> col) && (col >= 'a' && col <= 'h'))
287       && ((ss >> row) && (row == '3' || row == '6')))
288   {
289       st->epSquare = File(col - 'a') | Rank(row - '1');
290
291       if (!(attackers_to(st->epSquare) & pieces(sideToMove, PAWN)))
292           st->epSquare = SQ_NONE;
293   }
294
295   // 5-6. Halfmove clock and fullmove number
296   ss >> std::skipws >> st->rule50 >> gamePly;
297
298   // Convert from fullmove starting from 1 to ply starting from 0,
299   // handle also common incorrect FEN with fullmove = 0.
300   gamePly = std::max(2 * (gamePly - 1), 0) + int(sideToMove == BLACK);
301
302   chess960 = isChess960;
303   thisThread = th;
304   set_state(st);
305
306   assert(pos_is_ok());
307 }
308
309
310 /// Position::set_castling_right() is a helper function used to set castling
311 /// rights given the corresponding color and the rook starting square.
312
313 void Position::set_castling_right(Color c, Square rfrom) {
314
315   Square kfrom = king_square(c);
316   CastlingSide cs = kfrom < rfrom ? KING_SIDE : QUEEN_SIDE;
317   CastlingRight cr = (c | cs);
318
319   st->castlingRights |= cr;
320   castlingRightsMask[kfrom] |= cr;
321   castlingRightsMask[rfrom] |= cr;
322   castlingRookSquare[cr] = rfrom;
323
324   Square kto = relative_square(c, cs == KING_SIDE ? SQ_G1 : SQ_C1);
325   Square rto = relative_square(c, cs == KING_SIDE ? SQ_F1 : SQ_D1);
326
327   for (Square s = std::min(rfrom, rto); s <= std::max(rfrom, rto); ++s)
328       if (s != kfrom && s != rfrom)
329           castlingPath[cr] |= s;
330
331   for (Square s = std::min(kfrom, kto); s <= std::max(kfrom, kto); ++s)
332       if (s != kfrom && s != rfrom)
333           castlingPath[cr] |= s;
334 }
335
336
337 /// Position::set_state() computes the hash keys of the position, and other
338 /// data that once computed is updated incrementally as moves are made.
339 /// The function is only used when a new position is set up, and to verify
340 /// the correctness of the StateInfo data when running in debug mode.
341
342 void Position::set_state(StateInfo* si) const {
343
344   si->key = si->pawnKey = si->materialKey = 0;
345   si->npMaterial[WHITE] = si->npMaterial[BLACK] = VALUE_ZERO;
346   si->psq = SCORE_ZERO;
347
348   si->checkersBB = attackers_to(king_square(sideToMove)) & pieces(~sideToMove);
349
350   for (Bitboard b = pieces(); b; )
351   {
352       Square s = pop_lsb(&b);
353       Piece pc = piece_on(s);
354       si->key ^= Zobrist::psq[color_of(pc)][type_of(pc)][s];
355       si->psq += psq[color_of(pc)][type_of(pc)][s];
356   }
357
358   if (ep_square() != SQ_NONE)
359       si->key ^= Zobrist::enpassant[file_of(ep_square())];
360
361   if (sideToMove == BLACK)
362       si->key ^= Zobrist::side;
363
364   si->key ^= Zobrist::castling[st->castlingRights];
365
366   for (Bitboard b = pieces(PAWN); b; )
367   {
368       Square s = pop_lsb(&b);
369       si->pawnKey ^= Zobrist::psq[color_of(piece_on(s))][PAWN][s];
370   }
371
372   for (Color c = WHITE; c <= BLACK; ++c)
373       for (PieceType pt = PAWN; pt <= KING; ++pt)
374           for (int cnt = 0; cnt < pieceCount[c][pt]; ++cnt)
375               si->materialKey ^= Zobrist::psq[c][pt][cnt];
376
377   for (Color c = WHITE; c <= BLACK; ++c)
378       for (PieceType pt = KNIGHT; pt <= QUEEN; ++pt)
379           si->npMaterial[c] += pieceCount[c][pt] * PieceValue[MG][pt];
380 }
381
382
383 /// Position::fen() returns a FEN representation of the position. In case of
384 /// Chess960 the Shredder-FEN notation is used. This is mainly a debugging function.
385
386 const string Position::fen() const {
387
388   int emptyCnt;
389   std::ostringstream ss;
390
391   for (Rank rank = RANK_8; rank >= RANK_1; --rank)
392   {
393       for (File file = FILE_A; file <= FILE_H; ++file)
394       {
395           for (emptyCnt = 0; file <= FILE_H && empty(file | rank); ++file)
396               ++emptyCnt;
397
398           if (emptyCnt)
399               ss << emptyCnt;
400
401           if (file <= FILE_H)
402               ss << PieceToChar[piece_on(file | rank)];
403       }
404
405       if (rank > RANK_1)
406           ss << '/';
407   }
408
409   ss << (sideToMove == WHITE ? " w " : " b ");
410
411   if (can_castle(WHITE_OO))
412       ss << (chess960 ? to_char(file_of(castling_rook_square(WHITE |  KING_SIDE)), false) : 'K');
413
414   if (can_castle(WHITE_OOO))
415       ss << (chess960 ? to_char(file_of(castling_rook_square(WHITE | QUEEN_SIDE)), false) : 'Q');
416
417   if (can_castle(BLACK_OO))
418       ss << (chess960 ? to_char(file_of(castling_rook_square(BLACK |  KING_SIDE)),  true) : 'k');
419
420   if (can_castle(BLACK_OOO))
421       ss << (chess960 ? to_char(file_of(castling_rook_square(BLACK | QUEEN_SIDE)),  true) : 'q');
422
423   if (!can_castle(WHITE) && !can_castle(BLACK))
424       ss << '-';
425
426   ss << (ep_square() == SQ_NONE ? " - " : " " + to_string(ep_square()) + " ")
427      << st->rule50 << " " << 1 + (gamePly - int(sideToMove == BLACK)) / 2;
428
429   return ss.str();
430 }
431
432
433 /// Position::pretty() returns an ASCII representation of the position to be
434 /// printed to the standard output together with the move's san notation.
435
436 const string Position::pretty(Move move) const {
437
438   const string dottedLine =            "\n+---+---+---+---+---+---+---+---+";
439   const string twoRows =  dottedLine + "\n|   | . |   | . |   | . |   | . |"
440                         + dottedLine + "\n| . |   | . |   | . |   | . |   |";
441
442   string brd = twoRows + twoRows + twoRows + twoRows + dottedLine;
443
444   for (Bitboard b = pieces(); b; )
445   {
446       Square s = pop_lsb(&b);
447       brd[513 - 68 * rank_of(s) + 4 * file_of(s)] = PieceToChar[piece_on(s)];
448   }
449
450   std::ostringstream ss;
451
452   if (move)
453       ss << "\nMove: " << (sideToMove == BLACK ? ".." : "")
454          << move_to_san(*const_cast<Position*>(this), move);
455
456   ss << brd << "\nFen: " << fen() << "\nKey: " << std::hex << std::uppercase
457      << std::setfill('0') << std::setw(16) << st->key << "\nCheckers: ";
458
459   for (Bitboard b = checkers(); b; )
460       ss << to_string(pop_lsb(&b)) << " ";
461
462   ss << "\nLegal moves: ";
463   for (MoveList<LEGAL> it(*this); *it; ++it)
464       ss << move_to_san(*const_cast<Position*>(this), *it) << " ";
465
466   return ss.str();
467 }
468
469
470 /// Position::check_blockers() returns a bitboard of all the pieces with color
471 /// 'c' that are blocking check on the king with color 'kingColor'. A piece
472 /// blocks a check if removing that piece from the board would result in a
473 /// position where the king is in check. A check blocking piece can be either a
474 /// pinned or a discovered check piece, according if its color 'c' is the same
475 /// or the opposite of 'kingColor'.
476
477 Bitboard Position::check_blockers(Color c, Color kingColor) const {
478
479   Bitboard b, pinners, result = 0;
480   Square ksq = king_square(kingColor);
481
482   // Pinners are sliders that give check when a pinned piece is removed
483   pinners = (  (pieces(  ROOK, QUEEN) & PseudoAttacks[ROOK  ][ksq])
484              | (pieces(BISHOP, QUEEN) & PseudoAttacks[BISHOP][ksq])) & pieces(~kingColor);
485
486   while (pinners)
487   {
488       b = between_bb(ksq, pop_lsb(&pinners)) & pieces();
489
490       if (!more_than_one(b))
491           result |= b & pieces(c);
492   }
493   return result;
494 }
495
496
497 /// Position::attackers_to() computes a bitboard of all pieces which attack a
498 /// given square. Slider attacks use the occ bitboard to indicate occupancy.
499
500 Bitboard Position::attackers_to(Square s, Bitboard occ) const {
501
502   return  (attacks_from<PAWN>(s, BLACK) & pieces(WHITE, PAWN))
503         | (attacks_from<PAWN>(s, WHITE) & pieces(BLACK, PAWN))
504         | (attacks_from<KNIGHT>(s)      & pieces(KNIGHT))
505         | (attacks_bb<ROOK>(s, occ)     & pieces(ROOK, QUEEN))
506         | (attacks_bb<BISHOP>(s, occ)   & pieces(BISHOP, QUEEN))
507         | (attacks_from<KING>(s)        & pieces(KING));
508 }
509
510
511 /// Position::legal() tests whether a pseudo-legal move is legal
512
513 bool Position::legal(Move m, Bitboard pinned) const {
514
515   assert(is_ok(m));
516   assert(pinned == pinned_pieces(sideToMove));
517
518   Color us = sideToMove;
519   Square from = from_sq(m);
520
521   assert(color_of(moved_piece(m)) == us);
522   assert(piece_on(king_square(us)) == make_piece(us, KING));
523
524   // En passant captures are a tricky special case. Because they are rather
525   // uncommon, we do it simply by testing whether the king is attacked after
526   // the move is made.
527   if (type_of(m) == ENPASSANT)
528   {
529       Color them = ~us;
530       Square to = to_sq(m);
531       Square capsq = to + pawn_push(them);
532       Square ksq = king_square(us);
533       Bitboard b = (pieces() ^ from ^ capsq) | to;
534
535       assert(to == ep_square());
536       assert(moved_piece(m) == make_piece(us, PAWN));
537       assert(piece_on(capsq) == make_piece(them, PAWN));
538       assert(piece_on(to) == NO_PIECE);
539
540       return   !(attacks_bb<  ROOK>(ksq, b) & pieces(them, QUEEN, ROOK))
541             && !(attacks_bb<BISHOP>(ksq, b) & pieces(them, QUEEN, BISHOP));
542   }
543
544   // If the moving piece is a king, check whether the destination
545   // square is attacked by the opponent. Castling moves are checked
546   // for legality during move generation.
547   if (type_of(piece_on(from)) == KING)
548       return type_of(m) == CASTLING || !(attackers_to(to_sq(m)) & pieces(~us));
549
550   // A non-king move is legal if and only if it is not pinned or it
551   // is moving along the ray towards or away from the king.
552   return   !pinned
553         || !(pinned & from)
554         ||  aligned(from, to_sq(m), king_square(us));
555 }
556
557
558 /// Position::pseudo_legal() takes a random move and tests whether the move is
559 /// pseudo legal. It is used to validate moves from TT that can be corrupted
560 /// due to SMP concurrent access or hash position key aliasing.
561
562 bool Position::pseudo_legal(const Move m) const {
563
564   Color us = sideToMove;
565   Square from = from_sq(m);
566   Square to = to_sq(m);
567   Piece pc = moved_piece(m);
568
569   // Use a slower but simpler function for uncommon cases
570   if (type_of(m) != NORMAL)
571       return MoveList<LEGAL>(*this).contains(m);
572
573   // Is not a promotion, so promotion piece must be empty
574   if (promotion_type(m) - 2 != NO_PIECE_TYPE)
575       return false;
576
577   // If the 'from' square is not occupied by a piece belonging to the side to
578   // move, the move is obviously not legal.
579   if (pc == NO_PIECE || color_of(pc) != us)
580       return false;
581
582   // The destination square cannot be occupied by a friendly piece
583   if (pieces(us) & to)
584       return false;
585
586   // Handle the special case of a pawn move
587   if (type_of(pc) == PAWN)
588   {
589       // We have already handled promotion moves, so destination
590       // cannot be on the 8th/1st rank.
591       if (rank_of(to) == relative_rank(us, RANK_8))
592           return false;
593
594       if (   !(attacks_from<PAWN>(from, us) & pieces(~us) & to) // Not a capture
595
596           && !((from + pawn_push(us) == to) && empty(to))       // Not a single push
597
598           && !(   (from + 2 * pawn_push(us) == to)              // Not a double push
599                && (rank_of(from) == relative_rank(us, RANK_2))
600                && empty(to)
601                && empty(to - pawn_push(us))))
602           return false;
603   }
604   else if (!(attacks_from(pc, from) & to))
605       return false;
606
607   // Evasions generator already takes care to avoid some kind of illegal moves
608   // and legal() relies on this. We therefore have to take care that the same
609   // kind of moves are filtered out here.
610   if (checkers())
611   {
612       if (type_of(pc) != KING)
613       {
614           // Double check? In this case a king move is required
615           if (more_than_one(checkers()))
616               return false;
617
618           // Our move must be a blocking evasion or a capture of the checking piece
619           if (!((between_bb(lsb(checkers()), king_square(us)) | checkers()) & to))
620               return false;
621       }
622       // In case of king moves under check we have to remove king so as to catch
623       // invalid moves like b1a1 when opposite queen is on c1.
624       else if (attackers_to(to, pieces() ^ from) & pieces(~us))
625           return false;
626   }
627
628   return true;
629 }
630
631
632 /// Position::gives_check() tests whether a pseudo-legal move gives a check
633
634 bool Position::gives_check(Move m, const CheckInfo& ci) const {
635
636   assert(is_ok(m));
637   assert(ci.dcCandidates == discovered_check_candidates());
638   assert(color_of(moved_piece(m)) == sideToMove);
639
640   Square from = from_sq(m);
641   Square to = to_sq(m);
642   PieceType pt = type_of(piece_on(from));
643
644   // Is there a direct check?
645   if (ci.checkSq[pt] & to)
646       return true;
647
648   // Is there a discovered check?
649   if (   unlikely(ci.dcCandidates)
650       && (ci.dcCandidates & from)
651       && !aligned(from, to, ci.ksq))
652       return true;
653
654   switch (type_of(m))
655   {
656   case NORMAL:
657       return false;
658
659   case PROMOTION:
660       return attacks_bb(Piece(promotion_type(m)), to, pieces() ^ from) & ci.ksq;
661
662   // En passant capture with check? We have already handled the case
663   // of direct checks and ordinary discovered check, so the only case we
664   // need to handle is the unusual case of a discovered check through
665   // the captured pawn.
666   case ENPASSANT:
667   {
668       Square capsq = file_of(to) | rank_of(from);
669       Bitboard b = (pieces() ^ from ^ capsq) | to;
670
671       return  (attacks_bb<  ROOK>(ci.ksq, b) & pieces(sideToMove, QUEEN, ROOK))
672             | (attacks_bb<BISHOP>(ci.ksq, b) & pieces(sideToMove, QUEEN, BISHOP));
673   }
674   case CASTLING:
675   {
676       Square kfrom = from;
677       Square rfrom = to; // Castling is encoded as 'King captures the rook'
678       Square kto = relative_square(sideToMove, rfrom > kfrom ? SQ_G1 : SQ_C1);
679       Square rto = relative_square(sideToMove, rfrom > kfrom ? SQ_F1 : SQ_D1);
680
681       return   (PseudoAttacks[ROOK][rto] & ci.ksq)
682             && (attacks_bb<ROOK>(rto, (pieces() ^ kfrom ^ rfrom) | rto | kto) & ci.ksq);
683   }
684   default:
685       assert(false);
686       return false;
687   }
688 }
689
690
691 /// Position::do_move() makes a move, and saves all information necessary
692 /// to a StateInfo object. The move is assumed to be legal. Pseudo-legal
693 /// moves should be filtered out before this function is called.
694
695 void Position::do_move(Move m, StateInfo& newSt) {
696
697   CheckInfo ci(*this);
698   do_move(m, newSt, ci, gives_check(m, ci));
699 }
700
701 void Position::do_move(Move m, StateInfo& newSt, const CheckInfo& ci, bool moveIsCheck) {
702
703   assert(is_ok(m));
704   assert(&newSt != st);
705
706   ++nodes;
707   Key k = st->key;
708
709   // Copy some fields of the old state to our new StateInfo object except the
710   // ones which are going to be recalculated from scratch anyway and then switch
711   // our state pointer to point to the new (ready to be updated) state.
712   std::memcpy(&newSt, st, StateCopySize64 * sizeof(uint64_t));
713
714   newSt.previous = st;
715   st = &newSt;
716
717   // Update side to move
718   k ^= Zobrist::side;
719
720   // Increment ply counters. In particular, rule50 will be reset to zero later on
721   // in case of a capture or a pawn move.
722   ++gamePly;
723   ++st->rule50;
724   ++st->pliesFromNull;
725
726   Color us = sideToMove;
727   Color them = ~us;
728   Square from = from_sq(m);
729   Square to = to_sq(m);
730   Piece pc = piece_on(from);
731   PieceType pt = type_of(pc);
732   PieceType captured = type_of(m) == ENPASSANT ? PAWN : type_of(piece_on(to));
733
734   assert(color_of(pc) == us);
735   assert(piece_on(to) == NO_PIECE || color_of(piece_on(to)) == them || type_of(m) == CASTLING);
736   assert(captured != KING);
737
738   if (type_of(m) == CASTLING)
739   {
740       assert(pc == make_piece(us, KING));
741
742       Square rfrom, rto;
743       do_castling<true>(from, to, rfrom, rto);
744
745       captured = NO_PIECE_TYPE;
746       st->psq += psq[us][ROOK][rto] - psq[us][ROOK][rfrom];
747       k ^= Zobrist::psq[us][ROOK][rfrom] ^ Zobrist::psq[us][ROOK][rto];
748   }
749
750   if (captured)
751   {
752       Square capsq = to;
753
754       // If the captured piece is a pawn, update pawn hash key, otherwise
755       // update non-pawn material.
756       if (captured == PAWN)
757       {
758           if (type_of(m) == ENPASSANT)
759           {
760               capsq += pawn_push(them);
761
762               assert(pt == PAWN);
763               assert(to == st->epSquare);
764               assert(relative_rank(us, to) == RANK_6);
765               assert(piece_on(to) == NO_PIECE);
766               assert(piece_on(capsq) == make_piece(them, PAWN));
767
768               board[capsq] = NO_PIECE;
769           }
770
771           st->pawnKey ^= Zobrist::psq[them][PAWN][capsq];
772       }
773       else
774           st->npMaterial[them] -= PieceValue[MG][captured];
775
776       // Update board and piece lists
777       remove_piece(capsq, them, captured);
778
779       // Update material hash key and prefetch access to materialTable
780       k ^= Zobrist::psq[them][captured][capsq];
781       st->materialKey ^= Zobrist::psq[them][captured][pieceCount[them][captured]];
782       prefetch((char*)thisThread->materialTable[st->materialKey]);
783
784       // Update incremental scores
785       st->psq -= psq[them][captured][capsq];
786
787       // Reset rule 50 counter
788       st->rule50 = 0;
789   }
790
791   // Update hash key
792   k ^= Zobrist::psq[us][pt][from] ^ Zobrist::psq[us][pt][to];
793
794   // Reset en passant square
795   if (st->epSquare != SQ_NONE)
796   {
797       k ^= Zobrist::enpassant[file_of(st->epSquare)];
798       st->epSquare = SQ_NONE;
799   }
800
801   // Update castling rights if needed
802   if (st->castlingRights && (castlingRightsMask[from] | castlingRightsMask[to]))
803   {
804       int cr = castlingRightsMask[from] | castlingRightsMask[to];
805       k ^= Zobrist::castling[st->castlingRights & cr];
806       st->castlingRights &= ~cr;
807   }
808
809   // Prefetch TT access as soon as we know the new hash key
810   prefetch((char*)TT.first_entry(k));
811
812   // Move the piece. The tricky Chess960 castling is handled earlier
813   if (type_of(m) != CASTLING)
814       move_piece(from, to, us, pt);
815
816   // If the moving piece is a pawn do some special extra work
817   if (pt == PAWN)
818   {
819       // Set en-passant square if the moved pawn can be captured
820       if (   (int(to) ^ int(from)) == 16
821           && (attacks_from<PAWN>(from + pawn_push(us), us) & pieces(them, PAWN)))
822       {
823           st->epSquare = Square((from + to) / 2);
824           k ^= Zobrist::enpassant[file_of(st->epSquare)];
825       }
826
827       if (type_of(m) == PROMOTION)
828       {
829           PieceType promotion = promotion_type(m);
830
831           assert(relative_rank(us, to) == RANK_8);
832           assert(promotion >= KNIGHT && promotion <= QUEEN);
833
834           remove_piece(to, us, PAWN);
835           put_piece(to, us, promotion);
836
837           // Update hash keys
838           k ^= Zobrist::psq[us][PAWN][to] ^ Zobrist::psq[us][promotion][to];
839           st->pawnKey ^= Zobrist::psq[us][PAWN][to];
840           st->materialKey ^=  Zobrist::psq[us][promotion][pieceCount[us][promotion]-1]
841                             ^ Zobrist::psq[us][PAWN][pieceCount[us][PAWN]];
842
843           // Update incremental score
844           st->psq += psq[us][promotion][to] - psq[us][PAWN][to];
845
846           // Update material
847           st->npMaterial[us] += PieceValue[MG][promotion];
848       }
849
850       // Update pawn hash key and prefetch access to pawnsTable
851       st->pawnKey ^= Zobrist::psq[us][PAWN][from] ^ Zobrist::psq[us][PAWN][to];
852       prefetch((char*)thisThread->pawnsTable[st->pawnKey]);
853
854       // Reset rule 50 draw counter
855       st->rule50 = 0;
856   }
857
858   // Update incremental scores
859   st->psq += psq[us][pt][to] - psq[us][pt][from];
860
861   // Set capture piece
862   st->capturedType = captured;
863
864   // Update the key with the final value
865   st->key = k;
866
867   // Update checkers bitboard: piece must be already moved
868   st->checkersBB = 0;
869
870   if (moveIsCheck)
871   {
872       if (type_of(m) != NORMAL)
873           st->checkersBB = attackers_to(king_square(them)) & pieces(us);
874       else
875       {
876           // Direct checks
877           if (ci.checkSq[pt] & to)
878               st->checkersBB |= to;
879
880           // Discovered checks
881           if (ci.dcCandidates && (ci.dcCandidates & from))
882           {
883               if (pt != ROOK)
884                   st->checkersBB |= attacks_from<ROOK>(king_square(them)) & pieces(us, QUEEN, ROOK);
885
886               if (pt != BISHOP)
887                   st->checkersBB |= attacks_from<BISHOP>(king_square(them)) & pieces(us, QUEEN, BISHOP);
888           }
889       }
890   }
891
892   sideToMove = ~sideToMove;
893
894   assert(pos_is_ok());
895 }
896
897
898 /// Position::undo_move() unmakes a move. When it returns, the position should
899 /// be restored to exactly the same state as before the move was made.
900
901 void Position::undo_move(Move m) {
902
903   assert(is_ok(m));
904
905   sideToMove = ~sideToMove;
906
907   Color us = sideToMove;
908   Color them = ~us;
909   Square from = from_sq(m);
910   Square to = to_sq(m);
911   PieceType pt = type_of(piece_on(to));
912   PieceType captured = st->capturedType;
913
914   assert(empty(from) || type_of(m) == CASTLING);
915   assert(captured != KING);
916
917   if (type_of(m) == PROMOTION)
918   {
919       PieceType promotion = promotion_type(m);
920
921       assert(promotion == pt);
922       assert(relative_rank(us, to) == RANK_8);
923       assert(promotion >= KNIGHT && promotion <= QUEEN);
924
925       remove_piece(to, us, promotion);
926       put_piece(to, us, PAWN);
927       pt = PAWN;
928   }
929
930   if (type_of(m) == CASTLING)
931   {
932       Square rfrom, rto;
933       do_castling<false>(from, to, rfrom, rto);
934
935       captured = NO_PIECE_TYPE;
936       pt = KING;
937   }
938   else
939       move_piece(to, from, us, pt); // Put the piece back at the source square
940
941   if (captured)
942   {
943       Square capsq = to;
944
945       if (type_of(m) == ENPASSANT)
946       {
947           capsq -= pawn_push(us);
948
949           assert(pt == PAWN);
950           assert(to == st->previous->epSquare);
951           assert(relative_rank(us, to) == RANK_6);
952           assert(piece_on(capsq) == NO_PIECE);
953       }
954
955       put_piece(capsq, them, captured); // Restore the captured piece
956   }
957
958   // Finally point our state pointer back to the previous state
959   st = st->previous;
960   --gamePly;
961
962   assert(pos_is_ok());
963 }
964
965
966 /// Position::do_castling() is a helper used to do/undo a castling move. This
967 /// is a bit tricky, especially in Chess960.
968 template<bool Do>
969 void Position::do_castling(Square from, Square& to, Square& rfrom, Square& rto) {
970
971   bool kingSide = to > from;
972   rfrom = to; // Castling is encoded as "king captures friendly rook"
973   rto = relative_square(sideToMove, kingSide ? SQ_F1 : SQ_D1);
974   to  = relative_square(sideToMove, kingSide ? SQ_G1 : SQ_C1);
975
976   // Remove both pieces first since squares could overlap in Chess960
977   remove_piece(Do ?  from :  to, sideToMove, KING);
978   remove_piece(Do ? rfrom : rto, sideToMove, ROOK);
979   board[Do ? from : to] = board[Do ? rfrom : rto] = NO_PIECE; // Since remove_piece doesn't do it for us
980   put_piece(Do ?  to :  from, sideToMove, KING);
981   put_piece(Do ? rto : rfrom, sideToMove, ROOK);
982 }
983
984
985 /// Position::do(undo)_null_move() is used to do(undo) a "null move": It flips
986 /// the side to move without executing any move on the board.
987
988 void Position::do_null_move(StateInfo& newSt) {
989
990   assert(!checkers());
991
992   std::memcpy(&newSt, st, sizeof(StateInfo)); // Fully copy here
993
994   newSt.previous = st;
995   st = &newSt;
996
997   if (st->epSquare != SQ_NONE)
998   {
999       st->key ^= Zobrist::enpassant[file_of(st->epSquare)];
1000       st->epSquare = SQ_NONE;
1001   }
1002
1003   st->key ^= Zobrist::side;
1004   prefetch((char*)TT.first_entry(st->key));
1005
1006   ++st->rule50;
1007   st->pliesFromNull = 0;
1008
1009   sideToMove = ~sideToMove;
1010
1011   assert(pos_is_ok());
1012 }
1013
1014 void Position::undo_null_move() {
1015
1016   assert(!checkers());
1017
1018   st = st->previous;
1019   sideToMove = ~sideToMove;
1020 }
1021
1022
1023 /// Position::see() is a static exchange evaluator: It tries to estimate the
1024 /// material gain or loss resulting from a move.
1025
1026 Value Position::see_sign(Move m) const {
1027
1028   assert(is_ok(m));
1029
1030   // Early return if SEE cannot be negative because captured piece value
1031   // is not less then capturing one. Note that king moves always return
1032   // here because king midgame value is set to 0.
1033   if (PieceValue[MG][moved_piece(m)] <= PieceValue[MG][piece_on(to_sq(m))])
1034       return VALUE_KNOWN_WIN;
1035
1036   return see(m);
1037 }
1038
1039 Value Position::see(Move m) const {
1040
1041   Square from, to;
1042   Bitboard occupied, attackers, stmAttackers;
1043   Value swapList[32];
1044   int slIndex = 1;
1045   PieceType captured;
1046   Color stm;
1047
1048   assert(is_ok(m));
1049
1050   from = from_sq(m);
1051   to = to_sq(m);
1052   swapList[0] = PieceValue[MG][piece_on(to)];
1053   stm = color_of(piece_on(from));
1054   occupied = pieces() ^ from;
1055
1056   // Castling moves are implemented as king capturing the rook so cannot be
1057   // handled correctly. Simply return 0 that is always the correct value
1058   // unless in the rare case the rook ends up under attack.
1059   if (type_of(m) == CASTLING)
1060       return VALUE_ZERO;
1061
1062   if (type_of(m) == ENPASSANT)
1063   {
1064       occupied ^= to - pawn_push(stm); // Remove the captured pawn
1065       swapList[0] = PieceValue[MG][PAWN];
1066   }
1067
1068   // Find all attackers to the destination square, with the moving piece
1069   // removed, but possibly an X-ray attacker added behind it.
1070   attackers = attackers_to(to, occupied) & occupied;
1071
1072   // If the opponent has no attackers we are finished
1073   stm = ~stm;
1074   stmAttackers = attackers & pieces(stm);
1075   if (!stmAttackers)
1076       return swapList[0];
1077
1078   // The destination square is defended, which makes things rather more
1079   // difficult to compute. We proceed by building up a "swap list" containing
1080   // the material gain or loss at each stop in a sequence of captures to the
1081   // destination square, where the sides alternately capture, and always
1082   // capture with the least valuable piece. After each capture, we look for
1083   // new X-ray attacks from behind the capturing piece.
1084   captured = type_of(piece_on(from));
1085
1086   do {
1087       assert(slIndex < 32);
1088
1089       // Add the new entry to the swap list
1090       swapList[slIndex] = -swapList[slIndex - 1] + PieceValue[MG][captured];
1091
1092       // Locate and remove the next least valuable attacker
1093       captured = min_attacker<PAWN>(byTypeBB, to, stmAttackers, occupied, attackers);
1094
1095       // Stop before processing a king capture
1096       if (captured == KING)
1097       {
1098           if (stmAttackers == attackers)
1099               ++slIndex;
1100
1101           break;
1102       }
1103
1104       stm = ~stm;
1105       stmAttackers = attackers & pieces(stm);
1106       ++slIndex;
1107
1108   } while (stmAttackers);
1109
1110   // Having built the swap list, we negamax through it to find the best
1111   // achievable score from the point of view of the side to move.
1112   while (--slIndex)
1113       swapList[slIndex - 1] = std::min(-swapList[slIndex], swapList[slIndex - 1]);
1114
1115   return swapList[0];
1116 }
1117
1118
1119 /// Position::is_draw() tests whether the position is drawn by material, 50 moves
1120 /// rule or repetition. It does not detect stalemates.
1121
1122 bool Position::is_draw() const {
1123
1124   if (   !pieces(PAWN)
1125       && (non_pawn_material(WHITE) + non_pawn_material(BLACK) <= BishopValueMg))
1126       return true;
1127
1128   if (st->rule50 > 99 && (!checkers() || MoveList<LEGAL>(*this).size()))
1129       return true;
1130
1131   StateInfo* stp = st;
1132   for (int i = 2, e = std::min(st->rule50, st->pliesFromNull); i <= e; i += 2)
1133   {
1134       stp = stp->previous->previous;
1135
1136       if (stp->key == st->key)
1137           return true; // Draw at first repetition
1138   }
1139
1140   return false;
1141 }
1142
1143
1144 /// Position::flip() flips position with the white and black sides reversed. This
1145 /// is only useful for debugging e.g. for finding evaluation symmetry bugs.
1146
1147 static char toggle_case(char c) {
1148   return char(islower(c) ? toupper(c) : tolower(c));
1149 }
1150
1151 void Position::flip() {
1152
1153   string f, token;
1154   std::stringstream ss(fen());
1155
1156   for (Rank rank = RANK_8; rank >= RANK_1; --rank) // Piece placement
1157   {
1158       std::getline(ss, token, rank > RANK_1 ? '/' : ' ');
1159       f.insert(0, token + (f.empty() ? " " : "/"));
1160   }
1161
1162   ss >> token; // Active color
1163   f += (token == "w" ? "B " : "W "); // Will be lowercased later
1164
1165   ss >> token; // Castling availability
1166   f += token + " ";
1167
1168   std::transform(f.begin(), f.end(), f.begin(), toggle_case);
1169
1170   ss >> token; // En passant square
1171   f += (token == "-" ? token : token.replace(1, 1, token[1] == '3' ? "6" : "3"));
1172
1173   std::getline(ss, token); // Half and full moves
1174   f += token;
1175
1176   set(f, is_chess960(), this_thread());
1177
1178   assert(pos_is_ok());
1179 }
1180
1181
1182 /// Position::pos_is_ok() performs some consistency checks for the position object.
1183 /// This is meant to be helpful when debugging.
1184
1185 bool Position::pos_is_ok(int* failedStep) const {
1186
1187   int dummy, *step = failedStep ? failedStep : &dummy;
1188
1189   // What features of the position should be verified?
1190   const bool all = false;
1191
1192   const bool testBitboards       = all || false;
1193   const bool testKingCount       = all || false;
1194   const bool testKingCapture     = all || false;
1195   const bool testState           = all || false;
1196   const bool testCheckerCount    = all || false;
1197   const bool testPieceCounts     = all || false;
1198   const bool testPieceList       = all || false;
1199   const bool testCastlingSquares = all || false;
1200
1201   if (*step = 1, sideToMove != WHITE && sideToMove != BLACK)
1202       return false;
1203
1204   if ((*step)++, piece_on(king_square(WHITE)) != W_KING)
1205       return false;
1206
1207   if ((*step)++, piece_on(king_square(BLACK)) != B_KING)
1208       return false;
1209
1210   if ((*step)++, ep_square() != SQ_NONE && relative_rank(sideToMove, ep_square()) != RANK_6)
1211       return false;
1212
1213   if ((*step)++, testKingCount)
1214       if (   std::count(board, board + SQUARE_NB, W_KING) != 1
1215           || std::count(board, board + SQUARE_NB, B_KING) != 1)
1216           return false;
1217
1218   if ((*step)++, testKingCapture)
1219       if (attackers_to(king_square(~sideToMove)) & pieces(sideToMove))
1220           return false;
1221
1222   if ((*step)++, testBitboards)
1223   {
1224       // The intersection of the white and black pieces must be empty
1225       if (pieces(WHITE) & pieces(BLACK))
1226           return false;
1227
1228       // The union of the white and black pieces must be equal to all
1229       // occupied squares
1230       if ((pieces(WHITE) | pieces(BLACK)) != pieces())
1231           return false;
1232
1233       // Separate piece type bitboards must have empty intersections
1234       for (PieceType p1 = PAWN; p1 <= KING; ++p1)
1235           for (PieceType p2 = PAWN; p2 <= KING; ++p2)
1236               if (p1 != p2 && (pieces(p1) & pieces(p2)))
1237                   return false;
1238   }
1239
1240   if ((*step)++, testState)
1241   {
1242       StateInfo si;
1243       set_state(&si);
1244       if (   st->key != si.key
1245           || st->pawnKey != si.pawnKey
1246           || st->materialKey != si.materialKey
1247           || st->npMaterial[WHITE] != si.npMaterial[WHITE]
1248           || st->npMaterial[BLACK] != si.npMaterial[BLACK]
1249           || st->psq != si.psq)
1250           return false;
1251   }
1252
1253   if ((*step)++, testCheckerCount && popcount<Full>(st->checkersBB) > 2)
1254       return false;
1255
1256   if ((*step)++, testPieceCounts)
1257       for (Color c = WHITE; c <= BLACK; ++c)
1258           for (PieceType pt = PAWN; pt <= KING; ++pt)
1259               if (pieceCount[c][pt] != popcount<Full>(pieces(c, pt)))
1260                   return false;
1261
1262   if ((*step)++, testPieceList)
1263       for (Color c = WHITE; c <= BLACK; ++c)
1264           for (PieceType pt = PAWN; pt <= KING; ++pt)
1265               for (int i = 0; i < pieceCount[c][pt];  ++i)
1266                   if (   board[pieceList[c][pt][i]] != make_piece(c, pt)
1267                       || index[pieceList[c][pt][i]] != i)
1268                       return false;
1269
1270   if ((*step)++, testCastlingSquares)
1271       for (Color c = WHITE; c <= BLACK; ++c)
1272           for (CastlingSide s = KING_SIDE; s <= QUEEN_SIDE; s = CastlingSide(s + 1))
1273           {
1274               if (!can_castle(c | s))
1275                   continue;
1276
1277               if (  (castlingRightsMask[king_square(c)] & (c | s)) != (c | s)
1278                   || piece_on(castlingRookSquare[c | s]) != make_piece(c, ROOK)
1279                   || castlingRightsMask[castlingRookSquare[c | s]] != (c | s))
1280                   return false;
1281           }
1282
1283   *step = 0;
1284   return true;
1285 }