--- /dev/null
+// uci2uci.c
+
+// includes
+
+#include <string.h>
+#include <stdlib.h>
+
+#include "util.h"
+#include "board.h"
+#include "engine.h"
+#include "fen.h"
+#include "gui.h"
+#include "move.h"
+#include "move_do.h"
+#include "move_legal.h"
+#include "parse.h"
+#include "option.h"
+#include "book.h"
+#include "main.h"
+#include "uci.h"
+
+// defines
+
+#define StringSize 4096
+
+// variables
+
+static board_t UCIboard[1];
+static bool Init=TRUE;
+static int SavedMove=MoveNone;
+
+// prototypes
+
+static void send_uci_options();
+
+// parse_position()
+
+static void parse_position(const char string[]) {
+
+/* This is borrowed from Toga II. This code is quite hacky and will be
+ rewritten using the routines in parse.cpp.
+*/
+
+ const char * fen;
+ char * moves;
+ const char * ptr;
+ char move_string[256];
+ int move;
+ char * string_copy;
+
+ // init
+
+ string_copy=my_strdup(string);
+
+ fen = strstr(string_copy,"fen ");
+ moves = strstr(string_copy,"moves ");
+
+ // start position
+
+ if (fen != NULL) { // "fen" present
+
+ if (moves != NULL) { // "moves" present
+ ASSERT(moves>fen);
+ moves[-1] = '\0'; // dirty, but so is UCI
+ }
+
+ board_from_fen(UCIboard,fen+4); // CHANGE ME
+
+ } else {
+
+ // HACK: assumes startpos
+
+ board_from_fen(UCIboard,StartFen);
+ }
+
+ // moves
+
+ if (moves != NULL) { // "moves" present
+
+ ptr = moves + 6;
+
+ while (*ptr != '\0') {
+
+ while (*ptr == ' ') ptr++;
+
+ move_string[0] = *ptr++;
+ move_string[1] = *ptr++;
+ move_string[2] = *ptr++;
+ move_string[3] = *ptr++;
+
+ if (*ptr == '\0' || *ptr == ' ') {
+ move_string[4] = '\0';
+ } else { // promote
+ move_string[4] = *ptr++;
+ move_string[5] = '\0';
+ }
+ move = move_from_can(move_string,UCIboard);
+
+ move_do(UCIboard,move);
+
+ }
+ }
+ free(string_copy);
+}
+
+
+// send_book_move()
+
+static void send_book_move(int move){
+ char move_string[256];
+ my_log("POLYGLOT *BOOK MOVE*\n");
+ move_to_can(move,UCIboard,move_string,256);
+ // bogus info lines
+ gui_send(GUI,"info depth 1 time 0 nodes 0 nps 0 cpuload 0");
+ gui_send(GUI,"bestmove %s",move_string);
+}
+
+// format_uci_option_line()
+
+static void format_uci_option_line(char * option_line,option_t *opt){
+ char option_string[StringSize];
+ int j;
+ strcpy(option_line,"");
+ strcat(option_line,"option name");
+ if(opt->mode&PG){
+ strcat(option_line," Polyglot");
+ }
+ sprintf(option_string," %s",opt->name);
+ strcat(option_line,option_string);
+ sprintf(option_string," type %s",opt->type);
+ strcat(option_line,option_string);
+ if(strcmp(opt->type,"button")){
+ sprintf(option_string," default %s",opt->default_);
+ strcat(option_line,option_string);
+ }
+ if(!strcmp(opt->type,"spin")){
+ sprintf(option_string," min %s",opt->min);
+ strcat(option_line,option_string);
+ }
+ if(!strcmp(opt->type,"spin")){
+ sprintf(option_string," max %s",opt->max);
+ strcat(option_line,option_string);
+ }
+ for(j=0;j<opt->var_nb;j++){
+ sprintf(option_string," var %s",opt->var[j]);
+ strcat(option_line,option_string);
+ }
+}
+
+// send_uci_options()
+
+static void send_uci_options() {
+ int i;
+ option_t *p=Option;
+ char option_line[StringSize]="";
+ gui_send(GUI,"id name %s", Uci->name);
+ gui_send(GUI,"id author %s", Uci->author);
+ for(i=0;i<Uci->option_nb;i++){
+ format_uci_option_line(option_line,Uci->option+i);
+ gui_send(GUI,"%s",option_line);
+ }
+ while(p->name){
+ if(p->mode &UCI){
+ format_uci_option_line(option_line,p);
+ gui_send(GUI,"%s",option_line);
+ }
+ p++;
+ }
+ gui_send(GUI,"uciok");
+}
+
+// parse_setoption()
+
+
+
+static void parse_setoption(const char string[]) {
+ char *name;
+ char *pg_name;
+ char *value;
+ char * string_copy;
+ string_copy=my_strdup(string);
+ if(match(string_copy,"setoption name * value *")){
+ name=Star[0];
+ value=Star[1];
+ if(match(name, "Polyglot *")){
+ pg_name=Star[0];
+ polyglot_set_option(pg_name,value);
+ }else{
+ engine_send(Engine,"%s",string);
+ }
+ }else{
+ engine_send(Engine,"%s",string);
+ }
+ free(string_copy);
+}
+
+
+// uci2uci_gui_step()
+
+void uci2uci_gui_step(char string[]) {
+ int move;
+ if(FALSE){
+ }else if(match(string,"uci")){
+ send_uci_options();
+ return;
+ }else if(match(string,"setoption *")){
+ parse_setoption(string);
+ return;
+ }else if(match(string,"position *")){
+ parse_position(string);
+ Init=FALSE;
+ }else if(match(string,"go *")){
+ if(Init){
+ board_from_fen(UCIboard,StartFen);
+ Init=FALSE;
+ }
+ SavedMove=MoveNone;
+ if(!strstr(string,"infinite")){
+ move=book_move(UCIboard,option_get_bool("BookRandom"));
+ if (move != MoveNone && move_is_legal(move,UCIboard)) {
+ if(strstr(string,"ponder")){
+ SavedMove=move;
+ return;
+ }else{
+ send_book_move(move);
+ return;
+ }
+ }
+ }
+ }else if(match(string,"ponderhit") || match(string,"stop")){
+ if(SavedMove!=MoveNone){
+ send_book_move(SavedMove);
+ SavedMove=MoveNone;
+ return;
+ }
+ }else if(match(string,"quit")){
+ my_log("POLYGLOT *** \"quit\" from GUI ***\n");
+ quit();
+ }
+ engine_send(Engine,"%s",string);
+}
+
+void uci2uci_engine_step(char string[]) {
+ gui_send(GUI,string);
+}
+
+// end of uci2uci.cpp