4 * ----------------------------------------------------------------------
5 * Copyright (c) 1993, 1994, 1995 Matthias Mutz
6 * Copyright (c) 1999 Michael Vanier and the Free Software Foundation
7 * Copyright (c) 2008, 2013, 2014 Yann Dirson and the Free Software Foundation
9 * GNU SHOGI is based on GNU CHESS
11 * Copyright (c) 1988, 1989, 1990 John Stanback
12 * Copyright (c) 1992 Free Software Foundation
14 * This file is part of GNU SHOGI.
16 * GNU Shogi is free software; you can redistribute it and/or modify it
17 * under the terms of the GNU General Public License as published by the
18 * Free Software Foundation; either version 3 of the License,
19 * or (at your option) any later version.
21 * GNU Shogi is distributed in the hope that it will be useful, but WITHOUT
22 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
23 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
26 * You should have received a copy of the GNU General Public License along
27 * with GNU Shogi; see the file COPYING. If not, see
28 * <http://www.gnu.org/licenses/>.
29 * ----------------------------------------------------------------------
39 #include <sys/param.h>
40 #include <sys/types.h>
47 /****************************************
48 * forward declarations
49 ****************************************/
51 static void Raw_UpdateDisplay(short f
, short t
, short redraw
, short isspec
);
53 /****************************************
54 * Trivial output functions.
55 ****************************************/
69 fputs("\nYour move is? ", stdout
);
74 Raw_ShowCurrentMove(short pnt
, short f
, short t
)
80 Raw_ShowDepth(char ch
)
83 printf("Depth= %d%c \n", Sdepth
, ch
);
88 Raw_ShowGameType(void)
91 printf("%c vs. %c\n", GameType
[black
], GameType
[white
]);
96 Raw_ShowLine(unsigned short *bstline
)
100 for (i
= 1; bstline
[i
] > 0; i
++)
102 if ((i
> 1) && (i
% 8 == 1))
105 algbr((short)(bstline
[i
] >> 8), (short)(bstline
[i
] & 0xFF), 0);
106 printf("%5s ", mvstr
[0]);
114 Raw_ShowMessage(char *format
, ...)
119 va_start(ap
, format
);
127 Raw_AlwaysShowMessage(const char *format
, ...)
130 va_start(ap
, format
);
138 Raw_Printf(const char *format
, ...)
141 va_start(ap
, format
);
148 Raw_doRequestInputString(const char* fmt
, char* buffer
)
155 Raw_GetString(char* sx
)
161 while(!eof
&& !sx
[0])
162 eof
= (fgets(sx
, 80, stdin
) == NULL
);
164 /* remove any trailing newline */
165 nl
= strchr(sx
, '\n');
174 Raw_ShowNodeCnt(long NodeCnt
)
176 printf("Nodes = %ld Nodes/sec = %ld\n",
177 NodeCnt
, (((et
) ? ((NodeCnt
* 100) / et
) : 0)));
182 Raw_ShowPatternCount(short side
, short n
)
185 printf("%s%s matches %d pattern(s)\n", xboard
? "# " : "" , ColorStr
[side
], n
);
190 Raw_ShowResponseTime(void)
196 Raw_ShowResults(short score
, unsigned short *bstline
, char ch
)
198 if (flag
.post
&& (xboard
|| !XSHOGI
))
201 printf("%2d%c %6d %4ld %8ld ",
202 Sdepth
, ch
, score
, et
/ 100, NodeCnt
);
203 Raw_ShowLine(bstline
);
209 Raw_ShowSidetoMove(void)
217 printf("stage = %d\n", stage
);
218 printf("balance[black] = %d balance[white] = %d\n",
219 balance
[black
], balance
[white
]);
222 /****************************************
223 * End of trivial output routines.
224 ****************************************/
234 /* needed because of inconsistency between MSVC run-time system and gcc includes */
235 setbuf(stdout
, NULL
);
238 setvbuf(stdout
, NULL
, _IOLBF
, BUFSIZ
);
240 # ifdef HAVE_SETLINEBUF
243 # error "Need setvbuf() or setlinebuf() to compile gnushogi!"
247 printf("GNU Shogi %s\n", PACKAGE_VERSION
);
252 if (!TCflag
&& (MaxResponseTime
== 0))
253 MaxResponseTime
= 15L * 100L;
261 /* CHECKME: what purpose does this next statement serve? */
262 signal(SIGTERM
, SIG_IGN
);
272 Raw_TerminateSearch(int sig
)
274 #ifdef INTERRUPT_TEST
275 ElapsedTime(INIT_INTERRUPT_MODE
);
279 flag
.back
= true; /* previous: flag.timeout = true; */
281 flag
.bothsides
= false;
289 printf("GNU Shogi %s command summary\n", PACKAGE_VERSION
);
290 printf("----------------------------------------------------------------\n");
291 printf("7g7f move from 7g to 7f quit Exit Shogi\n");
292 printf("S6h move silver to 6h beep turn %s\n",
293 (flag
.beep
) ? "OFF" : "ON");
294 printf("2d2c+ move to 2c and promote\n");
295 printf("P*5e drop pawn to 5e easy turn %s\n",
296 (flag
.easy
) ? "OFF" : "ON");
297 printf("tsume toggle tsume mode hash turn %s\n",
298 (flag
.hash
) ? "OFF" : "ON");
299 printf("bd redraw board reverse board display\n");
300 printf("list game to shogi.lst book turn %s used %d of %d\n",
301 (Book
) ? "OFF" : "ON", bookcount
, booksize
);
302 printf("undo undo last ply remove take back a move\n");
303 printf("edit edit board force toggle manual move mode\n");
304 printf("switch sides with computer both computer match\n");
305 printf("black computer plays black white computer plays white\n");
306 printf("sd set search depth clock set time control\n");
307 printf("post principle variation hint suggest a move\n");
308 printf("save game to file get game from file\n");
309 printf("xsave pos. to xshogi file xget pos. from xshogi file\n");
310 printf("random randomize play new start new game\n");
311 printf("setup first \n");
312 printf("go computer plays now\n");
313 printf("level time control gamein \n");
314 printf("time set engine clock otime set opponent clock\n");
315 printf("Awindow Bwindow \n");
316 printf("rcptr turn %3s bsave book save\n",
317 flag
.rcptr
? "OFF" : "ON ");
318 printf("hashdepth hard turn easy OFF\n");
319 printf("contempt xwndw \n");
322 printf("debug depth alias for 'sd'\n");
323 printf("----------------------------------------------------------------\n");
324 printf("Computer: %-12s Opponent: %s\n",
325 ColorStr
[computer
], ColorStr
[opponent
]);
326 printf("Depth: %-12d Response time: %ld sec\n",
327 MaxSearchDepth
, MaxResponseTime
/100);
328 printf("Random: %-12s Easy mode: %s\n",
329 (dither
) ? "ON" : "OFF", (flag
.easy
) ? "ON" : "OFF");
330 printf("Beep: %-12s Transposition file: %s\n",
331 (flag
.beep
) ? "ON" : "OFF", (flag
.hash
) ? "ON" : "OFF");
332 printf("Tsume: %-12s Force: %s\n",
333 (flag
.tsume
) ? "ON" : "OFF", (flag
.force
) ? "ON" : "OFF");
334 printf("Time Control %s %d moves %ld sec %d add %d depth\n",
335 (TCflag
) ? "ON" : "OFF",
336 TimeControl
.moves
[black
], TimeControl
.clock
[black
] / 100,
337 TCadd
/100, MaxSearchDepth
);
342 * Set up a board position. Pieces are entered by typing the piece followed
343 * by the location. For example, Nf3 will place a knight on square f3.
348 short a
, r
, c
, sq
, i
, found
;
351 flag
.regularstart
= true;
354 Raw_UpdateDisplay(0, 0, 1, 0);
355 printf(". Exit to main\n");
356 printf("# Clear board\n");
357 printf("c Change sides\n");
358 printf("enter piece & location:\n");
372 for (sq
= 0; sq
< NO_SQUARES
; sq
++)
374 board
[sq
] = no_piece
;
389 for (i
= pawn
; i
<= king
; i
++)
391 if ((s
[0] == pxx
[i
]) || (s
[0] == qxx
[i
]))
399 printf("# Invalid piece type '%c'\n", s
[0]);
406 if ((c
< 0) || (c
>= NO_COLS
) || (r
< 0) || (r
>= NO_ROWS
)) {
407 printf("# Out-of-board position '%c%c'\n", s
[1], s
[2]);
413 for (i
= no_piece
; i
<= king
; i
++)
415 if ((s
[0] == pxx
[i
]) || (s
[0] == qxx
[i
]))
419 board
[sq
] = promoted
[i
];
429 printf("# Invalid piece type '%c'\n", s
[0]);
432 for (sq
= 0; sq
< NO_SQUARES
; sq
++)
433 Mvboard
[sq
] = ((board
[sq
] != Stboard
[sq
]) ? 10 : 0);
441 Raw_UpdateDisplay(0, 0, 1, 0);
446 * Set up a board position.
447 * Nine lines of nine characters are used to setup the board. 9a-1a is the
448 * first line. White pieces are represented by uppercase characters.
459 fgets(s
, 80, stdin
); /* skip "setup" command */
461 for (r
= NO_ROWS
- 1; r
>= 0; r
--)
465 for (c
= 0; c
<= (NO_COLS
- 1); c
++)
470 board
[sq
] = no_piece
;
472 for (i
= no_piece
; i
<= king
; i
++)
480 else if (ch
== qxx
[i
])
490 for (sq
= 0; sq
< NO_SQUARES
; sq
++)
491 Mvboard
[sq
] = ((board
[sq
] != Stboard
[sq
]) ? 10 : 0);
495 Raw_UpdateDisplay(0, 0, 1, 0);
496 fputs("Setup successful\n", stdout
);
501 Raw_SearchStartStuff(short side
)
505 printf("\nMove# %d Target = %ld Clock: %ld\n",
507 ResponseTime
, TimeControl
.clock
[side
]);
517 printf("Illegal position.\n");
521 if (mvstr
[0][0] == '\0')
525 if (XSHOGI
&& xboard
) /* xboard: print move in XBoard format, with 'move' prefix */
526 printf("move %s\n", mvstr
[0]);
528 /* add remaining time in milliseconds to xshogi */
529 printf("%d. ... %s %ld\n", mycnt1
, mvstr
[0],
530 (TimeControl
.clock
[player
] - et
) * 10);
532 printf("%d. ... %s\n", mycnt1
, mvstr
[0]);
535 if ((root
->flags
& draw
) || (root
->score
== -(SCORE_LIMIT
+ 999))
536 || (root
->score
== (SCORE_LIMIT
+ 998)))
549 if (Tree
[t
].f
|| Tree
[t
].t
)
557 printf("Gen %ld Node %ld Tree %d Eval %ld Rate %ld EC %d/%d RS hi %ld lo %ld \n", GenCnt
, NodeCnt
, t
, EvalNodes
,
558 (et
> 100) ? (NodeCnt
/ (et
/ 100)) : 0,
559 EADD
, EGET
, reminus
, replus
);
561 printf("Hin/Hout/Tcol/Coll/Fin/Fout = %ld/%ld/%ld/%ld/%ld/%ld\n",
562 HashAdd
, HashCnt
, THashCol
, HashCol
, FHashCnt
, FHashAdd
);
565 Raw_UpdateDisplay(root
->f
, root
->t
, 0, root
->flags
);
569 printf("My move is: %5s\n", mvstr
[0]);
576 if (root
->flags
& draw
)
577 fputs("Drawn game!\n", stdout
);
578 else if (root
->score
== -(SCORE_LIMIT
+ 999))
579 printf("%s mates!\n", ColorStr
[opponent
]);
580 else if (root
->score
== (SCORE_LIMIT
+ 998))
581 printf("%s mates!\n", ColorStr
[computer
]);
583 else if (!XSHOGI
&& (root
->score
< -SCORE_LIMIT
))
584 printf("%s%s has a forced mate in %d moves!\n", xboard
? "# " : "",
585 ColorStr
[opponent
], SCORE_LIMIT
+ 999 + root
->score
- 1);
586 else if (!XSHOGI
&& (root
->score
> SCORE_LIMIT
))
587 printf("%s%s has a forced mate in %d moves!\n", xboard
? "# " : "",
588 ColorStr
[computer
], SCORE_LIMIT
+ 998 - root
->score
- 1);
589 #endif /* VERYBUGGY */
594 Raw_UpdateClocks(void)
600 Raw_UpdateDisplay(short f
, short t
, short redraw
, short isspec
)
605 if (redraw
&& !XSHOGI
)
608 r
= (short)(TimeControl
.clock
[black
] / 6000);
609 c
= (short)((TimeControl
.clock
[black
] % 6000) / 100);
610 l
= (short)(TimeControl
.clock
[white
] / 6000);
611 m
= (short)((TimeControl
.clock
[white
] % 6000) / 100);
612 printf("Black %d:%02d White %d:%02d\n", r
, c
, l
, m
);
615 for (r
= (NO_ROWS
- 1); r
>= 0; r
--)
617 for (c
= 0; c
<= (NO_COLS
- 1); c
++)
621 ? locn((NO_ROWS
- 1) - r
, (NO_COLS
- 1) - c
)
623 pc
= (is_promoted
[board
[l
]] ? '+' : ' ');
625 if (color
[l
] == neutral
)
627 else if (color
[l
] == black
)
628 printf("%c%c", pc
, qxx
[board
[l
]]);
630 printf("%c%c", pc
, pxx
[board
[l
]]);
640 for (side
= black
; side
<= white
; side
++)
643 printf((side
== black
)?"black ":"white ");
645 for (piece
= pawn
; piece
<= king
; piece
++)
647 if ((c
= Captured
[side
][piece
]))
648 printf("%i%c ", c
, pxx
[piece
]);
659 Raw_ChangeAlphaWindow(void)
661 printf("WAwindow: ");
662 scanf("%hd", &WAwindow
);
663 printf("BAwindow: ");
664 scanf("%hd", &BAwindow
);
669 Raw_ChangeBetaWindow(void)
671 printf("WBwindow: ");
672 scanf("%hd", &WBwindow
);
673 printf("BBwindow: ");
674 scanf("%hd", &BBwindow
);
683 algbr((short) (hint
>> 8), (short) (hint
& 0xFF), 0);
684 printf("Hint: %s\n", mvstr
[0]);
687 fputs("I have no idea.\n", stdout
);
692 Raw_SelectLevel(char *sx
)
694 /* FIXME: NO_SQUARES is nonsense here */
695 char T
[NO_SQUARES
+ 1], *p
;
697 strncpy(T
, sx
, NO_SQUARES
);
698 T
[NO_SQUARES
] = '\0';
702 /* if line empty, ask for input */
705 fputs("Enter #moves #minutes: ", stdout
);
706 fgets(T
, NO_SQUARES
+ 1, stdin
);
709 /* skip blackspace */
710 for (p
= T
; *p
== ' '; p
++) ;
712 /* could be moves or a fischer clock */
715 /* its a fischer clock game */
718 TCminutes
= (short)strtol(p
, &q
, 10);
719 TCadd
= (short)strtol(q
, NULL
, 10) *100;
728 TCmoves
= (short)strtol(p
, &q
, 10);
729 TCminutes
= (short)strtol(q
, &q
, 10);
732 TCseconds
= (short)strtol(q
+ 1, (char **) NULL
, 10);
737 fputs("Operator time (hundredths) = ", stdout
);
738 scanf("%hd", &OperatorTime
);
744 MaxResponseTime
= TCminutes
*60L * 100L + TCseconds
* 100L;
745 TCminutes
= TCseconds
= 0;
754 int min
, sec
=0, inc
, mps
;
755 /* parse regular "level MPS TC INC" command of WB protocol */
756 if (sscanf(sx
, "%d %d %d", &mps
, &min
, &inc
) != 3)
757 sscanf(sx
, "%d %d:%d %d", &mps
, &min
, &sec
, &inc
);
758 TCminutes
= min
; TCseconds
= sec
;
759 TCadd
= inc
*100; TCmoves
= mps
? mps
: 50;
760 MaxResponseTime
= 0; TCflag
= true;
763 TimeControl
.clock
[black
] = TimeControl
.clock
[white
] = 0;
768 printf("Clocks: %ld %ld\n",
769 TimeControl
.clock
[black
] * 10,
770 TimeControl
.clock
[white
] * 10);
776 Raw_ChangeSearchDepth(char *sx
)
779 strncpy(buf
, sx
, 80); buf
[80] = '\0';
780 /* if line empty, ask for input */
783 fgets(buf
, 80+1, stdin
);
785 sscanf(buf
, "%hd", &MaxSearchDepth
);
786 TCflag
= !(MaxSearchDepth
> 0);
791 Raw_ChangeHashDepth(void)
793 printf("hashdepth = ");
794 scanf("%hd", &HashDepth
);
795 printf("MoveLimit = ");
796 scanf("%hd", &HashMoveLimit
);
801 Raw_SetContempt(void)
803 printf("contempt = ");
804 scanf("%hd", &contempt
);
809 Raw_ChangeXwindow(void)
812 scanf("%hd", &xwndw
);
817 * Raw_ShowPostnValue(short sq)
818 * must have called ExaminePosition() first
821 Raw_ShowPostnValue(short sq
)
823 (void) ScorePosition(color
[sq
]);
825 if (color
[sq
] != neutral
)
827 #if defined SAVE_SVALUE
828 printf("???%c ", (color
[sq
] == white
)?'b':'w');
830 printf("%3d%c ", svalue
[sq
], (color
[sq
] == white
)?'b':'w');
843 short c
, p
, sq
, tp
, tc
, tsq
, score
, j
, k
;
846 ExaminePosition(opponent
);
847 Raw_ShowMessage("Enter piece: ");
851 if ((s
[0] == 'b') || (s
[0] == 'B'))
854 if ((s
[0] == 'w') || (s
[0] == 'W'))
857 for (p
= king
; p
> no_piece
; p
--)
859 if ((s
[1] == pxx
[p
]) || (s
[1] == qxx
[p
]))
865 for (j
= (NO_ROWS
- 1); j
>= 0; j
--)
867 for (k
= 0; k
< (NO_COLS
); k
++)
869 sq
= j
*(NO_COLS
) + k
;
874 tsq
= PieceList
[c
][1];
875 PieceList
[c
][1] = sq
;
876 Raw_ShowPostnValue(sq
);
877 PieceList
[c
][1] = tsq
;
886 score
= ScorePosition(opponent
);
888 for (j
= (NO_ROWS
- 1); j
>= 0; j
--)
890 for (k
= 0; k
< (NO_COLS
); k
++)
892 sq
= j
*(NO_COLS
) + k
;
894 if (color
[sq
] != neutral
)
896 #if defined SAVE_SVALUE
897 printf("%?????%c ", (color
[sq
] == white
)?'b':'w');
899 printf("%5d%c ", svalue
[sq
], (color
[sq
] == white
)?'b':'w');
911 printf("stage = %d\n", stage
);
912 printf("S%d m%d ps%d gt%c m%d ps%d gt%c", score
,
913 mtl
[computer
], pscore
[computer
], GameType
[computer
],
914 mtl
[opponent
], pscore
[opponent
], GameType
[opponent
]);
919 Raw_DoTable(short table
[NO_SQUARES
])
922 ExaminePosition(opponent
);
924 for (j
= (NO_ROWS
- 1); j
>= 0; j
--)
926 for (k
= 0; k
< NO_COLS
; k
++)
928 sq
= j
*(NO_ROWS
) + k
;
929 printf("%3d ", table
[sq
]);
938 Raw_ShowPostnValues(void)
940 short sq
, score
, j
, k
;
941 ExaminePosition(opponent
);
943 for (j
= (NO_ROWS
- 1); j
>= 0; j
--)
945 for (k
= 0; k
< NO_COLS
; k
++)
947 sq
= j
* NO_COLS
+ k
;
948 Raw_ShowPostnValue(sq
);
954 score
= ScorePosition(opponent
);
955 printf("S%d m%d ps%d gt%c m%d ps%d gt%c", score
,
956 mtl
[computer
], pscore
[computer
], GameType
[computer
],
957 mtl
[opponent
], pscore
[opponent
], GameType
[opponent
]);
958 printf("\nhung black %d hung white %d\n", hung
[black
], hung
[white
]);
963 Raw_PollForInput(void)
967 if (!PeekNamedPipe(GetStdHandle(STD_INPUT_HANDLE
), NULL
, 0, NULL
, &cnt
, NULL
))
970 static struct pollfd pollfds
[1] = { [0] = { .fd
= STDIN_FILENO
,
971 .events
= POLLIN
} };
972 int cnt
= poll(pollfds
, sizeof(pollfds
)/sizeof(pollfds
[0]), 0);
974 perror("polling standard input");
978 if (cnt
) { /* if anything to read, or error occured */
980 flag
.back
= true; /* previous: flag.timeout = true; */
981 flag
.bothsides
= false;
985 struct display raw_display
=
987 .ChangeAlphaWindow
= Raw_ChangeAlphaWindow
,
988 .ChangeBetaWindow
= Raw_ChangeBetaWindow
,
989 .ChangeHashDepth
= Raw_ChangeHashDepth
,
990 .ChangeSearchDepth
= Raw_ChangeSearchDepth
,
991 .ChangeXwindow
= Raw_ChangeXwindow
,
992 .ClearScreen
= Raw_ClearScreen
,
993 .DoDebug
= Raw_DoDebug
,
994 .DoTable
= Raw_DoTable
,
995 .EditBoard
= Raw_EditBoard
,
996 .ExitShogi
= Raw_ExitShogi
,
997 .GiveHint
= Raw_GiveHint
,
998 .Initialize
= Raw_Initialize
,
999 .ShowNodeCnt
= Raw_ShowNodeCnt
,
1000 .OutputMove
= Raw_OutputMove
,
1001 .PollForInput
= Raw_PollForInput
,
1002 .SetContempt
= Raw_SetContempt
,
1003 .SearchStartStuff
= Raw_SearchStartStuff
,
1004 .SelectLevel
= Raw_SelectLevel
,
1005 .ShowCurrentMove
= Raw_ShowCurrentMove
,
1006 .ShowDepth
= Raw_ShowDepth
,
1007 .ShowGameType
= Raw_ShowGameType
,
1008 .ShowLine
= Raw_ShowLine
,
1009 .ShowMessage
= Raw_ShowMessage
,
1010 .AlwaysShowMessage
= Raw_AlwaysShowMessage
,
1011 .Printf
= Raw_Printf
,
1012 .doRequestInputString
= Raw_doRequestInputString
,
1013 .GetString
= Raw_GetString
,
1014 .SetupBoard
= Raw_SetupBoard
,
1015 .ShowPatternCount
= Raw_ShowPatternCount
,
1016 .ShowPostnValue
= Raw_ShowPostnValue
,
1017 .ShowPostnValues
= Raw_ShowPostnValues
,
1018 .ShowPrompt
= Raw_ShowPrompt
,
1019 .ShowResponseTime
= Raw_ShowResponseTime
,
1020 .ShowResults
= Raw_ShowResults
,
1021 .ShowSidetoMove
= Raw_ShowSidetoMove
,
1022 .ShowStage
= Raw_ShowStage
,
1023 .TerminateSearch
= Raw_TerminateSearch
,
1024 .UpdateClocks
= Raw_UpdateClocks
,
1025 .UpdateDisplay
= Raw_UpdateDisplay
,