uci.c

   1 /*
   2  * UCI support thru Polyglot
   3  *
   4  * Author: Alessandro Scotti (Jan 2006)
   5  *
   6  * Copyright 2006 Alessandro Scotti
   7  *
   8  * ------------------------------------------------------------------------
   9  *
  10  * GNU XBoard is free software: you can redistribute it and/or modify
  11  * it under the terms of the GNU General Public License as published by
  12  * the Free Software Foundation, either version 3 of the License, or (at
  13  * your option) any later version.
  14  *
  15  * GNU XBoard is distributed in the hope that it will be useful, but
  16  * WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  18  * General Public License for more details.
  19  *
  20  * You should have received a copy of the GNU General Public License
  21  * along with this program. If not, see http://www.gnu.org/licenses/.
  22  *
  23  * ------------------------------------------------------------------------
  24  */
  25 #include <stdio.h>
  26 #include <stdlib.h>
  27 #include <string.h>
  28
  29 #if HAVE_MALLOC_H
  30   #include <malloc.h>
  31 #endif
  32
  33 #include "common.h"
  34 #include "backend.h"
  35 Boolean GetArgValue(char *a);
  36
  37 void InitEngineUCI( const char * iniDir, ChessProgramState * cps )
  38 {   // replace engine command line by adapter command with expanded meta-symbols
  39     if( cps->isUCI ) {
  40         char *p, *q;
  41         char polyglotCommand[MSG_SIZ];
  42
  43         p = appData.adapterCommand;
  44         q = polyglotCommand;
  45         while(*p) {
  46           if(*p == '\\') p++; else
  47           if(*p == '%') { // substitute marker
  48             char argName[MSG_SIZ], buf[MSG_SIZ], *s = buf;
  49             if(*++p == '%') { // second %, expand as f or s in option name (e.g. %%cp -> fcp)
  50               *s++ = cps == &first ? 'f' : 's';
  51               p++;
  52             }
  53             while(*p >= '0' && *p) *s++ = *p++; // copy option name
  54             *s = NULLCHAR;
  55             if(cps == &second) { // change options for first into those for second engine
  56               if(strstr(buf, "first") == buf) sprintf(argName, "second%s", buf+5); else
  57               if(buf[0] == 'f') sprintf(argName, "s%s", buf+1); else
  58               strcpy(argName, buf);
  59             } else strcpy(argName, buf);
  60             if(GetArgValue(argName)) { // look up value of option with this name
  61               s = argName;
  62               while(*s) *q++ = *s++;
  63             } else DisplayFatalError("Bad adapter command", 0, 1);
  64             continue;
  65           }
  66           if(*p) *q++ = *p++;
  67         }
  68         *q = NULLCHAR;
  69         cps->program = StrSave(polyglotCommand);
  70         cps->dir = appData.polyglotDir;
  71     }
  72 }