XBoard: select an xboard-compatible implementation of "level" command
[gnushogi.git] / gnushogi / rawdsp.c
1 /*
2  * FILE: rawdsp.c
3  *
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
8  *
9  * GNU SHOGI is based on GNU CHESS
10  *
11  * Copyright (c) 1988, 1989, 1990 John Stanback
12  * Copyright (c) 1992 Free Software Foundation
13  *
14  * This file is part of GNU SHOGI.
15  *
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.
20  *
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
24  * for more details.
25  *
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  * ----------------------------------------------------------------------
30  *
31  */
32
33 #include <ctype.h>
34 #include <signal.h>
35 #include <stdarg.h>
36 #include <stdio.h>
37 #include <sys/param.h>
38 #include <sys/types.h>
39 #include <sys/file.h>
40 #ifndef WIN32
41 #include <poll.h>
42 #include <unistd.h>
43 #endif
44
45 #include "gnushogi.h"
46
47 /****************************************
48  * forward declarations
49  ****************************************/
50
51 static void Raw_UpdateDisplay(short f, short t, short redraw, short isspec);
52
53 /****************************************
54  * Trivial output functions.
55  ****************************************/
56
57 static void
58 Raw_ClearScreen(void)
59 {
60     if (!XSHOGI)
61         printf("\n");
62 }
63
64
65 static void
66 Raw_ShowPrompt(void)
67 {
68     if (!XSHOGI)
69         fputs("\nYour move is? ", stdout);
70 }
71
72
73 static void
74 Raw_ShowCurrentMove(short pnt, short f, short t)
75 {
76 }
77
78
79 static void
80 Raw_ShowDepth(char ch)
81 {
82     if (!XSHOGI)
83         printf("Depth= %d%c \n", Sdepth, ch);
84 }
85
86
87 static void
88 Raw_ShowGameType(void)
89 {
90     if (flag.post)
91         printf("%c vs. %c\n", GameType[black], GameType[white]);
92 }
93
94
95 static void
96 Raw_ShowLine(unsigned short *bstline)
97 {
98     int i;
99
100     for (i = 1; bstline[i] > 0; i++)
101     {
102         if ((i > 1) && (i % 8 == 1))
103             printf("\n                          ");
104
105         algbr((short)(bstline[i] >> 8), (short)(bstline[i] & 0xFF), false);
106         printf("%5s ", mvstr[0]);
107     }
108
109     printf("\n");
110 }
111
112
113 static void
114 Raw_ShowMessage(char *s)
115 {
116     if (!XSHOGI)
117         printf("%s\n", s);
118 }
119
120
121 static void
122 Raw_AlwaysShowMessage(const char *format, ...)
123 {
124     va_list ap;
125     va_start(ap, format);
126     vprintf(format, ap);
127     printf("\n");
128     va_end(ap);
129 }
130
131
132 static void
133 Raw_Printf(const char *format, ...)
134 {
135     va_list ap;
136     va_start(ap, format);
137     vprintf(format, ap);
138     va_end(ap);
139 }
140
141
142 static void
143 Raw_doRequestInputString(const char* fmt, char* buffer)
144 {
145     scanf(fmt, buffer);
146 }
147
148
149 static int
150 Raw_GetString(char* sx)
151 {
152     int eof = 0;
153     char *nl;
154     sx[0] = '\0';
155
156     while(!eof && !sx[0])
157         eof = (fgets(sx, 80, stdin) == NULL);
158
159     /* remove any trailing newline */
160     nl = strchr(sx, '\n');
161     if (nl)
162         nl[0] = '\0';
163
164     return eof;
165 }
166
167
168 static void
169 Raw_ShowNodeCnt(long NodeCnt)
170 {
171     printf("Nodes = %ld Nodes/sec = %ld\n",
172            NodeCnt, (((et) ? ((NodeCnt * 100) / et) : 0)));
173 }
174
175
176 static void
177 Raw_ShowPatternCount(short side, short n)
178 {
179     if (flag.post)
180         printf("%s%s matches %d pattern(s)\n", xboard ? "# " : "" , ColorStr[side], n);
181 }
182
183
184 static void
185 Raw_ShowResponseTime(void)
186 {
187 }
188
189
190 static void
191 Raw_ShowResults(short score, unsigned short *bstline, char ch)
192 {
193     if (flag.post && (xboard || !XSHOGI))
194     {
195         ElapsedTime(2);
196         printf("%2d%c %6d %4ld %8ld  ",
197                Sdepth, ch, score, et / 100, NodeCnt);
198         Raw_ShowLine(bstline);
199     }
200 }
201
202
203 static void
204 Raw_ShowSidetoMove(void)
205 {
206 }
207
208
209 static void
210 Raw_ShowStage(void)
211 {
212     printf("stage = %d\n", stage);
213     printf("balance[black] = %d balance[white] = %d\n",
214            balance[black], balance[white]);
215 }
216
217 /****************************************
218  * End of trivial output routines.
219  ****************************************/
220
221 static void
222 Raw_Initialize(void)
223 {
224     mycnt1 = mycnt2 = 0;
225
226     if (XSHOGI)
227     {
228 #ifdef WIN32
229         /* needed because of inconsistency between MSVC run-time system and gcc includes */
230         setbuf(stdout, NULL);
231 #else
232 #ifdef HAVE_SETVBUF
233         setvbuf(stdout, NULL, _IOLBF, BUFSIZ);
234 #else
235 #  ifdef HAVE_SETLINEBUF
236         setlinebuf(stdout);
237 #  else
238 #    error "Need setvbuf() or setlinebuf() to compile gnushogi!"
239 #  endif
240 #endif
241 #endif
242         printf("GNU Shogi %s\n", PACKAGE_VERSION);
243     }
244
245     if (hard_time_limit)
246     {
247         if (!TCflag && (MaxResponseTime == 0))
248             MaxResponseTime = 15L * 100L;
249     }
250 }
251
252
253 static void
254 Raw_ExitShogi(void)
255 {
256     /* CHECKME: what purpose does this next statement serve? */
257     signal(SIGTERM, SIG_IGN);
258
259     if (!nolist)
260         ListGame();
261
262     exit(0);
263 }
264
265
266 static void
267 Raw_TerminateSearch(int sig)
268 {
269 #ifdef INTERRUPT_TEST
270     ElapsedTime(INIT_INTERRUPT_MODE);
271 #endif
272
273     if (!flag.timeout)
274         flag.back = true; /* previous: flag.timeout = true; */
275
276     flag.bothsides = false;
277 }
278
279
280 static void
281 Raw_help(void)
282 {
283     Raw_ClearScreen();
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 ");
321     printf("test                              p                      \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);
338 }
339
340
341 /*
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.
344  */
345 static void
346 Raw_EditBoard(void)
347 {
348     short a, r, c, sq, i, found;
349     char s[80];
350
351     flag.regularstart = true;
352     Book = BOOKFAIL;
353     Raw_ClearScreen();
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");
359
360     a = black;
361
362     while(1)
363     {
364         scanf("%s", s);
365         found = 0;
366
367         if (s[0] == '.')
368             break;
369
370         if (s[0] == '#')
371         {
372             for (sq = 0; sq < NO_SQUARES; sq++)
373             {
374                 board[sq] = no_piece;
375                 color[sq] = neutral;
376             }
377
378             ClearCaptured();
379             continue;
380         }
381
382         if (s[0] == 'c') {
383             a = otherside[a];
384             continue;
385         }
386
387         if (s[1] == '*')
388         {
389             for (i = pawn; i <= king; i++)
390             {
391                 if ((s[0] == pxx[i]) || (s[0] == qxx[i]))
392                 {
393                     Captured[a][i]++;
394                     found = 1;
395                     break;
396                 }
397             }
398             if (!found)
399                 printf("# Invalid piece type '%c'\n", s[0]);
400             continue;
401         }
402
403         c = COL_NUM(s[1]);
404         r = ROW_NUM(s[2]);
405
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]);
408             continue;
409         }
410
411         sq = locn(r, c);
412
413         for (i = no_piece; i <= king; i++)
414         {
415             if ((s[0] == pxx[i]) || (s[0] == qxx[i]))
416             {
417                 color[sq] = a;
418                 if (s[3] == '+')
419                     board[sq] = promoted[i];
420                 else
421                     board[sq] = i;
422
423                 found = 1;
424                 break;
425             }
426         }
427
428         if (!found)
429             printf("# Invalid piece type '%c'\n", s[0]);
430     }
431
432     for (sq = 0; sq < NO_SQUARES; sq++)
433         Mvboard[sq] = ((board[sq] != Stboard[sq]) ? 10 : 0);
434
435     GameCnt = 0;
436     Game50 = 1;
437     ZeroRPT();
438     Sdepth = 0;
439     InitializeStats();
440     Raw_ClearScreen();
441     Raw_UpdateDisplay(0, 0, 1, 0);
442 }
443
444
445 /*
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.
449  */
450 static void
451 Raw_SetupBoard(void)
452 {
453     short r, c, sq, i;
454     char ch;
455     char s[80];
456
457     NewGame();
458
459     fgets(s, 80, stdin);            /* skip "setup" command */
460
461     for (r = NO_ROWS - 1; r >= 0; r--)
462     {
463         fgets(s, 80, stdin);
464
465         for (c = 0; c <= (NO_COLS - 1); c++)
466         {
467             ch = s[c];
468             sq = locn(r, c);
469             color[sq] = neutral;
470             board[sq] = no_piece;
471
472             for (i = no_piece; i <= king; i++)
473             {
474                 if (ch == pxx[i])
475                 {
476                     color[sq] = white;
477                     board[sq] = i;
478                     break;
479                 }
480                 else if (ch == qxx[i])
481                 {
482                     color[sq] = black;
483                     board[sq] = i;
484                     break;
485                 }
486             }
487         }
488     }
489
490     for (sq = 0; sq < NO_SQUARES; sq++)
491         Mvboard[sq] = ((board[sq] != Stboard[sq]) ? 10 : 0);
492
493     InitializeStats();
494     Raw_ClearScreen();
495     Raw_UpdateDisplay(0, 0, 1, 0);
496     fputs("Setup successful\n", stdout);
497 }
498
499
500 static void
501 Raw_SearchStartStuff(short side)
502 {
503     if (flag.post)
504     {
505         printf("\nMove# %d    Target = %ld    Clock: %ld\n",
506                GameCnt/2 + 1,
507                ResponseTime, TimeControl.clock[side]);
508     }
509 }
510
511
512 static void
513 Raw_OutputMove(void)
514 {
515     if (flag.illegal)
516     {
517         printf("Illegal position.\n");
518         return;
519     }
520
521     if (mvstr[0][0] == '\0')
522         goto nomove;
523
524     if (XSHOGI)
525         /* add remaining time in milliseconds to xshogi */
526         printf("%d. ... %s %ld\n", ++mycnt1, mvstr[0],
527                (TimeControl.clock[player] - et) * 10);
528     else
529         printf("%d. ... %s\n", ++mycnt1, mvstr[0]);
530
531  nomove:
532     if ((root->flags & draw) || (root->score == -(SCORE_LIMIT + 999))
533         || (root->score == (SCORE_LIMIT + 998)))
534         goto summary;
535
536     if (flag.post)
537     {
538         short h, l, t;
539
540         h = TREE;
541         l = 0;
542         t = TREE >> 1;
543
544         while (l != t)
545         {
546             if (Tree[t].f || Tree[t].t)
547                 l = t;
548             else
549                 h = t;
550
551             t = (l + h) >> 1;
552         }
553
554         printf("Gen %ld Node %ld Tree %d Eval %ld Rate %ld EC %d/%d RS hi %ld lo %ld \n", GenCnt, NodeCnt, t, EvalNodes,
555                (et > 100) ? (NodeCnt / (et / 100)) : 0,
556                EADD, EGET, reminus, replus);
557
558         printf("Hin/Hout/Tcol/Coll/Fin/Fout = %ld/%ld/%ld/%ld/%ld/%ld\n",
559                HashAdd, HashCnt, THashCol, HashCol, FHashCnt, FHashAdd);
560     }
561
562     Raw_UpdateDisplay(root->f, root->t, 0, root->flags);
563
564     if (!XSHOGI)
565     {
566         printf("My move is: %5s\n", mvstr[0]);
567
568         if (flag.beep)
569             printf("%c", 7);
570     }
571
572  summary:
573     if (root->flags & draw)
574         fputs("Drawn game!\n", stdout);
575     else if (root->score == -(SCORE_LIMIT + 999))
576         printf("%s mates!\n", ColorStr[opponent]);
577     else if (root->score == (SCORE_LIMIT + 998))
578         printf("%s mates!\n", ColorStr[computer]);
579 #ifdef VERYBUGGY
580     else if (!XSHOGI && (root->score < -SCORE_LIMIT))
581         printf("%s%s has a forced mate in %d moves!\n", xboard ? "# " : "",
582                ColorStr[opponent], SCORE_LIMIT + 999 + root->score - 1);
583     else if (!XSHOGI && (root->score > SCORE_LIMIT))
584         printf("%s%s has a forced mate in %d moves!\n", xboard ? "# " : "",
585                ColorStr[computer], SCORE_LIMIT + 998 - root->score - 1);
586 #endif /* VERYBUGGY */
587 }
588
589
590 static void
591 Raw_UpdateClocks(void)
592 {
593 }
594
595
596 static void
597 Raw_UpdateDisplay(short f, short t, short redraw, short isspec)
598 {
599
600     short r, c, l, m;
601
602     if (redraw && !XSHOGI)
603     {
604         printf("\n");
605         r = (short)(TimeControl.clock[black] / 6000);
606         c = (short)((TimeControl.clock[black] % 6000) / 100);
607         l = (short)(TimeControl.clock[white] / 6000);
608         m = (short)((TimeControl.clock[white] % 6000) / 100);
609         printf("Black %d:%02d  White %d:%02d\n", r, c, l, m);
610         printf("\n");
611
612         for (r = (NO_ROWS - 1); r >= 0; r--)
613         {
614             for (c = 0; c <= (NO_COLS - 1); c++)
615             {
616                 char pc;
617                 l = ((flag.reverse)
618                      ? locn((NO_ROWS - 1) - r, (NO_COLS - 1) - c)
619                      : locn(r, c));
620                 pc = (is_promoted[board[l]] ? '+' : ' ');
621
622                 if (color[l] == neutral)
623                     printf(" -");
624                 else if (color[l] == black)
625                     printf("%c%c", pc, qxx[board[l]]);
626                 else
627                     printf("%c%c", pc, pxx[board[l]]);
628             }
629
630             printf("\n");
631         }
632
633         printf("\n");
634         {
635             short side;
636
637             for (side = black; side <= white; side++)
638             {
639                 short piece, c;
640                 printf((side == black)?"black ":"white ");
641
642                 for (piece = pawn; piece <= king; piece++)
643                 {
644                     if ((c = Captured[side][piece]))
645                         printf("%i%c ", c, pxx[piece]);
646                 }
647
648                 printf("\n");
649             }
650         }
651     }
652 }
653
654
655 static void
656 Raw_ChangeAlphaWindow(void)
657 {
658     printf("WAwindow: ");
659     scanf("%hd", &WAwindow);
660     printf("BAwindow: ");
661     scanf("%hd", &BAwindow);
662 }
663
664
665 static void
666 Raw_ChangeBetaWindow(void)
667 {
668     printf("WBwindow: ");
669     scanf("%hd", &WBwindow);
670     printf("BBwindow: ");
671     scanf("%hd", &BBwindow);
672 }
673
674
675 static void
676 Raw_GiveHint(void)
677 {
678     if (hint)
679     {
680         algbr((short) (hint >> 8), (short) (hint & 0xFF), false);
681         printf("Hint: %s\n", mvstr[0]);
682     }
683     else
684         fputs("I have no idea.\n", stdout);
685 }
686
687
688 static void
689 Raw_SelectLevel(char *sx)
690 {
691     /* FIXME: NO_SQUARES is nonsense here */
692     char T[NO_SQUARES + 1], *p;
693
694     strncpy(T, sx, NO_SQUARES);
695     T[NO_SQUARES] = '\0';
696
697
698     if (!xboard) {
699         /* if line empty, ask for input */
700         if (!T[0])
701         {
702             fputs("Enter #moves #minutes: ", stdout);
703             fgets(T, NO_SQUARES + 1, stdin);
704         }
705     
706         /* skip blackspace */
707         for (p = T; *p == ' '; p++) ;
708     
709         /* could be moves or a fischer clock */
710         if (*p == 'f')
711         {
712             /* its a fischer clock game */
713             char *q;
714             p++;
715             TCminutes = (short)strtol(p, &q, 10);
716             TCadd = (short)strtol(q, NULL, 10) *100;
717             TCseconds = 0;
718             TCmoves = 50;
719         }
720         else
721         {
722             /* regular game */
723             char *q;
724             TCadd = 0;
725             TCmoves = (short)strtol(p, &q, 10);
726             TCminutes = (short)strtol(q, &q, 10);
727     
728             if (*q == ':')
729                 TCseconds = (short)strtol(q + 1, (char **) NULL, 10);
730             else
731                 TCseconds = 0;
732     
733     #ifdef OPERATORTIME
734             fputs("Operator time (hundredths) = ", stdout);
735             scanf("%hd", &OperatorTime);
736     #endif
737     
738             if (TCmoves == 0)
739             {
740                 TCflag = false;
741                 MaxResponseTime = TCminutes*60L * 100L + TCseconds * 100L;
742                 TCminutes = TCseconds = 0;
743             }
744             else
745             {
746                 TCflag = true;
747                 MaxResponseTime = 0;
748             }
749         }
750     } else {
751         int min, sec=0, inc, mps;
752         /* parse regular "level MPS TC INC" command of WB protocol */
753         sscanf(sx, "%d %d %d", &mps, &min, &inc) == 3 ||
754         sscanf(sx, "%d %d:%d %d", &mps, &min, &sec, &inc);
755         TCminutes = min; TCseconds = sec;
756         TCadd = inc*100; TCmoves = mps ? mps : 50;
757         MaxResponseTime = 0; TCflag = true;
758     }
759
760     TimeControl.clock[black] = TimeControl.clock[white] = 0;
761     SetTimeControl();
762
763     if (XSHOGI)
764     {
765         printf("Clocks: %ld %ld\n",
766                TimeControl.clock[black] * 10,
767                TimeControl.clock[white] * 10);
768     }
769 }
770
771
772 static void
773 Raw_ChangeSearchDepth(char *sx)
774 {
775     char buf[80+1];
776     strncpy(buf, sx, 80); buf[80] = '\0';
777     /* if line empty, ask for input */
778     if (!buf[0]) {
779         printf("depth = ");
780         fgets(buf, 80+1, stdin);
781     }
782     sscanf(buf, "%hd", &MaxSearchDepth);
783     TCflag = !(MaxSearchDepth > 0);
784 }
785
786
787 static void
788 Raw_ChangeHashDepth(void)
789 {
790     printf("hashdepth = ");
791     scanf("%hd", &HashDepth);
792     printf("MoveLimit = ");
793     scanf("%hd", &HashMoveLimit);
794 }
795
796
797 static void
798 Raw_SetContempt(void)
799 {
800     printf("contempt = ");
801     scanf("%hd", &contempt);
802 }
803
804
805 static void
806 Raw_ChangeXwindow(void)
807 {
808     printf("xwndw = ");
809     scanf("%hd", &xwndw);
810 }
811
812
813 /*
814  * Raw_ShowPostnValue(short sq)
815  * must have called ExaminePosition() first
816  */
817 static void
818 Raw_ShowPostnValue(short sq)
819 {
820     (void) ScorePosition(color[sq]);
821
822     if (color[sq] != neutral)
823     {
824 #if defined SAVE_SVALUE
825         printf("???%c ", (color[sq] == white)?'b':'w');
826 #else
827         printf("%3d%c ", svalue[sq], (color[sq] == white)?'b':'w');
828 #endif
829     }
830     else
831     {
832         printf(" *   ");
833     }
834 }
835
836
837 static void
838 Raw_DoDebug(void)
839 {
840     short c, p, sq, tp, tc, tsq, score, j, k;
841     char s[40];
842
843     ExaminePosition(opponent);
844     Raw_ShowMessage("Enter piece: ");
845     scanf("%s", s);
846     c = neutral;
847
848     if ((s[0] == 'b') || (s[0] == 'B'))
849         c = black;
850
851     if ((s[0] == 'w') || (s[0] == 'W'))
852         c = white;
853
854     for (p = king; p > no_piece; p--)
855     {
856         if ((s[1] == pxx[p]) || (s[1] == qxx[p]))
857             break;
858     }
859
860     if (p > no_piece)
861     {
862         for (j = (NO_ROWS - 1); j >= 0; j--)
863         {
864             for (k = 0; k < (NO_COLS); k++)
865             {
866                 sq = j*(NO_COLS) + k;
867                 tp = board[sq];
868                 tc = color[sq];
869                 board[sq] = p;
870                 color[sq] = c;
871                 tsq = PieceList[c][1];
872                 PieceList[c][1] = sq;
873                 Raw_ShowPostnValue(sq);
874                 PieceList[c][1] = tsq;
875                 board[sq] = tp;
876                 color[sq] = tc;
877             }
878
879             printf("\n");
880         }
881     }
882
883     score = ScorePosition(opponent);
884
885     for (j = (NO_ROWS - 1); j >= 0; j--)
886     {
887         for (k = 0; k < (NO_COLS); k++)
888         {
889             sq = j*(NO_COLS) + k;
890
891             if (color[sq] != neutral)
892             {
893 #if defined SAVE_SVALUE
894                 printf("%?????%c ", (color[sq] == white)?'b':'w');
895 #else
896                 printf("%5d%c ", svalue[sq], (color[sq] == white)?'b':'w');
897 #endif
898             }
899             else
900             {
901                 printf("    *  ");
902             }
903         }
904
905         printf("\n");
906     }
907
908     printf("stage = %d\n", stage);
909     printf("S%d m%d ps%d gt%c m%d ps%d gt%c", score,
910            mtl[computer], pscore[computer], GameType[computer],
911            mtl[opponent], pscore[opponent], GameType[opponent]);
912 }
913
914
915 static void
916 Raw_DoTable(short table[NO_SQUARES])
917 {
918     short  sq, j, k;
919     ExaminePosition(opponent);
920
921     for (j = (NO_ROWS - 1); j >= 0; j--)
922     {
923         for (k = 0; k < NO_COLS; k++)
924         {
925             sq = j*(NO_ROWS) + k;
926             printf("%3d ", table[sq]);
927         }
928
929         printf("\n");
930     }
931 }
932
933
934 static void
935 Raw_ShowPostnValues(void)
936 {
937     short sq, score, j, k;
938     ExaminePosition(opponent);
939
940     for (j = (NO_ROWS - 1); j >= 0; j--)
941     {
942         for (k = 0; k < NO_COLS; k++)
943         {
944             sq = j * NO_COLS + k;
945             Raw_ShowPostnValue(sq);
946         }
947
948         printf("\n");
949     }
950
951     score = ScorePosition(opponent);
952     printf("S%d m%d ps%d gt%c m%d ps%d gt%c", score,
953            mtl[computer], pscore[computer], GameType[computer],
954            mtl[opponent], pscore[opponent], GameType[opponent]);
955     printf("\nhung black %d hung white %d\n", hung[black], hung[white]);
956 }
957
958
959 static void
960 Raw_PollForInput(void)
961 {
962 #ifdef WIN32
963     DWORD cnt;
964     if (!PeekNamedPipe(GetStdHandle(STD_INPUT_HANDLE), NULL, 0, NULL, &cnt, NULL))
965         cnt = 1;
966 #else
967     static struct pollfd pollfds[1] = { [0] = { .fd = STDIN_FILENO,
968                                                 .events = POLLIN } };
969     int cnt = poll(pollfds, sizeof(pollfds)/sizeof(pollfds[0]), 0);
970     if (cnt < 0) {
971         perror("polling standard input");
972         Raw_ExitShogi();
973     }
974 #endif
975     if (cnt) { /* if anything to read, or error occured */
976         if (!flag.timeout)
977             flag.back = true; /* previous: flag.timeout = true; */
978         flag.bothsides = false;
979     }
980 }
981
982 struct display raw_display =
983 {
984     .ChangeAlphaWindow    = Raw_ChangeAlphaWindow,
985     .ChangeBetaWindow     = Raw_ChangeBetaWindow,
986     .ChangeHashDepth      = Raw_ChangeHashDepth,
987     .ChangeSearchDepth    = Raw_ChangeSearchDepth,
988     .ChangeXwindow        = Raw_ChangeXwindow,
989     .ClearScreen          = Raw_ClearScreen,
990     .DoDebug              = Raw_DoDebug,
991     .DoTable              = Raw_DoTable,
992     .EditBoard            = Raw_EditBoard,
993     .ExitShogi            = Raw_ExitShogi,
994     .GiveHint             = Raw_GiveHint,
995     .Initialize           = Raw_Initialize,
996     .ShowNodeCnt          = Raw_ShowNodeCnt,
997     .OutputMove           = Raw_OutputMove,
998     .PollForInput         = Raw_PollForInput,
999     .SetContempt          = Raw_SetContempt,
1000     .SearchStartStuff     = Raw_SearchStartStuff,
1001     .SelectLevel          = Raw_SelectLevel,
1002     .ShowCurrentMove      = Raw_ShowCurrentMove,
1003     .ShowDepth            = Raw_ShowDepth,
1004     .ShowGameType         = Raw_ShowGameType,
1005     .ShowLine             = Raw_ShowLine,
1006     .ShowMessage          = Raw_ShowMessage,
1007     .AlwaysShowMessage    = Raw_AlwaysShowMessage,
1008     .Printf               = Raw_Printf,
1009     .doRequestInputString = Raw_doRequestInputString,
1010     .GetString            = Raw_GetString,
1011     .SetupBoard           = Raw_SetupBoard,
1012     .ShowPatternCount     = Raw_ShowPatternCount,
1013     .ShowPostnValue       = Raw_ShowPostnValue,
1014     .ShowPostnValues      = Raw_ShowPostnValues,
1015     .ShowPrompt           = Raw_ShowPrompt,
1016     .ShowResponseTime     = Raw_ShowResponseTime,
1017     .ShowResults          = Raw_ShowResults,
1018     .ShowSidetoMove       = Raw_ShowSidetoMove,
1019     .ShowStage            = Raw_ShowStage,
1020     .TerminateSearch      = Raw_TerminateSearch,
1021     .UpdateClocks         = Raw_UpdateClocks,
1022     .UpdateDisplay        = Raw_UpdateDisplay,
1023     .help                 = Raw_help,
1024 };