WebSVN – Games.Chess Giants – Diff – /engine-crafty/main.c

 #  include <unistd.h>
 #  include <pwd.h>
 #  include <sys/types.h>
 #endif
 #include <signal.h>
+#if defined(SYZYGY)
+#  include "tbprobe.h"
+#endif
-/* last modified 02/24/14 */
+/* last modified 08/03/16 */
 /*
  *******************************************************************************
  *                                                                             *
- *  Crafty, copyright 1996-2015 by Robert M. Hyatt, Ph.D., Associate Professor *
+ *  Crafty, copyright 1996-2016 by Robert M. Hyatt, Ph.D.                      *
- *  of Computer and Information Sciences, University of Alabama at Birmingham. *
  *                                                                             *
  *  Crafty is a team project consisting of the following members.  These are   *
  *  the people involved in the continuing development of this program, there   *
  *  are no particular members responsible for any specific aspect of Crafty,   *
  *  although R. Hyatt wrote 99%+ of the existing code, excepting the Magic .   *
- *  move stuff by Pradu Kaanan, egtb.cpp written by Eugene Nalimov, and the    *
+ *  move stuff by Pradu Kaanan, syzygy code written by Ronald de Man, and the  *
  *  epd stuff written by S. Edwards.                                           *
  *                                                                             *
- *     Robert Hyatt, University of Alabama at Birmingham.                      *
+ *     Robert Hyatt, Pelham, AL.                                               *
  *     Mike Byrne, Pen Argyl, PA.                                              *
  *     Tracy Riegle, Hershey, PA.                                              *
  *     Peter Skinner, Edmonton, AB  Canada.                                    *
  *                                                                             *
  *  All rights reserved.  No part of this program may be reproduced in any     *
  *           used to watch the log file while a game is in progress.  This is  *
  *           a bit trickier than you might think since Crafty displays the     *
  *           game move numbers in the PV.  Penalty for pawns on same color as  *
  *           bishop now only applies when there is one bishop.                 *
  *                                                                             *
- *    25.0.1 Cleanup of NextMove() plus a minor ordering bug fix that would    *
+ *    25.1   Cleanup of NextMove() plus a minor ordering bug fix that would    *
  *           skip counter moves at ply = 2. Added NUMA code to force the hash  *
  *           tables to be spread across the numa nodes as equally as possible  *
  *           rather than all of the data sitting on just onenode.  This makes  *
  *           one specific user policy important.  BEFORE you set the hash size *
  *           for any of the four hash tables, you should ALWAYS set the max    *
  *           routines.  A new "smpnuma" command is now used to enable/disable  *
  *           NUMA mode (which really only affects how the hash tables are      *
  *           cleared, all the other NUMA code works just fine no matter        *
  *           whether this is enabled or disabled.  Fixed a bug with the xboard *
  *           memory command that could overflow and cause preposterous malloc  *
+ *           requests.  Change to LMP that now enables it in the last 16 plies *
+ *           of search depth, although only the last 8-10 plies really have    *
+ *           a chance for this to kick in unless there are more than 100 legal *
+ *           moves to try.  Minor change to hash path in HashStore() that made *
+ *           it hard to store entries on the first search after the table was  *
+ *           cleared.  Removed Nalimov DTM EGTB code and converted to SYZYGY   *
+ *           WDL/DTC tables instead (courtesy of Ronald de Man).  This         *
+ *           correctly handles the 50 move rule  where the Nalimov tables      *
+ *           would walk into forced draws (by 50 move rule) while convincing   *
+ *           the search it was winning.  Swindle mode now also activates when  *
+ *           in a drawn ending with a material plus for the side on move, as   *
+ *           well as when the best root move is a "cursed win" (forced win,    *
+ *           but drawn because of the 50 move rule).  This gives the non-EGTB  *
+ *           opponent the opportunity to turn that 50 move draw into a loss.   *
+ *           There are some changes in the scoring output as a result of this. *
+ *           The usual +/-MatNN scores show up for real mates, but when in     *
+ *           EGTB endings, the scores are of the form Win or Lose with the     *
+ *           appropriate sign correction (-Win means black is winning, +Lose   *
+ *           means white is losing.)  Basil Falcinelli contributed to the new  *
+ *           syzygy code used in this version.  Minor change to skill code to  *
+ *           avoid altering search parameters since the speed reduction and    *
+ *           randomness in the eval is more than enough to reduce the Elo.     *
+ *           Minor change to HashProbe() where I now only update the AGE of an *
+ *           entry that matches the current hash signature if the entry        *
+ *           actually causes a search termination, rather than updating it     *
+ *           each time there is a signature match.  If the search is not       *
+ *           terminated on the spot, we have to store an entry when the search *
+ *           ends which will also overwrite the current exact match and update *
+ *           the age as well.  Suggested by J. Wesley Cleveland on CCC.        *
- *           requests.                                                         *
+ *                                                                             *
+ *    25.2   Minor bug in the fail-high / fail-low code.  Crafty is supposed   *
+ *           to deal with the case where the first move produces a score, then *
+ *           a later move fails high but then produces a worse score.  We are  *
+ *           supposed to revert to the better move.  An "optimization" made    *
+ *           this fail, but it has been fixed here.  "new" command removed as  *
+ *           it is pretty difficult to restore everything once a game has been *
+ *           started.  To start a new game, quit crafty and restart.  Crafty   *
+ *           now notifies xboard/winboard to do this automatically so using    *
+ *           those interfaces requires no changes to anything.                 *
  *                                                                             *
  *******************************************************************************
  */
 int main(int argc, char **argv) {
   TREE *tree;
 #if defined(UNIX)
   char path[1024];
   struct passwd *pwd;
 #else
   char crafty_rc_file_spec[FILENAME_MAX];
+  SYSTEM_INFO sysinfo;
+#endif
+#if defined(UNIX)
+  hardware_processors = sysconf(_SC_NPROCESSORS_ONLN);
+#else
+  GetSystemInfo(&sysinfo);
+  hardware_processors = sysinfo.dwNumberOfProcessors;
 #endif
 /* Collect environmental variables */
   char *directory_spec = getenv("CRAFTY_BOOK_PATH");
   if (directory_spec)
   if (!input_stream)
     if ((pwd = getpwuid(getuid()))) {
       sprintf(path, "%s/.craftyrc", pwd->pw_dir);
       input_stream = fopen(path, "r");
+    }
-  if (input_stream)
+  if (input_stream) {
 #else
   sprintf(crafty_rc_file_spec, "%s/crafty.rc", rc_path);
-  if ((input_stream = fopen(crafty_rc_file_spec, "r")))
+  if ((input_stream = fopen(crafty_rc_file_spec, "r"))) {
 #endif
     while (1) {
       readstat = Read(1, buffer);
       if (readstat < 0)
         break;
       if (result == 0)
         Print(2048, "ERROR \"%s\" is unknown rc-file option\n", buffer);
       if (input_stream == stdin)
         break;
+    }
+  }
   input_stream = stdin;
 #if defined(UNIX)
   if (xboard)
     signal(SIGINT, SIG_IGN);
 #endif
+  if (smp_max_threads)
-  Print(32, "\nCrafty v%s (%d cpus)\n\n", version, Max(smp_max_threads, 1));
+    Print(32, "\nCrafty v%s (%d threads)\n\n", version, smp_max_threads);
-  NewGame(1);
+  else
+    Print(32, "\nCrafty v%s\n\n", version);
+  if (hardware_processors > 0)
+    Print(32, "machine has %d processors\n\n", hardware_processors);
 /*
  ************************************************************
  *                                                          *
  *  Check to see if we can find a "crafty.cpf" personality  *
  *  file which contains the default personality settings to *
  ************************************************************
  */
   while (1) {
     presult = 0;
     do {
-      if (new_game)
-        NewGame(0);
       opponent_start_time = ReadClock();
       input_status = 0;
       display = tree->position;
       move = 0;
       presult = 0;
           value = DrawScore(game_wtm);
           if (xboard)
             Print(-1, "1/2-1/2 {Drawn by 3-fold repetition}\n");
+        }
         if (draw_type == 2) {
+          if (!Mated(tree, 0, game_wtm)) {
-          Print(1, "I claim a draw by the 50 move rule.\n");
+            Print(1, "I claim a draw by the 50 move rule.\n");
-          value = DrawScore(game_wtm);
+            value = DrawScore(game_wtm);
-          if (xboard)
+            if (xboard)
-            Print(-1, "1/2-1/2 {Drawn by 50-move rule}\n");
+              Print(-1, "1/2-1/2 {Drawn by 50-move rule}\n");
+          }
+        }
         if (Drawn(tree, last_search_value) == 2) {
           Print(1, "I claim a draw due to insufficient material.\n");
           if (xboard)
             Print(-1, "1/2-1/2 {Insufficient material}\n");
+        }
-      } else {
+      } else
-        tree->status[1] = tree->status[0];
         presult = 0;
-      }
 #if defined(DEBUG)
       ValidatePosition(tree, 0, move, "Main(1)");
 #endif
     } while (force);
 /*
     if (presult != 1) {
       strcpy(kibitz_text, "n/a");
       last_pv.pathd = 0;
       last_pv.pathl = 0;
       display = tree->position;
+      tree->status[1] = tree->status[0];
       value = Iterate(game_wtm, think, 0);
+    }
 /*
  ************************************************************
  *                                                          *
     last_value = value;
     if (MateScore(last_value))
       last_mate_score = last_value;
     thinking = 0;
     if (!last_pv.pathl) {
-      if (value == -MATE + 1) {
+      if (Check(game_wtm)) {
         over = 1;
         if (game_wtm) {
           Print(-1, "0-1 {Black mates}\n");
           strcpy(pgn_result, "0-1");
         } else {
               last_pv.path[1]));
       last_search_value = value;
       if (kibitz) {
         if (kibitz_depth)
           Kibitz(2, game_wtm, kibitz_depth, end_time - start_time, value,
-              tree->nodes_searched, busy_percent, (int) tree->egtb_hits, // Pierre-Marie Baty -- added type cast
+              tree->nodes_searched, busy_percent, tree->egtb_hits,
               kibitz_text);
         else
           Kibitz(4, game_wtm, 0, 0, 0, 0, 0, 0, kibitz_text);
+      }
       MakeMoveRoot(tree, game_wtm, last_pv.path[1]);

Subversion Repositories Games.Chess Giants

Games.Chess Giants/engine-crafty/main.c – Rev 108 → 154