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 * ----------------------------------------------------------------------
37 #include <sys/param.h>
38 #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), false);
106 printf("%5s ", mvstr[0]);
114 Raw_ShowMessage(char *s)
122 Raw_AlwaysShowMessage(const char *format, ...)
125 va_start(ap, format);
133 Raw_Printf(const char *format, ...)
136 va_start(ap, format);
143 Raw_doRequestInputString(const char* fmt, char* buffer)
150 Raw_GetString(char* sx)
156 while(!eof && !sx[0])
157 eof = (fgets(sx, 80, stdin) == NULL);
159 /* remove any trailing newline */
160 nl = strchr(sx, '\n');
169 Raw_ShowNodeCnt(long NodeCnt)
171 printf("Nodes = %ld Nodes/sec = %ld\n",
172 NodeCnt, (((et) ? ((NodeCnt * 100) / et) : 0)));
177 Raw_ShowPatternCount(short side, short n)
180 printf("%s%s matches %d pattern(s)\n", xboard ? "# " : "" , ColorStr[side], n);
185 Raw_ShowResponseTime(void)
191 Raw_ShowResults(short score, unsigned short *bstline, char ch)
193 if (flag.post && (xboard || !XSHOGI))
196 printf("%2d%c %6d %4ld %8ld ",
197 Sdepth, ch, score, et / 100, NodeCnt);
198 Raw_ShowLine(bstline);
204 Raw_ShowSidetoMove(void)
212 printf("stage = %d\n", stage);
213 printf("balance[black] = %d balance[white] = %d\n",
214 balance[black], balance[white]);
217 /****************************************
218 * End of trivial output routines.
219 ****************************************/
229 /* needed because of inconsistency between MSVC run-time system and gcc includes */
230 setbuf(stdout, NULL);
233 setvbuf(stdout, NULL, _IOLBF, BUFSIZ);
235 # ifdef HAVE_SETLINEBUF
238 # error "Need setvbuf() or setlinebuf() to compile gnushogi!"
242 printf("GNU Shogi %s\n", PACKAGE_VERSION);
247 if (!TCflag && (MaxResponseTime == 0))
248 MaxResponseTime = 15L * 100L;
256 /* CHECKME: what purpose does this next statement serve? */
257 signal(SIGTERM, SIG_IGN);
267 Raw_TerminateSearch(int sig)
269 #ifdef INTERRUPT_TEST
270 ElapsedTime(INIT_INTERRUPT_MODE);
274 flag.back = true; /* previous: flag.timeout = true; */
276 flag.bothsides = false;
284 printf("GNU Shogi %s command summary\n", PACKAGE_VERSION);
285 printf("----------------------------------------------------------------\n");
286 printf("7g7f move from 7g to 7f quit Exit Shogi\n");
287 printf("S6h move silver to 6h beep turn %s\n",
288 (flag.beep) ? "OFF" : "ON");
289 printf("2d2c+ move to 2c and promote material turn %s\n",
290 (flag.material) ? "OFF" : "ON");
291 printf("P*5e drop pawn to 5e easy turn %s\n",
292 (flag.easy) ? "OFF" : "ON");
293 printf("tsume toggle tsume mode hash turn %s\n",
294 (flag.hash) ? "OFF" : "ON");
295 printf("bd redraw board reverse board display\n");
296 printf("list game to shogi.lst book turn %s used %d of %d\n",
297 (Book) ? "OFF" : "ON", bookcount, booksize);
298 printf("undo undo last ply remove take back a move\n");
299 printf("edit edit board force toggle manual move mode\n");
300 printf("switch sides with computer both computer match\n");
301 printf("black computer plays black white computer plays white\n");
302 printf("sd set search depth clock set time control\n");
303 printf("post principle variation hint suggest a move\n");
304 printf("save game to file get game from file\n");
305 printf("xsave pos. to xshogi file xget pos. from xshogi file\n");
306 printf("random randomize play new start new game\n");
307 printf("setup first \n");
308 printf("go computer plays now material turn %s\n",
309 flag.material ? "OFF" : "ON");
310 printf("level time control gamein \n");
311 printf("time set engine clock otime set opponent clock\n");
312 printf("Awindow Bwindow \n");
313 printf("rcptr turn %3s bsave book save\n",
314 flag.rcptr ? "OFF" : "ON ");
315 printf("hashdepth hard turn easy OFF\n");
316 printf("contempt xwndw \n");
317 printf("rv turn %3s coords turn %s\n",
318 flag.rv ? "OFF" : "ON ", flag.coords ? "OFF" : "ON");
319 printf("stars turn %3s moves \n",
320 flag.stars ? "OFF" : "ON ");
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), false);
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 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,