annabunches/pygo
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity
c17ed205d7
pygo/gnugo/interface/gtp_examples/gtp2_6

1168 lines
32 KiB
Plaintext
Raw Blame History

This patch to GNU Go 2.6 allows it to play with the Go Text Protocol.
diff -u -N -r -x *\.orig -x *\.info* ./configure.in ../gnugo-2.6.1/gnugo-2.6.1/configure.in
--- ./configure.in Sun Feb 13 03:02:11 2000
+++ ../gnugo-2.6.1/gnugo-2.6.1/configure.in Sat Aug 4 00:10:58 2001
@@ -8,7 +8,7 @@
AC_PREREQ(2.12)dnl dnl Minimum Autoconf version required.
dnl this defines VERSION and PACKAGE
-AM_INIT_AUTOMAKE([gnugo], [2.6])
+AM_INIT_AUTOMAKE([gnugo], [2.6.1])
GNU_PACKAGE="GNU $PACKAGE"
AC_DEFINE_UNQUOTED(GNU_PACKAGE, "$GNU_PACKAGE")
diff -u -N -r -x *\.orig -x *\.info* ./engine/liberty.h ../gnugo-2.6.1/gnugo-2.6.1/engine/liberty.h
--- ./engine/liberty.h Tue Feb 8 19:59:07 2000
+++ ../gnugo-2.6.1/gnugo-2.6.1/engine/liberty.h Fri Aug 10 16:20:09 2001
@@ -53,6 +53,7 @@
#define WHITE 1
#define BLACK 2
#define GRAY_BORDER 3
+#define GRAY 3
#define WHITE_BORDER 4
#define BLACK_BORDER 5
#define NONE 6 /* for use with is_computer_player */
@@ -138,8 +139,7 @@
void restore_state(void);
int dragon_status(int i, int j);
void change_dragon_status(int x, int y, int status);
-
-void who_wins(int color, float fkomi, FILE* stdwhat);
+void who_wins(int color, float fkomi, FILE * stdwhat);
/* data concerning a dragon. A copy is kept at each stone of the string */
@@ -362,6 +362,7 @@
void find_cuts(void);
void find_connections(void);
void endgame(void);
+float estimate_score(float komi);
/* various different strategies for finding a move */
diff -u -N -r -x *\.orig -x *\.info* ./engine/moyo.c ../gnugo-2.6.1/gnugo-2.6.1/engine/moyo.c
--- ./engine/moyo.c Tue Feb 8 19:59:07 2000
+++ ../gnugo-2.6.1/gnugo-2.6.1/engine/moyo.c Fri Aug 10 16:21:10 2001
@@ -2489,6 +2489,20 @@
fprintf(stdwhat, "%c says \"I lost!\"\n", (color == WHITE) ? 'W' : 'B');
}
+float
+estimate_score(float fkomi)
+{
+ float white_score;
+ float black_score;
+ float result;
+
+ make_moyo(BLACK);
+ white_score = (float) terri_eval[WHITE] + fkomi;
+ black_score = (float) terri_eval[BLACK];
+ result = white_score - black_score;
+ return result;
+}
+
void
diff -u -N -r -x *\.orig -x *\.info* ./engine/reading.c ../gnugo-2.6.1/gnugo-2.6.1/engine/reading.c
--- ./engine/reading.c Tue Feb 8 19:59:07 2000
+++ ../gnugo-2.6.1/gnugo-2.6.1/engine/reading.c Sat Aug 4 00:10:58 2001
@@ -2732,9 +2732,6 @@
{
int safe=0;
- if (stackp == 0 && safe_move_cache_when[i][j][color==BLACK] == movenum)
- return safe_move_cache[i][j][color==BLACK];
-
if (trymove(i, j, color, "safe_move", -1, -1)) {
int acode = attack(i, j, NULL, NULL);
if (acode != 1)
@@ -2742,10 +2739,6 @@
popgo();
}
- if (stackp == 0) {
- safe_move_cache_when[i][j][color==BLACK] = movenum;
- safe_move_cache[i][j][color==BLACK] = safe;
- }
return safe;
}
diff -u -N -r -x *\.orig -x *\.info* ./engine/sethand.c ../gnugo-2.6.1/gnugo-2.6.1/engine/sethand.c
--- ./engine/sethand.c Sat Feb 5 05:59:53 2000
+++ ../gnugo-2.6.1/gnugo-2.6.1/engine/sethand.c Sat Aug 4 00:10:58 2001
@@ -158,13 +158,16 @@
if (handicap > maxhand)
handicap = maxhand;
- sgfAddPropertyInt(sgf_root,"HA",handicap);
+ if (sgf_root)
+ sgfAddPropertyInt(sgf_root,"HA",handicap);
/* special cases: 5 and 7 */
if (handicap == 5 || handicap == 7) {
p[mid][mid] = BLACK;
handicap--;
- sgfAddStone(sgf_root,BLACK,mid,mid);
- sgf_set_stone(mid,mid,BLACK);
+ if (sgf_root) {
+ sgfAddStone(sgf_root,BLACK,mid,mid);
+ sgf_set_stone(mid,mid,BLACK);
+ }
}
for (x=0; x<handicap; ++x) {
@@ -185,8 +188,10 @@
if ( j < 0) j += board_size-1;
p[i][j] = BLACK;
- sgfAddStone(sgf_root,BLACK,i,j);
- sgf_set_stone(i,j,BLACK);
+ if (sgf_root) {
+ sgfAddStone(sgf_root,BLACK,i,j);
+ sgf_set_stone(i,j,BLACK);
+ }
}
return handicap;
}
diff -u -N -r -x *\.orig -x *\.info* ./engine/utils.c ../gnugo-2.6.1/gnugo-2.6.1/engine/utils.c
--- ./engine/utils.c Tue Feb 8 19:59:07 2000
+++ ../gnugo-2.6.1/gnugo-2.6.1/engine/utils.c Sat Aug 4 00:10:58 2001
@@ -349,7 +349,6 @@
case 's':
{
char *s = va_arg(ap, char*);
- assert( (int)*s >= board_size ); /* in case %s used in place of %m */
fputs(s, outputfile);
break;
}
diff -u -N -r -x *\.orig -x *\.info* ./interface/Makefile.am ../gnugo-2.6.1/gnugo-2.6.1/interface/Makefile.am
--- ./interface/Makefile.am Thu Feb 3 20:48:50 2000
+++ ../gnugo-2.6.1/gnugo-2.6.1/interface/Makefile.am Sat Aug 4 00:10:58 2001
@@ -26,7 +26,10 @@
play_gmp.c \
play_solo.c \
play_test.c \
- gmp.c
+ play_gtp.c \
+ gmp.c \
+ gtp.c \
+ gtp.h
AIXOPTS=-O -qmaxmem=16384 -qro -qroconst -qinfo
diff -u -N -r -x *\.orig -x *\.info* ./interface/Makefile.in ../gnugo-2.6.1/gnugo-2.6.1/interface/Makefile.in
--- ./interface/Makefile.in Mon Feb 14 07:10:44 2000
+++ ../gnugo-2.6.1/gnugo-2.6.1/interface/Makefile.in Tue Aug 14 01:17:57 2001
@@ -88,7 +88,7 @@
LDADD = ../engine/libengine.a ../patterns/libpatterns.a ../sgf/libsgf.a ../utils/libutils.a
-gnugo_SOURCES = main.c interface.c play_ascii.c play_gmp.c play_solo.c play_test.c gmp.c
+gnugo_SOURCES = main.c interface.c play_ascii.c play_gmp.c play_solo.c play_test.c play_gtp.c gmp.c gtp.c gtp.h
AIXOPTS = -O -qmaxmem=16384 -qro -qroconst -qinfo
@@ -104,7 +104,7 @@
LDFLAGS = @LDFLAGS@
LIBS = @LIBS@
gnugo_OBJECTS = main.o interface.o play_ascii.o play_gmp.o play_solo.o \
-play_test.o gmp.o
+play_test.o play_gtp.o gmp.o gtp.o
gnugo_LDADD = $(LDADD)
gnugo_DEPENDENCIES = ../engine/libengine.a ../patterns/libpatterns.a \
../sgf/libsgf.a ../utils/libutils.a
@@ -120,7 +120,7 @@
DISTFILES = $(DIST_COMMON) $(SOURCES) $(HEADERS) $(TEXINFOS) $(EXTRA_DIST)
-TAR = tar
+TAR = gtar
GZIP_ENV = --best
SOURCES = $(gnugo_SOURCES)
OBJECTS = $(gnugo_OBJECTS)
@@ -229,6 +229,7 @@
fi; \
done
gmp.o: gmp.c ../config.h gmp.h
+gtp.o: gtp.c gtp.h
interface.o: interface.c ../config.h ../sgf/sgf.h ../engine/liberty.h \
../engine/hash.h interface.h ../engine/main.h
main.o: main.c ../config.h ../utils/getopt.h ../engine/main.h \
@@ -241,6 +242,8 @@
play_gmp.o: play_gmp.c interface.h ../engine/liberty.h ../config.h \
../engine/hash.h gmp.h ../sgf/sgf.h ../sgf/ttsgf.h \
../sgf/ttsgf_write.h ../sgf/sgfana.h
+play_gtp.o: play_gtp.c ../config.h ../engine/liberty.h ../engine/hash.h \
+ interface.h gtp.h
play_solo.o: play_solo.c ../config.h interface.h ../engine/liberty.h \
../engine/hash.h ../sgf/sgf.h ../sgf/sgf_properties.h \
../sgf/ttsgf_read.h ../sgf/ttsgf.h ../sgf/sgfana.h
diff -u -N -r -x *\.orig -x *\.info* ./interface/gtp.c ../gnugo-2.6.1/gnugo-2.6.1/interface/gtp.c
--- ./interface/gtp.c Thu Jan 1 00:00:00 1970
+++ ../gnugo-2.6.1/gnugo-2.6.1/interface/gtp.c Tue Aug 14 00:50:36 2001
@@ -0,0 +1,417 @@
+/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *\
+ * This is GNU Go, a Go program. Contact gnugo@gnu.org, or see *
+ * http://www.gnu.org/software/gnugo/ for more information. *
+ * *
+ * To facilitate development of the Go Text Protocol, the two *
+ * files gtp.c and gtp.h are licensed under less restrictive *
+ * terms than the rest of GNU Go. *
+ * *
+ * Copyright 2001 by the Free Software Foundation. *
+ * *
+ * Permission is hereby granted, free of charge, to any person *
+ * obtaining a copy of this file gtp.c, to deal in the Software *
+ * without restriction, including without limitation the rights *
+ * to use, copy, modify, merge, publish, distribute, and/or *
+ * sell copies of the Software, and to permit persons to whom *
+ * the Software is furnished to do so, provided that the above *
+ * copyright notice(s) and this permission notice appear in all *
+ * copies of the Software and that both the above copyright *
+ * notice(s) and this permission notice appear in supporting *
+ * documentation. *
+ * *
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY *
+ * KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE *
+ * WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR *
+ * PURPOSE AND NONINFRINGEMENT OF THIRD PARTY RIGHTS. IN NO *
+ * EVENT SHALL THE COPYRIGHT HOLDER OR HOLDERS INCLUDED IN THIS *
+ * NOTICE BE LIABLE FOR ANY CLAIM, OR ANY SPECIAL INDIRECT OR *
+ * CONSEQUENTIAL DAMAGES, OR ANY DAMAGES WHATSOEVER RESULTING *
+ * FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF *
+ * CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT *
+ * OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS *
+ * SOFTWARE. *
+ * *
+ * Except as contained in this notice, the name of a copyright *
+ * holder shall not be used in advertising or otherwise to *
+ * promote the sale, use or other dealings in this Software *
+ * without prior written authorization of the copyright holder. *
+\* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
+
+#include <stdio.h>
+#include <string.h>
+#include <ctype.h>
+#include <assert.h>
+
+#include "gtp.h"
+
+/* These are copied from gnugo.h. We don't include this file in order
+ * to remain as independent as possible of GNU Go internals.
+ */
+#define EMPTY 0
+#define WHITE 1
+#define BLACK 2
+
+/* We need to keep track of the board size in order to be able to
+ * convert between coordinate descriptions. We could also have passed
+ * the board size in all calls needing it, but that would be
+ * unnecessarily inconvenient.
+ */
+static int gtp_boardsize = -1;
+
+/* Read stdin linewise and interpret as GTP commands. */
+void
+gtp_main_loop(struct gtp_command commands[])
+{
+ char line[GTP_BUFSIZE];
+ char command[GTP_BUFSIZE];
+ char *p;
+ int i;
+ int id;
+ int n;
+ int status = GTP_OK;
+
+ while (status == GTP_OK) {
+ /* Read a line from stdin. */
+ if (!fgets(line, GTP_BUFSIZE, stdin))
+ break; /* EOF or some error */
+
+ /* Remove comments. */
+ if ((p = strchr(line, '#')) != NULL)
+ *p = 0;
+
+ p = line;
+
+ /* Look for an identification number. */
+ if (sscanf(p, "%d%n", &id, &n) == 1)
+ p += n;
+ else
+ id = -1; /* No identification number. */
+
+ /* Look for command name. */
+ if (sscanf(p, " %s %n", command, &n) < 1)
+ continue; /* Whitespace only on this line, ignore. */
+ p += n;
+
+ /* Search the list of commands and call the corresponding function
+ * if it's found.
+ */
+ for (i = 0; commands[i].name != NULL; i++) {
+ if (strcmp(command, commands[i].name) == 0) {
+ status = (*commands[i].function)(p, id);
+ break;
+ }
+ }
+ if (commands[i].name == NULL)
+ gtp_failure(id, "unknown command: '%s'", command);
+
+ if (status == GTP_FATAL)
+ gtp_panic();
+ }
+}
+
+
+/* Set the board size used in coordinate conversions. */
+void
+gtp_internal_set_boardsize(int size)
+{
+ gtp_boardsize = size;
+}
+
+/*
+ * This function works like printf, except that it only understands
+ * very few of the standard formats, to be precise %c, %d, %f, %s.
+ * But it also accepts %m, which takes two integers and writes a move,
+ * and %C, which takes a color value and writes a color string.
+ */
+void
+gtp_mprintf(const char *fmt, ...)
+{
+ va_list ap;
+ va_start(ap, fmt);
+
+ for ( ; *fmt ; ++fmt ) {
+ if (*fmt == '%') {
+ switch (*++fmt) {
+ case 'c':
+ {
+ /* rules of promotion => passed as int, not char */
+ int c = va_arg(ap, int);
+ putc(c, stdout);
+ break;
+ }
+ case 'd':
+ {
+ int d = va_arg(ap, int);
+ fprintf(stdout, "%d", d);
+ break;
+ }
+ case 'f':
+ {
+ double f = va_arg(ap, double); /* passed as double, not float */
+ fprintf(stdout, "%f", f);
+ break;
+ }
+ case 's':
+ {
+ char *s = va_arg(ap, char*);
+ fputs(s, stdout);
+ break;
+ }
+ case 'm':
+ {
+ int m = va_arg(ap, int);
+ int n = va_arg(ap, int);
+ if (m == -1 && n == -1)
+ fputs("PASS", stdout);
+ else if ((m<0) || (n<0) || (m>=gtp_boardsize) || (n>=gtp_boardsize))
+ fprintf(stdout, "??");
+ else
+ fprintf(stdout, "%c%d", 'A' + n + (n >= 8), gtp_boardsize - m);
+ break;
+ }
+ case 'C':
+ {
+ int color = va_arg(ap, int);
+ if (color == WHITE)
+ fputs("white", stdout);
+ else if (color == BLACK)
+ fputs("black", stdout);
+ else
+ fputs("empty", stdout);
+ break;
+ }
+ default:
+ fprintf(stdout, "\n\nUnknown format character '%c'\n", *fmt);
+ break;
+ }
+ }
+ else
+ putc(*fmt, stdout);
+ }
+ va_end(ap);
+}
+
+
+/* This currently works exactly like printf. */
+void
+gtp_printf(const char *format, ...)
+{
+ va_list ap;
+ va_start(ap, format);
+ vfprintf(stdout, format, ap);
+ va_end(ap);
+}
+
+
+/* Write success or failure indication plus identity number if one was
+ * given.
+ */
+void
+gtp_printid(int id, int status)
+{
+ if (status == GTP_SUCCESS)
+ gtp_printf("=");
+ else
+ gtp_printf("?");
+
+ if (id < 0)
+ gtp_printf(" ");
+ else
+ gtp_printf("%d ", id);
+}
+
+
+/* Finish a GTP response by writing a double newline and returning GTP_OK. */
+int
+gtp_finish_response()
+{
+ gtp_printf("\n\n");
+ return GTP_OK;
+}
+
+
+/* Write a full success response. Except for the id number, the call
+ * is just like one to printf.
+ */
+int
+gtp_success(int id, const char *format, ...)
+{
+ va_list ap;
+ gtp_printid(id, GTP_SUCCESS);
+ va_start(ap, format);
+ vfprintf(stdout, format, ap);
+ va_end(ap);
+ return gtp_finish_response();
+}
+
+
+/* Write a full failure response. The call is identical to gtp_success. */
+int
+gtp_failure(int id, const char *format, ...)
+{
+ va_list ap;
+ gtp_printid(id, GTP_FAILURE);
+ va_start(ap, format);
+ vfprintf(stdout, format, ap);
+ va_end(ap);
+ return gtp_finish_response();
+}
+
+
+/* Write a panic message. */
+void
+gtp_panic()
+{
+ gtp_printf("! panic\n\n");
+}
+
+
+/* Convert a string describing a color, "b", "black", "w", or "white",
+ * to GNU Go's integer representation of colors. Return the number of
+ * characters read from the string s.
+ */
+int
+gtp_decode_color(char *s, int *color)
+{
+ char color_string[7];
+ int i;
+ int n;
+
+ assert(gtp_boardsize > 0);
+
+ if (sscanf(s, "%6s%n", color_string, &n) != 1)
+ return 0;
+
+ for (i = 0; i < (int) strlen(color_string); i++)
+ color_string[i] = tolower((int) color_string[i]);
+
+ if (strcmp(color_string, "b") == 0
+ || strcmp(color_string, "black") == 0)
+ *color = BLACK;
+ else if (strcmp(color_string, "w") == 0
+ || strcmp(color_string, "white") == 0)
+ *color = WHITE;
+ else
+ return 0;
+
+ return n;
+}
+
+
+/* Convert an intersection given by a string to two coordinates
+ * according to GNU Go's convention. Return the number of characters
+ * read from the string s.
+ */
+int
+gtp_decode_coord(char *s, int *i, int *j)
+{
+ char column;
+ int row;
+ int n;
+
+ assert(gtp_boardsize > 0);
+
+ if (sscanf(s, " %c%d%n", &column, &row, &n) != 2)
+ return 0;
+
+ if (tolower((int) column) == 'i')
+ return 0;
+ *j = tolower((int) column) - 'a';
+ if (tolower((int) column) > 'i')
+ --*j;
+
+ *i = gtp_boardsize - row;
+
+ if (*i < 0 || *i >= gtp_boardsize || *j < 0 || *j >= gtp_boardsize)
+ return 0;
+
+ return n;
+}
+
+/* Convert a move, i.e. "b" or "w" followed by a vertex to a color and
+ * coordinates. Return the number of characters read from the string
+ * s.
+ */
+int
+gtp_decode_move(char *s, int *color, int *i, int *j)
+{
+ int n1, n2;
+
+ assert(gtp_boardsize > 0);
+
+ n1 = gtp_decode_color(s, color);
+ if (n1 == 0)
+ return 0;
+
+ n2 = gtp_decode_coord(s + n1, i, j);
+ if (n2 == 0)
+ return 0;
+
+ return n1 + n2;
+}
+
+/* This a bubble sort. Given the expected size of the sets to
+ * sort, it's probably not worth the overhead to set up a call to
+ * qsort.
+ */
+static void
+sort_moves(int n, int movei[], int movej[])
+{
+ int b, a;
+ for (b = n-1; b > 0; b--) {
+ for (a = 0; a < b; a++) {
+ if (movei[a] > movei[b]
+ || (movei[a] == movei[b] && movej[a] > movej[b])) {
+ int tmp;
+ tmp = movei[b];
+ movei[b] = movei[a];
+ movei[a] = tmp;
+ tmp = movej[b];
+ movej[b] = movej[a];
+ movej[a] = tmp;
+ }
+ }
+ }
+}
+
+/* Write a number of space separated vertices. The moves are sorted
+ * before being written.
+ */
+void
+gtp_print_vertices(int n, int movei[], int movej[])
+{
+ int k;
+
+ assert(gtp_boardsize > 0);
+
+ sort_moves(n, movei, movej);
+ for (k = 0; k < n; k++) {
+ if (k > 0)
+ gtp_printf(" ");
+ if ((movei[k] == -1 && movej[k] == -1)
+ || (movei[k] == gtp_boardsize && movej[k] == gtp_boardsize))
+ gtp_printf("PASS");
+ else if (movei[k] < 0 || movei[k] >= gtp_boardsize
+ || movej[k] < 0 || movej[k] >= gtp_boardsize) {
+ gtp_printf("?? %d %d", movei[k], movej[k]);
+ }
+ else
+ gtp_printf("%c%d", 'A' + movej[k] + (movej[k] >= 8),
+ gtp_boardsize - movei[k]);
+ }
+}
+
+/* Write a single move. */
+void
+gtp_print_vertex(int i, int j)
+{
+ gtp_print_vertices(1, &i, &j);
+}
+
+
+/*
+ * Local Variables:
+ * tab-width: 8
+ * c-basic-offset: 2
+ * End:
+ */
diff -u -N -r -x *\.orig -x *\.info* ./interface/gtp.h ../gnugo-2.6.1/gnugo-2.6.1/interface/gtp.h
--- ./interface/gtp.h Thu Jan 1 00:00:00 1970
+++ ../gnugo-2.6.1/gnugo-2.6.1/interface/gtp.h Sat Aug 4 00:10:58 2001
@@ -0,0 +1,83 @@
+/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *\
+ * This is GNU Go, a Go program. Contact gnugo@gnu.org, or see *
+ * http://www.gnu.org/software/gnugo/ for more information. *
+ * *
+ * To facilitate development of the Go Text Protocol, the two *
+ * files gtp.c and gtp.h are licensed under less restrictive *
+ * terms than the rest of GNU Go. *
+ * *
+ * Copyright 2001 by the Free Software Foundation. *
+ * *
+ * Permission is hereby granted, free of charge, to any person *
+ * obtaining a copy of this file gtp.h, to deal in the Software *
+ * without restriction, including without limitation the rights *
+ * to use, copy, modify, merge, publish, distribute, and/or *
+ * sell copies of the Software, and to permit persons to whom *
+ * the Software is furnished to do so, provided that the above *
+ * copyright notice(s) and this permission notice appear in all *
+ * copies of the Software and that both the above copyright *
+ * notice(s) and this permission notice appear in supporting *
+ * documentation. *
+ * *
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY *
+ * KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE *
+ * WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR *
+ * PURPOSE AND NONINFRINGEMENT OF THIRD PARTY RIGHTS. IN NO *
+ * EVENT SHALL THE COPYRIGHT HOLDER OR HOLDERS INCLUDED IN THIS *
+ * NOTICE BE LIABLE FOR ANY CLAIM, OR ANY SPECIAL INDIRECT OR *
+ * CONSEQUENTIAL DAMAGES, OR ANY DAMAGES WHATSOEVER RESULTING *
+ * FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF *
+ * CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT *
+ * OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS *
+ * SOFTWARE. *
+ * *
+ * Except as contained in this notice, the name of a copyright *
+ * holder shall not be used in advertising or otherwise to *
+ * promote the sale, use or other dealings in this Software *
+ * without prior written authorization of the copyright holder. *
+\* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
+
+#include <stdarg.h>
+
+/* Maximum allowed line length in GTP. */
+#define GTP_BUFSIZE 1000
+
+/* Status returned from callback functions. */
+#define GTP_QUIT -1
+#define GTP_OK 0
+#define GTP_FATAL 1
+
+/* Whether the GTP command was successful. */
+#define GTP_SUCCESS 0
+#define GTP_FAILURE 1
+
+/* Function pointer for callback functions. */
+typedef int (*gtp_fn_ptr)(char *s, int id);
+
+/* Elements in the array of commands required by gtp_main_loop. */
+struct gtp_command {
+ const char *name;
+ gtp_fn_ptr function;
+};
+
+void gtp_main_loop(struct gtp_command commands[]);
+void gtp_internal_set_boardsize(int size);
+void gtp_mprintf(const char *format, ...);
+void gtp_printf(const char *format, ...);
+void gtp_printid(int id, int status);
+int gtp_finish_response(void);
+int gtp_success(int id, const char *format, ...);
+int gtp_failure(int id, const char *format, ...);
+void gtp_panic(void);
+int gtp_decode_color(char *s, int *color);
+int gtp_decode_coord(char *s, int *m, int *n);
+int gtp_decode_move(char *s, int *color, int *i, int *j);
+void gtp_print_vertices(int n, int movei[], int movej[]);
+void gtp_print_vertex(int i, int j);
+
+/*
+ * Local Variables:
+ * tab-width: 8
+ * c-basic-offset: 2
+ * End:
+ */
diff -u -N -r -x *\.orig -x *\.info* ./interface/interface.c ../gnugo-2.6.1/gnugo-2.6.1/interface/interface.c
--- ./interface/interface.c Sat Feb 5 06:03:19 2000
+++ ../gnugo-2.6.1/gnugo-2.6.1/interface/interface.c Tue Aug 14 00:49:58 2001
@@ -326,14 +326,14 @@
int
clear_board(board_t **board)
{
- if(board==NULL)
- {
+ if (board==NULL) {
memset(p,EMPTY,sizeof(p));
- }
- else
- {
- memset(board,EMPTY,MAX_BOARD*MAX_BOARD*sizeof(board_t));
- }
+ }
+ else {
+ memset(board,EMPTY,MAX_BOARD*MAX_BOARD*sizeof(board_t));
+ }
+ white_captured = 0;
+ black_captured = 0;
return 1;
}
diff -u -N -r -x *\.orig -x *\.info* ./interface/interface.h ../gnugo-2.6.1/gnugo-2.6.1/interface/interface.h
--- ./interface/interface.h Sat Feb 5 06:03:25 2000
+++ ../gnugo-2.6.1/gnugo-2.6.1/interface/interface.h Sat Aug 4 00:10:58 2001
@@ -42,6 +42,7 @@
void play_ascii(char * filename);
void play_ascii_emacs(char * filename);
void play_gmp(void);
+void play_gtp(void);
void play_solo(int);
void play_test(struct SGFNode *, enum testmode);
int load_sgf_file(struct SGFNode *, const char *untilstr);
diff -u -N -r -x *\.orig -x *\.info* ./interface/main.c ../gnugo-2.6.1/gnugo-2.6.1/interface/main.c
--- ./interface/main.c Sat Feb 12 04:37:42 2000
+++ ../gnugo-2.6.1/gnugo-2.6.1/interface/main.c Sat Aug 4 00:10:58 2001
@@ -79,7 +79,7 @@
Usage : gnugo [-opts]\n\
\n\
Main Options:\n\
- --mode <mode> Force the playing mode ('ascii', 'test' or 'gmp').\n\
+ --mode <mode> Select mode ('ascii', 'test, 'gmp', 'gtp').\n\
Default is ASCII.\n\
If no terminal is detected GMP (Go Modem Protocol)\n\
will be assumed.\n\
@@ -185,6 +185,7 @@
MODE_ASCII,
MODE_ASCII_EMACS,
MODE_GMP,
+ MODE_GTP,
MODE_SGF,
MODE_LOAD_AND_ANALYZE,
MODE_LOAD_AND_SCORE,
@@ -482,6 +483,7 @@
if (strcmp(optarg,"ascii")==0) playmode = MODE_ASCII;
else if (strcmp(optarg,"emacs")==0) playmode = MODE_ASCII_EMACS;
else if (strcmp(optarg,"gmp")==0) playmode = MODE_GMP;
+ else if (strcmp(optarg,"gtp")==0) playmode = MODE_GTP;
else if (strcmp(optarg,"test")==0) playmode = MODE_TEST;
else {
fprintf(stderr,"Invalid mode selection: %s\n",optarg);
@@ -718,6 +720,10 @@
set_computer_player(NONE);
}
play_ascii_emacs(infile);
+ break;
+
+ case MODE_GTP:
+ play_gtp();
break;
case MODE_ASCII :
diff -u -N -r -x *\.orig -x *\.info* ./interface/play_gtp.c ../gnugo-2.6.1/gnugo-2.6.1/interface/play_gtp.c
--- ./interface/play_gtp.c Thu Jan 1 00:00:00 1970
+++ ../gnugo-2.6.1/gnugo-2.6.1/interface/play_gtp.c Tue Aug 14 01:16:03 2001
@@ -0,0 +1,377 @@
+/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *\
+ * 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 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. *
+ * *
+ * 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. *
+\* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
+
+#ifdef HAVE_CONFIG_H
+#include <config.h>
+#endif
+
+#include <stdio.h>
+#include <assert.h>
+#include <ctype.h>
+#include <string.h>
+
+#include "liberty.h"
+#include "interface.h"
+#include "gtp.h"
+
+#define MAXLIBS (2*(MAX_BOARD*MAX_BOARD + 1)/3)
+#define UNUSED(x) x=x
+
+/* Internal state that's not part of the engine. */
+int color_to_move;
+float komi;
+int handicap;
+
+#define DECLARE(func) static int func(char *s, int id)
+
+DECLARE(gtp_fixed_handicap);
+DECLARE(gtp_genmove_black);
+DECLARE(gtp_genmove_white);
+DECLARE(gtp_name);
+DECLARE(gtp_estimate_score);
+DECLARE(gtp_playblack);
+DECLARE(gtp_playwhite);
+DECLARE(gtp_quit);
+DECLARE(gtp_set_boardsize);
+DECLARE(gtp_set_komi);
+DECLARE(gtp_showboard);
+DECLARE(gtp_version);
+DECLARE(gtp_help);
+float estimate_score(float komi);
+
+void play_gtp(void);
+
+/* List of known commands. */
+static struct gtp_command commands[] = {
+ {"black", gtp_playblack},
+ {"boardsize", gtp_set_boardsize},
+ {"fixed_handicap", gtp_fixed_handicap},
+ {"genmove_black", gtp_genmove_black},
+ {"genmove_white", gtp_genmove_white},
+ {"help", gtp_help},
+ {"komi", gtp_set_komi},
+ {"name", gtp_name},
+ {"estimate_score", gtp_estimate_score},
+ {"quit", gtp_quit},
+ {"showboard", gtp_showboard},
+ {"version", gtp_version},
+ {"white", gtp_playwhite},
+ {NULL, NULL}
+};
+
+
+/* Start playing using the Go Text Protocol. */
+void
+play_gtp(void)
+{
+ /* Try to make sure that we have a useful level of buffering of stdout. */
+#ifdef HAVE_SETLINEBUF
+ setlinebuf(stdout);
+#else
+ setbuf(stdout, NULL);
+#endif
+
+ gtp_internal_set_boardsize(19);
+
+ gtp_main_loop(commands);
+}
+
+
+/* Function: Quit
+ * Arguments: none
+ * Fails: never
+ * Returns: nothing
+ */
+static int
+gtp_quit(char *s, int id)
+{
+ UNUSED(s);
+ gtp_success(id, "");
+ return GTP_QUIT;
+}
+
+
+/****************************
+ * Program identity. *
+ ****************************/
+
+/* Function: Report the name of the program.
+ * Arguments: none
+ * Fails: never
+ * Returns: program name
+ */
+static int
+gtp_name(char *s, int id)
+{
+ UNUSED(s);
+ return gtp_success(id, "GNU Go");
+}
+
+
+/* Function: Report the version number of the program.
+ * Arguments: none
+ * Fails: never
+ * Returns: version number
+ */
+static int
+gtp_version(char *s, int id)
+{
+ UNUSED(s);
+ return gtp_success(id, VERSION);
+}
+
+
+/* Function: Set the board size to NxN and clear the board.
+ * Arguments: integer
+ * Fails: board size outside engine's limits
+ * Returns: nothing
+ */
+static int
+gtp_set_boardsize(char *s, int id)
+{
+ int boardsize;
+ if (sscanf(s, "%d", &boardsize) < 1)
+ return gtp_failure(id, "boardsize not an integer");
+
+ if (boardsize < MIN_BOARD || boardsize > MAX_BOARD)
+ return gtp_failure(id, "unacceptable boardsize");
+
+ set_boardsize(boardsize);
+ clear_board(NULL);
+ gtp_internal_set_boardsize(boardsize);
+ return gtp_success(id, "");
+}
+
+
+/* Function: Set the komi.
+ * Arguments: float
+ * Fails: incorrect argument
+ * Returns: nothing
+ */
+static int
+gtp_set_komi(char *s, int id)
+{
+ if (sscanf(s, "%f", &komi) < 1)
+ return gtp_failure(id, "komi not a float");
+
+ return gtp_success(id, "");
+}
+
+
+/* Function: Play a black stone at the given vertex.
+ * Arguments: vertex
+ * Fails: invalid vertex, illegal move
+ * Returns: nothing
+ */
+static int
+gtp_playblack(char *s, int id)
+{
+ int i, j;
+ char *c;
+
+ for (c = s; *c; c++)
+ *c = tolower(*c);
+
+ if (strncmp(s, "pass", 4) == 0) {
+ i = get_boardsize();
+ j = get_boardsize();
+ }
+ else if (!gtp_decode_coord(s, &i, &j))
+ return gtp_failure(id, "invalid coordinate");
+
+ if (!legal(i, j, BLACK))
+ return gtp_failure(id, "illegal move");
+
+ updateboard(i, j, BLACK);
+ return gtp_success(id, "");
+}
+
+
+/* Function: Play a white stone at the given vertex.
+ * Arguments: vertex
+ * Fails: invalid vertex, illegal move
+ * Returns: nothing
+ */
+static int
+gtp_playwhite(char *s, int id)
+{
+ int i, j;
+ char *c;
+
+ for (c = s; *c; c++)
+ *c = tolower(*c);
+
+ if (strncmp(s, "pass", 4) == 0) {
+ i = get_boardsize();
+ j = get_boardsize();
+ }
+ else if (!gtp_decode_coord(s, &i, &j))
+ return gtp_failure(id, "invalid coordinate");
+
+ if (!legal(i, j, WHITE))
+ return gtp_failure(id, "illegal move");
+
+ updateboard(i, j, WHITE);
+ return gtp_success(id, "");
+}
+
+
+/* Function: Set up fixed placement handicap stones.
+ * Arguments: number of handicap stones
+ * Fails: invalid number of stones for the current boardsize
+ * Returns: list of vertices with handicap stones
+ */
+static int
+gtp_fixed_handicap(char *s, int id)
+{
+ int m, n;
+ int first = 1;
+ int handicap;
+ if (sscanf(s, "%d", &handicap) < 1)
+ return gtp_failure(id, "handicap not an integer");
+
+ clear_board(NULL);
+ if (sethand(handicap) != handicap)
+ return gtp_failure(id, "invalid handicap");
+
+ gtp_printid(id, GTP_SUCCESS);
+
+ for (m = 0; m < board_size; m++)
+ for (n = 0; n < board_size; n++)
+ if (p[m][n] != EMPTY) {
+ if (!first)
+ gtp_printf(" ");
+ else
+ first = 0;
+ gtp_mprintf("%m", m, n);
+ }
+
+ return gtp_finish_response();
+}
+
+
+/* Function: Generate and play the supposedly best black move.
+ * Arguments: none
+ * Fails: never
+ * Returns: a move coordinate (or "PASS")
+ */
+static int
+gtp_genmove_black(char *s, int id)
+{
+ int i, j;
+ UNUSED(s);
+
+ if (genmove(&i, &j, BLACK) >= 0)
+ updateboard(i, j, BLACK);
+
+ gtp_printid(id, GTP_SUCCESS);
+ gtp_print_vertex(i, j);
+ return gtp_finish_response();
+}
+
+
+
+
+/* Function: Generate and play the supposedly best white move.
+ * Arguments: none
+ * Fails: never
+ * Returns: a move coordinate (or "PASS")
+ */
+static int
+gtp_genmove_white(char *s, int id)
+{
+ int i, j;
+ UNUSED(s);
+ if (genmove(&i, &j, WHITE) >= 0)
+ updateboard(i, j, WHITE);
+
+ gtp_printid(id, GTP_SUCCESS);
+ gtp_print_vertex(i, j);
+ return gtp_finish_response();
+}
+
+static int
+gtp_estimate_score(char *s, int id)
+{
+ int i, j;
+ float score;
+ UNUSED(s);
+
+ genmove(&i, &j, BLACK);
+ score = estimate_score(komi);
+
+ gtp_printid(id, GTP_SUCCESS);
+ if (score > 0.0)
+ gtp_printf("W+%3.1f (upper bound: %3.1f, lower: %3.1f)",
+ score, score, score);
+ else if (score < 0.0)
+ gtp_printf("B+%3.1f (upper bound: %3.1f, lower: %3.1f)",
+ -score, score, score);
+ else
+ gtp_printf("0");
+ return gtp_finish_response();
+}
+
+
+/* Function: Write the position to stderr.
+ * Arguments: none
+ * Fails: never
+ * Returns: nothing
+ */
+static int
+gtp_showboard(char *s, int id)
+{
+ UNUSED(s);
+ showboard(1);
+ return gtp_success(id, "");
+}
+
+
+/* Function: List all known commands
+ * Arguments: none
+ * Fails: never
+ * Returns: list of known commands, one per line
+ */
+static int
+gtp_help(char *s, int id)
+{
+ int k;
+ UNUSED(s);
+
+ gtp_printid(id, GTP_SUCCESS);
+
+ for (k = 0; commands[k].name != NULL; k++)
+ gtp_printf("%s\n", commands[k].name);
+
+ gtp_printf("\n");
+ return GTP_OK;
+}
+
+
+
+
+/*
+ * Local Variables:
+ * tab-width: 8
+ * c-basic-offset: 2
+ * End:
+ */
Reference in New Issue View Git Blame Copy Permalink