4 * Curses interface for GNU Shogi
6 * ----------------------------------------------------------------------
7 * Copyright (c) 1993, 1994, 1995 Matthias Mutz
8 * Copyright (c) 1999 Michael Vanier and the Free Software Foundation
9 * Copyright (c) 2008, 2013, 2014 Yann Dirson and the Free Software Foundation
11 * GNU SHOGI is based on GNU CHESS
13 * Copyright (c) 1988, 1989, 1990 John Stanback
14 * Copyright (c) 1992 Free Software Foundation
16 * This file is part of GNU SHOGI.
18 * GNU Shogi is free software; you can redistribute it and/or modify it
19 * under the terms of the GNU General Public License as published by the
20 * Free Software Foundation; either version 3 of the License,
21 * or (at your option) any later version.
23 * GNU Shogi is distributed in the hope that it will be useful, but WITHOUT
24 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
25 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
28 * You should have received a copy of the GNU General Public License along
29 * with GNU Shogi; see the file COPYING. If not, see
30 * <http://www.gnu.org/licenses/>.
31 * ----------------------------------------------------------------------
34 /* request *snprintf prototypes*/
35 #define _POSIX_C_SOURCE 200112L
41 #include <sys/param.h>
42 #include <sys/types.h>
47 #include "cursesdsp.h"
54 /* Definition of FIONREAD */
55 #include <sys/filio.h>
59 /* Definition of errno(). */
63 #define FLUSH_SCANW fflush(stdout), scanw
70 #define VIR_C(s) ((flag.reverse) ? (NO_COLS - 1 - column(s)) : column(s))
71 #define VIR_R(s) ((flag.reverse) ? (NO_ROWS - 1 - row(s)) : row(s))
73 unsigned short MV
[MAXDEPTH
];
77 /* Forward declarations. */
78 /* FIXME: change this name, puh-leeze! */
80 static void UpdateCatched(void);
81 static void DrawPiece(short sq
);
82 static void ShowScore(short score
);
84 /****************************************
85 * Trivial output functions.
86 ****************************************/
97 Curses_ClearScreen(void)
105 gotoXY(short x
, short y
)
120 Curses_ShowCurrentMove(short pnt
, short f
, short t
)
124 printw("(%2d) %5s ", pnt
, mvstr
[0]);
129 Curses_ShowDepth(char ch
)
132 printw("Depth= %d%c ", Sdepth
, ch
);
138 Curses_ShowGameType(void)
143 printw("%c vs. %c", GameType
[black
], GameType
[white
]);
152 printw("GNU Shogi %s", PACKAGE_VERSION
);
157 Curses_ShowLine(unsigned short *bstline
)
163 Curses_ShowMessage(char *s
)
172 Curses_AlwaysShowMessage(const char *format
, va_list ap
)
174 static char buffer
[60];
175 vsnprintf(buffer
, sizeof(buffer
), format
, ap
);
176 Curses_ShowMessage(buffer
);
181 Curses_Printf(const char *format
, va_list ap
)
183 static char buffer
[60];
184 vsnprintf(buffer
, sizeof(buffer
), format
, ap
);
185 printw("%s", buffer
);
190 Curses_doRequestInputString(const char* fmt
, char* buffer
)
192 FLUSH_SCANW(fmt
, buffer
);
197 Curses_GetString(char* sx
)
200 return (getstr(sx
) == ERR
);
205 Curses_ShowNodeCnt(long NodeCnt
)
208 /* printw("Nodes = %8ld, Nodes/Sec = %5ld", NodeCnt, (et > 100) ? NodeCnt / (et / 100) : 0); */
209 printw("n = %ld n/s = %ld",
210 NodeCnt
, (et
> 100) ? NodeCnt
/ (et
/ 100) : 0);
216 Curses_ShowPatternCount(short side
, short n
)
220 gotoXY(TAB
+ 10 + 3 * side
, 20); /* CHECKME */
233 gotoXY(5, ((flag
.reverse
) ? (5 + 2*NO_ROWS
) : 2));
234 printw("%s", (computer
== white
) ? "Computer" : "Human ");
235 gotoXY(5, ((flag
.reverse
) ? 2 : (5 + 2*NO_ROWS
)));
236 printw("%s", (computer
== black
) ? "Computer" : "Human ");
241 Curses_ShowPrompt(void)
243 Curses_ShowSidetoMove();
245 printw("Your move is? ");
251 Curses_ShowResponseTime(void)
257 printw("%ld, %d, %ld, %ld, %ld, %d",
258 ResponseTime
, TCC
, TCleft
, ExtraTime
, et
, flag
.timeout
);
265 Curses_ShowResults(short score
, unsigned short *bstline
, char ch
)
267 unsigned char d
, ply
;
271 Curses_ShowDepth(ch
);
275 for (ply
= 1; bstline
[ply
] > 0; ply
++)
283 algbr((short) bstline
[ply
] >> 8,
284 (short) bstline
[ply
] & 0xFF, false);
285 printw("%5s ", mvstr
[0]);
300 ShowScore(short score
)
303 printw("Score= %d", score
);
309 Curses_ShowSidetoMove(void)
312 printw("%2d: %s", 1 + GameCnt
/ 2, ColorStr
[player
]);
318 Curses_ShowStage(void)
321 printw("Stage= %2d%c B= %2d W= %2d",
322 stage
, flag
.tsume
?'T':' ', balance
[black
], balance
[white
]);
326 /****************************************
327 * End of trivial output routines.
328 ****************************************/
331 Curses_Initialize(void)
333 signal(SIGINT
, Curses_Die
);
334 signal(SIGQUIT
, Curses_Die
);
341 Curses_ExitShogi(void)
361 signal(SIGINT
, SIG_IGN
);
362 signal(SIGQUIT
, SIG_IGN
);
364 Curses_ShowMessage("Abort? ");
365 FLUSH_SCANW("%s", s
);
367 if (strcmp(s
, "yes") == 0)
370 signal(SIGINT
, Curses_Die
);
371 signal(SIGQUIT
, Curses_Die
);
376 Curses_TerminateSearch(int sig
)
378 signal(SIGINT
, SIG_IGN
);
379 signal(SIGQUIT
, SIG_IGN
);
382 flag
.musttimeout
= true;
384 Curses_ShowMessage("Terminate Search");
385 flag
.bothsides
= false;
386 signal(SIGINT
, Curses_Die
);
387 signal(SIGQUIT
, Curses_Die
);
394 Curses_ClearScreen();
395 printw("GNU Shogi %s command summary\n", PACKAGE_VERSION
);
396 printw("-------------------------------"
397 "---------------------------------\n");
398 printw("7g7f move from 7g to 7f quit Exit Shogi\n");
399 printw("S6h move silver to 6h beep turn %s\n", (flag
.beep
) ? "OFF" : "ON");
400 printw("2d2c+ move to 2c and promote material turn %s\n", (flag
.material
) ? "OFF" : "ON");
401 printw("P*5e drop pawn to 5e easy turn %s\n", (flag
.easy
) ? "OFF" : "ON");
402 printw("tsume toggle tsume mode hash turn %s\n", (flag
.hash
) ? "OFF" : "ON");
403 printw("bd redraw board reverse board display\n");
404 printw("list game to shogi.lst book turn %s used %d of %d\n", (Book
) ? "OFF" : "ON", bookcount
, BOOKSIZE
);
405 printw("undo undo last ply remove take back a move\n");
406 printw("edit edit board force toggle manual move mode\n");
407 printw("switch sides with computer both computer match\n");
408 printw("black computer plays black white computer plays white\n");
409 printw("depth set search depth clock set time control\n");
410 printw("post principle variation hint suggest a move\n", (flag
.post
) ? "OFF" : "ON");
411 printw("save game to file get game from file\n");
412 printw("random randomize play new start new game\n");
414 printw("Computer: %s", ColorStr
[computer
]);
416 printw("Opponent: %s", ColorStr
[opponent
]);
418 printw("Level: %ld", MaxResponseTime
/100);
420 printw("Easy mode: %s", (flag
.easy
) ? "ON" : "OFF");
422 printw("Tsume: %s", (flag
.tsume
) ? "ON" : "OFF");
424 printw("Depth: %d", MaxSearchDepth
);
426 printw("Random: %s", (dither
) ? "ON" : "OFF");
428 printw("Transposition table: %s", (flag
.hash
) ? "ON" : "OFF");
430 printw("Hit <RET> to return: ");
432 printw("Time Control %s %d moves %d sec %d add %d depth\n", (TCflag
) ? "ON" : "OFF",
433 TimeControl
.moves
[black
],
434 TimeControl
.clock
[black
] / 100,
435 OperatorTime
, MaxSearchDepth
);
440 fflush(stdin
); /* what is this supposed to do?? */
444 Curses_ClearScreen();
445 Curses_UpdateDisplay(0, 0, 1, 0);
449 static const short x0
[2] = { 54, 2 };
450 static const short y0
[2] = { 20, 4 };
454 * Set up a board position. Pieces are entered by typing the piece followed
455 * by the location. For example, N3f will place a knight on square 3f.
456 * P* will put a pawn to the captured pieces.
460 Curses_EditBoard(void)
462 short a
, c
, sq
, i
, found
;
466 flag
.regularstart
= true;
468 Curses_ClearScreen();
469 Curses_UpdateDisplay(0, 0, 1, 0);
471 printw(". Exit to main\n");
473 printw("# Clear board\n");
475 printw("c Change sides\n");
477 printw("Enter piece & location: ");
483 printw("Editing: %s", ColorStr
[a
]);
486 FLUSH_SCANW("%s", s
);
495 for (sq
= 0; sq
< NO_SQUARES
; sq
++)
497 board
[sq
] = no_piece
;
514 for (i
= NO_PIECES
; i
> no_piece
; i
--)
516 if ((s
[0] == pxx
[i
]) || (s
[0] == qxx
[i
]))
518 Captured
[a
][unpromoted
[i
]]++;
525 AlwaysShowMessage("Invalid piece type '%c'", s
[0]);
532 if ((c
< 0) || (c
>= NO_COLS
) || (r
< 0) || (r
>= NO_ROWS
)) {
533 AlwaysShowMessage("Out-of-board '%c%c'", s
[1], s
[2]);
539 for (i
= NO_PIECES
; i
> no_piece
; i
--)
541 if ((s
[0] == pxx
[i
]) || (s
[0] == qxx
[i
]))
545 board
[sq
] = promoted
[i
];
547 board
[sq
] = unpromoted
[i
];
555 AlwaysShowMessage("Invalid piece type '%c'", s
[0]);
560 for (sq
= 0; sq
< NO_SQUARES
; sq
++)
561 Mvboard
[sq
] = ((board
[sq
] != Stboard
[sq
]) ? 10 : 0);
568 Curses_ClearScreen();
569 Curses_UpdateDisplay(0, 0, 1, 0);
578 for (side
= black
; side
<= white
; side
++)
580 short x
, y
, piece
, cside
, k
;
582 cside
= flag
.reverse
? (side
^ 1) : side
;
587 for (piece
= pawn
; piece
<= king
; piece
++)
591 if ((n
= Captured
[side
][piece
]))
594 printw("%i%c", n
, pxx
[piece
]);
625 Curses_SearchStartStuff(short side
)
629 signal(SIGINT
, Curses_TerminateSearch
);
630 signal(SIGQUIT
, Curses_TerminateSearch
);
632 for (i
= 4; i
< 14; i
++) /* CHECKME */
641 Curses_OutputMove(void)
644 Curses_UpdateDisplay(root
->f
, root
->t
, 0, (short) root
->flags
);
649 printw("Illegal position.");
653 printw("My move is: %5s", mvstr
[0]);
662 if (root
->flags
& draw
)
663 printw("Drawn game!");
664 else if (root
->score
== -(SCORE_LIMIT
+ 999))
665 printw("Opponent mates!");
666 else if (root
->score
== SCORE_LIMIT
+ 998)
667 printw("Computer mates!");
669 else if (root
->score
< -SCORE_LIMIT
)
670 printw("Opp: mate in %d!", SCORE_LIMIT
+ 999 + root
->score
- 1);
671 else if (root
->score
> SCORE_LIMIT
)
672 printw("Comp: mate in %d!", SCORE_LIMIT
+ 998 - root
->score
- 1);
673 #endif /* VERYBUGGY */
687 if (Tree
[t
].f
|| Tree
[t
].t
)
695 ShowNodeCnt(NodeCnt
);
697 printw("Max Tree = %5d", t
);
701 Curses_ShowSidetoMove();
706 Curses_UpdateClocks(void)
713 m
= (short) ((dt
= (TimeControl
.clock
[player
] - et
)) / 6000);
714 s
= (short) ((dt
- 6000 * (long) m
) / 100);
718 m
= (short) ((dt
= et
) / 6000);
719 s
= (short) (et
- 6000 * (long) m
) / 100;
729 gotoXY(20, (flag
.reverse
) ? 2 : (5 + 2*NO_ROWS
));
731 gotoXY(20, (flag
.reverse
) ? (5 + 2*NO_ROWS
) : 2);
733 /* printw("%d:%02d %ld ", m, s, dt); */
734 printw("%d:%02d ", m
, s
);
737 ShowNodeCnt(NodeCnt
);
749 if (color
[sq
] == neutral
)
753 else if (flag
.reverse
^ (color
[sq
] == black
))
765 if (is_promoted
[(int)piece
])
768 y
= pxx
[unpromoted
[(int)piece
]];
776 gotoXY(MARGIN
+ 3 + 5 * VIR_C(sq
), 4 + 2 * ((NO_ROWS
- 1) - VIR_R(sq
)));
777 printw("%c%c%c%c", l
, p
, y
, r
);
782 * Curses_ShowPostnValue(): must have called ExaminePosition() first
785 Curses_ShowPostnValue(short sq
)
789 gotoXY(4 + 5 * VIR_C(sq
), 5 + 2 * (7 - VIR_R(sq
))); /* CHECKME */
790 score
= ScorePosition(color
[sq
]);
792 if (color
[sq
] != neutral
)
793 #if defined SAVE_SVALUE
799 printw("%3d ", svalue
[sq
]);
810 Curses_ShowPostnValues(void)
814 ExaminePosition(opponent
);
816 for (sq
= 0; sq
< NO_SQUARES
; sq
++)
817 Curses_ShowPostnValue(sq
);
819 score
= ScorePosition(opponent
);
821 printw("S%d m%d ps%d gt%c m%d ps%d gt%c", score
,
822 mtl
[computer
], pscore
[computer
], GameType
[computer
],
823 mtl
[opponent
], pscore
[opponent
], GameType
[opponent
]);
830 Curses_UpdateDisplay(short f
, short t
, short redraw
, short isspec
)
844 for (j
=0; j
<NO_COLS
; j
++)
847 while (i
<= 1 + 2*NO_ROWS
)
854 z
= NO_ROWS
+ 2 - ((i
+ 1) / 2);
856 printw("%c |", ROW_NAME(z
+1));
857 for (j
=0; j
<NO_COLS
; j
++)
862 if (i
< 2 + 2*NO_ROWS
)
865 for (j
=0; j
<NO_COLS
; j
++)
871 for (j
=0; j
<NO_COLS
; j
++)
874 gotoXY(MARGIN
, 4 + 2*NO_ROWS
);
878 printw(" 1 2 3 4 5 6 7 8 9");
880 printw(" 9 8 7 6 5 4 3 2 1");
883 printw(" 1 2 3 4 5");
885 printw(" 5 4 3 2 1");
888 for (sq
= 0; sq
< NO_SQUARES
; sq
++)
891 else /* not redraw */
899 if ((isspec
& capture
) || (isspec
& dropmask
) || redraw
)
903 for (side
= black
; side
<= white
; side
++)
905 short x
, y
, piece
, cside
, k
;
906 cside
= flag
.reverse
? (side
^ 1) : side
;
911 for (piece
= pawn
; piece
<= king
; piece
++)
915 if ((n
= Captured
[side
][piece
]))
918 printw("%i%c", n
, pxx
[piece
]);
920 if (cside
== black
) y
--; else y
++;
947 Curses_ChangeAlphaWindow(void)
949 Curses_ShowMessage("WAwindow = ");
950 FLUSH_SCANW("%hd", &WAwindow
);
951 Curses_ShowMessage("BAwindow = ");
952 FLUSH_SCANW("%hd", &BAwindow
);
957 Curses_ChangeBetaWindow(void)
959 Curses_ShowMessage("WBwindow = ");
960 FLUSH_SCANW("%hd", &WBwindow
);
961 Curses_ShowMessage("BBwindow = ");
962 FLUSH_SCANW("%hd", &BBwindow
);
967 Curses_GiveHint(void)
973 algbr((short) (hint
>> 8), (short) (hint
& 0xFF), false);
976 Curses_ShowMessage(s
);
980 Curses_ShowMessage("I have no idea.\n");
986 Curses_ChangeSearchDepth(void)
988 Curses_ShowMessage("depth = ");
989 FLUSH_SCANW("%hd", &MaxSearchDepth
);
990 TCflag
= !(MaxSearchDepth
> 0);
995 Curses_ChangeHashDepth(void)
997 Curses_ShowMessage("hashdepth = ");
998 FLUSH_SCANW("%hd", &HashDepth
);
999 Curses_ShowMessage("MoveLimit = ");
1000 FLUSH_SCANW("%hd", &HashMoveLimit
);
1005 Curses_SetContempt(void)
1007 Curses_ShowMessage("contempt = ");
1008 FLUSH_SCANW("%hd", &contempt
);
1013 Curses_ChangeXwindow(void)
1015 Curses_ShowMessage("xwndw= ");
1016 FLUSH_SCANW("%hd", &xwndw
);
1021 Curses_SelectLevel(char *sx
)
1025 Curses_ClearScreen();
1027 printw("GNU Shogi %s", PACKAGE_VERSION
);
1029 printw(" 1. 40 moves in 5 minutes");
1031 printw(" 2. 40 moves in 15 minutes");
1033 printw(" 3. 40 moves in 30 minutes");
1035 printw(" 4. all moves in 15 minutes");
1037 printw(" 5. all moves in 30 minutes");
1039 printw(" 6. all moves in 15 minutes, 30 seconds fischer clock");
1041 printw(" 7. all moves in 30 minutes, 30 seconds fischer clock");
1043 printw(" 8. 1 move in 1 minute");
1045 printw(" 9. 1 move in 15 minutes");
1047 printw("10. 1 move in 30 minutes");
1055 printw("Enter Level: ");
1057 FLUSH_SCANW("%d", &item
);
1104 flag
.onemove
= true;
1110 flag
.onemove
= true;
1116 flag
.onemove
= true;
1120 TCflag
= (TCmoves
> 0);
1122 TimeControl
.clock
[black
] = TimeControl
.clock
[white
] = 0;
1125 Curses_ClearScreen();
1126 Curses_UpdateDisplay(0, 0, 1, 0);
1131 Curses_DoDebug(void)
1133 short c
, p
, sq
, tp
, tc
, tsq
, score
;
1136 ExaminePosition(opponent
);
1137 Curses_ShowMessage("Enter piece: ");
1138 FLUSH_SCANW("%s", s
);
1141 if ((s
[0] == 'b') || (s
[0] == 'B'))
1144 if ((s
[0] == 'w') || (s
[0] == 'W'))
1147 for (p
= king
; p
> no_piece
; p
--)
1149 if ((s
[1] == pxx
[p
]) || (s
[1] == qxx
[p
]))
1153 for (sq
= 0; sq
< NO_SQUARES
; sq
++)
1159 tsq
= PieceList
[c
][1];
1160 PieceList
[c
][1] = sq
;
1161 Curses_ShowPostnValue(sq
);
1162 PieceList
[c
][1] = tsq
;
1167 score
= ScorePosition(opponent
);
1169 printw("S%d m%d ps%d gt%c m%d ps%d gt%c", score
,
1170 mtl
[computer
], pscore
[computer
], GameType
[computer
],
1171 mtl
[opponent
], pscore
[opponent
], GameType
[opponent
]);
1178 Curses_DoTable(short table
[NO_SQUARES
])
1181 ExaminePosition(opponent
);
1183 for (sq
= 0; sq
< NO_SQUARES
; sq
++)
1185 gotoXY(4 + 5 * VIR_C(sq
), 5 + 2 * (7 - VIR_R(sq
)));
1186 printw("%3d ", table
[sq
]);
1192 Curses_PollForInput(void)
1197 if ((i
= ioctl((int) 0, FIONREAD
, &nchar
)))
1201 "You probably have a non-ANSI <ioctl.h>; "
1202 "see README. %d %d %x\n",
1203 i
, errno
, FIONREAD
);
1212 flag
.bothsides
= false;
1218 Curses_SetupBoard(void)
1220 Curses_ShowMessage("'setup' command is not supported in Cursesmode");