projects / sgk-go / blob
? search:
summary | tags | clone url | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Before starting to tinker, ran clang-format on files that seem like relevant starting...
[sgk-go] / interface / play_ascii.c
/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *\
* This is GNU Go, a Go program. Contact gnugo@gnu.org, or see *
* http://www.gnu.org/software/gnugo/ for more information. *
* *
* Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, *
* 2008 and 2009 by the Free Software Foundation. *
* *
* This program is free software; you can redistribute it and/or *
* modify it under the terms of the GNU General Public License as *
* published by the Free Software Foundation - version 3 or *
* (at your option) any later version. *
* *
* This program is distributed in the hope that it will be useful, *
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
* GNU General Public License in file COPYING for more details. *
* *
* You should have received a copy of the GNU General Public *
* License along with this program; if not, write to the Free *
* Software Foundation, Inc., 51 Franklin Street, Fifth Floor, *
* Boston, MA 02111, USA. *
\* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
#include "gnugo.h"
#include <ctype.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#if READLINE
#include <readline/history.h>
#include <readline/readline.h>
#endif
#include "gg_utils.h"
#include "interface.h"
#include "liberty.h"
#include "sgftree.h"
#define DEBUG_COMMANDS "\
capture <pos> try to capture indicated group\n\
dead Toggle display of dead stones\n\
defend <pos> try to defend indicated group\n\
listdragons print dragon info \n\
showarea display area\n\
showdragons display dragons\n\
showmoyo display moyo\n\
showterri display territory\n\
"
/* some options for the ascii interface */
static int opt_showboard = 1;
static int showdead = 0;
static SGFTree sgftree;
static int resignation_allowed;
static int clock_on = 0;
/* Unreasonable score used to detect missing information. */
#define NO_SCORE 4711
/* Keep track of the score estimated before the last computer move. */
static int current_score_estimate = NO_SCORE;
static void do_play_ascii(Gameinfo* gameinfo);
static int ascii_endgame(Gameinfo* gameinfo, int reason);
static void ascii_count(Gameinfo* gameinfo);
static void showcapture(char* line);
static void showdefense(char* line);
static void ascii_goto(Gameinfo* gameinfo, char* line);
static void ascii_free_handicap(Gameinfo* gameinfo, char* handicap_string);
/* If sgf game info is written can't reset parameters like handicap, etc. */
static int sgf_initialized;
/*
* Create letterbar for the top and bottom of the ASCII board.
*/
static void
make_letterbar(int boardsize, char* letterbar)
{
int i, letteroffset;
char spaces[64];
char letter[64];
if (boardsize <= 25)
strcpy(spaces, " ");
strcpy(letterbar, " ");
for (i = 0; i < boardsize; i++) {
letteroffset = 'A';
if (i + letteroffset >= 'I')
letteroffset++;
strcat(letterbar, spaces);
sprintf(letter, "%c", i + letteroffset);
strcat(letterbar, letter);
}
}
/* This array contains +'s and -'s for the empty board positions.
* hspot_size contains the board size that the grid has been
* initialized to.
*/
static int hspot_size;
static char hspots[MAX_BOARD][MAX_BOARD];
/*
* Mark the handicap spots on the board.
*/
static void
set_handicap_spots(int boardsize)
{
if (hspot_size == boardsize)
return;
hspot_size = boardsize;
memset(hspots, '.', sizeof(hspots));
if (boardsize == 5) {
/* place the outer 4 */
hspots[1][1] = '+';
hspots[boardsize - 2][1] = '+';
hspots[1][boardsize - 2] = '+';
hspots[boardsize - 2][boardsize - 2] = '+';
/* and the middle one */
hspots[boardsize / 2][boardsize / 2] = '+';
return;
}
if (!(boardsize % 2)) {
/* If the board size is even, no center handicap spots. */
if (boardsize > 2 && boardsize < 12) {
/* Place the outer 4 only. */
hspots[2][2] = '+';
hspots[boardsize - 3][2] = '+';
hspots[2][boardsize - 3] = '+';
hspots[boardsize - 3][boardsize - 3] = '+';
} else {
/* Place the outer 4 only. */
hspots[3][3] = '+';
hspots[boardsize - 4][3] = '+';
hspots[3][boardsize - 4] = '+';
hspots[boardsize - 4][boardsize - 4] = '+';
}
} else {
/* Uneven board size */
if (boardsize > 2 && boardsize < 12) {
/* Place the outer 4... */
hspots[2][2] = '+';
hspots[boardsize - 3][2] = '+';
hspots[2][boardsize - 3] = '+';
hspots[boardsize - 3][boardsize - 3] = '+';
/* ...and the middle one. */
hspots[boardsize / 2][boardsize / 2] = '+';
} else if (boardsize > 12) {
/* Place the outer 4... */
hspots[3][3] = '+';
hspots[boardsize - 4][3] = '+';
hspots[3][boardsize - 4] = '+';
hspots[boardsize - 4][boardsize - 4] = '+';
/* ...and the inner 4... */
hspots[3][boardsize / 2] = '+';
hspots[boardsize / 2][3] = '+';
hspots[boardsize / 2][boardsize - 4] = '+';
hspots[boardsize - 4][boardsize / 2] = '+';
/* ...and the middle one. */
hspots[boardsize / 2][boardsize / 2] = '+';
}
}
return;
}
#define WHITECOLOR "\x1B[41m"
#define BLACKCOLOR "\x1B[44m"
#define RESETCOLOR "\x1B[0m"
#define BACK1COLOR "\x1B[43m"
#define BACK2COLOR "\x1B[47m"
/*
* Display the board position when playing in ASCII.
*/
static void
ascii_showboard(void)
{
int i, j;
char letterbar[64];
int last_pos_was_move;
int pos_is_move;
int dead;
int last_move = get_last_move();
make_letterbar(board_size, letterbar);
set_handicap_spots(board_size);
printf("\n");
printf(" White (" WHITECOLOR " " RESETCOLOR ") has captured %d pieces\n", black_captured);
printf(" Black (" BLACKCOLOR " " RESETCOLOR ") has captured %d pieces\n", white_captured);
if (showscore) {
if (current_score_estimate == NO_SCORE)
printf(" No score estimate is available yet.\n");
else if (current_score_estimate < 0)
printf(" Estimated score: Black is ahead by %d\n",
-current_score_estimate);
else if (current_score_estimate > 0)
printf(" Estimated score: White is ahead by %d\n",
current_score_estimate);
else
printf(" Estimated score: Even!\n");
}
printf("\n");
fflush(stdout);
printf("%s", letterbar);
if (get_last_player() != EMPTY) {
gfprintf(stdout, " Last move: %s %1m",
get_last_player() == WHITE ? "White" : "Black",
last_move);
}
printf("\n");
fflush(stdout);
for (i = 0; i < board_size; i++) {
printf(" %2d", board_size - i);
last_pos_was_move = 0;
for (j = 0; j < board_size; j++) {
if (POS(i, j) == last_move)
pos_is_move = 128;
else
pos_is_move = 0;
dead = (dragon_status(POS(i, j)) == DEAD) && showdead;
switch (BOARD(i, j) + pos_is_move + last_pos_was_move) {
case EMPTY + 128:
case EMPTY:
if (i % 2 == 0) {
if (j % 2 == 0) {
printf(BACK1COLOR " " RESETCOLOR);
} else {
printf(BACK2COLOR " " RESETCOLOR);
}
} else {
if (j % 2 == 0) {
printf(BACK2COLOR " " RESETCOLOR);
} else {
printf(BACK1COLOR " " RESETCOLOR);
}
}
last_pos_was_move = 0;
break;
case BLACK:
printf(BLACKCOLOR " " RESETCOLOR);
last_pos_was_move = 0;
break;
case WHITE:
printf(WHITECOLOR " " RESETCOLOR);
last_pos_was_move = 0;
break;
case BLACK + 128:
printf(BLACKCOLOR "()" RESETCOLOR);
last_pos_was_move = 0;
break;
case WHITE + 128:
printf(WHITECOLOR "()" RESETCOLOR);
last_pos_was_move = 0;
break;
case EMPTY + 256:
if (i % 2 == 0) {
if (j % 2 == 0) {
printf(BACK1COLOR " " RESETCOLOR);
} else {
printf(BACK2COLOR " " RESETCOLOR);
}
} else {
if (j % 2 == 0) {
printf(BACK2COLOR " " RESETCOLOR);
} else {
printf(BACK1COLOR " " RESETCOLOR);
}
}
last_pos_was_move = 0;
break;
case BLACK + 256:
printf(BLACKCOLOR " " RESETCOLOR);
last_pos_was_move = 0;
break;
case WHITE + 256:
printf(WHITECOLOR " " RESETCOLOR);
last_pos_was_move = 0;
break;
default:
fprintf(stderr, "Illegal board value %d\n", (int)BOARD(i, j));
exit(EXIT_FAILURE);
break;
}
}
if (last_pos_was_move == 0) {
if (board_size > 10)
printf(" %2d", board_size - i);
else
printf(" %1d", board_size - i);
} else {
if (board_size > 10)
printf("%2d", board_size - i);
else
printf("%1d", board_size - i);
}
printf("\n");
}
fflush(stdout);
printf("%s\n\n", letterbar);
fflush(stdout);
if (clock_on) {
clock_print(WHITE);
clock_print(BLACK);
}
} /* end ascii_showboard */
/*
* command help
*/
static void
show_commands(void)
{
printf("\nCommands:\n");
printf(" back Take back your last move\n");
printf(" boardsize Set boardsize (on move 1 only)\n");
printf(" comment Write a comment to outputfile\n");
printf(" depth <num> Set depth for reading\n");
printf(" display Display game board\n");
printf(" exit Exit GNU Go\n");
printf(" force <move> Force a move for current color\n");
printf(" forward Go to next node in game tree\n");
printf(" goto <movenum> Go to movenum in game tree\n");
printf(" level <amount> Playing level (default = 10)\n");
printf(" handicap <num> Set fixed handicap (on move 1 only)\n");
printf(" freehandicap <num> Place free handicap (on move 1 only)\n");
printf(" Omit <num> to place handicap yourself\n");
printf(" help Display this help menu\n");
printf(" helpdebug Display debug help menu\n");
printf(" info Display program settings\n");
printf(" komi Set komi (on move 1 only)\n");
printf(" last Goto last node in game tree\n");
printf(" pass Pass on your move\n");
printf(" play <num> Play <num> moves\n");
printf(" playblack Play as Black (switch if White)\n");
printf(" playwhite Play as White (switch if Black)\n");
printf(" quit Exit GNU Go\n");
printf(" resign Resign the current game\n");
printf(" save <file> Save the current game\n");
printf(" load <file> Load a game from file\n");
printf(" score Toggle display of score On/Off\n");
printf(" showboard Toggle display of board On/Off\n");
printf(" switch Switch the color you are playing\n");
printf(" undo Take the last move back (same as back)\n");
printf(" <move> A move of the format <letter><number>");
printf("\n");
}
enum commands { INVALID = -1,
END,
EXIT,
QUIT,
RESIGN,
PASS,
MOVE,
FORCE,
SWITCH,
PLAY,
PLAYBLACK,
PLAYWHITE,
SETHANDICAP,
FREEHANDICAP,
SETBOARDSIZE,
SETKOMI,
SETDEPTH,
INFO,
DISPLAY,
SHOWBOARD,
HELP,
UNDO,
COMMENT,
SCORE,
CMD_DEAD,
CMD_BACK,
CMD_FORWARD,
CMD_LAST,
CMD_CAPTURE,
CMD_DEFEND,
CMD_HELPDEBUG,
CMD_SHOWAREA,
CMD_SHOWMOYO,
CMD_SHOWTERRI,
CMD_GOTO,
CMD_SAVE,
CMD_LOAD,
CMD_SHOWDRAGONS,
CMD_LISTDRAGONS,
SETLEVEL,
NEW,
COUNT,
CONTINUE
};
/*
* Check if we have a valid command.
*/
static int
get_command(char* command)
{
char c;
int d;
/* Check to see if a move was input. */
if (!((sscanf(command, "%c%d", &c, &d) != 2)
|| ((c = toupper((int)c)) < 'A')
|| ((c = toupper((int)c)) > 'Z')
|| (c == 'I')))
return MOVE;
/* help shortcut */
if (command[0] == '?')
return HELP;
/* Kill leading spaces. */
while (command[0] == ' ')
command++;
if (!strncmp(command, "playblack", 9))
return PLAYBLACK;
if (!strncmp(command, "playwhite", 9))
return PLAYWHITE;
if (!strncmp(command, "showboard", 9))
return SHOWBOARD;
if (!strncmp(command, "showdragons", 9))
return CMD_SHOWDRAGONS;
if (!strncmp(command, "listdragons", 9))
return CMD_LISTDRAGONS;
if (!strncmp(command, "boardsize", 9))
return SETBOARDSIZE;
if (!strncmp(command, "freehandicap", 9))
return FREEHANDICAP;
if (!strncmp(command, "handicap", 5))
return SETHANDICAP;
if (!strncmp(command, "display", 7))
return DISPLAY;
if (!strncmp(command, "helpdebug", 7))
return CMD_HELPDEBUG;
if (!strncmp(command, "resign", 6))
return RESIGN;
if (!strncmp(command, "showmoyo", 6))
return CMD_SHOWMOYO;
if (!strncmp(command, "showterri", 6))
return CMD_SHOWTERRI;
if (!strncmp(command, "showarea", 6))
return CMD_SHOWAREA;
if (!strncmp(command, "depth", 5))
return SETDEPTH;
if (!strncmp(command, "switch", 5))
return SWITCH;
if (!strncmp(command, "komi", 4))
return SETKOMI;
if (!strncmp(command, "play", 4))
return PLAY;
if (!strncmp(command, "info", 4))
return INFO;
if (!strncmp(command, "force", 4))
return FORCE;
if (!strncmp(command, "level", 5))
return SETLEVEL;
if (!strncmp(command, "pass", 4))
return PASS;
if (!strncmp(command, "save", 3))
return CMD_SAVE;
if (!strncmp(command, "load", 3))
return CMD_LOAD;
if (!strncmp(command, "end", 3))
return END;
if (!strncmp(command, "move", 3))
return MOVE;
if (!strncmp(command, "undo", 3))
return UNDO;
if (!strncmp(command, "comment", 3))
return COMMENT;
if (!strncmp(command, "score", 3))
return SCORE;
if (!strncmp(command, "dead", 3))
return CMD_DEAD;
if (!strncmp(command, "capture", 3))
return CMD_CAPTURE;
if (!strncmp(command, "defend", 3))
return CMD_DEFEND;
if (!strncmp(command, "exit", 4))
return EXIT;
if (!strncmp(command, "quit", 4))
return QUIT;
if (!strncmp(command, "help", 1))
return HELP;
if (!strncmp(command, "back", 2))
return CMD_BACK;
if (!strncmp(command, "forward", 2))
return CMD_FORWARD;
if (!strncmp(command, "last", 2))
return CMD_LAST;
if (!strncmp(command, "goto", 2))
return CMD_GOTO;
if (!strncmp(command, "game", 2))
return NEW;
if (!strncmp(command, "count", 3))
return COUNT;
if (!strncmp(command, "continue", 4))
return CONTINUE;
/* No valid command was found. */
return INVALID;
}
/*
* Write sgf root node.
*/
static void
init_sgf(Gameinfo* ginfo)
{
if (sgf_initialized)
return;
sgf_initialized = 1;
sgf_write_header(sgftree.root, 1, get_random_seed(), komi,
ginfo->handicap, get_level(), chinese_rules);
if (ginfo->handicap > 0)
sgffile_recordboard(sgftree.root);
}
/*
* Generate the computer move.
*/
static int
computer_move(Gameinfo* gameinfo, int* passes)
{
int move;
float move_value;
int resign;
int resignation_declined = 0;
float upper_bound, lower_bound;
init_sgf(gameinfo);
/* Generate computer move. */
if (autolevel_on)
adjust_level_offset(gameinfo->to_move);
move = genmove(gameinfo->to_move, &move_value, &resign);
if (resignation_allowed && resign) {
int state = ascii_endgame(gameinfo, 2);
if (state != -1)
return state;
/* The opponent declined resignation. Remember not to resign again. */
resignation_allowed = 0;
resignation_declined = 1;
}
if (showscore) {
gnugo_estimate_score(&upper_bound, &lower_bound);
current_score_estimate = (int)((lower_bound + upper_bound) / 2.0);
}
mprintf("%s(%d): %1m\n", color_to_string(gameinfo->to_move),
movenum + 1, move);
if (is_pass(move))
(*passes)++;
else
*passes = 0;
gnugo_play_move(move, gameinfo->to_move);
sgffile_add_debuginfo(sgftree.lastnode, move_value);
sgftreeAddPlay(&sgftree, gameinfo->to_move, I(move), J(move));
if (resignation_declined)
sgftreeAddComment(&sgftree, "GNU Go resignation was declined");
sgffile_output(&sgftree);
gameinfo->to_move = OTHER_COLOR(gameinfo->to_move);
return 0;
}
/*
* Make a move.
*/
static int
do_move(Gameinfo* gameinfo, char* command, int* passes, int force)
{
int move = string_to_location(board_size, command);
if (move == NO_MOVE) {
printf("\nInvalid move: %s\n", command);
return 0;
}
if (!is_allowed_move(move, gameinfo->to_move)) {
printf("\nIllegal move: %s", command);
return 0;
}
*passes = 0;
TRACE("\nyour move: %1m\n\n", move);
init_sgf(gameinfo);
gnugo_play_move(move, gameinfo->to_move);
sgffile_add_debuginfo(sgftree.lastnode, 0.0);
sgftreeAddPlay(&sgftree, gameinfo->to_move, I(move), J(move));
sgffile_output(&sgftree);
if (opt_showboard) {
ascii_showboard();
printf("GNU Go is thinking...\n");
}
if (force) {
gameinfo->computer_player = OTHER_COLOR(gameinfo->computer_player);
gameinfo->to_move = OTHER_COLOR(gameinfo->to_move);
sgftreeAddComment(&sgftree, "forced");
return 0;
}
gameinfo->to_move = OTHER_COLOR(gameinfo->to_move);
return computer_move(gameinfo, passes);
}
/*
* Make a pass.
*/
static int
do_pass(Gameinfo* gameinfo, int* passes, int force)
{
(*passes)++;
init_sgf(gameinfo);
gnugo_play_move(PASS_MOVE, gameinfo->to_move);
sgffile_add_debuginfo(sgftree.lastnode, 0.0);
sgftreeAddPlay(&sgftree, gameinfo->to_move, -1, -1);
sgffile_output(&sgftree);
gameinfo->to_move = OTHER_COLOR(gameinfo->to_move);
if (force) {
gameinfo->computer_player = OTHER_COLOR(gameinfo->computer_player);
sgftreeAddComment(&sgftree, "forced");
return 0;
}
return computer_move(gameinfo, passes);
}
/*
* Play a game against an ascii client.
*/
void play_ascii(SGFTree* tree, Gameinfo* gameinfo, char* filename, char* until)
{
int sz;
setvbuf(stdout, (char*)NULL, _IONBF, 0); /* No buffering. */
sgftree = *tree;
if (filename) {
/* No need to check for failure here since that was already done
* when it was loaded in main().
*
* FIXME: Why do we load the game again?
*/
gameinfo_play_sgftree(gameinfo, &sgftree, until);
sgf_initialized = 1;
} else {
if (sgfGetIntProperty(sgftree.root, "SZ", &sz))
gnugo_clear_board(sz);
if (gameinfo->handicap == 0)
gameinfo->to_move = BLACK;
else {
gameinfo->handicap = place_fixed_handicap(gameinfo->handicap);
gameinfo->to_move = WHITE;
}
sgf_initialized = 0;
}
do_play_ascii(gameinfo);
printf("\nThanks! for playing GNU Go.\n\n");
/* main() frees the tree and we might have changed it. */
*tree = sgftree;
}
void do_play_ascii(Gameinfo* gameinfo)
{
int m, num;
float fnum;
int passes = 0; /* two passes and its over */
int tmp;
char line[80];
char* line_ptr = line;
char* command;
char* tmpstring;
int state = 1;
if (have_time_settings())
clock_on = 1;
while (state == 1) {
state = 0;
/* No score is estimated yet. */
current_score_estimate = NO_SCORE;
/* Allow resignation at interface level (the engine may still be not
* allowed to resign.
*/
resignation_allowed = 1;
printf("\nBeginning ASCII mode game.\n\n");
gameinfo_print(gameinfo);
/* Does the computer play first? If so, make a move. */
if (gameinfo->computer_player == gameinfo->to_move)
state = computer_move(gameinfo, &passes);
/* main ASCII Play loop */
while (state == 0) {
/* Display game board. */
if (opt_showboard)
ascii_showboard();
#if !READLINE
/* Print the prompt */
mprintf("%s(%d): ", color_to_string(gameinfo->to_move), movenum + 1);
/* Read a line of input. */
line_ptr = line;
if (!fgets(line, 80, stdin))
return;
#else
snprintf(line, 79, "%s(%d): ",
color_to_string(gameinfo->to_move), movenum + 1);
if (!(line_ptr = readline(line)))
return;
add_history(line_ptr);
#endif
while (state == 0
&& (command = strtok(line_ptr, ";"), line_ptr = 0, command)) {
/* Get the command or move. */
switch (get_command(command)) {
case RESIGN:
state = ascii_endgame(gameinfo, 1);
break;
case END:
case EXIT:
case QUIT:
return;
case HELP:
show_commands();
break;
case CMD_HELPDEBUG:
printf(DEBUG_COMMANDS);
break;
case SHOWBOARD:
opt_showboard = !opt_showboard;
break;
case INFO:
printf("\n");
gameinfo_print(gameinfo);
break;
case SETBOARDSIZE:
if (sgf_initialized) {
printf("Boardsize cannot be changed after record is started!\n");
break;
}
command += 10;
if (sscanf(command, "%d", &num) != 1) {
printf("\nInvalid command syntax!\n");
break;
}
if (!check_boardsize(num, stdout))
break;
/* Init board. */
board_size = num;
clear_board();
/* In case max handicap changes on smaller board. */
gameinfo->handicap = place_fixed_handicap(gameinfo->handicap);
sgfOverwritePropertyInt(sgftree.root, "SZ", board_size);
sgfOverwritePropertyInt(sgftree.root, "HA", gameinfo->handicap);
break;
case SETHANDICAP:
if (sgf_initialized) {
printf("Handicap cannot be changed after game is started!\n");
break;
}
command += 9;
if (sscanf(command, "%d", &num) != 1) {
printf("\nInvalid command syntax!\n");
break;
}
if (num < 0 || num > MAX_HANDICAP) {
printf("\nInvalid handicap: %d\n", num);
break;
}
/* Init board. */
clear_board();
/* Place stones on board but don't record sgf
* in case we change more info. */
gameinfo->handicap = place_fixed_handicap(num);
printf("\nSet handicap to %d\n", gameinfo->handicap);
gameinfo->to_move = (gameinfo->handicap ? WHITE : BLACK);
break;
case FREEHANDICAP:
if (sgf_initialized) {
printf("Handicap cannot be changed after game is started!\n");
break;
}
while (*command && *command != ' ')
command++;
ascii_free_handicap(gameinfo, command);
break;
case SETKOMI:
if (sgf_initialized) {
printf("Komi cannot be modified after game record is started!\n");
break;
}
command += 5;
if (sscanf(command, "%f", &fnum) != 1) {
printf("\nInvalid command syntax!\n");
break;
}
komi = fnum;
printf("\nSet Komi to %.1f\n", komi);
break;
case SETDEPTH:
command += 6;
if (sscanf(command, "%d", &num) != 1) {
printf("\nInvalid command syntax!\n");
break;
}
mandated_depth = num;
printf("\nSet depth to %d\n", mandated_depth);
break;
case SETLEVEL:
command += 6;
if (sscanf(command, "%d", &num) != 1) {
printf("\nInvalid command syntax!\n");
break;
}
set_level(num);
printf("\nSet level to %d\n", num);
break;
case DISPLAY:
if (!opt_showboard)
ascii_showboard();
break;
case FORCE:
command += 6; /* skip the force part... */
switch (get_command(command)) {
case MOVE:
state = do_move(gameinfo, command, &passes, 1);
break;
case PASS:
state = do_pass(gameinfo, &passes, 1);
break;
default:
printf("Illegal forced move: %s %d\n", command,
get_command(command));
break;
}
break;
case MOVE:
state = do_move(gameinfo, command, &passes, 0);
break;
case PASS:
state = do_pass(gameinfo, &passes, 0);
break;
case PLAY:
command += 5;
if (sscanf(command, "%d", &num) != 1) {
printf("\nInvalid command syntax!\n");
break;
}
if (num >= 0)
for (m = 0; m < num; m++) {
gameinfo->computer_player
= OTHER_COLOR(gameinfo->computer_player);
state = computer_move(gameinfo, &passes);
if (state)
break;
if (passes >= 2)
break;
}
else {
printf("\nInvalid number of moves specified: %d\n", num);
break;
}
break;
case PLAYBLACK:
if (gameinfo->computer_player == WHITE)
gameinfo->computer_player = BLACK;
if (gameinfo->computer_player == gameinfo->to_move)
state = computer_move(gameinfo, &passes);
break;
case PLAYWHITE:
if (gameinfo->computer_player == BLACK)
gameinfo->computer_player = WHITE;
if (gameinfo->computer_player == gameinfo->to_move)
state = computer_move(gameinfo, &passes);
break;
case SWITCH:
gameinfo->computer_player = OTHER_COLOR(gameinfo->computer_player);
state = computer_move(gameinfo, &passes);
break;
case UNDO:
case CMD_BACK:
if (undo_move(1)) {
sgftreeAddComment(&sgftree, "undone");
sgftreeBack(&sgftree);
gameinfo->to_move = OTHER_COLOR(gameinfo->to_move);
} else
printf("\nCan't undo.\n");
break;
case CMD_FORWARD:
if (sgftreeForward(&sgftree))
gameinfo->to_move = gnugo_play_sgfnode(sgftree.lastnode,
gameinfo->to_move);
else
printf("\nEnd of game tree.\n");
break;
case CMD_LAST:
while (sgftreeForward(&sgftree))
gameinfo->to_move = gnugo_play_sgfnode(sgftree.lastnode,
gameinfo->to_move);
break;
case COMMENT:
printf("\nEnter comment. Press ENTER when ready.\n");
fgets(line, 80, stdin);
sgftreeAddComment(&sgftree, line);
break;
case SCORE:
showscore = !showscore;
if (!showscore)
current_score_estimate = NO_SCORE;
break;
case CMD_DEAD:
silent_examine_position(FULL_EXAMINE_DRAGONS);
showdead = !showdead;
break;
case CMD_CAPTURE:
strtok(command, " ");
showcapture(strtok(NULL, " "));
break;
case CMD_DEFEND:
strtok(command, " ");
showdefense(strtok(NULL, " "));
break;
case CMD_SHOWMOYO:
tmp = printmoyo;
printmoyo = PRINTMOYO_MOYO;
silent_examine_position(EXAMINE_DRAGONS);
printmoyo = tmp;
break;
case CMD_SHOWTERRI:
tmp = printmoyo;
printmoyo = PRINTMOYO_TERRITORY;
silent_examine_position(EXAMINE_DRAGONS);
printmoyo = tmp;
break;
case CMD_SHOWAREA:
tmp = printmoyo;
printmoyo = PRINTMOYO_AREA;
silent_examine_position(EXAMINE_DRAGONS);
printmoyo = tmp;
break;
case CMD_SHOWDRAGONS:
silent_examine_position(EXAMINE_DRAGONS);
showboard(1);
break;
case CMD_GOTO:
strtok(command, " ");
ascii_goto(gameinfo, strtok(NULL, " "));
break;
case CMD_SAVE:
strtok(command, " ");
tmpstring = strtok(NULL, " ");
if (tmpstring) {
/* discard newline */
tmpstring[strlen(tmpstring) - 1] = 0;
/* make sure we are saving proper handicap */
init_sgf(gameinfo);
writesgf(sgftree.root, tmpstring);
printf("You may resume the game");
printf(" with -l %s --mode ascii\n", tmpstring);
printf("or load %s\n", tmpstring);
} else
printf("Please specify filename\n");
break;
case CMD_LOAD:
strtok(command, " ");
tmpstring = strtok(NULL, " ");
if (tmpstring) {
/* discard newline */
tmpstring[strlen(tmpstring) - 1] = 0;
if (!sgftree_readfile(&sgftree, tmpstring)) {
fprintf(stderr, "Cannot open or parse '%s'\n", tmpstring);
break;
}
/* to avoid changing handicap etc. */
if (gameinfo_play_sgftree(gameinfo, &sgftree, NULL) == EMPTY)
fprintf(stderr, "Cannot load '%s'\n", tmpstring);
else {
sgf_initialized = 1;
sgfOverwritePropertyInt(sgftree.root, "HA", gameinfo->handicap);
}
} else
printf("Please specify a filename\n");
break;
case CMD_LISTDRAGONS:
silent_examine_position(EXAMINE_DRAGONS);
show_dragons();
break;
default:
printf("\nInvalid command: %s", command);
break;
}
if (passes >= 2)
state = ascii_endgame(gameinfo, 0);
}
#if READLINE
free(line_ptr);
#endif
}
sgffile_output(&sgftree);
passes = 0;
/* Play a different game next time. */
update_random_seed();
/* Free the sgf tree and prepare for a new game. */
sgfFreeNode(sgftree.root);
sgftree_clear(&sgftree);
sgftreeCreateHeaderNode(&sgftree, board_size, komi, gameinfo->handicap);
sgf_initialized = 0;
gameinfo_clear(gameinfo);
}
}
/* Communicates with user after a game has ended. */
static int
ascii_endgame(Gameinfo* gameinfo, int reason)
{
char line[80];
char* line_ptr;
char* command;
char* tmpstring;
int state = 0;
if (reason == 0) { /* Two passes, game is over. */
who_wins(gameinfo->computer_player, stdout);
printf("\nIf you disagree, we may count the game together.\n");
sgftreeWriteResult(&sgftree, (white_score + black_score) / 2.0, 1);
} else {
int color = OTHER_COLOR(gameinfo->to_move);
if (reason == 1) /* Our opponent has resigned. */
printf("GNU Go wins by resignation.\n");
else /* We have resigned. */
printf("You win by resignation.\n");
printf("Result: %c+Resign\n\n", color == WHITE ? 'W' : 'B');
sgftreeWriteResult(&sgftree, color == WHITE ? 1000.0 : -1000.0, 1);
}
while (state == 0) {
printf("You may optionally save the game as an SGF file.\n\n");
printf("Type \"save <filename>\" to save,\n");
if (reason == 0)
printf(" \"count\" to recount,\n");
else if (reason == 2)
printf(" \"continue\" to decline resignation and continue the game,\n");
printf(" \"quit\" to quit\n");
printf(" or \"game\" to play again\n");
line_ptr = line;
if (!fgets(line, 80, stdin))
break;
command = strtok(line_ptr, "");
switch (get_command(command)) {
case CMD_SAVE:
strtok(command, " ");
tmpstring = strtok(NULL, " ");
if (tmpstring) {
/* discard newline */
tmpstring[strlen(tmpstring) - 1] = 0;
init_sgf(gameinfo);
writesgf(sgftree.root, tmpstring);
} else
printf("Please specify filename\n");
break;
case COUNT:
if (reason == 0)
ascii_count(gameinfo);
break;
case CONTINUE:
state = -1;
break;
case NEW:
state = 1;
break;
case QUIT:
state = 2;
break;
default:
state = 0;
}
}
return state;
}
/* ascii_count() scores the game.
*/
static void
ascii_count(Gameinfo* gameinfo)
{
char line[12];
int done = 0;
int i;
int xyzzy = 1;
printf("\nGame over. Let's count!.\n");
showdead = 1;
ascii_showboard();
while (!done) {
printf("Dead stones are marked with small letters (x,o).\n");
printf("\nIf you don't agree, enter the location of a group\n");
printf("to toggle its state or \"done\".\n");
if (!fgets(line, 12, stdin))
return; /* EOF or some error */
for (i = 0; i < 12; i++)
line[i] = tolower((int)line[i]);
if (!strncmp(line, "done", 4))
done = 1;
else if (!strncmp(line, "quit", 4))
return;
else if (!strncmp(line, "xyzzy", 5)) {
if (xyzzy) {
printf("\nYou are in a debris room filled with stuff washed in from the\n");
printf("surface. A low wide passage with cobbles becomes plugged\n");
printf("with mud and debris here, but an awkward canyon leads\n");
printf("upward and west. A note on the wall says:\n");
printf(" Magic Word \"XYZZY\"\n\n");
xyzzy = 0;
} else {
printf("You are inside a building, a well house for a large spring.\n\n");
xyzzy = 1;
}
} else if (!strncmp(line, "help", 4)) {
printf("\nIf there are dead stones on the board I will remove them.\n");
printf("You must tell me where they are. Type the coordinates of a\n");
printf("dead group, or type \"done\"\n");
} else if (!strncmp(line, "undo", 4)) {
printf("UNDO not allowed anymore. The status of the stones now\n");
printf("toggles after entering the location of it.\n");
ascii_showboard();
} else {
int pos = string_to_location(board_size, line);
if (pos == NO_MOVE || board[pos] == EMPTY)
printf("\ninvalid!\n");
else {
enum dragon_status status = dragon_status(pos);
status = (status == DEAD) ? ALIVE : DEAD;
change_dragon_status(pos, status);
ascii_showboard();
}
}
}
who_wins(gameinfo->computer_player, stdout);
}
static void
showcapture(char* line)
{
int str;
int move;
gg_assert(line);
str = string_to_location(board_size, line);
if (str == NO_MOVE || board[str] == EMPTY) {
printf("\ninvalid point!\n");
return;
}
if (attack(str, &move))
mprintf("\nSuccessful attack of %1m at %1m\n", str, move);
else
mprintf("\n%1m cannot be attacked\n", str);
}
static void
showdefense(char* line)
{
int str;
int move;
gg_assert(line);
str = string_to_location(board_size, line);
if (str == NO_MOVE || board[str] == EMPTY) {
printf("\ninvalid point!\n");
return;
}
if (attack(str, NULL)) {
if (find_defense(str, &move))
mprintf("\nSuccessful defense of %1m at %1m\n", str, move);
else
mprintf("\n%1m cannot be defended\n", str);
} else
mprintf("\nThere is no need to defend %1m\n", str);
}
static void
ascii_goto(Gameinfo* gameinfo, char* line)
{
const char* movenumber = line;
if (!line)
return;
if (!strncmp(line, "last", 4))
movenumber = "9999";
else if (!strncmp(line, "first", 4))
movenumber = "1";
printf("goto %s\n", movenumber);
gameinfo_play_sgftree(gameinfo, &sgftree, movenumber);
}
static void
ascii_free_handicap(Gameinfo* gameinfo, char* handicap_string)
{
int handi;
int i;
char line[80];
int stones[MAX_BOARD * MAX_BOARD];
if (sscanf(handicap_string, "%d", &handi) == 1) {
/* GNU Go is to place handicap */
if (handi < 0 || handi == 1) {
printf("\nInvalid command syntax!\n");
return;
}
clear_board();
handi = place_free_handicap(handi);
printf("\nPlaced %d stones of free handicap.\n", handi);
} else { /* User is to place handicap */
clear_board();
handi = 0;
while (1) {
ascii_showboard();
printf("\nType in coordinates of next handicap stone, or one of the following commands:\n");
printf(" undo take back the last stone placed\n");
printf(" clear remove all the stones placed so far\n");
printf(" done finish placing handicap\n\n");
printf("You have placed %d handicap stone(s) so far.\n\n", handi);
if (!fgets(line, 80, stdin))
return; /* EOF or some error */
for (i = 0; i < 80; i++)
line[i] = tolower((int)line[i]);
if (!strncmp(line, "undo", 4)) {
if (!handi)
printf("\nNothing to undo.\n");
else {
remove_stone(stones[--handi]);
gprintf("\nRemoved the stone at %m.\n", I(stones[handi]),
J(stones[handi]));
}
} else if (!strncmp(line, "clear", 5)) {
clear_board();
handi = 0;
} else if (!strncmp(line, "done", 4)) {
if (handi == 1) /* Don't bother with checks later */
printf("\nHandicap cannot be one stone. Either add "
"some more, or delete the only stone.\n");
else
break;
} else {
int pos = string_to_location(board_size, line);
if (pos != NO_MOVE) {
if (board[pos] != EMPTY)
printf("\nThere's already a stone there.\n");
else {
add_stone(pos, BLACK);
stones[handi++] = pos;
}
} else
printf("\nInvalid command: %s", line);
}
}
}
gameinfo->handicap = handi;
gameinfo->to_move = (handi ? WHITE : BLACK);
}
/*
* Local Variables:
* tab-width: 4
* c-basic-offset: 4
* End:
*/
Fork of GNU Go supporting Xeon Phi coprocessors (and other modifications).