X-Git-Url: http://winboard.nl/cgi-bin?p=polyglot.git;a=blobdiff_plain;f=board.c;h=4f1139f296174dbb5826b8de6eaf9139007ba461;hp=b17d354f5e5279d0a7bb826b085fad11c1496305;hb=HEAD;hpb=e15efca6667b2673b4c1a5879a6917eab6800e58

diff --git a/board.c b/board.c
index b17d354..4f1139f 100644
--- a/board.c
+++ b/board.c
@@ -1,492 +1,492 @@
-
-// board.c
-
-// includes
-
-#include <stdio.h>
-
-#include "attack.h"
-#include "board.h"
-#include "colour.h"
-#include "fen.h"
-#include "hash.h"
-#include "list.h"
-#include "move.h"
-#include "move_do.h"
-#include "move_gen.h"
-#include "move_legal.h"
-#include "piece.h"
-#include "util.h"
-
-// constants
-
-static const bool UseSlowDebug = FALSE;
-
-// functions
-
-// board_is_ok()
-
-bool board_is_ok(const board_t * board) {
-
-   int sq, piece;
-   int colour, pos;
-   int king, rook;
-
-   if (board == NULL) return FALSE;
-
-   // optional heavy DEBUG mode
-
-   if (!UseSlowDebug) return TRUE;
-
-   // squares
-
-   for (sq = 0; sq < SquareNb; sq++) {
-      piece = board->square[sq];
-      if (square_is_ok(sq)) {
-         pos = board->pos[sq];
-         if (piece == Empty) {
-            if (pos != -1) return FALSE;
-         } else {
-            if (pos < 0) return FALSE;
-            if (board->list[piece_colour(piece)][pos] != sq) return FALSE;
-         }
-      } else {
-         if (piece != Knight64) return FALSE;
-      }
-   }
-
-   // white piece list
-
-   colour = White;
-   pos = 0;
-
-   if (board->list_size[colour] <= 0 || board->list_size[colour] > 16) return FALSE;
-
-   sq = board->list[colour][pos];
-   if (sq == SquareNone) return FALSE;
-   if (board->pos[sq] != pos) return FALSE;
-   piece = board->square[sq];
-   if (!colour_equal(piece,colour) || !piece_is_king(piece)) return FALSE;
-
-   for (pos++; pos < board->list_size[colour]; pos++) {
-      sq = board->list[colour][pos];
-      if (sq == SquareNone) return FALSE;
-      if (board->pos[sq] != pos) return FALSE;
-      if (!colour_equal(board->square[sq],colour)) return FALSE;
-   }
-
-   sq = board->list[colour][pos];
-   if (sq != SquareNone) return FALSE;
-
-   // black piece list
-
-   colour = Black;
-   pos = 0;
-
-   if (board->list_size[colour] <= 0 || board->list_size[colour] > 16) return FALSE;
-
-   sq = board->list[colour][pos];
-   if (sq == SquareNone) return FALSE;
-   if (board->pos[sq] != pos) return FALSE;
-   piece = board->square[sq];
-   if (!colour_equal(piece,colour) || !piece_is_king(piece)) return FALSE;
-
-   for (pos++; pos < board->list_size[colour]; pos++) {
-      sq = board->list[colour][pos];
-      if (sq == SquareNone) return FALSE;
-      if (board->pos[sq] != pos) return FALSE;
-      if (!colour_equal(board->square[sq],colour)) return FALSE;
-   }
-
-   sq = board->list[colour][pos];
-   if (sq != SquareNone) return FALSE;
-
-   // TODO: material
-
-   if (board->number[WhiteKing12] != 1) return FALSE;
-   if (board->number[BlackKing12] != 1) return FALSE;
-
-   if (!colour_is_ok(board->turn)) return FALSE;
-
-   // castling status
-
-   if (board->castle[White][SideH] != SquareNone) {
-
-      king = board->list[White][0];
-      if ((king < A1) || (king > H1)) return FALSE;
-      if (board->square[king] != WhiteKing256) return FALSE;
-
-      rook = board->castle[White][SideH];
-      if ((rook < A1) || (rook > H1)) return FALSE;
-      if (board->square[rook] != WhiteRook256) return FALSE;
-
-      if (rook <= king) return FALSE;
-   }
-
-   if (board->castle[White][SideA] != SquareNone) {
-
-      king = board->list[White][0];
-      if ((king < A1) || (king > H1)) return FALSE;
-      if (board->square[king] != WhiteKing256) return FALSE;
-
-      rook = board->castle[White][SideA];
-      if ((rook < A1) || (rook > H1)) return FALSE;
-      if (board->square[rook] != WhiteRook256) return FALSE;
-
-      if (rook >= king) return FALSE;
-   }
-
-   if (board->castle[Black][SideH] != SquareNone) {
-
-      king = board->list[Black][0];
-      if ((king < A8) || (king > H8)) return FALSE;
-      if (board->square[king] != BlackKing256) return FALSE;
-
-      rook = board->castle[Black][SideH];
-      if ((rook < A8) || (rook > H8)) return FALSE;
-      if (board->square[rook] != BlackRook256) return FALSE;
-
-      if (rook <= king) return FALSE;
-   }
-
-   if (board->castle[Black][SideA] != SquareNone) {
-
-      king = board->list[Black][0];
-      if (king < A8 || king > H8) return FALSE;
-      if (board->square[king] != BlackKing256) return FALSE;
-
-      rook = board->castle[Black][SideA];
-      if (rook < A8 || rook > H8) return FALSE;
-      if (board->square[rook] != BlackRook256) return FALSE;
-
-      if (rook >= king) return FALSE;
-   }
-
-   return TRUE;
-}
-
-// board_clear()
-
-void board_clear(board_t * board) {
-
-   int file, rank, sq;
-   int colour, pos;
-   int piece;
-
-   ASSERT(board!=NULL);
-
-   // edge squares
-
-   for (sq = 0; sq < SquareNb; sq++) {
-      board->square[sq] = Knight64; // HACK: uncoloured knight
-      board->pos[sq] = -1;
-   }
-
-   // empty squares
-
-   for (rank = 0; rank < 8; rank++) {
-      for (file = 0; file < 8; file++) {
-         sq = square_make(file,rank);
-         board->square[sq] = Empty;
-      }
-   }
-
-   // piece lists
-
-   for (colour = 0; colour < 3; colour++) {
-      for (pos = 0; pos < 32; pos++) { // HACK
-         board->list[colour][pos] = SquareNone;
-      }
-      board->list_size[colour] = 0;
-   }
-
-   // material
-
-   for (piece = 0; piece < 12; piece++) {
-      board->number[piece] = 0;
-   }
-
-   // rest
-
-   board->turn = ColourNone;
-   board->castle[White][SideH] = SquareNone;
-   board->castle[White][SideA] = SquareNone;
-   board->castle[Black][SideH] = SquareNone;
-   board->castle[Black][SideA] = SquareNone;
-   board->ep_square = SquareNone;
-
-   board->ply_nb = 0;
-   board->move_nb = 0;
-
-   board->key = 0;
-}
-
-// board_start()
-
-void board_start(board_t * board) {
-
-   ASSERT(board!=NULL);
-
-   if (!board_from_fen(board,StartFen)) ASSERT(FALSE);
-}
-
-// board_copy()
-
-void board_copy(board_t * dst, const board_t * src) {
-
-   ASSERT(dst!=NULL);
-   ASSERT(board_is_ok(src));
-
-   *dst = *src;
-}
-
-// board_equal()
-
-bool board_equal(const board_t * board_1, const board_t * board_2) {
-
-   int sq_64, sq;
-
-   ASSERT(board_is_ok(board_1));
-   ASSERT(board_is_ok(board_2));
-
-   // fast comparison
-
-   if (board_1->key != board_2->key) return FALSE;
-
-   // slow comparison
-
-   for (sq_64 = 0; sq_64 < 64; sq_64++) {
-      sq = square_from_64(sq_64);
-      if (board_1->square[sq] != board_2->square[sq]) return FALSE;
-   }
-
-   if (board_1->turn != board_2->turn) return FALSE;
-   if (board_1->castle[White][SideH] != board_2->castle[White][SideH]) return FALSE;
-   if (board_1->castle[White][SideA] != board_2->castle[White][SideA]) return FALSE;
-   if (board_1->castle[Black][SideH] != board_2->castle[Black][SideH]) return FALSE;
-   if (board_1->castle[Black][SideA] != board_2->castle[Black][SideA]) return FALSE;
-   if (board_1->ep_square != board_2->ep_square) return FALSE;
-
-   return TRUE;
-}
-
-// board_init_list()
-
-void board_init_list(board_t * board) {
-
-   int sq_64, sq, piece;
-   int colour, pos;
-
-   ASSERT(board!=NULL);
-
-   // init
-
-   for (sq_64 = 0; sq_64 < 64; sq_64++) {
-      sq = square_from_64(sq_64);
-      board->pos[sq] = -1;
-   }
-
-   for (piece = 0; piece < 12; piece++) board->number[piece] = 0;
-
-   // white piece list
-
-   colour = White;
-   pos = 0;
-
-   for (sq_64 = 0; sq_64 < 64; sq_64++) {
-      sq = square_from_64(sq_64);
-      piece = board->square[sq];
-      ASSERT(pos>=0&&pos<=16);
-      if (colour_equal(piece,colour) && piece_is_king(piece)) {
-         board->pos[sq] = pos;
-         board->list[colour][pos] = sq;
-         pos++;
-         board->number[piece_to_12(piece)]++;
-      }
-   }
-   ASSERT(pos==1);
-
-   for (sq_64 = 0; sq_64 < 64; sq_64++) {
-      sq = square_from_64(sq_64);
-      piece = board->square[sq];
-      ASSERT(pos>=0&&pos<=16);
-      if (colour_equal(piece,colour) && !piece_is_king(piece)) {
-         board->pos[sq] = pos;
-         board->list[colour][pos] = sq;
-         pos++;
-         board->number[piece_to_12(piece)]++;
-      }
-   }
-
-   ASSERT(pos>=1&&pos<=16);
-   board->list[colour][pos] = SquareNone;
-   board->list_size[colour] = pos;
-
-   // black piece list
-
-   colour = Black;
-   pos = 0;
-
-   for (sq_64 = 0; sq_64 < 64; sq_64++) {
-      sq = square_from_64(sq_64);
-      piece = board->square[sq];
-      ASSERT(pos>=0&&pos<=16);
-      if (colour_equal(piece,colour) && piece_is_king(piece)) {
-         board->pos[sq] = pos;
-         board->list[colour][pos] = sq;
-         pos++;
-         board->number[piece_to_12(piece)]++;
-      }
-   }
-   ASSERT(pos==1);
-
-   for (sq_64 = 0; sq_64 < 64; sq_64++) {
-      sq = square_from_64(sq_64);
-      piece = board->square[sq];
-      ASSERT(pos>=1&&pos<=16);
-      if (colour_equal(piece,colour) && !piece_is_king(piece)) {
-         board->pos[sq] = pos;
-         board->list[colour][pos] = sq;
-         pos++;
-         board->number[piece_to_12(piece)]++;
-      }
-   }
-
-   ASSERT(pos>=1&&pos<=16);
-   board->list[colour][pos] = SquareNone;
-   board->list_size[colour] = pos;
-
-   // hash key
-
-   board->key = hash_key(board);
-}
-
-// board_flags()
-
-int board_flags(const board_t * board) {
-
-   int flags;
-
-   flags = 0;
-
-   if (board->castle[White][SideH] != SquareNone) flags |= 1 << 0;
-   if (board->castle[White][SideA] != SquareNone) flags |= 1 << 1;
-   if (board->castle[Black][SideH] != SquareNone) flags |= 1 << 2;
-   if (board->castle[Black][SideA] != SquareNone) flags |= 1 << 3;
-
-   return flags;
-}
-
-// board_can_play()
-
-bool board_can_play(const board_t * board) {
-
-   list_t list[1];
-   int i, move;
-
-   ASSERT(board_is_ok(board));
-
-   gen_moves(list,board);
-
-   for (i = 0; i < list_size(list); i++) {
-      move = list_move(list,i);
-      if (pseudo_is_legal(move,board)) return TRUE;
-   }
-
-   return FALSE; // no legal move
-}
-
-// board_mobility()
-
-int board_mobility(const board_t * board) {
-
-   list_t list[1];
-
-   ASSERT(board_is_ok(board));
-
-   gen_legal_moves(list,board);
-
-   return list_size(list);
-}
-
-// board_is_check()
-
-bool board_is_check(const board_t * board) {
-
-   ASSERT(board_is_ok(board));
-
-   return is_in_check(board,board->turn);
-}
-
-// board_is_mate()
-
-bool board_is_mate(const board_t * board) {
-
-   ASSERT(board_is_ok(board));
-
-   if (!board_is_check(board)) return FALSE;
-   if (board_can_play(board)) return FALSE;
-
-   return TRUE;
-}
-
-// board_is_stalemate()
-
-bool board_is_stalemate(const board_t * board) {
-
-   ASSERT(board_is_ok(board));
-
-   if (board_is_check(board)) return FALSE;
-   if (board_can_play(board)) return FALSE;
-
-   return TRUE;
-}
-
-// king_pos()
-
-int king_pos(const board_t * board, int colour) {
-
-   ASSERT(board_is_ok(board));
-   ASSERT(colour_is_ok(colour));
-
-   return board->list[colour][0];
-}
-
-// board_disp()
-
-void board_disp(const board_t * board) {
-
-   int file, rank, sq;
-   int piece, c;
-   char fen[256];
-
-   ASSERT(board!=NULL);
-
-   if (!board_to_fen(board,fen,256)) ASSERT(FALSE);
-   my_log("POLYGLOT %s\n",fen);
-   my_log("POLYGLOT\n");
-
-   for (rank = 7; rank >= 0; rank--) {
-
-      my_log("POLYGLOT ");
-
-      for (file = 0; file < 8; file++) {
-
-         sq = square_make(file,rank);
-         piece = board->square[sq];
-
-         c = (piece != Empty) ? piece_to_char(piece) : '-';
-         my_log("%c ",c);
-      }
-
-      my_log("\n");
-   }
-
-   my_log("POLYGLOT\n");
-
-   my_log("POLYGLOT %s to play\n",(colour_is_black(board->turn))?"black":"white");
-   my_log("POLYGLOT\n");
-}
-
-// end of board.cpp
-
+
+// board.c
+
+// includes
+
+#include <stdio.h>
+
+#include "attack.h"
+#include "board.h"
+#include "colour.h"
+#include "fen.h"
+#include "hash.h"
+#include "list.h"
+#include "move.h"
+#include "move_do.h"
+#include "move_gen.h"
+#include "move_legal.h"
+#include "piece.h"
+#include "util.h"
+
+// constants
+
+static const bool UseSlowDebug = FALSE;
+
+// functions
+
+// board_is_ok()
+
+bool board_is_ok(const board_t * board) {
+
+   int sq, piece;
+   int colour, pos;
+   int king, rook;
+
+   if (board == NULL) return FALSE;
+
+   // optional heavy DEBUG mode
+
+   if (!UseSlowDebug) return TRUE;
+
+   // squares
+
+   for (sq = 0; sq < SquareNb; sq++) {
+      piece = board->square[sq];
+      if (square_is_ok(sq)) {
+         pos = board->pos[sq];
+         if (piece == Empty) {
+            if (pos != -1) return FALSE;
+         } else {
+            if (pos < 0) return FALSE;
+            if (board->list[piece_colour(piece)][pos] != sq) return FALSE;
+         }
+      } else {
+         if (piece != Knight64) return FALSE;
+      }
+   }
+
+   // white piece list
+
+   colour = White;
+   pos = 0;
+
+   if (board->list_size[colour] <= 0 || board->list_size[colour] > 16) return FALSE;
+
+   sq = board->list[colour][pos];
+   if (sq == SquareNone) return FALSE;
+   if (board->pos[sq] != pos) return FALSE;
+   piece = board->square[sq];
+   if (!colour_equal(piece,colour) || !piece_is_king(piece)) return FALSE;
+
+   for (pos++; pos < board->list_size[colour]; pos++) {
+      sq = board->list[colour][pos];
+      if (sq == SquareNone) return FALSE;
+      if (board->pos[sq] != pos) return FALSE;
+      if (!colour_equal(board->square[sq],colour)) return FALSE;
+   }
+
+   sq = board->list[colour][pos];
+   if (sq != SquareNone) return FALSE;
+
+   // black piece list
+
+   colour = Black;
+   pos = 0;
+
+   if (board->list_size[colour] <= 0 || board->list_size[colour] > 16) return FALSE;
+
+   sq = board->list[colour][pos];
+   if (sq == SquareNone) return FALSE;
+   if (board->pos[sq] != pos) return FALSE;
+   piece = board->square[sq];
+   if (!colour_equal(piece,colour) || !piece_is_king(piece)) return FALSE;
+
+   for (pos++; pos < board->list_size[colour]; pos++) {
+      sq = board->list[colour][pos];
+      if (sq == SquareNone) return FALSE;
+      if (board->pos[sq] != pos) return FALSE;
+      if (!colour_equal(board->square[sq],colour)) return FALSE;
+   }
+
+   sq = board->list[colour][pos];
+   if (sq != SquareNone) return FALSE;
+
+   // TODO: material
+
+   if (board->number[WhiteKing12] != 1) return FALSE;
+   if (board->number[BlackKing12] != 1) return FALSE;
+
+   if (!colour_is_ok(board->turn)) return FALSE;
+
+   // castling status
+
+   if (board->castle[White][SideH] != SquareNone) {
+
+      king = board->list[White][0];
+      if ((king < A1) || (king > H1)) return FALSE;
+      if (board->square[king] != WhiteKing256) return FALSE;
+
+      rook = board->castle[White][SideH];
+      if ((rook < A1) || (rook > H1)) return FALSE;
+      if (board->square[rook] != WhiteRook256) return FALSE;
+
+      if (rook <= king) return FALSE;
+   }
+
+   if (board->castle[White][SideA] != SquareNone) {
+
+      king = board->list[White][0];
+      if ((king < A1) || (king > H1)) return FALSE;
+      if (board->square[king] != WhiteKing256) return FALSE;
+
+      rook = board->castle[White][SideA];
+      if ((rook < A1) || (rook > H1)) return FALSE;
+      if (board->square[rook] != WhiteRook256) return FALSE;
+
+      if (rook >= king) return FALSE;
+   }
+
+   if (board->castle[Black][SideH] != SquareNone) {
+
+      king = board->list[Black][0];
+      if ((king < A8) || (king > H8)) return FALSE;
+      if (board->square[king] != BlackKing256) return FALSE;
+
+      rook = board->castle[Black][SideH];
+      if ((rook < A8) || (rook > H8)) return FALSE;
+      if (board->square[rook] != BlackRook256) return FALSE;
+
+      if (rook <= king) return FALSE;
+   }
+
+   if (board->castle[Black][SideA] != SquareNone) {
+
+      king = board->list[Black][0];
+      if (king < A8 || king > H8) return FALSE;
+      if (board->square[king] != BlackKing256) return FALSE;
+
+      rook = board->castle[Black][SideA];
+      if (rook < A8 || rook > H8) return FALSE;
+      if (board->square[rook] != BlackRook256) return FALSE;
+
+      if (rook >= king) return FALSE;
+   }
+
+   return TRUE;
+}
+
+// board_clear()
+
+void board_clear(board_t * board) {
+
+   int file, rank, sq;
+   int colour, pos;
+   int piece;
+
+   ASSERT(board!=NULL);
+
+   // edge squares
+
+   for (sq = 0; sq < SquareNb; sq++) {
+      board->square[sq] = Knight64; // HACK: uncoloured knight
+      board->pos[sq] = -1;
+   }
+
+   // empty squares
+
+   for (rank = 0; rank < 8; rank++) {
+      for (file = 0; file < 8; file++) {
+         sq = square_make(file,rank);
+         board->square[sq] = Empty;
+      }
+   }
+
+   // piece lists
+
+   for (colour = 0; colour < 3; colour++) {
+      for (pos = 0; pos < 32; pos++) { // HACK
+         board->list[colour][pos] = SquareNone;
+      }
+      board->list_size[colour] = 0;
+   }
+
+   // material
+
+   for (piece = 0; piece < 12; piece++) {
+      board->number[piece] = 0;
+   }
+
+   // rest
+
+   board->turn = ColourNone;
+   board->castle[White][SideH] = SquareNone;
+   board->castle[White][SideA] = SquareNone;
+   board->castle[Black][SideH] = SquareNone;
+   board->castle[Black][SideA] = SquareNone;
+   board->ep_square = SquareNone;
+
+   board->ply_nb = 0;
+   board->move_nb = 0;
+
+   board->key = 0;
+}
+
+// board_start()
+
+void board_start(board_t * board) {
+
+   ASSERT(board!=NULL);
+
+   if (!board_from_fen(board,StartFen)) ASSERT(FALSE);
+}
+
+// board_copy()
+
+void board_copy(board_t * dst, const board_t * src) {
+
+   ASSERT(dst!=NULL);
+   ASSERT(board_is_ok(src));
+
+   *dst = *src;
+}
+
+// board_equal()
+
+bool board_equal(const board_t * board_1, const board_t * board_2) {
+
+   int sq_64, sq;
+
+   ASSERT(board_is_ok(board_1));
+   ASSERT(board_is_ok(board_2));
+
+   // fast comparison
+
+   if (board_1->key != board_2->key) return FALSE;
+
+   // slow comparison
+
+   for (sq_64 = 0; sq_64 < 64; sq_64++) {
+      sq = square_from_64(sq_64);
+      if (board_1->square[sq] != board_2->square[sq]) return FALSE;
+   }
+
+   if (board_1->turn != board_2->turn) return FALSE;
+   if (board_1->castle[White][SideH] != board_2->castle[White][SideH]) return FALSE;
+   if (board_1->castle[White][SideA] != board_2->castle[White][SideA]) return FALSE;
+   if (board_1->castle[Black][SideH] != board_2->castle[Black][SideH]) return FALSE;
+   if (board_1->castle[Black][SideA] != board_2->castle[Black][SideA]) return FALSE;
+   if (board_1->ep_square != board_2->ep_square) return FALSE;
+
+   return TRUE;
+}
+
+// board_init_list()
+
+void board_init_list(board_t * board) {
+
+   int sq_64, sq, piece;
+   int colour, pos;
+
+   ASSERT(board!=NULL);
+
+   // init
+
+   for (sq_64 = 0; sq_64 < 64; sq_64++) {
+      sq = square_from_64(sq_64);
+      board->pos[sq] = -1;
+   }
+
+   for (piece = 0; piece < 12; piece++) board->number[piece] = 0;
+
+   // white piece list
+
+   colour = White;
+   pos = 0;
+
+   for (sq_64 = 0; sq_64 < 64; sq_64++) {
+      sq = square_from_64(sq_64);
+      piece = board->square[sq];
+      ASSERT(pos>=0&&pos<=16);
+      if (colour_equal(piece,colour) && piece_is_king(piece)) {
+         board->pos[sq] = pos;
+         board->list[colour][pos] = sq;
+         pos++;
+         board->number[piece_to_12(piece)]++;
+      }
+   }
+   ASSERT(pos==1);
+
+   for (sq_64 = 0; sq_64 < 64; sq_64++) {
+      sq = square_from_64(sq_64);
+      piece = board->square[sq];
+      ASSERT(pos>=0&&pos<=16);
+      if (colour_equal(piece,colour) && !piece_is_king(piece)) {
+         board->pos[sq] = pos;
+         board->list[colour][pos] = sq;
+         pos++;
+         board->number[piece_to_12(piece)]++;
+      }
+   }
+
+   ASSERT(pos>=1&&pos<=16);
+   board->list[colour][pos] = SquareNone;
+   board->list_size[colour] = pos;
+
+   // black piece list
+
+   colour = Black;
+   pos = 0;
+
+   for (sq_64 = 0; sq_64 < 64; sq_64++) {
+      sq = square_from_64(sq_64);
+      piece = board->square[sq];
+      ASSERT(pos>=0&&pos<=16);
+      if (colour_equal(piece,colour) && piece_is_king(piece)) {
+         board->pos[sq] = pos;
+         board->list[colour][pos] = sq;
+         pos++;
+         board->number[piece_to_12(piece)]++;
+      }
+   }
+   ASSERT(pos==1);
+
+   for (sq_64 = 0; sq_64 < 64; sq_64++) {
+      sq = square_from_64(sq_64);
+      piece = board->square[sq];
+      ASSERT(pos>=1&&pos<=16);
+      if (colour_equal(piece,colour) && !piece_is_king(piece)) {
+         board->pos[sq] = pos;
+         board->list[colour][pos] = sq;
+         pos++;
+         board->number[piece_to_12(piece)]++;
+      }
+   }
+
+   ASSERT(pos>=1&&pos<=16);
+   board->list[colour][pos] = SquareNone;
+   board->list_size[colour] = pos;
+
+   // hash key
+
+   board->key = hash_key(board);
+}
+
+// board_flags()
+
+int board_flags(const board_t * board) {
+
+   int flags;
+
+   flags = 0;
+
+   if (board->castle[White][SideH] != SquareNone) flags |= 1 << 0;
+   if (board->castle[White][SideA] != SquareNone) flags |= 1 << 1;
+   if (board->castle[Black][SideH] != SquareNone) flags |= 1 << 2;
+   if (board->castle[Black][SideA] != SquareNone) flags |= 1 << 3;
+
+   return flags;
+}
+
+// board_can_play()
+
+bool board_can_play(const board_t * board) {
+
+   list_t list[1];
+   int i, move;
+
+   ASSERT(board_is_ok(board));
+
+   gen_moves(list,board);
+
+   for (i = 0; i < list_size(list); i++) {
+      move = list_move(list,i);
+      if (pseudo_is_legal(move,board)) return TRUE;
+   }
+
+   return FALSE; // no legal move
+}
+
+// board_mobility()
+
+int board_mobility(const board_t * board) {
+
+   list_t list[1];
+
+   ASSERT(board_is_ok(board));
+
+   gen_legal_moves(list,board);
+
+   return list_size(list);
+}
+
+// board_is_check()
+
+bool board_is_check(const board_t * board) {
+
+   ASSERT(board_is_ok(board));
+
+   return is_in_check(board,board->turn);
+}
+
+// board_is_mate()
+
+bool board_is_mate(const board_t * board) {
+
+   ASSERT(board_is_ok(board));
+
+   if (!board_is_check(board)) return FALSE;
+   if (board_can_play(board)) return FALSE;
+
+   return TRUE;
+}
+
+// board_is_stalemate()
+
+bool board_is_stalemate(const board_t * board) {
+
+   ASSERT(board_is_ok(board));
+
+   if (board_is_check(board)) return FALSE;
+   if (board_can_play(board)) return FALSE;
+
+   return TRUE;
+}
+
+// king_pos()
+
+int king_pos(const board_t * board, int colour) {
+
+   ASSERT(board_is_ok(board));
+   ASSERT(colour_is_ok(colour));
+
+   return board->list[colour][0];
+}
+
+// board_disp()
+
+void board_disp(const board_t * board) {
+
+   int file, rank, sq;
+   int piece, c;
+   char fen[256];
+   char row[9];
+   char line[256];
+
+   ASSERT(board!=NULL);
+
+   if (!board_to_fen(board,fen,256)) ASSERT(FALSE);
+   my_log("POLYGLOT FEN %s\n",fen);
+   my_log("POLYGLOT *** CURRENT BOARD ***\n");
+
+   for (rank = 7; rank >= 0; rank--) {
+
+      for (file = 0; file < 8; file++) {
+
+         sq = square_make(file,rank);
+         piece = board->square[sq];
+
+         c = (piece != Empty) ? piece_to_char(piece) : '-';
+         row[file]=c;
+      }
+      row[8]='\0';
+      snprintf(line,sizeof(line),"POLYGLOT %s\n",row);
+      line[sizeof(line)-1]='\0';
+      my_log(line);
+   }
+
+   my_log("POLYGLOT %s to play\n",(colour_is_black(board->turn))?"black":"white");
+   my_log("POLYGLOT\n");
+}
+
+// end of board.cpp
+