/*
Pikafish Proxy - a Chinese Chess Engine Wrapper for XQWizard to run Pikafish
Designed by Morning Yellow, Version: 2023-03-05, Last Modified: Jun. 2023
Copyright (C) 2023 www.xqbase.com
This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Lesser General Public
License as published by the Free Software Foundation; either
version 2.1 of the License, or (at your option) any later version.
This library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Lesser General Public License for more details.
You should have received a copy of the GNU Lesser General Public
License along with this library; if not, write to the Free Software
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
*/
#include <stdio.h>
#include <string.h>
#include "version.h"
#include "../base/pipe.h"
#include "../base/base.h"
#include "../base/base2.h"
#include "../base/rc4prng.h"
#include "../eleeye/pregen.h"
#include "../eleeye/position.h"
#include "../eleeye/book.h"
int main(void) {
bool bUseBook;
int i, nLen, mv, vl;
uint32_t dwMoveStr;
char *lp, *lpTime, *lp2;
char sz[LINE_INPUT_MAX_CHAR], sz2[LINE_INPUT_MAX_CHAR];
char szTime[LINE_INPUT_MAX_CHAR], szInc[LINE_INPUT_MAX_CHAR], szBookFile[LINE_INPUT_MAX_CHAR];
BookStruct mvsBook[MAX_GEN_MOVES];
RC4Struct rc4;
PipeStruct pipeConsole, pipeEngine;
PositionStruct pos;
bUseBook = true;
LocatePath(sz, "pikafish-modern.exe");
LocatePath(szBookFile, "BOOK.DAT");
pipeConsole.Open();
pipeEngine.Open(sz);
PreGenInit();
rc4.InitRand();
pos.FromFen(cszStartFen);
while (pipeEngine.nEof == 0) {
// Read Pikafish's Response
while (pipeEngine.LineInput(sz)) {
// printf("info string ENG->GUI: [%s]\n", sz);
if (false) {
// "Pikafish ...": Ignore
} else if (strncmp(sz, "Pikafish ", 9) == 0) {
// "id ...", "option ...", "uciok": Ignore
} else if (strncmp(sz, "id ", 3) == 0) {
} else if (strncmp(sz, "option ", 7) == 0) {
} else if (strcmp(sz, "uciok") == 0) {
// "bestmove (none)" -> "nobestmove"
} else if (strcmp(sz, "bestmove (none)") == 0) {
printf("nobestmove\n");
// "info depth ... score cp ..." -> "info depth ... score ..."
} else if (strncmp(sz, "info depth ", 11) == 0) {
lp = strstr(sz, " score cp ");
if (lp != NULL) {
strcpy(sz2, lp + 10);
strcpy(lp + 7, sz2);
}
printf("%s\n", sz);
// else: unchanged
} else {
printf("%s\n", sz);
}
fflush(stdout);
}
// Read XQWizard's Request
while (pipeConsole.LineInput(sz)) {
if (false) {
// "ucci" -> "uci", show version and options
} else if (strcmp(sz, "ucci") == 0) {
printf("id name Pikafish\n");
printf("id version " PIKAFISH_VERSION "\n");
printf("option usemillisec type check default true\n");
printf("option usebook type check default true\n");
printf("option bookfiles type string default %s\n", szBookFile);
printf("option hashsize type spin default 16 min 1 max 33554432\n");
printf("option threads type spin default 1 min 1 max 1024\n");
printf("ucciok\n");
strcpy(sz, "uci");
// "setoption ...": only accepts "usebook", "bookfiles", "hashsize" and "threads"
} else if (strncmp(sz, "setoption ", 10) == 0) {
if (false) {
// "setoption usebook true/false"
} else if (strncmp(sz, "setoption usebook ", 18) == 0) {
lp = sz + 18;
bUseBook = (strcmp(lp, "true") == 0 || strcmp(lp, "on") == 0);
continue;
// "setoption bookfiles ..."
} else if (strncmp(sz, "setoption bookfiles ", 20) == 0) {
lp = sz + 20;
if (AbsolutePath(lp)) {
strcpy(szBookFile, lp);
} else {
LocatePath(szBookFile, lp);
}
continue;
// "setoption hashsize ..." -> "setoption name Hash value ..."
} else if (strncmp(sz, "setoption hashsize ", 19) == 0) {
strcpy(sz2, "setoption name Hash value ");
strcat(sz2, sz + 19);
strcpy(sz, sz2);
// "setoption threads ..." -> "setoption name Threads value ..."
} else if (strncmp(sz, "setoption threads ", 18) == 0) {
sscanf(sz + 18, "%d", &i);
sprintf(sz, "setoption name Threads value %d", i < 1 ? 1 : i);
} else {
// else: unchanged
continue;
}
// "position ...": parse position for book search
} else if (strncmp(sz, "position ", 9) == 0) {
lp = strstr(sz, " fen ");
if (lp == NULL) {
pos.FromFen(cszStartFen);
} else {
pos.FromFen(lp + 5);
}
lp = strstr(sz, " moves ");
if (lp != NULL) {
lp += 7;
nLen = (strlen(lp) + 1) / 5;
for (i = 0; i < nLen; i ++) {
mv = COORD_MOVE(*(uint32_t *) lp);
lp += 5;
if (mv == 0) {
break;
}
if (pos.ucpcSquares[SRC(mv)] == 0) {
break;
}
pos.MakeMove(mv);
if (pos.LastMove().CptDrw > 0) {
pos.SetIrrev();
}
}
}
// "go ...": search book first, then call engine
} else if (strncmp(sz, "go ", 3) == 0) {
// search book
if (bUseBook) {
// a. get all moves for this position
nLen = GetBookMoves(pos, szBookFile, mvsBook);
if (nLen > 0) {
vl = 0;
for (i = 0; i < nLen; i ++) {
vl += mvsBook[i].wvl;
dwMoveStr = MOVE_COORD(mvsBook[i].wmv);
printf("info depth 0 score %d pv %.4s\n", mvsBook[i].wvl, (const char *) &dwMoveStr);
fflush(stdout);
}
// b. pick a random move by move weight
vl = rc4.NextLong() % (uint32_t) vl;
for (i = 0; i < nLen; i ++) {
vl -= mvsBook[i].wvl;
if (vl < 0) {
break;
}
}
// c. skip the move that causes repetition
pos.MakeMove(mvsBook[i].wmv);
if (pos.RepStatus(3) == 0) {
dwMoveStr = MOVE_COORD(mvsBook[i].wmv);
printf("bestmove %.4s", (const char *) &dwMoveStr);
// d. get ponder move (next move with max weight)
nLen = GetBookMoves(pos, szBookFile, mvsBook);
pos.UndoMakeMove();
if (nLen > 0) {
dwMoveStr = MOVE_COORD(mvsBook[0].wmv);
printf(" ponder %.4s", (const char *) &dwMoveStr);
}
printf("\n");
fflush(stdout);
continue;
}
pos.UndoMakeMove();
}
}
// "go time ..." -> "go wtime ... btime ..."
lp = strstr(sz, " time ");
if (lp != NULL) {
lpTime = lp + 6;
// copy text after "time"
lp2 = strchr(lpTime, ' ');
if (lp2 == NULL) {
strcpy(szTime, lpTime + 6);
} else {
nLen = lp2 - lpTime;
strncpy(szTime, lpTime, nLen);
szTime[nLen] = '\0';
}
// copy text after "increment"
lp2 = strstr(sz, " increment ");
if (lp2 == NULL) {
// copy text after "movestogo"
lp2 = strstr(sz, " movestogo ");
if (lp2 == NULL) {
sprintf(lp, " wtime %s btime %s", szTime, szTime);
} else {
lpTime = lp2 + 11;
lp2 = strchr(lpTime, ' ');
if (lp2 == NULL) {
strcpy(szInc, lpTime);
} else {
nLen = lp2 - lpTime;
strncpy(szInc, lpTime, nLen);
szInc[nLen] = '\0';
}
sprintf(lp, " wtime %s btime %s movestogo %s", szTime, szTime, szInc);
}
} else {
lpTime = lp2 + 11;
lp2 = strchr(lpTime, ' ');
if (lp2 == NULL) {
strcpy(szInc, lpTime);
} else {
nLen = lp2 - lpTime;
strncpy(szInc, lpTime, nLen);
szInc[nLen] = '\0';
}
sprintf(lp, " wtime %s btime %s winc %s binc %s", szTime, szTime, szInc, szInc);
}
}
// other options such as "go depth ...": unchanged
}
pipeEngine.LineOutput(sz);
// printf("info string GUI->ENG: [%s]\n", sz);
fflush(stdout);
}
Idle();
}
pipeConsole.Close();
pipeEngine.Close();
return 0;
}
标签：协议,pikafish,...,else,sz,lp,printf,nLen From： https://www.cnblogs.com/ryueifu-VBA/p/17893348.html