4 * ----------------------------------------------------------------------
5 * Copyright (c) 1993, 1994, 1995 Matthias Mutz
6 * Copyright (c) 1999 Michael Vanier and the Free Software Foundation
8 * GNU SHOGI is based on GNU CHESS
10 * Copyright (c) 1988, 1989, 1990 John Stanback
11 * Copyright (c) 1992 Free Software Foundation
13 * This file is part of GNU SHOGI.
15 * GNU Shogi is free software; you can redistribute it and/or modify it
16 * under the terms of the GNU General Public License as published by the
17 * Free Software Foundation; either version 3 of the License,
18 * or (at your option) any later version.
20 * GNU Shogi is distributed in the hope that it will be useful, but WITHOUT
21 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
22 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
25 * You should have received a copy of the GNU General Public License along
26 * with GNU Shogi; see the file COPYING. If not, see
27 * <http://www.gnu.org/licenses/>.
28 * ----------------------------------------------------------------------
36 #include <sys/param.h>
37 #include <sys/types.h>
46 unsigned short MV[MAXDEPTH];
52 extern short pscore[];
54 /****************************************
55 * forward declarations
56 ****************************************/
58 void Raw_UpdateDisplay(short f, short t, short redraw, short isspec);
60 /****************************************
61 * Trivial output functions.
62 ****************************************/
67 if (!barebones && !XSHOGI)
75 if (!barebones && !XSHOGI)
77 fputs("\nYour move is? ", stdout);
83 Raw_ShowCurrentMove(short pnt, short f, short t)
89 Raw_ShowDepth(char ch)
91 if (!barebones && !XSHOGI)
93 printf("Depth= %d%c ", Sdepth, ch);
100 Raw_ShowGameType(void)
103 printf("%c vs. %c\n", GameType[black], GameType[white]);
108 Raw_ShowLine(unsigned short *bstline)
112 for (i = 1; bstline[i] > 0; i++)
114 if ((i > 1) && (i % 8 == 1))
117 algbr((short)(bstline[i] >> 8), (short)(bstline[i] & 0xFF), false);
118 printf("%5s ", mvstr[0]);
126 Raw_ShowMessage(char *s)
134 Raw_AlwaysShowMessage(const char *format, ...)
137 va_start(ap, format);
145 Raw_Printf(const char *format, ...)
148 va_start(ap, format);
155 Raw_doRequestInputString(const char* fmt, char* buffer)
162 Raw_GetString(char* sx)
168 while(!eof && !sx[0])
169 eof = (fgets(sx, 80, stdin) == NULL);
171 /* remove any trailing newline */
172 nl = strchr(sx, '\n');
181 Raw_ShowNodeCnt(long NodeCnt)
183 printf("Nodes = %ld Nodes/sec = %ld\n",
184 NodeCnt, (((et) ? ((NodeCnt * 100) / et) : 0)));
189 Raw_ShowPatternCount(short side, short n)
192 printf("%s matches %d pattern(s)\n", ColorStr[side], n);
197 Raw_ShowResponseTime(void)
203 Raw_ShowResults(short score, unsigned short *bstline, char ch)
205 if (flag.post && !XSHOGI)
208 printf("%2d%c %6d %4ld %8ld ",
209 Sdepth, ch, score, et / 100, NodeCnt);
210 Raw_ShowLine(bstline);
216 Raw_ShowSidetoMove(void)
224 printf("stage = %d\n", stage);
225 printf("balance[black] = %d balance[white] = %d\n",
226 balance[black], balance[white]);
229 /****************************************
230 * End of trivial output routines.
231 ****************************************/
241 /* needed because of inconsistency between MSVC run-time system and gcc includes */
242 setbuf(stdout, NULL);
245 setvbuf(stdout, NULL, _IOLBF, BUFSIZ);
247 # ifdef HAVE_SETLINEBUF
250 # error "Need setvbuf() or setlinebuf() to compile gnushogi!"
254 printf("GNU Shogi %s\n", PACKAGE_VERSION);
259 if (!TCflag && (MaxResponseTime == 0))
260 MaxResponseTime = 15L * 100L;
268 /* CHECKME: what purpose does this next statement serve? */
269 signal(SIGTERM, SIG_IGN);
283 Raw_ShowMessage("Abort? ");
286 if (strcmp(s, "yes") == 0)
292 Raw_TerminateSearch(int sig)
294 #ifdef INTERRUPT_TEST
295 ElapsedTime(INIT_INTERRUPT_MODE);
299 flag.back = true; /* previous: flag.timeout = true; */
301 flag.bothsides = false;
309 printf("GNU Shogi %s command summary\n", PACKAGE_VERSION);
310 printf("----------------------------------------------------------------\n");
311 printf("7g7f move from 7g to 7f quit Exit Shogi\n");
312 printf("S6h move silver to 6h beep turn %s\n",
313 (flag.beep) ? "OFF" : "ON");
314 printf("2d2c+ move to 2c and promote material turn %s\n",
315 (flag.material) ? "OFF" : "ON");
316 printf("P*5e drop pawn to 5e easy turn %s\n",
317 (flag.easy) ? "OFF" : "ON");
318 printf("tsume toggle tsume mode hash turn %s\n",
319 (flag.hash) ? "OFF" : "ON");
320 printf("bd redraw board reverse board display\n");
321 printf("list game to shogi.lst book turn %s used %d of %d\n",
322 (Book) ? "OFF" : "ON", bookcount, booksize);
323 printf("undo undo last ply remove take back a move\n");
324 printf("edit edit board force toggle manual move mode\n");
325 printf("switch sides with computer both computer match\n");
326 printf("black computer plays black white computer plays white\n");
327 printf("sd set search depth clock set time control\n");
328 printf("post principle variation hint suggest a move\n");
329 printf("save game to file get game from file\n");
330 printf("xsave pos. to xshogi file xget pos. from xshogi file\n");
331 printf("random randomize play new start new game\n");
332 printf("setup first \n");
333 printf("go computer plays now material turn %s\n",
334 flag.material ? "OFF" : "ON");
335 printf("level time control gamein \n");
336 printf("time set engine clock otime set opponent clock\n");
337 printf("Awindow Bwindow \n");
338 printf("rcptr turn %3s bsave book save\n",
339 flag.rcptr ? "OFF" : "ON ");
340 printf("hashdepth hard turn easy OFF\n");
341 printf("contempt xwndw \n");
342 printf("rv turn %3s coords turn %s\n",
343 flag.rv ? "OFF" : "ON ", flag.coords ? "OFF" : "ON");
344 printf("stars turn %3s moves \n",
345 flag.stars ? "OFF" : "ON ");
347 printf("debug depth alias for 'sd'\n");
348 printf("----------------------------------------------------------------\n");
349 printf("Computer: %-12s Opponent: %s\n",
350 ColorStr[computer], ColorStr[opponent]);
351 printf("Depth: %-12d Response time: %ld sec\n",
352 MaxSearchDepth, MaxResponseTime/100);
353 printf("Random: %-12s Easy mode: %s\n",
354 (dither) ? "ON" : "OFF", (flag.easy) ? "ON" : "OFF");
355 printf("Beep: %-12s Transposition file: %s\n",
356 (flag.beep) ? "ON" : "OFF", (flag.hash) ? "ON" : "OFF");
357 printf("Tsume: %-12s Force: %s\n",
358 (flag.tsume) ? "ON" : "OFF", (flag.force) ? "ON" : "OFF");
359 printf("Time Control %s %d moves %ld sec %d add %d depth\n",
360 (TCflag) ? "ON" : "OFF",
361 TimeControl.moves[black], TimeControl.clock[black] / 100,
362 TCadd/100, MaxSearchDepth);
367 * Set up a board position. Pieces are entered by typing the piece followed
368 * by the location. For example, Nf3 will place a knight on square f3.
373 short a, r, c, sq, i, found;
376 flag.regularstart = true;
379 Raw_UpdateDisplay(0, 0, 1, 0);
380 fputs(". Exit to main\n", stdout);
381 fputs("# Clear board\n", stdout);
382 fputs("c Change sides\n", stdout);
383 fputs("enter piece & location: \n", stdout);
394 for (sq = 0; sq < NO_SQUARES; sq++)
396 board[sq] = no_piece;
408 for (i = pawn; i <= king; i++)
410 if ((s[0] == pxx[i]) || (s[0] == qxx[i]))
427 if ((c >= 0) && (c < NO_COLS) && (r >= 0) && (r < NO_ROWS))
431 board[sq] = no_piece;
433 for (i = no_piece; i <= king; i++)
435 if ((s[0] == pxx[i]) || (s[0] == qxx[i]))
438 board[sq] = promoted[i];
453 for (sq = 0; sq < NO_SQUARES; sq++)
454 Mvboard[sq] = ((board[sq] != Stboard[sq]) ? 10 : 0);
462 Raw_UpdateDisplay(0, 0, 1, 0);
467 * Set up a board position.
468 * Nine lines of nine characters are used to setup the board. 9a-1a is the
469 * first line. White pieces are represented by uppercase characters.
480 fgets(s, 80, stdin); /* skip "setup" command */
482 for (r = NO_ROWS - 1; r >= 0; r--)
486 for (c = 0; c <= (NO_COLS - 1); c++)
491 board[sq] = no_piece;
493 for (i = no_piece; i <= king; i++)
501 else if (ch == qxx[i])
511 for (sq = 0; sq < NO_SQUARES; sq++)
512 Mvboard[sq] = ((board[sq] != Stboard[sq]) ? 10 : 0);
516 Raw_UpdateDisplay(0, 0, 1, 0);
517 fputs("Setup successful\n", stdout);
522 Raw_SearchStartStuff(short side)
526 printf("\nMove# %d Target = %ld Clock: %ld\n",
528 ResponseTime, TimeControl.clock[side]);
538 printf("Illegal position.\n");
542 if (mvstr[0][0] == '\0')
547 /* add remaining time in milliseconds to xshogi */
548 printf("%d. ... %s %ld\n", ++mycnt1, mvstr[0],
549 (TimeControl.clock[player] - et) * 10);
553 printf("%d. ... %s\n", ++mycnt1, mvstr[0]);
557 if ((root->flags & draw) || (root->score == -(SCORE_LIMIT + 999))
558 || (root->score == (SCORE_LIMIT + 998)))
571 if (Tree[t].f || Tree[t].t)
579 printf("Gen %ld Node %ld Tree %d Eval %ld Rate %ld EC %d/%d RS hi %ld lo %ld \n", GenCnt, NodeCnt, t, EvalNodes,
580 (et > 100) ? (NodeCnt / (et / 100)) : 0,
581 EADD, EGET, reminus, replus);
583 printf("Hin/Hout/Tcol/Coll/Fin/Fout = %ld/%ld/%ld/%ld/%ld/%ld\n",
584 HashAdd, HashCnt, THashCol, HashCol, FHashCnt, FHashAdd);
587 Raw_UpdateDisplay(root->f, root->t, 0, root->flags);
591 printf("My move is: %5s\n", mvstr[0]);
598 if (root->flags & draw)
600 fputs("Drawn game!\n", stdout);
602 else if (root->score == -(SCORE_LIMIT + 999))
604 printf("%s mates!\n", ColorStr[opponent]);
606 else if (root->score == (SCORE_LIMIT + 998))
608 printf("%s mates!\n", ColorStr[computer]);
611 else if (!barebones && (root->score < -SCORE_LIMIT))
613 printf("%s has a forced mate in %d moves!\n",
614 ColorStr[opponent], SCORE_LIMIT + 999 + root->score - 1);
616 else if (!barebones && (root->score > SCORE_LIMIT))
618 printf("%s has a forced mate in %d moves!\n",
619 ColorStr[computer], SCORE_LIMIT + 998 - root->score - 1);
621 #endif /* VERYBUGGY */
626 Raw_UpdateClocks(void)
632 Raw_UpdateDisplay(short f, short t, short redraw, short isspec)
637 if (redraw && !XSHOGI)
640 r = (short)(TimeControl.clock[black] / 6000);
641 c = (short)((TimeControl.clock[black] % 6000) / 100);
642 l = (short)(TimeControl.clock[white] / 6000);
643 m = (short)((TimeControl.clock[white] % 6000) / 100);
644 printf("Black %d:%02d White %d:%02d\n", r, c, l, m);
647 for (r = (NO_ROWS - 1); r >= 0; r--)
649 for (c = 0; c <= (NO_COLS - 1); c++)
653 ? locn((NO_ROWS - 1) - r, (NO_COLS - 1) - c)
655 pc = (is_promoted[board[l]] ? '+' : ' ');
657 if (color[l] == neutral)
659 else if (color[l] == black)
660 printf("%c%c", pc, qxx[board[l]]);
662 printf("%c%c", pc, pxx[board[l]]);
672 for (side = black; side <= white; side++)
675 printf((side == black)?"black ":"white ");
677 for (piece = pawn; piece <= king; piece++)
679 if ((c = Captured[side][piece]))
680 printf("%i%c ", c, pxx[piece]);
691 Raw_ChangeAlphaWindow(void)
693 printf("WAwindow: ");
694 scanf("%hd", &WAwindow);
695 printf("BAwindow: ");
696 scanf("%hd", &BAwindow);
701 Raw_ChangeBetaWindow(void)
703 printf("WBwindow: ");
704 scanf("%hd", &WBwindow);
705 printf("BBwindow: ");
706 scanf("%hd", &BBwindow);
715 algbr((short) (hint >> 8), (short) (hint & 0xFF), false);
716 printf("Hint: %s\n", mvstr[0]);
719 fputs("I have no idea.\n", stdout);
724 Raw_SelectLevel(char *sx)
726 /* FIXME: NO_SQUARES is nonsense here */
727 char T[NO_SQUARES + 1], *p;
729 strncpy(T, sx, NO_SQUARES);
730 T[NO_SQUARES] = '\0';
732 /* if line empty, ask for input */
735 fputs("Enter #moves #minutes: ", stdout);
736 fgets(T, NO_SQUARES + 1, stdin);
739 /* skip blackspace */
740 for (p = T; *p == ' '; p++) ;
742 /* could be moves or a fischer clock */
745 /* its a fischer clock game */
748 TCminutes = (short)strtol(p, &q, 10);
749 TCadd = (short)strtol(q, NULL, 10) *100;
758 TCmoves = (short)strtol(p, &q, 10);
759 TCminutes = (short)strtol(q, &q, 10);
762 TCseconds = (short)strtol(q + 1, (char **) NULL, 10);
767 fputs("Operator time (hundredths) = ", stdout);
768 scanf("%hd", &OperatorTime);
774 MaxResponseTime = TCminutes*60L * 100L + TCseconds * 100L;
775 TCminutes = TCseconds = 0;
784 TimeControl.clock[black] = TimeControl.clock[white] = 0;
789 printf("Clocks: %ld %ld\n",
790 TimeControl.clock[black] * 10,
791 TimeControl.clock[white] * 10);
797 Raw_ChangeSearchDepth(char *sx)
800 strncpy(buf, sx, 80); buf[80] = '\0';
801 /* if line empty, ask for input */
804 fgets(buf, 80+1, stdin);
806 sscanf(buf, "%hd", &MaxSearchDepth);
807 TCflag = !(MaxSearchDepth > 0);
812 Raw_ChangeHashDepth(void)
814 printf("hashdepth = ");
815 scanf("%hd", &HashDepth);
816 printf("MoveLimit = ");
817 scanf("%hd", &HashMoveLimit);
822 Raw_SetContempt(void)
824 printf("contempt = ");
825 scanf("%hd", &contempt);
830 Raw_ChangeXwindow(void)
833 scanf("%hd", &xwndw);
838 * Raw_ShowPostnValue(short sq)
839 * must have called ExaminePosition() first
842 Raw_ShowPostnValue(short sq)
844 (void) ScorePosition(color[sq]);
846 if (color[sq] != neutral)
848 #if defined SAVE_SVALUE
849 printf("???%c ", (color[sq] == white)?'b':'w');
851 printf("%3d%c ", svalue[sq], (color[sq] == white)?'b':'w');
864 short c, p, sq, tp, tc, tsq, score, j, k;
867 ExaminePosition(opponent);
868 Raw_ShowMessage("Enter piece: ");
872 if ((s[0] == 'b') || (s[0] == 'B'))
875 if ((s[0] == 'w') || (s[0] == 'W'))
878 for (p = king; p > no_piece; p--)
880 if ((s[1] == pxx[p]) || (s[1] == qxx[p]))
886 for (j = (NO_ROWS - 1); j >= 0; j--)
888 for (k = 0; k < (NO_COLS); k++)
890 sq = j*(NO_COLS) + k;
895 tsq = PieceList[c][1];
896 PieceList[c][1] = sq;
897 Raw_ShowPostnValue(sq);
898 PieceList[c][1] = tsq;
907 score = ScorePosition(opponent);
909 for (j = (NO_ROWS - 1); j >= 0; j--)
911 for (k = 0; k < (NO_COLS); k++)
913 sq = j*(NO_COLS) + k;
915 if (color[sq] != neutral)
917 #if defined SAVE_SVALUE
918 printf("%?????%c ", (color[sq] == white)?'b':'w');
920 printf("%5d%c ", svalue[sq], (color[sq] == white)?'b':'w');
932 printf("stage = %d\n", stage);
933 printf("S%d m%d ps%d gt%c m%d ps%d gt%c", score,
934 mtl[computer], pscore[computer], GameType[computer],
935 mtl[opponent], pscore[opponent], GameType[opponent]);
940 Raw_DoTable(short table[NO_SQUARES])
943 ExaminePosition(opponent);
945 for (j = (NO_ROWS - 1); j >= 0; j--)
947 for (k = 0; k < NO_COLS; k++)
949 sq = j*(NO_ROWS) + k;
950 printf("%3d ", table[sq]);
959 Raw_ShowPostnValues(void)
961 short sq, score, j, k;
962 ExaminePosition(opponent);
964 for (j = (NO_ROWS - 1); j >= 0; j--)
966 for (k = 0; k < NO_COLS; k++)
968 sq = j * NO_COLS + k;
969 Raw_ShowPostnValue(sq);
975 score = ScorePosition(opponent);
976 printf("S%d m%d ps%d gt%c m%d ps%d gt%c", score,
977 mtl[computer], pscore[computer], GameType[computer],
978 mtl[opponent], pscore[opponent], GameType[opponent]);
979 printf("\nhung black %d hung white %d\n", hung[black], hung[white]);
984 Raw_PollForInput(void)
988 if (!PeekNamedPipe(GetStdHandle(STD_INPUT_HANDLE), NULL, 0, NULL, &cnt, NULL))
991 static struct pollfd pollfds[1] = { [0] = { .fd = STDIN_FILENO,
992 .events = POLLIN } };
993 int cnt = poll(pollfds, sizeof(pollfds)/sizeof(pollfds[0]), 0);
995 perror("polling standard input");
999 if (cnt) { /* if anything to read, or error occured */
1001 flag.back = true; /* previous: flag.timeout = true; */
1002 flag.bothsides = false;
1006 struct display raw_display =
1008 .ChangeAlphaWindow = Raw_ChangeAlphaWindow,
1009 .ChangeBetaWindow = Raw_ChangeBetaWindow,
1010 .ChangeHashDepth = Raw_ChangeHashDepth,
1011 .ChangeSearchDepth = Raw_ChangeSearchDepth,
1012 .ChangeXwindow = Raw_ChangeXwindow,
1013 .ClearScreen = Raw_ClearScreen,
1014 .DoDebug = Raw_DoDebug,
1015 .DoTable = Raw_DoTable,
1016 .EditBoard = Raw_EditBoard,
1017 .ExitShogi = Raw_ExitShogi,
1018 .GiveHint = Raw_GiveHint,
1019 .Initialize = Raw_Initialize,
1020 .ShowNodeCnt = Raw_ShowNodeCnt,
1021 .OutputMove = Raw_OutputMove,
1022 .PollForInput = Raw_PollForInput,
1023 .SetContempt = Raw_SetContempt,
1024 .SearchStartStuff = Raw_SearchStartStuff,
1025 .SelectLevel = Raw_SelectLevel,
1026 .ShowCurrentMove = Raw_ShowCurrentMove,
1027 .ShowDepth = Raw_ShowDepth,
1028 .ShowGameType = Raw_ShowGameType,
1029 .ShowLine = Raw_ShowLine,
1030 .ShowMessage = Raw_ShowMessage,
1031 .AlwaysShowMessage = Raw_AlwaysShowMessage,
1032 .Printf = Raw_Printf,
1033 .doRequestInputString = Raw_doRequestInputString,
1034 .GetString = Raw_GetString,
1035 .SetupBoard = Raw_SetupBoard,
1036 .ShowPatternCount = Raw_ShowPatternCount,
1037 .ShowPostnValue = Raw_ShowPostnValue,
1038 .ShowPostnValues = Raw_ShowPostnValues,
1039 .ShowPrompt = Raw_ShowPrompt,
1040 .ShowResponseTime = Raw_ShowResponseTime,
1041 .ShowResults = Raw_ShowResults,
1042 .ShowSidetoMove = Raw_ShowSidetoMove,
1043 .ShowStage = Raw_ShowStage,
1044 .TerminateSearch = Raw_TerminateSearch,
1045 .UpdateClocks = Raw_UpdateClocks,
1046 .UpdateDisplay = Raw_UpdateDisplay,