/*
Stockfish, a UCI chess playing engine derived from Glaurung 2.1
Copyright (C) 2004-2008 Tord Romstad (Glaurung author)
- Copyright (C) 2008-2010 Marco Costalba, Joona Kiiski, Tord Romstad
+ Copyright (C) 2008-2015 Marco Costalba, Joona Kiiski, Tord Romstad
+ Copyright (C) 2015-2018 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
along with this program. If not, see <http://www.gnu.org/licenses/>.
*/
-#include <iostream>
+#include <algorithm> // For std::count
+#include <cassert>
+#include "movegen.h"
#include "search.h"
#include "thread.h"
-#include "ucioption.h"
+#include "uci.h"
+#include "syzygy/tbprobe.h"
+#include "tt.h"
-ThreadsManager Threads; // Global object definition
+ThreadPool Threads; // Global object
-namespace { extern "C" {
- // start_routine() is the C function which is called when a new thread
- // is launched. It simply calls idle_loop() of the supplied thread. The
- // last two threads are dedicated to read input from GUI and to mimic a
- // timer, so they run in listener_loop() and timer_loop() respectively.
+/// Thread constructor launches the thread and waits until it goes to sleep
+/// in idle_loop(). Note that 'searching' and 'exit' should be alredy set.
-#if defined(_MSC_VER)
- DWORD WINAPI start_routine(LPVOID thread) {
-#else
- void* start_routine(void* thread) {
-#endif
+Thread::Thread(size_t n) : idx(n), stdThread(&Thread::idle_loop, this) {
- if (((Thread*)thread)->threadID == 0)
- ((Thread*)thread)->main_loop();
-
- else if (((Thread*)thread)->threadID == MAX_THREADS)
- ((Thread*)thread)->timer_loop();
- else
- ((Thread*)thread)->idle_loop(NULL);
-
- return 0;
- }
-
-} }
-
-
-// wake_up() wakes up the thread, normally at the beginning of the search or,
-// if "sleeping threads" is used, when there is some work to do.
-
-void Thread::wake_up() {
-
- lock_grab(&sleepLock);
- cond_signal(&sleepCond);
- lock_release(&sleepLock);
+ wait_for_search_finished();
}
-// cutoff_occurred() checks whether a beta cutoff has occurred in the current
-// active split point, or in some ancestor of the split point.
+/// Thread destructor wakes up the thread in idle_loop() and waits
+/// for its termination. Thread should be already waiting.
-bool Thread::cutoff_occurred() const {
+Thread::~Thread() {
- for (SplitPoint* sp = splitPoint; sp; sp = sp->parent)
- if (sp->is_betaCutoff)
- return true;
- return false;
-}
+ assert(!searching);
+ exit = true;
+ start_searching();
+ stdThread.join();
+}
-// is_available_to() checks whether the thread is available to help the thread with
-// threadID "master" at a split point. An obvious requirement is that thread must be
-// idle. With more than two threads, this is not by itself sufficient: If the thread
-// is the master of some active split point, it is only available as a slave to the
-// threads which are busy searching the split point at the top of "slave"'s split
-// point stack (the "helpful master concept" in YBWC terminology).
-bool Thread::is_available_to(int master) const {
+/// Thread::clear() reset histories, usually before a new game
- if (is_searching)
- return false;
+void Thread::clear() {
- // Make a local copy to be sure doesn't become zero under our feet while
- // testing next condition and so leading to an out of bound access.
- int localActiveSplitPoints = activeSplitPoints;
+ counterMoves.fill(MOVE_NONE);
+ mainHistory.fill(0);
+ captureHistory.fill(0);
- // No active split points means that the thread is available as a slave for any
- // other thread otherwise apply the "helpful master" concept if possible.
- if ( !localActiveSplitPoints
- || splitPoints[localActiveSplitPoints - 1].is_slave[master])
- return true;
+ for (auto& to : continuationHistory)
+ for (auto& h : to)
+ h->fill(0);
- return false;
+ continuationHistory[NO_PIECE][0]->fill(Search::CounterMovePruneThreshold - 1);
}
+/// Thread::start_searching() wakes up the thread that will start the search
-// read_uci_options() updates number of active threads and other internal
-// parameters according to the UCI options values. It is called before
-// to start a new search.
-
-void ThreadsManager::read_uci_options() {
+void Thread::start_searching() {
- maxThreadsPerSplitPoint = Options["Maximum Number of Threads per Split Point"].value<int>();
- minimumSplitDepth = Options["Minimum Split Depth"].value<int>() * ONE_PLY;
- useSleepingThreads = Options["Use Sleeping Threads"].value<bool>();
-
- set_size(Options["Threads"].value<int>());
+ std::lock_guard<Mutex> lk(mutex);
+ searching = true;
+ cv.notify_one(); // Wake up the thread in idle_loop()
}
-// set_size() changes the number of active threads and raises do_sleep flag for
-// all the unused threads that will go immediately to sleep.
-
-void ThreadsManager::set_size(int cnt) {
+/// Thread::wait_for_search_finished() blocks on the condition variable
+/// until the thread has finished searching.
- assert(cnt > 0 && cnt <= MAX_THREADS);
+void Thread::wait_for_search_finished() {
- activeThreads = cnt;
-
- for (int i = 1; i < MAX_THREADS; i++) // Ignore main thread
- if (i < activeThreads)
- {
- // Dynamically allocate pawn and material hash tables according to the
- // number of active threads. This avoids preallocating memory for all
- // possible threads if only few are used as, for instance, on mobile
- // devices where memory is scarce and allocating for MAX_THREADS could
- // even result in a crash.
- threads[i].pawnTable.init();
- threads[i].materialTable.init();
-
- threads[i].do_sleep = false;
- }
- else
- threads[i].do_sleep = true;
+ std::unique_lock<Mutex> lk(mutex);
+ cv.wait(lk, [&]{ return !searching; });
}
-// init() is called during startup. Initializes locks and condition variables
-// and launches all threads sending them immediately to sleep.
+/// Thread::idle_loop() is where the thread is parked, blocked on the
+/// condition variable, when it has no work to do.
-void ThreadsManager::init() {
+void Thread::idle_loop() {
- // Initialize sleep condition used to block waiting for end of searching
- cond_init(&sleepCond);
+ // If OS already scheduled us on a different group than 0 then don't overwrite
+ // the choice, eventually we are one of many one-threaded processes running on
+ // some Windows NUMA hardware, for instance in fishtest. To make it simple,
+ // just check if running threads are below a threshold, in this case all this
+ // NUMA machinery is not needed.
+ if (Options["Threads"] > 8)
+ WinProcGroup::bindThisThread(idx);
- // Initialize threads lock, used when allocating slaves during splitting
- lock_init(&threadsLock);
-
- // Initialize sleep and split point locks
- for (int i = 0; i <= MAX_THREADS; i++)
+ while (true)
{
- lock_init(&threads[i].sleepLock);
- cond_init(&threads[i].sleepCond);
+ std::unique_lock<Mutex> lk(mutex);
+ searching = false;
+ cv.notify_one(); // Wake up anyone waiting for search finished
+ cv.wait(lk, [&]{ return searching; });
- for (int j = 0; j < MAX_ACTIVE_SPLIT_POINTS; j++)
- lock_init(&(threads[i].splitPoints[j].lock));
- }
+ if (exit)
+ return;
- // Initialize main thread's associated data
- threads[0].pawnTable.init();
- threads[0].materialTable.init();
+ lk.unlock();
- // Create and launch all the threads, threads will go immediately to sleep
- for (int i = 0; i <= MAX_THREADS; i++)
- {
- threads[i].is_searching = false;
- threads[i].do_sleep = true;
- threads[i].threadID = i;
-
-#if defined(_MSC_VER)
- threads[i].handle = CreateThread(NULL, 0, start_routine, (LPVOID)&threads[i], 0, NULL);
- bool ok = (threads[i].handle != NULL);
-#else
- bool ok = (pthread_create(&threads[i].handle, NULL, start_routine, (void*)&threads[i]) == 0);
-#endif
-
- if (!ok)
- {
- std::cerr << "Failed to create thread number " << i << std::endl;
- ::exit(EXIT_FAILURE);
- }
+ search();
}
}
+/// ThreadPool::set() creates/destroys threads to match the requested number.
+/// Created and launched threads will go immediately to sleep in idle_loop.
+/// Upon resizing, threads are recreated to allow for binding if necessary.
-// exit() is called to cleanly terminate the threads when the program finishes
+void ThreadPool::set(size_t requested) {
-void ThreadsManager::exit() {
+ if (size() > 0) { // destroy any existing thread(s)
+ main()->wait_for_search_finished();
- for (int i = 0; i <= MAX_THREADS; i++)
- {
- threads[i].do_terminate = true;
- threads[i].wake_up();
-
- // Wait for slave termination
-#if defined(_MSC_VER)
- WaitForSingleObject(threads[i].handle, 0);
- CloseHandle(threads[i].handle);
-#else
- pthread_join(threads[i].handle, NULL);
-#endif
-
- // Now we can safely destroy locks and wait conditions
- lock_destroy(&threads[i].sleepLock);
- cond_destroy(&threads[i].sleepCond);
-
- for (int j = 0; j < MAX_ACTIVE_SPLIT_POINTS; j++)
- lock_destroy(&(threads[i].splitPoints[j].lock));
+ while (size() > 0)
+ delete back(), pop_back();
}
- lock_destroy(&threadsLock);
- cond_destroy(&sleepCond);
-}
-
-
-// available_slave_exists() tries to find an idle thread which is available as
-// a slave for the thread with threadID "master".
-
-bool ThreadsManager::available_slave_exists(int master) const {
-
- assert(master >= 0 && master < activeThreads);
-
- for (int i = 0; i < activeThreads; i++)
- if (i != master && threads[i].is_available_to(master))
- return true;
-
- return false;
-}
-
-
-// split_point_finished() checks if all the slave threads of a given split
-// point have finished searching.
-
-bool ThreadsManager::split_point_finished(SplitPoint* sp) const {
-
- for (int i = 0; i < activeThreads; i++)
- if (sp->is_slave[i])
- return false;
-
- return true;
-}
-
-
-// split() does the actual work of distributing the work at a node between
-// several available threads. If it does not succeed in splitting the
-// node (because no idle threads are available, or because we have no unused
-// split point objects), the function immediately returns. If splitting is
-// possible, a SplitPoint object is initialized with all the data that must be
-// copied to the helper threads and we tell our helper threads that they have
-// been assigned work. This will cause them to instantly leave their idle loops and
-// call search().When all threads have returned from search() then split() returns.
-
-template <bool Fake>
-Value ThreadsManager::split(Position& pos, SearchStack* ss, Value alpha, Value beta,
- Value bestValue, Depth depth, Move threatMove,
- int moveCount, MovePicker* mp, int nodeType) {
- assert(pos.pos_is_ok());
- assert(bestValue >= -VALUE_INFINITE);
- assert(bestValue <= alpha);
- assert(alpha < beta);
- assert(beta <= VALUE_INFINITE);
- assert(depth > DEPTH_ZERO);
- assert(pos.thread() >= 0 && pos.thread() < activeThreads);
- assert(activeThreads > 1);
-
- int i, master = pos.thread();
- Thread& masterThread = threads[master];
-
- // If we already have too many active split points, don't split
- if (masterThread.activeSplitPoints >= MAX_ACTIVE_SPLIT_POINTS)
- return bestValue;
-
- // Pick the next available split point object from the split point stack
- SplitPoint* sp = masterThread.splitPoints + masterThread.activeSplitPoints;
-
- // Initialize the split point object
- sp->parent = masterThread.splitPoint;
- sp->master = master;
- sp->is_betaCutoff = false;
- sp->depth = depth;
- sp->threatMove = threatMove;
- sp->alpha = alpha;
- sp->beta = beta;
- sp->nodeType = nodeType;
- sp->bestValue = bestValue;
- sp->mp = mp;
- sp->moveCount = moveCount;
- sp->pos = &pos;
- sp->nodes = 0;
- sp->ss = ss;
- for (i = 0; i < activeThreads; i++)
- sp->is_slave[i] = false;
-
- // If we are here it means we are not available
- assert(masterThread.is_searching);
-
- int workersCnt = 1; // At least the master is included
-
- // Try to allocate available threads and ask them to start searching setting
- // the state to Thread::WORKISWAITING, this must be done under lock protection
- // to avoid concurrent allocation of the same slave by another master.
- lock_grab(&threadsLock);
-
- for (i = 0; !Fake && i < activeThreads && workersCnt < maxThreadsPerSplitPoint; i++)
- if (i != master && threads[i].is_available_to(master))
- {
- workersCnt++;
- sp->is_slave[i] = true;
- threads[i].splitPoint = sp;
-
- // This makes the slave to exit from idle_loop()
- threads[i].is_searching = true;
-
- if (useSleepingThreads)
- threads[i].wake_up();
- }
-
- lock_release(&threadsLock);
-
- // We failed to allocate even one slave, return
- if (!Fake && workersCnt == 1)
- return bestValue;
-
- masterThread.splitPoint = sp;
- masterThread.activeSplitPoints++;
-
- // Everything is set up. The master thread enters the idle loop, from which
- // it will instantly launch a search, because its is_searching flag is set.
- // We pass the split point as a parameter to the idle loop, which means that
- // the thread will return from the idle loop when all slaves have finished
- // their work at this split point.
- masterThread.idle_loop(sp);
-
- // In helpful master concept a master can help only a sub-tree, and
- // because here is all finished is not possible master is booked.
- assert(!masterThread.is_searching);
-
- // We have returned from the idle loop, which means that all threads are
- // finished. Note that changing state and decreasing activeSplitPoints is done
- // under lock protection to avoid a race with Thread::is_available_to().
- lock_grab(&threadsLock);
-
- masterThread.is_searching = true;
- masterThread.activeSplitPoints--;
-
- lock_release(&threadsLock);
-
- masterThread.splitPoint = sp->parent;
- pos.set_nodes_searched(pos.nodes_searched() + sp->nodes);
-
- return sp->bestValue;
-}
-
-// Explicit template instantiations
-template Value ThreadsManager::split<false>(Position&, SearchStack*, Value, Value, Value, Depth, Move, int, MovePicker*, int);
-template Value ThreadsManager::split<true>(Position&, SearchStack*, Value, Value, Value, Depth, Move, int, MovePicker*, int);
+ if (requested > 0) { // create new thread(s)
+ push_back(new MainThread(0));
-
-// Thread::timer_loop() is where the timer thread waits maxPly milliseconds
-// and then calls do_timer_event().
-
-void Thread::timer_loop() {
-
- while (!do_terminate)
- {
- lock_grab(&sleepLock);
- timed_wait(&sleepCond, &sleepLock, maxPly ? maxPly : INT_MAX);
- lock_release(&sleepLock);
- do_timer_event();
+ while (size() < requested)
+ push_back(new Thread(size()));
+ clear();
}
-}
-
-
-// ThreadsManager::set_timer() is used to set the timer to trigger after msec
-// milliseconds. If msec is 0 then timer is stopped.
-
-void ThreadsManager::set_timer(int msec) {
- Thread& timer = threads[MAX_THREADS];
-
- lock_grab(&timer.sleepLock);
- timer.maxPly = msec;
- cond_signal(&timer.sleepCond); // Wake up and restart the timer
- lock_release(&timer.sleepLock);
+ // Reallocate the hash with the new threadpool size
+ TT.resize(Options["Hash"]);
}
+/// ThreadPool::clear() sets threadPool data to initial values.
-// Thread::main_loop() is where the main thread is parked waiting to be started
-// when there is a new search. Main thread will launch all the slave threads.
-
-void Thread::main_loop() {
-
- while (true)
- {
- lock_grab(&sleepLock);
-
- do_sleep = true; // Always return to sleep after a search
-
- is_searching = false;
-
- while (do_sleep && !do_terminate)
- {
- cond_signal(&Threads.sleepCond); // Wake up UI thread if needed
- cond_wait(&sleepCond, &sleepLock);
- }
-
- is_searching = true;
+void ThreadPool::clear() {
- lock_release(&sleepLock);
+ for (Thread* th : *this)
+ th->clear();
- if (do_terminate)
- return;
-
- Search::think();
- }
+ main()->callsCnt = 0;
+ main()->previousScore = VALUE_INFINITE;
+ main()->previousTimeReduction = 1.0;
}
+/// ThreadPool::start_thinking() wakes up main thread waiting in idle_loop() and
+/// returns immediately. Main thread will wake up other threads and start the search.
-// ThreadsManager::start_thinking() is used by UI thread to wake up the main
-// thread parked in main_loop() and starting a new search. If asyncMode is true
-// then function returns immediately, otherwise caller is blocked waiting for
-// the search to finish.
-
-void ThreadsManager::start_thinking(const Position& pos, const Search::LimitsType& limits,
- const std::vector<Move>& searchMoves, bool asyncMode) {
- Thread& main = threads[0];
+void ThreadPool::start_thinking(Position& pos, StateListPtr& states,
+ const Search::LimitsType& limits, bool ponderMode) {
- lock_grab(&main.sleepLock);
+ main()->wait_for_search_finished();
- // Wait main thread has finished before to launch a new search
- while (!main.do_sleep)
- cond_wait(&sleepCond, &main.sleepLock);
-
- // Copy input arguments to Search global variables
- Search::RootPosition.copy(pos, 0);
+ stopOnPonderhit = stop = false;
+ ponder = ponderMode;
Search::Limits = limits;
- Search::RootMoves = searchMoves;
-
- // Reset signals before to start the search
- memset((void*)&Search::Signals, 0, sizeof(Search::Signals));
-
- main.do_sleep = false;
- cond_signal(&main.sleepCond); // Wake up main thread
-
- if (!asyncMode)
- cond_wait(&sleepCond, &main.sleepLock);
-
- lock_release(&main.sleepLock);
-}
+ Search::RootMoves rootMoves;
+ for (const auto& m : MoveList<LEGAL>(pos))
+ if ( limits.searchmoves.empty()
+ || std::count(limits.searchmoves.begin(), limits.searchmoves.end(), m))
+ rootMoves.emplace_back(m);
-// ThreadsManager::wait_for_stop_or_ponderhit() is called when the maximum depth
-// is reached while the program is pondering. The point is to work around a wrinkle
-// in the UCI protocol: When pondering, the engine is not allowed to give a
-// "bestmove" before the GUI sends it a "stop" or "ponderhit" command.
-// We simply wait here until one of these commands (that raise StopRequest) is
-// sent, and return, after which the bestmove and pondermove will be printed.
+ if (!rootMoves.empty())
+ Tablebases::rank_root_moves(pos, rootMoves);
-void ThreadsManager::wait_for_stop_or_ponderhit() {
+ // After ownership transfer 'states' becomes empty, so if we stop the search
+ // and call 'go' again without setting a new position states.get() == NULL.
+ assert(states.get() || setupStates.get());
- Search::Signals.stopOnPonderhit = true;
+ if (states.get())
+ setupStates = std::move(states); // Ownership transfer, states is now empty
- Thread& main = threads[0];
+ // We use Position::set() to set root position across threads. But there are
+ // some StateInfo fields (previous, pliesFromNull, capturedPiece) that cannot
+ // be deduced from a fen string, so set() clears them and to not lose the info
+ // we need to backup and later restore setupStates->back(). Note that setupStates
+ // is shared by threads but is accessed in read-only mode.
+ StateInfo tmp = setupStates->back();
- lock_grab(&main.sleepLock);
+ for (Thread* th : *this)
+ {
+ th->nodes = th->tbHits = th->nmpMinPly = 0;
+ th->rootDepth = th->completedDepth = DEPTH_ZERO;
+ th->rootMoves = rootMoves;
+ th->rootPos.set(pos.fen(), pos.is_chess960(), &setupStates->back(), th);
+ }
- while (!Search::Signals.stop)
- cond_wait(&main.sleepCond, &main.sleepLock);
+ setupStates->back() = tmp;
- lock_release(&main.sleepLock);
+ main()->start_searching();
}