Give reason with Illegal move message in case of repeat
[hachu.git] / hachu.c
diff --git a/hachu.c b/hachu.c
index 68c0a6c..ad1bd20 100644 (file)
--- a/hachu.c
+++ b/hachu.c
@@ -91,11 +91,11 @@ typedef struct {
   char fireMask;\r
 } UndoInfo;\r
 \r
-char *array;\r
+char *array, *reason;\r
 int bWidth, bHeight, bsize, zone, currentVariant;\r
 int stm, xstm, hashKeyH, hashKeyL, framePtr, msp, nonCapts, rootEval, retMSP, retFirst, retDep, pvPtr, level, cnt50, chuFlag=1, tenFlag, mobilityScore;\r
-int nodes, startTime, tlim1, tlim2;\r
-Move retMove, moveStack[10000], path[100], repStack[300], pv[1000];\r
+int nodes, startTime, tlim1, tlim2, repCnt;\r
+Move retMove, moveStack[10000], path[100], repStack[300], pv[1000], repeatMove[300];\r
 \r
 #define X 36 /* slider              */\r
 #define R 37 /* jump capture        */\r
@@ -1356,7 +1356,7 @@ void
 GenCapts(int sqr, int victimValue)\r
 { // generate all moves that capture the piece on the given square\r
   int i, range, att = attacks[2*sqr + stm];\r
-//printf("GenCapts(%d,%d)\n",sqr,victimValue);\r
+//printf("GenCapts(%c%d,%d) %08x\n",sqr%BW+'a',sqr/BW,victimValue,att);\r
   if(!att) return; // no attackers at all!\r
   for(i=0; i<8; i++) {               // try all rays\r
     int x, v, jumper, jcapt=0;\r
@@ -1460,7 +1460,7 @@ GenCapts(int sqr, int victimValue)
     for(i=0; i<8; i++) {    // scan all knight jumps to locate source\r
       int x = sqr - nStep[i], attacker = board[x];\r
       if(attacker == EMPTY || (attacker & TYPE) != stm) continue;\r
-      if(p[attacker].range[i] <= N && p[attacker].range[i] >= S) { // has Knight jump in our direction\r
+      if(p[attacker].range[i] <= N && p[attacker].range[i] >= S && p[attacker].range[i] != J) { // has Knight jump in our direction\r
        NewCapture(x, sqr + victimValue, p[attacker].promoFlag);   // plain jump (as in N)\r
        if(p[attacker].range[i] < N) { // Lion power; generate double captures over two possible intermediates\r
          int v = kStep[i]; // leftish path\r
@@ -1630,7 +1630,8 @@ if(flag & depth >= 0) printf("%2d:%d found %d/%d %08x %s\n", depth, iterDep, cur
 if(flag & depth >= 0) printf("%2d:%d made %d/%d %s\n", depth, iterDep, curMove, msp, MoveToText(moveStack[curMove], 0));\r
       for(i=2; i<=cnt50; i+=2) if(repStack[level-i+200] == hashKeyH) {\r
        moveStack[curMove] = 0; // erase forbidden move\r
-       score = -INF; goto repetition;\r
+       if(!level) repeatMove[repCnt++] = move & 0xFFFFFF; // remember outlawed move\r
+       score = -INF; moveStack[curMove] = 0; goto repetition;\r
       }\r
       repStack[level+200] = hashKeyH;\r
 \r
@@ -1912,7 +1913,7 @@ ParseMove (char *moveText)
   if(*moveText == '+') ret |= PROMOTE;\r
 printf("# suppress = %c%d\n", sup1%BW+'a', sup1/BW);\r
 MapFromScratch(attacks);\r
-  postThinking--;\r
+  postThinking--; repCnt = 0;\r
   Search(-INF-1, INF+1, 0, 1, sup1 & ~PROMOTE, sup2);\r
   postThinking++;\r
   for(i=retFirst; i<retMSP; i++) {\r
@@ -1932,8 +1933,16 @@ printf("# deferral of %d\n", deferred);
        if(!(flags & promoBoard[f])) moveStack[i] |= DEFER; // came from outside zone, so essential deferral\r
       }\r
     }\r
-    if(i >= retMSP)\r
-      for(i=retFirst; i<retMSP; i++) printf("# %d. %08x %08x %s\n", i-20, moveStack[i], ret, MoveToText(moveStack[i], 0));\r
+    if(i >= retMSP) {\r
+      for(i=retFirst; i<retMSP; i++) printf("# %d. %08x %08x %s\n", i-50, moveStack[i], ret, MoveToText(moveStack[i], 0));\r
+      reason = NULL;\r
+      for(i=0; i<repCnt; i++) {if((repeatMove[i] & 0xFFFFFF) == ret) {\r
+        reason = "Repeats earlier position";\r
+        break;\r
+      }\r
+ printf("# %d. %08x %08x %s\n", i, repeatMove[i], ret, MoveToText(repeatMove[i], 0));\r
+}\r
+    }\r
   }\r
   return (i >= retMSP ? INVALID : moveStack[i]);\r
 }\r
@@ -1949,7 +1958,7 @@ MapFromScratch(attacks);
 //pmap(attacks, WHITE);\r
 //pmap(attacks, BLACK);\r
 //flag=1;\r
-  postThinking--;\r
+  postThinking--; repCnt = 0;\r
   Search(-INF-1, INF+1, 0, 1, sup1 & ~PROMOTE, sup2);\r
   postThinking++;\r
 flag=0;\r
@@ -2007,6 +2016,7 @@ SearchBestMove (int stm, int timeLeft, int mps, int timeControl, int inc, int ti
   tlim2 = 1.9*targetTime;\r
   nodes = 0;\r
 MapFromScratch(attacks);\r
+  retMove = INVALID; repCnt = 0;\r
   score = Search(-INF-1, INF+1, rootEval, 20, sup1, sup2);\r
   *move = retMove;\r
   *ponderMove = INVALID;\r
@@ -2030,9 +2040,11 @@ printf("# setup done");fflush(stdout);
 \r
     void PrintResult(int stm, int score)\r
     {\r
-      if(score == 0) printf("1/2-1/2\n");\r
-      if(score > 0 && stm == WHITE || score < 0 && stm == BLACK) printf("1-0\n");\r
-      else printf("0-1\n");\r
+      char tail[100];\r
+      if(reason) sprintf(tail, " {%s}", reason); else *tail = 0;\r
+      if(score == 0) printf("1/2-1/2%s\n", tail);\r
+      if(score > 0 && stm == WHITE || score < 0 && stm == BLACK) printf("1-0%s\n", tail);\r
+      else printf("0-1%s\n", tail);\r
     }\r
 \r
     main()\r
@@ -2056,6 +2068,20 @@ printf("# setup done");fflush(stdout);
           score = SearchBestMove(stm, timeLeft, mps, timeControl, inc, timePerMove, &move, &ponderMove);\r
 \r
           if(move == INVALID) {         // game apparently ended\r
+            int kcapt = 0, xstm = stm ^ WHITE, king, k = p[king=royal[xstm]].pos;\r
+            if( k != ABSENT) { // test if King capture possible\r
+              if(attacks[2*k + stm]) {\r
+                if( p[king + 2].pos == ABSENT ) kcapt = 1; // we have an attack on his only King\r
+              }\r
+            } else { // he has no king! Test for attacks on Crown Prince\r
+              k = p[king + 2].pos;\r
+              if(attacks[2*k + stm]) kcapt = 1; // we have attack on Crown Prince\r
+            }\r
+            if(kcapt) { // print King capture before claiming\r
+              GenCapts(k, 0);\r
+              printf("move %s\n", MoveToText(moveStack[msp-1], 1));\r
+              reason = "king capture";\r
+            } else reason = "resign";\r
             engineSide = NONE;          // so stop playing\r
             PrintResult(stm, score);\r
           } else {\r
@@ -2167,8 +2193,9 @@ printf("var %d\n",i);
         if(!strcmp(command, ""))  {  continue; }\r
         if(!strcmp(command, "usermove")){\r
           int move = ParseMove(inBuf+9);\r
-          if(move == INVALID) printf("Illegal move\n");\r
-          else {\r
+          if(move == INVALID) {\r
+            if(reason) printf("Illegal move {%s}\n", reason); else printf("%s\n", reason="Illegal move");\r
+          } else {\r
             stm = MakeMove2(stm, move);\r
             ponderMove = INVALID;\r
             gameMove[moveNr++] = move;  // remember game\r