/*
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-2014 Marco Costalba, Joona Kiiski, 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"
-ThreadsManager Threads; // Global object definition
+using namespace Search;
-namespace { extern "C" {
+ThreadPool Threads; // Global object
+
+extern void check_time();
+
+namespace {
// start_routine() is the C function which is called when a new thread
- // is launched. It simply calls idle_loop() of the supplied thread.
- // There are two versions of this function; one for POSIX threads and
- // one for Windows threads.
+ // is launched. It is a wrapper to the virtual function idle_loop().
-#if defined(_MSC_VER)
+ extern "C" { long start_routine(ThreadBase* th) { th->idle_loop(); return 0; } }
- DWORD WINAPI start_routine(LPVOID thread) {
- ((Thread*)thread)->idle_loop(NULL);
- return 0;
- }
+ // Helpers to launch a thread after creation and joining before delete. Must be
+ // outside Thread c'tor and d'tor because the object will be fully initialized
+ // when start_routine (and hence virtual idle_loop) is called and when joining.
-#else
+ template<typename T> T* new_thread() {
+ T* th = new T();
+ thread_create(th->handle, start_routine, th); // Will go to sleep
+ return th;
+ }
- void* start_routine(void* thread) {
+ void delete_thread(ThreadBase* th) {
+ th->exit = true; // Search must be already finished
+ th->notify_one();
+ thread_join(th->handle); // Wait for thread termination
+ delete th;
+ }
- ((Thread*)thread)->idle_loop(NULL);
- return NULL;
- }
+}
-#endif
-} }
+// notify_one() wakes up the thread when there is some work to do
+void ThreadBase::notify_one() {
+
+ mutex.lock();
+ sleepCondition.notify_one();
+ mutex.unlock();
+}
-// 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() {
+// wait_for() set the thread to sleep until 'condition' turns true
- lock_grab(&sleepLock);
- cond_signal(&sleepCond);
- lock_release(&sleepLock);
+void ThreadBase::wait_for(volatile const bool& condition) {
+
+ mutex.lock();
+ while (!condition) sleepCondition.wait(mutex);
+ mutex.unlock();
}
-// cutoff_occurred() checks whether a beta cutoff has occurred in the current
-// active split point, or in some ancestor of the split point.
+// Thread c'tor just inits data and does not launch any execution thread.
+// Such a thread will only be started when c'tor returns.
+
+Thread::Thread() /* : splitPoints() */ { // Value-initialization bug in MSVC
+
+ searching = false;
+ maxPly = splitPointsSize = 0;
+ activeSplitPoint = NULL;
+ activePosition = NULL;
+ idx = Threads.size(); // Starts from 0
+}
+
+
+// cutoff_occurred() checks whether a beta cutoff has occurred in the
+// current active split point, or in some ancestor of the split point.
bool Thread::cutoff_occurred() const {
- for (SplitPoint* sp = splitPoint; sp; sp = sp->parent)
- if (sp->is_betaCutoff)
+ for (SplitPoint* sp = activeSplitPoint; sp; sp = sp->parentSplitPoint)
+ if (sp->cutoff)
return true;
+
return false;
}
-// 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).
+// Thread::available_to() checks whether the thread is available to help the
+// thread 'master' at a split point. An obvious requirement is that thread must
+// be idle. With more than two threads, this is not sufficient: If the thread is
+// the master of some split point, it is only available as a slave to the slaves
+// 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 {
+bool Thread::available_to(const Thread* master) const {
- if (is_searching)
+ if (searching)
return false;
- // 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;
+ // Make a local copy to be sure it doesn't become zero under our feet while
+ // testing next condition and so leading to an out of bounds access.
+ const int size = splitPointsSize;
- // No active split points means that the thread is available as a slave for any
+ // No 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;
-
- return false;
+ return !size || splitPoints[size - 1].slavesMask.test(master->idx);
}
-// 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.
+// TimerThread::idle_loop() is where the timer thread waits msec milliseconds
+// and then calls check_time(). If msec is 0 thread sleeps until it's woken up.
-void ThreadsManager::read_uci_options() {
+void TimerThread::idle_loop() {
- 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>();
+ while (!exit)
+ {
+ mutex.lock();
- set_size(Options["Threads"].value<int>());
+ if (!exit)
+ sleepCondition.wait_for(mutex, run ? Resolution : INT_MAX);
+
+ mutex.unlock();
+
+ if (run)
+ check_time();
+ }
}
-// set_size() changes the number of active threads and raises do_sleep flag for
-// all the unused threads that will go immediately to sleep.
+// MainThread::idle_loop() is where the main thread is parked waiting to be started
+// when there is a new search. The main thread will launch all the slave threads.
-void ThreadsManager::set_size(int cnt) {
+void MainThread::idle_loop() {
- assert(cnt > 0 && cnt <= MAX_THREADS);
+ while (true)
+ {
+ mutex.lock();
- activeThreads = cnt;
+ thinking = false;
- for (int i = 0; i < MAX_THREADS; i++)
- if (i < activeThreads)
+ while (!thinking && !exit)
{
- // 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;
+ Threads.sleepCondition.notify_one(); // Wake up the UI thread if needed
+ sleepCondition.wait(mutex);
}
- else
- threads[i].do_sleep = true;
-}
+ mutex.unlock();
-// init() is called during startup. Initializes locks and condition variables
-// and launches all threads sending them immediately to sleep.
+ if (exit)
+ return;
-void ThreadsManager::init() {
+ searching = true;
- // Initialize threads lock, used when allocating slaves during splitting
- lock_init(&threadsLock);
+ Search::think();
- // Initialize sleep and split point locks
- for (int i = 0; i < MAX_THREADS; i++)
- {
- lock_init(&threads[i].sleepLock);
- cond_init(&threads[i].sleepCond);
+ assert(searching);
- for (int j = 0; j < MAX_ACTIVE_SPLIT_POINTS; j++)
- lock_init(&(threads[i].splitPoints[j].lock));
+ searching = false;
}
+}
- // Initialize main thread's associated data
- threads[0].is_searching = true;
- threads[0].threadID = 0;
- set_size(1); // This makes all the threads but the main to go to sleep
- // Create and launch all the threads but the main that is already running,
- // threads will go immediately to sleep.
- for (int i = 1; i < MAX_THREADS; i++)
- {
- threads[i].is_searching = false;
- threads[i].threadID = i;
+// init() is called at startup to create and launch requested threads, that will
+// go immediately to sleep. We cannot use a c'tor because Threads is a static
+// object and we need a fully initialized engine at this point due to allocation
+// of Endgames in Thread c'tor.
-#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
+void ThreadPool::init() {
- if (!ok)
- {
- std::cerr << "Failed to create thread number " << i << std::endl;
- ::exit(EXIT_FAILURE);
- }
- }
+ timer = new_thread<TimerThread>();
+ push_back(new_thread<MainThread>());
+ read_uci_options();
}
-// exit() is called to cleanly terminate the threads when the program finishes
+// exit() cleanly terminates the threads before the program exits. Cannot be done in
+// d'tor because we have to terminate the threads before to free ThreadPool object.
-void ThreadsManager::exit() {
+void ThreadPool::exit() {
- // Wake up all the slave threads at once. This is faster than "wake and wait"
- // for each thread and avoids a rare crash once every 10K games under Linux.
- for (int i = 1; i < MAX_THREADS; i++)
- {
- threads[i].do_terminate = true;
- threads[i].wake_up();
- }
+ delete_thread(timer); // As first because check_time() accesses threads data
- for (int i = 0; i < MAX_THREADS; i++)
- {
- if (i != 0)
- {
- // 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
- }
+ for (iterator it = begin(); it != end(); ++it)
+ delete_thread(*it);
+}
- // 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));
- }
+// read_uci_options() updates internal threads parameters from the corresponding
+// UCI options and creates/destroys threads to match the requested number. Thread
+// objects are dynamically allocated to avoid creating all possible threads
+// in advance (which include pawns and material tables), even if only a few
+// are to be used.
- lock_destroy(&threadsLock);
-}
+void ThreadPool::read_uci_options() {
+ minimumSplitDepth = Options["Min Split Depth"] * ONE_PLY;
+ size_t requested = Options["Threads"];
-// available_slave_exists() tries to find an idle thread which is available as
-// a slave for the thread with threadID "master".
+ assert(requested > 0);
-bool ThreadsManager::available_slave_exists(int master) const {
+ // If zero (default) then set best minimum split depth automatically
+ if (!minimumSplitDepth)
+ minimumSplitDepth = requested < 8 ? 4 * ONE_PLY : 7 * ONE_PLY;
- assert(master >= 0 && master < activeThreads);
+ while (size() < requested)
+ push_back(new_thread<Thread>());
- for (int i = 0; i < activeThreads; i++)
- if (i != master && threads[i].is_available_to(master))
- return true;
+ while (size() > requested)
+ {
+ delete_thread(back());
+ pop_back();
+ }
+}
- return false;
+
+// available_slave() tries to find an idle thread which is available as a slave
+// for the thread 'master'.
+
+Thread* ThreadPool::available_slave(const Thread* master) const {
+
+ for (const_iterator it = begin(); it != end(); ++it)
+ if ((*it)->available_to(master))
+ return *it;
+
+ return NULL;
}
// 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) {
+// several available threads. If it does not succeed in splitting the node
+// (because no idle threads are available), 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 then helper threads are
+// told 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.
+
+void Thread::split(Position& pos, Stack* ss, Value alpha, Value beta, Value* bestValue,
+ Move* bestMove, Depth depth, int moveCount,
+ MovePicker* movePicker, int nodeType, bool cutNode) {
+
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
+ assert(-VALUE_INFINITE < *bestValue && *bestValue <= alpha && alpha < beta && beta <= VALUE_INFINITE);
+ assert(depth >= Threads.minimumSplitDepth);
+ assert(searching);
+ assert(splitPointsSize < MAX_SPLITPOINTS_PER_THREAD);
+
+ // Pick the next available split point from the split point stack
+ SplitPoint& sp = splitPoints[splitPointsSize];
+
+ sp.masterThread = this;
+ sp.parentSplitPoint = activeSplitPoint;
+ sp.slavesMask = 0, sp.slavesMask.set(idx);
+ sp.depth = depth;
+ sp.bestValue = *bestValue;
+ sp.bestMove = *bestMove;
+ sp.alpha = alpha;
+ sp.beta = beta;
+ sp.nodeType = nodeType;
+ sp.cutNode = cutNode;
+ sp.movePicker = movePicker;
+ sp.moveCount = moveCount;
+ sp.pos = &pos;
+ sp.nodes = 0;
+ sp.cutoff = false;
+ sp.ss = ss;
// 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);
+ // 'searching' flag. This must be done under lock protection to avoid concurrent
+ // allocation of the same slave by another master.
+ Threads.mutex.lock();
+ sp.mutex.lock();
- 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;
+ sp.allSlavesSearching = true; // Must be set under lock protection
+ ++splitPointsSize;
+ activeSplitPoint = &sp;
+ activePosition = NULL;
- // This makes the slave to exit from idle_loop()
- threads[i].is_searching = true;
+ for (Thread* slave; (slave = Threads.available_slave(this)) != NULL; )
+ {
+ sp.slavesMask.set(slave->idx);
+ slave->activeSplitPoint = &sp;
+ slave->searching = true; // Slave leaves idle_loop()
+ slave->notify_one(); // Could be sleeping
+ }
- if (useSleepingThreads)
- threads[i].wake_up();
- }
+ // Everything is set up. The master thread enters the idle loop, from which
+ // it will instantly launch a search, because its 'searching' flag is set.
+ // The thread will return from the idle loop when all slaves have finished
+ // their work at this split point.
+ sp.mutex.unlock();
+ Threads.mutex.unlock();
- lock_release(&threadsLock);
+ Thread::idle_loop(); // Force a call to base class idle_loop()
- // We failed to allocate even one slave, return
- if (!Fake && workersCnt == 1)
- return bestValue;
+ // In the helpful master concept, a master can help only a sub-tree of its
+ // split point and because everything is finished here, it's not possible
+ // for the master to be booked.
+ assert(!searching);
+ assert(!activePosition);
- masterThread.splitPoint = sp;
- masterThread.activeSplitPoints++;
+ // We have returned from the idle loop, which means that all threads are
+ // finished. Note that setting 'searching' and decreasing splitPointsSize is
+ // done under lock protection to avoid a race with Thread::available_to().
+ Threads.mutex.lock();
+ sp.mutex.lock();
+
+ searching = true;
+ --splitPointsSize;
+ activeSplitPoint = sp.parentSplitPoint;
+ activePosition = &pos;
+ pos.set_nodes_searched(pos.nodes_searched() + sp.nodes);
+ *bestMove = sp.bestMove;
+ *bestValue = sp.bestValue;
+
+ sp.mutex.unlock();
+ Threads.mutex.unlock();
+}
- // 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);
+// wait_for_think_finished() waits for main thread to go to sleep then returns
- // 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);
+void ThreadPool::wait_for_think_finished() {
- // 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);
+ MainThread* th = main();
+ th->mutex.lock();
+ while (th->thinking) sleepCondition.wait(th->mutex);
+ th->mutex.unlock();
+}
- masterThread.is_searching = true;
- masterThread.activeSplitPoints--;
- lock_release(&threadsLock);
+// start_thinking() wakes up the main thread sleeping in MainThread::idle_loop()
+// so to start a new search, then returns immediately.
- masterThread.splitPoint = sp->parent;
- pos.set_nodes_searched(pos.nodes_searched() + sp->nodes);
+void ThreadPool::start_thinking(const Position& pos, const LimitsType& limits, StateStackPtr& states) {
- return sp->bestValue;
-}
+ wait_for_think_finished();
+
+ SearchTime = Time::now(); // As early as possible
+
+ Signals.stopOnPonderhit = Signals.firstRootMove = false;
+ Signals.stop = Signals.failedLowAtRoot = false;
+
+ RootMoves.clear();
+ RootPos = pos;
+ Limits = limits;
+ if (states.get()) // If we don't set a new position, preserve current state
+ {
+ SetupStates = states; // Ownership transfer here
+ assert(!states.get());
+ }
-// 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);
+ for (MoveList<LEGAL> it(pos); *it; ++it)
+ if ( limits.searchmoves.empty()
+ || std::count(limits.searchmoves.begin(), limits.searchmoves.end(), *it))
+ RootMoves.push_back(RootMove(*it));
+
+ main()->thinking = true;
+ main()->notify_one(); // Starts main thread
+}