From: H.G. Muller Date: Fri, 13 Sep 2013 15:49:44 +0000 (+0200) Subject: Implement analyze command X-Git-Url: http://winboard.nl/cgi-bin?a=commitdiff_plain;h=26a4f3f831c5e1d912bffcee61904165ffe55e72;p=bonanza.git Implement analyze command To implement infinite analysis, the 'analyze' and 'exit' commands are added. A search with flag_ponder set is used to do the analysis. When in analyze mode, such a search will be automatically restarted after receiving a move or undo command. --- diff --git a/proce.c b/proce.c index 214c78b..0f9223c 100644 --- a/proce.c +++ b/proce.c @@ -75,6 +75,8 @@ static int cmd_read( tree_t * restrict ptree, char **lasts ); static int cmd_resign( tree_t * restrict ptree, char **lasts ); static int cmd_time( char **lasts ); static int cmd_undo( tree_t * restrict ptree ); // [HGM] undo +static int cmd_analyze( tree_t * restrict ptree ); // [HGM] analyze +static int cmd_exit( void ); static int is_move( const char *str ); @@ -99,6 +101,7 @@ int move_list[1024], move_ptr; int myTime, hisTime, movesPerSession, inc, plyNr; char xboard_mode; +char analyze_mode; static void SetTimes(void) @@ -140,8 +143,8 @@ Out("# command = '%s'\n", line); IF("sd") { sprintf(line, "limit depth %d", value); return 0; } IF("st") { ; } IF("quit") { return 0; } - IF("analyze") { ; } - IF("exit") { ; } + IF("analyze") { return 0; } + IF("exit") { return 0; } IF("variant") { /* ignore, since it must be Shogi */; } IF("setboard") { ; } IF("option") { ; } @@ -153,7 +156,7 @@ Out("# command = '%s'\n", line); IF("usermove") { char fromX=line[9], fromY=line[10], toX=line[11], toY=line[12], promo=line[13]; int from; {int i,j;for(i=0;i<81;i+=9){printf("# ");for(j=0;j<9;j++)printf(" %3d", BOARD[i+j]);printf("\n");}} - if(forceMode) strcpy(line, "move "), line += 5; else plyNr++, SetTimes(); + if(forceMode || analyze_mode) strcpy(line, "move "), line += 5; else plyNr++, SetTimes(); if(fromY == '@') { // drop if(fromX >= 'a') fromX += 'A' - 'a'; switch(fromX) { // encode piece @@ -175,7 +178,7 @@ Out("# from=%d\n",from); plyNr++; return 0; } - IF("undo") { ; } + IF("undo") { return 0; } IF("remove") { ; } IF("ping") { Out("pong %d\n", value); } return 1; @@ -201,6 +204,11 @@ proce_cui( tree_t * restrict ptree ) if ( ! strcmp( token, "xboard" ) ) { xboard_mode = 1; game_status |= flag_noprompt; return 1; } } #endif + if ( ! strcmp( token, "analyze" ) ) { return cmd_analyze( ptree ); } // [HGM] analyze + if ( ! strcmp( token, "exit" ) ) { return cmd_exit(); } // [HGM] analyze + if ( ! strcmp( token, "move" ) ) { return cmd_move( ptree, &last ); } + if ( ! strcmp( token, "undo" ) ) { return cmd_undo( ptree ); } // [HGM] undo + analyze_mode = 0; // [HGM] analyze: all other commands terminate analysis if ( is_move( token ) ) { return cmd_usrmove( ptree, token, &last ); } if ( ! strcmp( token, "s" ) ) { return cmd_move_now(); } if ( ! strcmp( token, "beep" ) ) { return cmd_beep( &last); } @@ -208,7 +216,6 @@ proce_cui( tree_t * restrict ptree ) if ( ! strcmp( token, "display" ) ) { return cmd_display( ptree, &last ); } if ( ! strcmp( token, "hash" ) ) { return cmd_hash( &last ); } if ( ! strcmp( token, "limit" ) ) { return cmd_limit( &last ); } - if ( ! strcmp( token, "move" ) ) { return cmd_move( ptree, &last ); } if ( ! strcmp( token, "new" ) ) { return cmd_new( ptree, &last ); } if ( ! strcmp( token, "peek" ) ) { return cmd_peek( &last ); } if ( ! strcmp( token, "ping" ) ) { return cmd_ping(); } @@ -219,7 +226,6 @@ proce_cui( tree_t * restrict ptree ) if ( ! strcmp( token, "resign" ) ) { return cmd_resign( ptree, &last ); } if ( ! strcmp( token, "suspend" ) ) { return cmd_suspend(); } if ( ! strcmp( token, "time" ) ) { return cmd_time( &last ); } - if ( ! strcmp( token, "undo" ) ) { return cmd_undo( ptree ); } // [HGM] undo #if defined(CSA_LAN) if ( ! strcmp( token, "connect" ) ) { return cmd_connect( ptree, &last ); } #endif @@ -391,6 +397,22 @@ cmd_mnjmove( tree_t * restrict ptree, char **lasts, int is_alter ) static int +do_analyze( tree_t * restrict ptree ) +{ // [HGM] analyze: do a ponder search on the current position + int iret; + if ( get_elapsed( &time_start ) < 0 ) { return -1; } + time_limit = time_max_limit = 1e9; // kludge: use huge time to mimic infinity +#ifdef XBOARD + Out("1 0 0 0 New Search\n"); // make sure lower depth is emitted, so XBoard undestand new search started +#endif + game_status |= flag_pondering; + iret = iterate( ptree, 0 ); + game_status &= ~flag_pondering; + return iret; +} + + +static int cmd_undo( tree_t * restrict ptree ) { // [HGM] undo: restart the game, and feed all moves except the last int i, last = move_ptr; @@ -407,6 +429,34 @@ cmd_undo( tree_t * restrict ptree ) for(i=0; i