- /* 
-   Stockfish, a UCI chess playing engine derived from Glaurung 2.1 
-   Copyright (C) 2004-2008 Tord Romstad (Glaurung author) 
-   Copyright (C) 2008-2015 Marco Costalba, Joona Kiiski, Tord Romstad 
-   Copyright (C) 2015-2016 Marco Costalba, Joona Kiiski, Gary Linscott, Tord Romstad 
-   
-   Stockfish is free software: you can redistribute it and/or modify 
-   it under the terms of the GNU General Public License as published by 
-   the Free Software Foundation, either version 3 of the License, or 
-   (at your option) any later version. 
-   
-   Stockfish is distributed in the hope that it will be useful, 
-   but WITHOUT ANY WARRANTY; without even the implied warranty of 
-   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the 
-   GNU General Public License for more details. 
-   
-   You should have received a copy of the GNU General Public License 
-   along with this program.  If not, see <http://www.gnu.org/licenses/>. 
- */ 
-   
- #include <cassert> 
-   
- #include "movepick.h" 
- #include "thread.h" 
-   
- namespace { 
-   
-   enum Stages { 
-     MAIN_SEARCH, CAPTURES_INIT, GOOD_CAPTURES, KILLERS, COUNTERMOVE, QUIET_INIT, QUIET, BAD_CAPTURES, 
-     EVASION, EVASIONS_INIT, ALL_EVASIONS, 
-     PROBCUT, PROBCUT_INIT, PROBCUT_CAPTURES, 
-     QSEARCH_WITH_CHECKS, QCAPTURES_1_INIT, QCAPTURES_1, QCHECKS, 
-     QSEARCH_NO_CHECKS, QCAPTURES_2_INIT, QCAPTURES_2, 
-     QSEARCH_RECAPTURES, QRECAPTURES 
-   }; 
-   
-   // Our insertion sort, which is guaranteed to be stable, as it should be 
-   void insertion_sort(ExtMove* begin, ExtMove* end) 
-   { 
-     ExtMove tmp, *p, *q; 
-   
-     for (p = begin + 1; p < end; ++p) 
-     { 
-         tmp = *p; 
-         for (q = p; q != begin && *(q-1) < tmp; --q) 
-             *q = *(q-1); 
-         *q = tmp; 
-     } 
-   } 
-   
-   // pick_best() finds the best move in the range (begin, end) and moves it to 
-   // the front. It's faster than sorting all the moves in advance when there 
-   // are few moves, e.g., the possible captures. 
-   Move pick_best(ExtMove* begin, ExtMove* end) 
-   { 
-       std::swap(*begin, *std::max_element(begin, end)); 
-       return *begin; 
-   } 
-   
- } // namespace 
-   
-   
- /// Constructors of the MovePicker class. As arguments we pass information 
- /// to help it to return the (presumably) good moves first, to decide which 
- /// moves to return (in the quiescence search, for instance, we only want to 
- /// search captures, promotions, and some checks) and how important good move 
- /// ordering is at the current node. 
-   
- MovePicker::MovePicker(const Position& p, Move ttm, Depth d, Search::Stack* s) 
-            : pos(p), ss(s), depth(d) { 
-   
-   assert(d > DEPTH_ZERO); 
-   
-   Square prevSq = to_sq((ss-1)->currentMove); 
-   countermove = pos.this_thread()->counterMoves[pos.piece_on(prevSq)][prevSq]; 
-   
-   stage = pos.checkers() ? EVASION : MAIN_SEARCH; 
-   ttMove = ttm && pos.pseudo_legal(ttm) ? ttm : MOVE_NONE; 
-   stage += (ttMove == MOVE_NONE); 
- } 
-   
- MovePicker::MovePicker(const Position& p, Move ttm, Depth d, Square s) 
-            : pos(p) { 
-   
-   assert(d <= DEPTH_ZERO); 
-   
-   if (pos.checkers()) 
-       stage = EVASION; 
-   
-   else if (d > DEPTH_QS_NO_CHECKS) 
-       stage = QSEARCH_WITH_CHECKS; 
-   
-   else if (d > DEPTH_QS_RECAPTURES) 
-       stage = QSEARCH_NO_CHECKS; 
-   
-   else 
-   { 
-       stage = QSEARCH_RECAPTURES; 
-       recaptureSquare = s; 
-       return; 
-   } 
-   
-   ttMove = ttm && pos.pseudo_legal(ttm) ? ttm : MOVE_NONE; 
-   stage += (ttMove == MOVE_NONE); 
- } 
-   
- MovePicker::MovePicker(const Position& p, Move ttm, Value th) 
-            : pos(p), threshold(th) { 
-   
-   assert(!pos.checkers()); 
-   
-   stage = PROBCUT; 
-   
-   // In ProbCut we generate captures with SEE higher than the given threshold 
-   ttMove =   ttm 
-           && pos.pseudo_legal(ttm) 
-           && pos.capture(ttm) 
-           && pos.see_ge(ttm, threshold + 1)? ttm : MOVE_NONE; 
-   
-   stage += (ttMove == MOVE_NONE); 
- } 
-   
-   
- /// score() assigns a numerical value to each move in a move list. The moves with 
- /// highest values will be picked first. 
- template<> 
- void MovePicker::score<CAPTURES>() { 
-   // Winning and equal captures in the main search are ordered by MVV, preferring 
-   // captures near our home rank. Surprisingly, this appears to perform slightly 
-   // better than SEE-based move ordering: exchanging big pieces before capturing 
-   // a hanging piece probably helps to reduce the subtree size. 
-   // In the main search we want to push captures with negative SEE values to the 
-   // badCaptures[] array, but instead of doing it now we delay until the move 
-   // has been picked up, saving some SEE calls in case we get a cutoff. 
-   for (auto& m : *this) 
-       m.value =  PieceValue[MG][pos.piece_on(to_sq(m))] 
-                - Value(200 * relative_rank(pos.side_to_move(), to_sq(m))); 
- } 
-   
- template<> 
- void MovePicker::score<QUIETS>() { 
-   
-   const HistoryStats& history = pos.this_thread()->history; 
-   const FromToStats& fromTo = pos.this_thread()->fromTo; 
-   
-   const CounterMoveStats* cm = (ss-1)->counterMoves; 
-   const CounterMoveStats* fm = (ss-2)->counterMoves; 
-   const CounterMoveStats* f2 = (ss-4)->counterMoves; 
-   
-   Color c = pos.side_to_move(); 
-   
-   for (auto& m : *this) 
-       m.value =      history[pos.moved_piece(m)][to_sq(m)] 
-                + (cm ? (*cm)[pos.moved_piece(m)][to_sq(m)] : VALUE_ZERO) 
-                + (fm ? (*fm)[pos.moved_piece(m)][to_sq(m)] : VALUE_ZERO) 
-                + (f2 ? (*f2)[pos.moved_piece(m)][to_sq(m)] : VALUE_ZERO) 
-                + fromTo.get(c, m); 
- } 
-   
- template<> 
- void MovePicker::score<EVASIONS>() { 
-   // Try captures ordered by MVV/LVA, then non-captures ordered by history value 
-   const HistoryStats& history = pos.this_thread()->history; 
-   const FromToStats& fromTo = pos.this_thread()->fromTo; 
-   Color c = pos.side_to_move(); 
-   
-   for (auto& m : *this) 
-       if (pos.capture(m)) 
-           m.value =  PieceValue[MG][pos.piece_on(to_sq(m))] 
-                    - Value(type_of(pos.moved_piece(m))) + HistoryStats::Max; 
-       else 
-           m.value = history[pos.moved_piece(m)][to_sq(m)] + fromTo.get(c, m); 
- } 
-   
-   
- /// next_move() is the most important method of the MovePicker class. It returns 
- /// a new pseudo legal move every time it is called, until there are no more moves 
- /// left. It picks the move with the biggest value from a list of generated moves 
- /// taking care not to return the ttMove if it has already been searched. 
-   
- Move MovePicker::next_move() { 
-   
-   Move move; 
-   
-   switch (stage) { 
-   
-   case MAIN_SEARCH: case EVASION: case QSEARCH_WITH_CHECKS: 
-   case QSEARCH_NO_CHECKS: case PROBCUT: 
-       ++stage; 
-       return ttMove; 
-   
-   case CAPTURES_INIT: 
-       endBadCaptures = cur = moves; 
-       endMoves = generate<CAPTURES>(pos, cur); 
-       score<CAPTURES>(); 
-       ++stage; 
-   
-   case GOOD_CAPTURES: 
-       while (cur < endMoves) 
-       { 
-           move = pick_best(cur++, endMoves); 
-           if (move != ttMove) 
-           { 
-               if (pos.see_ge(move, VALUE_ZERO)) 
-                   return move; 
-   
-               // Losing capture, move it to the beginning of the array 
-               *endBadCaptures++ = move; 
-           } 
-       } 
-   
-       ++stage; 
-       move = ss->killers[0];  // First killer move 
-       if (    move != MOVE_NONE 
-           &&  move != ttMove 
-           &&  pos.pseudo_legal(move) 
-           && !pos.capture(move)) 
-           return move; 
-   
-   case KILLERS: 
-       ++stage; 
-       move = ss->killers[1]; // Second killer move 
-       if (    move != MOVE_NONE 
-           &&  move != ttMove 
-           &&  pos.pseudo_legal(move) 
-           && !pos.capture(move)) 
-           return move; 
-   
-   case COUNTERMOVE: 
-       ++stage; 
-       move = countermove; 
-       if (    move != MOVE_NONE 
-           &&  move != ttMove 
-           &&  move != ss->killers[0] 
-           &&  move != ss->killers[1] 
-           &&  pos.pseudo_legal(move) 
-           && !pos.capture(move)) 
-           return move; 
-   
-   case QUIET_INIT: 
-       cur = endBadCaptures; 
-       endMoves = generate<QUIETS>(pos, cur); 
-       score<QUIETS>(); 
-       if (depth < 3 * ONE_PLY) 
-       { 
-           ExtMove* goodQuiet = std::partition(cur, endMoves, [](const ExtMove& m) 
-                                              { return m.value > VALUE_ZERO; }); 
-           insertion_sort(cur, goodQuiet); 
-       } else 
-           insertion_sort(cur, endMoves); 
-       ++stage; 
-   
-   case QUIET: 
-       while (cur < endMoves) 
-       { 
-           move = *cur++; 
-           if (   move != ttMove 
-               && move != ss->killers[0] 
-               && move != ss->killers[1] 
-               && move != countermove) 
-               return move; 
-       } 
-       ++stage; 
-       cur = moves; // Point to beginning of bad captures 
-   
-   case BAD_CAPTURES: 
-       if (cur < endBadCaptures) 
-           return *cur++; 
-       break; 
-   
-   case EVASIONS_INIT: 
-       cur = moves; 
-       endMoves = generate<EVASIONS>(pos, cur); 
-       score<EVASIONS>(); 
-       ++stage; 
-   
-   case ALL_EVASIONS: 
-       while (cur < endMoves) 
-       { 
-           move = pick_best(cur++, endMoves); 
-           if (move != ttMove) 
-               return move; 
-       } 
-       break; 
-   
-   case PROBCUT_INIT: 
-       cur = moves; 
-       endMoves = generate<CAPTURES>(pos, cur); 
-       score<CAPTURES>(); 
-       ++stage; 
-   
-   case PROBCUT_CAPTURES: 
-       while (cur < endMoves) 
-       { 
-           move = pick_best(cur++, endMoves); 
-           if (   move != ttMove 
-               && pos.see_ge(move, threshold + 1)) 
-               return move; 
-       } 
-       break; 
-   
-   case QCAPTURES_1_INIT: case QCAPTURES_2_INIT: 
-       cur = moves; 
-       endMoves = generate<CAPTURES>(pos, cur); 
-       score<CAPTURES>(); 
-       ++stage; 
-   
-   case QCAPTURES_1: case QCAPTURES_2: 
-       while (cur < endMoves) 
-       { 
-           move = pick_best(cur++, endMoves); 
-           if (move != ttMove) 
-               return move; 
-       } 
-       if (stage == QCAPTURES_2) 
-           break; 
-       cur = moves; 
-       endMoves = generate<QUIET_CHECKS>(pos, cur); 
-       ++stage; 
-   
-   case QCHECKS: 
-       while (cur < endMoves) 
-       { 
-           move = cur++->move; 
-           if (move != ttMove) 
-               return move; 
-       } 
-       break; 
-   
-   case QSEARCH_RECAPTURES: 
-       cur = moves; 
-       endMoves = generate<CAPTURES>(pos, cur); 
-       score<CAPTURES>(); 
-       ++stage; 
-   
-   case QRECAPTURES: 
-       while (cur < endMoves) 
-       { 
-           move = pick_best(cur++, endMoves); 
-           if (to_sq(move) == recaptureSquare) 
-               return move; 
-       } 
-       break; 
-   
-   default: 
-       assert(false); 
-   } 
-   
-   return MOVE_NONE; 
- } 
-