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 matches %d pattern(s)\n", ColorStr[side], n);
185 Raw_ShowResponseTime(void)
191 Raw_ShowResults(short score, unsigned short *bstline, char ch)
193 if (flag.post && !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 fputs(". Exit to main\n", stdout);
356 fputs("# Clear board\n", stdout);
357 fputs("c Change sides\n", stdout);
358 fputs("enter piece & location: \n", stdout);
369 for (sq = 0; sq < NO_SQUARES; sq++)
371 board[sq] = no_piece;
383 for (i = pawn; i <= king; i++)
385 if ((s[0] == pxx[i]) || (s[0] == qxx[i]))
402 if ((c >= 0) && (c < NO_COLS) && (r >= 0) && (r < NO_ROWS))
406 board[sq] = no_piece;
408 for (i = no_piece; i <= king; i++)
410 if ((s[0] == pxx[i]) || (s[0] == qxx[i]))
413 board[sq] = promoted[i];
428 for (sq = 0; sq < NO_SQUARES; sq++)
429 Mvboard[sq] = ((board[sq] != Stboard[sq]) ? 10 : 0);
437 Raw_UpdateDisplay(0, 0, 1, 0);
442 * Set up a board position.
443 * Nine lines of nine characters are used to setup the board. 9a-1a is the
444 * first line. White pieces are represented by uppercase characters.
455 fgets(s, 80, stdin); /* skip "setup" command */
457 for (r = NO_ROWS - 1; r >= 0; r--)
461 for (c = 0; c <= (NO_COLS - 1); c++)
466 board[sq] = no_piece;
468 for (i = no_piece; i <= king; i++)
476 else if (ch == qxx[i])
486 for (sq = 0; sq < NO_SQUARES; sq++)
487 Mvboard[sq] = ((board[sq] != Stboard[sq]) ? 10 : 0);
491 Raw_UpdateDisplay(0, 0, 1, 0);
492 fputs("Setup successful\n", stdout);
497 Raw_SearchStartStuff(short side)
501 printf("\nMove# %d Target = %ld Clock: %ld\n",
503 ResponseTime, TimeControl.clock[side]);
513 printf("Illegal position.\n");
517 if (mvstr[0][0] == '\0')
521 /* add remaining time in milliseconds to xshogi */
522 printf("%d. ... %s %ld\n", ++mycnt1, mvstr[0],
523 (TimeControl.clock[player] - et) * 10);
525 printf("%d. ... %s\n", ++mycnt1, mvstr[0]);
528 if ((root->flags & draw) || (root->score == -(SCORE_LIMIT + 999))
529 || (root->score == (SCORE_LIMIT + 998)))
542 if (Tree[t].f || Tree[t].t)
550 printf("Gen %ld Node %ld Tree %d Eval %ld Rate %ld EC %d/%d RS hi %ld lo %ld \n", GenCnt, NodeCnt, t, EvalNodes,
551 (et > 100) ? (NodeCnt / (et / 100)) : 0,
552 EADD, EGET, reminus, replus);
554 printf("Hin/Hout/Tcol/Coll/Fin/Fout = %ld/%ld/%ld/%ld/%ld/%ld\n",
555 HashAdd, HashCnt, THashCol, HashCol, FHashCnt, FHashAdd);
558 Raw_UpdateDisplay(root->f, root->t, 0, root->flags);
562 printf("My move is: %5s\n", mvstr[0]);
569 if (root->flags & draw)
570 fputs("Drawn game!\n", stdout);
571 else if (root->score == -(SCORE_LIMIT + 999))
572 printf("%s mates!\n", ColorStr[opponent]);
573 else if (root->score == (SCORE_LIMIT + 998))
574 printf("%s mates!\n", ColorStr[computer]);
576 else if (!XSHOGI && (root->score < -SCORE_LIMIT))
577 printf("%s has a forced mate in %d moves!\n",
578 ColorStr[opponent], SCORE_LIMIT + 999 + root->score - 1);
579 else if (!XSHOGI && (root->score > SCORE_LIMIT))
580 printf("%s has a forced mate in %d moves!\n",
581 ColorStr[computer], SCORE_LIMIT + 998 - root->score - 1);
582 #endif /* VERYBUGGY */
587 Raw_UpdateClocks(void)
593 Raw_UpdateDisplay(short f, short t, short redraw, short isspec)
598 if (redraw && !XSHOGI)
601 r = (short)(TimeControl.clock[black] / 6000);
602 c = (short)((TimeControl.clock[black] % 6000) / 100);
603 l = (short)(TimeControl.clock[white] / 6000);
604 m = (short)((TimeControl.clock[white] % 6000) / 100);
605 printf("Black %d:%02d White %d:%02d\n", r, c, l, m);
608 for (r = (NO_ROWS - 1); r >= 0; r--)
610 for (c = 0; c <= (NO_COLS - 1); c++)
614 ? locn((NO_ROWS - 1) - r, (NO_COLS - 1) - c)
616 pc = (is_promoted[board[l]] ? '+' : ' ');
618 if (color[l] == neutral)
620 else if (color[l] == black)
621 printf("%c%c", pc, qxx[board[l]]);
623 printf("%c%c", pc, pxx[board[l]]);
633 for (side = black; side <= white; side++)
636 printf((side == black)?"black ":"white ");
638 for (piece = pawn; piece <= king; piece++)
640 if ((c = Captured[side][piece]))
641 printf("%i%c ", c, pxx[piece]);
652 Raw_ChangeAlphaWindow(void)
654 printf("WAwindow: ");
655 scanf("%hd", &WAwindow);
656 printf("BAwindow: ");
657 scanf("%hd", &BAwindow);
662 Raw_ChangeBetaWindow(void)
664 printf("WBwindow: ");
665 scanf("%hd", &WBwindow);
666 printf("BBwindow: ");
667 scanf("%hd", &BBwindow);
676 algbr((short) (hint >> 8), (short) (hint & 0xFF), false);
677 printf("Hint: %s\n", mvstr[0]);
680 fputs("I have no idea.\n", stdout);
685 Raw_SelectLevel(char *sx)
687 /* FIXME: NO_SQUARES is nonsense here */
688 char T[NO_SQUARES + 1], *p;
690 strncpy(T, sx, NO_SQUARES);
691 T[NO_SQUARES] = '\0';
693 /* if line empty, ask for input */
696 fputs("Enter #moves #minutes: ", stdout);
697 fgets(T, NO_SQUARES + 1, stdin);
700 /* skip blackspace */
701 for (p = T; *p == ' '; p++) ;
703 /* could be moves or a fischer clock */
706 /* its a fischer clock game */
709 TCminutes = (short)strtol(p, &q, 10);
710 TCadd = (short)strtol(q, NULL, 10) *100;
719 TCmoves = (short)strtol(p, &q, 10);
720 TCminutes = (short)strtol(q, &q, 10);
723 TCseconds = (short)strtol(q + 1, (char **) NULL, 10);
728 fputs("Operator time (hundredths) = ", stdout);
729 scanf("%hd", &OperatorTime);
735 MaxResponseTime = TCminutes*60L * 100L + TCseconds * 100L;
736 TCminutes = TCseconds = 0;
745 TimeControl.clock[black] = TimeControl.clock[white] = 0;
750 printf("Clocks: %ld %ld\n",
751 TimeControl.clock[black] * 10,
752 TimeControl.clock[white] * 10);
758 Raw_ChangeSearchDepth(char *sx)
761 strncpy(buf, sx, 80); buf[80] = '\0';
762 /* if line empty, ask for input */
765 fgets(buf, 80+1, stdin);
767 sscanf(buf, "%hd", &MaxSearchDepth);
768 TCflag = !(MaxSearchDepth > 0);
773 Raw_ChangeHashDepth(void)
775 printf("hashdepth = ");
776 scanf("%hd", &HashDepth);
777 printf("MoveLimit = ");
778 scanf("%hd", &HashMoveLimit);
783 Raw_SetContempt(void)
785 printf("contempt = ");
786 scanf("%hd", &contempt);
791 Raw_ChangeXwindow(void)
794 scanf("%hd", &xwndw);
799 * Raw_ShowPostnValue(short sq)
800 * must have called ExaminePosition() first
803 Raw_ShowPostnValue(short sq)
805 (void) ScorePosition(color[sq]);
807 if (color[sq] != neutral)
809 #if defined SAVE_SVALUE
810 printf("???%c ", (color[sq] == white)?'b':'w');
812 printf("%3d%c ", svalue[sq], (color[sq] == white)?'b':'w');
825 short c, p, sq, tp, tc, tsq, score, j, k;
828 ExaminePosition(opponent);
829 Raw_ShowMessage("Enter piece: ");
833 if ((s[0] == 'b') || (s[0] == 'B'))
836 if ((s[0] == 'w') || (s[0] == 'W'))
839 for (p = king; p > no_piece; p--)
841 if ((s[1] == pxx[p]) || (s[1] == qxx[p]))
847 for (j = (NO_ROWS - 1); j >= 0; j--)
849 for (k = 0; k < (NO_COLS); k++)
851 sq = j*(NO_COLS) + k;
856 tsq = PieceList[c][1];
857 PieceList[c][1] = sq;
858 Raw_ShowPostnValue(sq);
859 PieceList[c][1] = tsq;
868 score = ScorePosition(opponent);
870 for (j = (NO_ROWS - 1); j >= 0; j--)
872 for (k = 0; k < (NO_COLS); k++)
874 sq = j*(NO_COLS) + k;
876 if (color[sq] != neutral)
878 #if defined SAVE_SVALUE
879 printf("%?????%c ", (color[sq] == white)?'b':'w');
881 printf("%5d%c ", svalue[sq], (color[sq] == white)?'b':'w');
893 printf("stage = %d\n", stage);
894 printf("S%d m%d ps%d gt%c m%d ps%d gt%c", score,
895 mtl[computer], pscore[computer], GameType[computer],
896 mtl[opponent], pscore[opponent], GameType[opponent]);
901 Raw_DoTable(short table[NO_SQUARES])
904 ExaminePosition(opponent);
906 for (j = (NO_ROWS - 1); j >= 0; j--)
908 for (k = 0; k < NO_COLS; k++)
910 sq = j*(NO_ROWS) + k;
911 printf("%3d ", table[sq]);
920 Raw_ShowPostnValues(void)
922 short sq, score, j, k;
923 ExaminePosition(opponent);
925 for (j = (NO_ROWS - 1); j >= 0; j--)
927 for (k = 0; k < NO_COLS; k++)
929 sq = j * NO_COLS + k;
930 Raw_ShowPostnValue(sq);
936 score = ScorePosition(opponent);
937 printf("S%d m%d ps%d gt%c m%d ps%d gt%c", score,
938 mtl[computer], pscore[computer], GameType[computer],
939 mtl[opponent], pscore[opponent], GameType[opponent]);
940 printf("\nhung black %d hung white %d\n", hung[black], hung[white]);
945 Raw_PollForInput(void)
949 if (!PeekNamedPipe(GetStdHandle(STD_INPUT_HANDLE), NULL, 0, NULL, &cnt, NULL))
952 static struct pollfd pollfds[1] = { [0] = { .fd = STDIN_FILENO,
953 .events = POLLIN } };
954 int cnt = poll(pollfds, sizeof(pollfds)/sizeof(pollfds[0]), 0);
956 perror("polling standard input");
960 if (cnt) { /* if anything to read, or error occured */
962 flag.back = true; /* previous: flag.timeout = true; */
963 flag.bothsides = false;
967 struct display raw_display =
969 .ChangeAlphaWindow = Raw_ChangeAlphaWindow,
970 .ChangeBetaWindow = Raw_ChangeBetaWindow,
971 .ChangeHashDepth = Raw_ChangeHashDepth,
972 .ChangeSearchDepth = Raw_ChangeSearchDepth,
973 .ChangeXwindow = Raw_ChangeXwindow,
974 .ClearScreen = Raw_ClearScreen,
975 .DoDebug = Raw_DoDebug,
976 .DoTable = Raw_DoTable,
977 .EditBoard = Raw_EditBoard,
978 .ExitShogi = Raw_ExitShogi,
979 .GiveHint = Raw_GiveHint,
980 .Initialize = Raw_Initialize,
981 .ShowNodeCnt = Raw_ShowNodeCnt,
982 .OutputMove = Raw_OutputMove,
983 .PollForInput = Raw_PollForInput,
984 .SetContempt = Raw_SetContempt,
985 .SearchStartStuff = Raw_SearchStartStuff,
986 .SelectLevel = Raw_SelectLevel,
987 .ShowCurrentMove = Raw_ShowCurrentMove,
988 .ShowDepth = Raw_ShowDepth,
989 .ShowGameType = Raw_ShowGameType,
990 .ShowLine = Raw_ShowLine,
991 .ShowMessage = Raw_ShowMessage,
992 .AlwaysShowMessage = Raw_AlwaysShowMessage,
993 .Printf = Raw_Printf,
994 .doRequestInputString = Raw_doRequestInputString,
995 .GetString = Raw_GetString,
996 .SetupBoard = Raw_SetupBoard,
997 .ShowPatternCount = Raw_ShowPatternCount,
998 .ShowPostnValue = Raw_ShowPostnValue,
999 .ShowPostnValues = Raw_ShowPostnValues,
1000 .ShowPrompt = Raw_ShowPrompt,
1001 .ShowResponseTime = Raw_ShowResponseTime,
1002 .ShowResults = Raw_ShowResults,
1003 .ShowSidetoMove = Raw_ShowSidetoMove,
1004 .ShowStage = Raw_ShowStage,
1005 .TerminateSearch = Raw_TerminateSearch,
1006 .UpdateClocks = Raw_UpdateClocks,
1007 .UpdateDisplay = Raw_UpdateDisplay,