X-Git-Url: http://winboard.nl/cgi-bin?a=blobdiff_plain;f=main.c;h=ae3c5aaf4a7e87cb45e8b82ede8eda8f34d0df0a;hb=5b56e51eeae04c352b95b1706b9d69b61feba3e9;hp=95ddd20736cf7377440f95b55d241df18a5b8a96;hpb=5eed4adb3552562329c0b0b460c8851efb1a38bb;p=polyglot.git diff --git a/main.c b/main.c index 95ddd20..ae3c5aa 100644 --- a/main.c +++ b/main.c @@ -7,6 +7,7 @@ #include #include #include +#include #include "attack.h" #include "board.h" @@ -32,11 +33,13 @@ #include "xboard2uci.h" #include "uci2uci.h" #include "ini.h" +#include "util.h" + // constants -static const char * const Version = "1.4.39b"; +static const char * const Version = "1.4.53b"; static const char * const HelpMessage = "\ SYNTAX\n\ * polyglot [configfile] [-noini] [-ec engine] [-ed enginedirectory] [-en enginename] [-log] [-lf logfile] [-hash value] [-bk book] [-pg =]* [-uci =]*\n\ @@ -58,65 +61,222 @@ static bool Init; // prototypes -static void init_book (); static void stop_search (); // functions // arg_shift_left() -void arg_shift_left(char **argv, int index){ +static void arg_shift_left(char **argv, int index){ int i; for(i=index; argv[i]!=NULL; i++){ argv[i]=argv[i+1]; } } +// parse_args() + +static void parse_args(ini_t *ini, char **argv){ + int arg_index; + char *arg; + arg_index=0; + while((arg=argv[arg_index])){ + if(my_string_equal(arg,"-ec") && argv[arg_index+1]){ + ini_insert_ex(ini,"PolyGlot","EngineCommand",argv[arg_index+1]); + arg_shift_left(argv,arg_index); + arg_shift_left(argv,arg_index); + continue; + }if(my_string_equal(arg,"-ed") && argv[arg_index+1]){ + ini_insert_ex(ini,"PolyGlot","EngineDir",argv[arg_index+1]); + arg_shift_left(argv,arg_index); + arg_shift_left(argv,arg_index); + continue; + } + if(my_string_equal(arg,"-en") && argv[arg_index+1]){ + ini_insert_ex(ini,"PolyGlot","EngineName",argv[arg_index+1]); + arg_shift_left(argv,arg_index); + arg_shift_left(argv,arg_index); + continue; + } + if(my_string_equal(arg,"-log") && + argv[arg_index+1] && + IS_BOOL(argv[arg_index+1])){ + ini_insert_ex(ini, + "PolyGlot", + "Log", + TO_BOOL(argv[arg_index+1])?"true":"false"); + arg_shift_left(argv,arg_index); + arg_shift_left(argv,arg_index); + continue; + } + if(my_string_equal(arg,"-lf") && argv[arg_index+1]){ + ini_insert_ex(ini,"PolyGlot","LogFile",argv[arg_index+1]); + arg_shift_left(argv,arg_index); + arg_shift_left(argv,arg_index); + continue; + } + if(my_string_equal(arg,"-wb") && + argv[arg_index+1]&& + IS_BOOL(argv[arg_index+1])){ + ini_insert_ex(ini,"PolyGlot", + "OnlyWbOptions", + TO_BOOL(argv[arg_index+1])?"true":"false"); + arg_shift_left(argv,arg_index); + arg_shift_left(argv,arg_index); + continue; + } + if((my_string_equal(arg,"-pg")||my_string_equal(arg,"-uci")) && + argv[arg_index+1]){ + int ret; + char section[StringSize]; + char name[StringSize]; + char value[StringSize]; + ret=ini_line_parse(argv[arg_index+1],section,name,value); + if(ret==NAME_VALUE){ + if(my_string_equal(arg,"-pg")){ + ini_insert_ex(ini,"PolyGlot",name,value); + }else{ + ini_insert_ex(ini,"Engine",name,value); + } + } + arg_shift_left(argv,arg_index); + arg_shift_left(argv,arg_index); + continue; + } + arg_index++; + } +} + -void write_ini(const char *filename, - option_list_t *pg_options, - option_list_t *uci_options){ +// make_ini() + +static void make_ini(ini_t *ini){ option_t *opt; + ini_insert_ex(ini,"polyglot", + "EngineCommand", + option_get(Option,"EngineCommand")); + ini_insert_ex(ini,"polyglot", + "EngineDir", + option_get(Option,"EngineDir")); + option_start_iter(Option); + while((opt=option_next(Option))){ + if(my_string_case_equal(opt->name,"SettingsFile")) continue; + if(my_string_case_equal(opt->name,"EngineCommand")) continue; + if(my_string_case_equal(opt->name,"EngineDir")) continue; + if(!my_string_equal(opt->value,opt->default_)&& !IS_BUTTON(opt->type)) + { + ini_insert_ex(ini,"polyglot",opt->name,opt->value); + } + } + option_start_iter(Uci->option); + while((opt=option_next(Uci->option))){ + if(!strncmp(opt->name,"UCI_",4) && + !my_string_case_equal(opt->name,"UCI_LimitStrength") && + !my_string_case_equal(opt->name,"UCI_Elo"))continue; + if(!my_string_equal(opt->value,opt->default_)&& + !IS_BUTTON(opt->type)){ + ini_insert_ex(ini,"engine",opt->name,opt->value); + } + } +} + + +// write_ini() + +static void write_ini(const char *filename, + ini_t *ini){ + const char *quote; + ini_entry_t *entry; char tmp[StringSize]; FILE *f; + time_t t=time(NULL); f=fopen(filename,"w"); if(!f){ - my_fatal("ini_create_pg(): Cannot open %s for writing.\n",filename); + gui_send(GUI,"tellusererror write_ini(): %s: %s.",filename,strerror(errno)); + my_log("POLYGLOT write_ini(): %s: %s.\n",filename,strerror(errno)); + return; } + fprintf(f,"; Created: %s\n",ctime(&t)); fprintf(f,"[PolyGlot]\n"); - option_start_iter(pg_options); - while((opt=option_next(pg_options))){ - if(opt->mode & XBOARD){ - snprintf(tmp,sizeof(tmp),"%s=%s\n",opt->name,opt->value); - tmp[sizeof(tmp)-1]='\0'; - fprintf(f,"%s",tmp); - } + ini_start_iter(ini); + while((entry=ini_next(ini))){ + if(my_string_case_equal(entry->section,"polyglot")){ + if(strchr(entry->value,';')|| strchr(entry->value,'#')|| strchr(entry->value,'"')){ + quote="\""; + }else{ + quote=""; + } + snprintf(tmp,sizeof(tmp),"%s=%s%s%s\n", + entry->name, + quote, + entry->value, + quote); + tmp[sizeof(tmp)-1]='\0'; + fprintf(f,"%s",tmp); + } } fprintf(f,"[Engine]\n"); - option_start_iter(uci_options); - while((opt=option_next(uci_options))){ - snprintf(tmp,sizeof(tmp),"%s=%s\n",opt->name,opt->value); - tmp[sizeof(tmp)-1]='\0'; - fprintf(f,"%s",tmp); + ini_start_iter(ini); + while((entry=ini_next(ini))){ + if(my_string_case_equal(entry->section,"engine")){ + if(strchr(entry->value,';')|| strchr(entry->value,'#')|| strchr(entry->value,'"')){ + quote="\""; + }else{ + quote=""; + } + snprintf(tmp,sizeof(tmp),"%s=%s%s%s\n", + entry->name, + quote, + entry->value, + quote); + tmp[sizeof(tmp)-1]='\0'; + fprintf(f,"%s",tmp); + } } fclose(f); } +// welcome_message() + +void welcome_message(char *buf){ + if(!DEBUG){ + sprintf(buf, + "PolyGlot %s by Fabien Letouzey.\n", + Version); + }else{ + sprintf(buf, + "PolyGlot %s by Fabien Letouzey (debug build).\n", + Version); + } +} + +int wb_select(){ + option_t *opt; + option_start_iter(Option); + while((opt=option_next(Option))){ + opt->mode&=~XBOARD; + if(opt->mode & XBSEL){ + opt->mode|=XBOARD; + } + } +} // main() int main(int argc, char * argv[]) { - ini_t ini[1]; + ini_t ini[1], ini_command[1]; ini_entry_t *entry; char *arg; int arg_index; bool NoIni; + option_t *opt; + char welcome[StringSize]; + + + welcome_message(welcome); - if(!DEBUG){ - printf("PolyGlot %s by Fabien Letouzey.\n",Version); - }else{ - printf("PolyGlot %s by Fabien Letouzey (debug build).\n",Version); - } + printf("%s",welcome); + if(argc>=2 && ((my_string_case_equal(argv[1],"help")) || (my_string_case_equal(argv[1],"-help")) || (my_string_case_equal(argv[1],"--help")) || (my_string_case_equal(argv[1],"-h")) || my_string_case_equal(argv[1],"/?"))){ printf("%s\n",HelpMessage); @@ -138,7 +298,10 @@ int main(int argc, char * argv[]) { my_random_init(); - // book utilities + ini_init(ini); + ini_init(ini_command); + + // book utilities: do not touch these if (argc >= 2 && my_string_equal(argv[1],"make-book")) { book_make(argc,argv); @@ -166,8 +329,8 @@ int main(int argc, char * argv[]) { do_perft(argc,argv); return EXIT_SUCCESS; } - - // what is the config file? This is very hacky right now? + + // What is the config file? This is very hacky right now. // Do we want a config file at all? @@ -180,8 +343,9 @@ int main(int argc, char * argv[]) { } } arg_shift_left(argv,arg_index-1); + parse_args(ini_command,argv+1); if(NoIni){ - option_set(Option,"OptionFile",""); + option_set(Option,"SettingsFile",""); } // Ok see if first argument looks like config file @@ -189,108 +353,68 @@ int main(int argc, char * argv[]) { if(argv[1] && !my_string_equal(argv[1],"epd-test") && !(argv[1][0]=='-')){ // first argument must be config file if(!NoIni){ - option_set(Option,"OptionFile",argv[1]); + option_set(Option,"SettingsFile",argv[1]); }else{ // ignore } arg_shift_left(argv,1); }else{ // Config file is the default. - // This has already been set above or in "option_init_pg" + // This has already been set above or in "option_init_pg()" } - - ini_init(ini); + + // if we use a config file: load it! - if(!my_string_equal(option_get_string(Option,"OptionFile"),"")){ - if(ini_parse(ini,option_get_string(Option,"OptionFile"))){ + if(!my_string_equal(option_get_string(Option,"SettingsFile"),"")){ + if(ini_parse(ini,option_get_string(Option,"SettingsFile"))){ my_fatal("main(): Can't open file \"%s\": %s\n", - option_get_string(Option,"OptionFile"), + option_get_string(Option,"SettingsFile"), strerror(errno)); } } - // parse the command line and merge options + // Extract some important options - arg_index=1; - while((arg=argv[arg_index])){ -// int i=1; -// char *arg1; -// printf("arg_index=%d\n",arg_index); -// while((arg1=argv[i++])){ -// printf("arg=%s ",arg1); -// } -// printf("\n"); - if(my_string_equal(arg,"-ec") && argv[arg_index+1]){ - ini_insert_ex(ini,"PolyGlot","EngineCommand",argv[arg_index+1]); - arg_shift_left(argv,arg_index); - arg_shift_left(argv,arg_index); - continue; - } - if(my_string_equal(arg,"-ed") && argv[arg_index+1]){ - ini_insert_ex(ini,"PolyGlot","EngineDir",argv[arg_index+1]); - arg_shift_left(argv,arg_index); - arg_shift_left(argv,arg_index); - continue; - } - if(my_string_equal(arg,"-en") && argv[arg_index+1]){ - ini_insert_ex(ini,"PolyGlot","EngineName",argv[arg_index+1]); - arg_shift_left(argv,arg_index); - arg_shift_left(argv,arg_index); - continue; - } - if(my_string_equal(arg,"-log")){ - ini_insert_ex(ini,"PolyGlot","Log","true"); - arg_shift_left(argv,arg_index); - continue; - } - if(my_string_equal(arg,"-lf") && argv[arg_index+1]){ - ini_insert_ex(ini,"PolyGlot","LogFile",argv[arg_index+1]); - arg_shift_left(argv,arg_index); - arg_shift_left(argv,arg_index); - continue; - } - if(my_string_equal(arg,"-hash") && argv[arg_index+1]){ - ini_insert_ex(ini,"Engine","Hash",argv[arg_index+1]); - arg_shift_left(argv,arg_index); - arg_shift_left(argv,arg_index); - continue; - } - if(my_string_equal(arg,"-bk") && argv[arg_index+1]){ - ini_insert_ex(ini,"PolyGlot","Book","true"); - ini_insert_ex(ini,"PolyGlot","BookFile",argv[arg_index+1]); - arg_shift_left(argv,arg_index); - arg_shift_left(argv,arg_index); - continue; - } - if((my_string_equal(arg,"-pg")||my_string_equal(arg,"-uci")) && - argv[arg_index]){ - int ret; - char section[StringSize]; - char name[StringSize]; - char value[StringSize]; - ret=ini_line_parse(argv[arg_index++],section,name,value); - if(ret==NAME_VALUE){ - if(my_string_equal(arg,"-pg")){ - ini_insert_ex(ini,"PolyGlot",name,value); - }else{ - ini_insert_ex(ini,"Engine",name,value); - } - } - arg_shift_left(argv,arg_index); - arg_shift_left(argv,arg_index); - continue; + if((entry=ini_find(ini,"polyglot","EngineCommand"))){ + option_set(Option,entry->name,entry->value); + } + if((entry=ini_find(ini,"polyglot","EngineDir"))){ + option_set(Option,entry->name,entry->value); + } + if((entry=ini_find(ini,"polyglot","EngineName"))){ + option_set(Option,entry->name,entry->value); + } + if((entry=ini_find(ini,"polyglot","Log"))){ + polyglot_set_option(entry->name,entry->value); + } + if((entry=ini_find(ini,"polyglot","LogFile"))){ + polyglot_set_option(entry->name,entry->value); + } + + // Concession to WB 4.4.0 + // Treat "polyglot_1st.ini" and "polyglot_2nd.ini" specially + + if(option_get_bool(Option,"WbWorkArounds3")){ + const char *SettingsFile=option_get(Option,"SettingsFile"); + if(strstr(SettingsFile,"polyglot_1st.ini")|| + strstr(SettingsFile,"polyglot_2nd.ini")){ + option_set(Option,"SettingsFile",""); } - arg_index++; } - // extract PG options - // this sets both the default and the value - - option_from_ini(Option,ini,"polyglot"); + // Look at command line for logging option. It is important + // to start logging as soon as possible. + + if((entry=ini_find(ini_command,"PolyGlot","Log"))){ + option_set(Option,entry->name,entry->value); + } + if((entry=ini_find(ini_command,"PolyGlot","LogFile"))){ + option_set(Option,entry->name,entry->value); + } - // start logging if required + // start logging if required if (option_get_bool(Option,"Log")) { my_log_open(option_get_string(Option,"LogFile")); @@ -298,13 +422,25 @@ int main(int argc, char * argv[]) { // log welcome stuff - if(!DEBUG){ - my_log("PolyGlot %s by Fabien Letouzey\n",Version); - }else{ - my_log("PolyGlot %s by Fabien Letouzey (debug build)\n",Version); - } + my_log("%s",welcome); my_log("POLYGLOT *** START ***\n"); - my_log("POLYGLOT INI file \"%s\"\n",option_get_string(Option,"OptionFile")); + if(!my_string_equal(option_get_string(Option,"SettingsFile"),"")){ + my_log("POLYGLOT INI file \"%s\"\n",option_get_string(Option,"SettingsFile")); + } + + + // scavenge command line for options necessary to start the engine + + + if((entry=ini_find(ini_command,"PolyGlot","EngineCommand"))){ + option_set(Option,entry->name,entry->value); + } + if((entry=ini_find(ini_command,"PolyGlot","EngineDir"))){ + option_set(Option,entry->name,entry->value); + } + if((entry=ini_find(ini_command,"PolyGlot","EngineName"))){ + option_set(Option,entry->name,entry->value); + } // start engine @@ -319,43 +455,82 @@ int main(int argc, char * argv[]) { my_log("POLYGLOT *** Switching to UCI mode ***\n"); } - // initialize uci parsing and send uci command. Parse options and wait - // for uciok + // initialize uci parsing and send uci command. + // Parse options and wait for uciok uci_open(Uci,Engine); - // get engine name from engine if not supplied in config file - + option_set_default(Option,"EngineName",Uci->name); + + // get engine name from engine if not supplied in config file or on + // the command line + if (my_string_equal(option_get_string(Option,"EngineName"),"")) { option_set(Option,"EngineName",Uci->name); } - // if there is a save file: load it! - if(my_string_equal(option_get_string(Option,"SaveFile"),"")){ + // In the case we have been invoked with NoIni or StandardIni + // we still have to load a config file. + + if(my_string_equal(option_get_string(Option,"SettingsFile"),"")){ + + // construct the name of the ConfigFile from the EngineName + char tmp[StringSize]; + char option_file[StringSize]; + int i; snprintf(tmp,sizeof(tmp),"%s.ini", option_get_string(Option,"EngineName")); tmp[sizeof(tmp)-1]='\0'; - option_set(Option,"SaveFile",tmp); - } - if(option_get_bool(Option,"SaveSettingsOnExit")){ - my_log("POLYGLOT SaveFile=%s\n",option_get_string(Option,"SaveFile")); - if(ini_parse(ini,option_get_string(Option,"SaveFile"))){ - my_log("POLYGLOT Unable to open SaveFile\n"); + for(i=0;isection,"polyglot")){ + opt=option_find(Option,entry->name); + if(opt && !IS_BUTTON(opt->type)){ + polyglot_set_option(entry->name,entry->value); + } + } + } + // Cater to our biggest customer:-) + + if(option_get_bool(Option,"OnlyWbOptions")){ + wb_select(); + } // done initializing @@ -368,18 +543,10 @@ int main(int argc, char * argv[]) { if(my_string_case_equal(entry->section,"engine")){ // also updates value in Uci->option uci_send_option(Uci,entry->name,"%s",entry->value); - // since this comes from the ini file, also update default - option_set_default(Uci->option,entry->name,entry->value); - //to get a decent display in winboard_x we need to now if an engine really is doing multipv analysis - // "multipv 1" in the pv is meaningless,f.i. toga sends that all the time - //therefore check if MultiPV is set to a decent value in the polyglot ini file - if(my_string_case_equal(entry->name,"MultiPV") && - atoi(entry->value)>1){ - Uci->multipv_mode=TRUE; - } } } - + + // EPD test @@ -391,21 +558,45 @@ int main(int argc, char * argv[]) { } // Anything that hasn't been parsed yet is a syntax error + // It seems that XBoard sometimes passes empty strings as arguments + // to PolyGlot. We ignore these. - if(argv[1]){ - my_fatal("main(): Unknown option: %s\n",argv[1]); + argc=1; + while((arg=argv[argc++])){ + if(!my_string_equal(arg,"")){ + my_fatal("main(): Option: \"%s\" not found\n",argv[argc-1]); + } } - - init_book(); gui_init(GUI); mainloop(); return EXIT_SUCCESS; } -// polyglot_set_option +// polyglot_set_option() -void polyglot_set_option(char *name, char *value){ // this must be cleaned up! +void polyglot_set_option(const char *name, const char *value){ // this must be cleaned up! + ini_t ini[1]; + int ret; + ini_init(ini); + my_log("POLYGLOT Setting PolyGlot option %s=\"%s\"\n",name,value); + if(my_string_case_equal(name,"Save")){ + ret=my_mkdir(option_get(Option,"SettingsDir")); + if(ret){ + my_log("POLYGLOT polyglot_set_option(): %s: %s\n", + option_get(Option,"SettingsDir"), + strerror(errno)); + } + make_ini(ini); + write_ini(option_get(Option,"SettingsFile"),ini); + return; + } +// if(my_string_equal(option_get(Option,name),value)){ +// my_log("Not setting PolyGlot option \"%s\" " +// "since it already as the correct value.\n", +// name); +// return; +// } option_set(Option,name,value); if(option_get_bool(Option,"Book")&&(my_string_case_equal(name,"BookFile")||my_string_case_equal(name,"Book"))){ my_log("POLYGLOT *** SETTING BOOK ***\n"); @@ -417,8 +608,8 @@ void polyglot_set_option(char *name, char *value){ // this must be cleaned up! my_log("POLYGLOT Unable to open book \"%s\"\n",option_get_string(Option,"BookFile")); } }else if(option_get_bool(Option,"Log")&&(my_string_case_equal(name,"LogFile") ||my_string_case_equal(name,"Log"))){ - my_log("POLYGLOT *** SETTING LOGFILE ***\n"); - my_log("POLYGLOT LOGFILE \"%s\"\n",option_get_string(Option,"LogFile")); + my_log("POLYGLOT *** SWITCHING LOGFILE ***\n"); + my_log("POLYGLOT NEW LOGFILE \"%s\"\n",option_get_string(Option,"LogFile")); my_log_close(); my_log_open(option_get_string(Option,"LogFile")); }else if(option_get_bool(Option,"UseNice") &&(my_string_case_equal(name,"NiceValue")||my_string_case_equal(name,"UseNice"))){ @@ -437,21 +628,6 @@ void polyglot_set_option(char *name, char *value){ // this must be cleaned up! } -// init_book() - -static void init_book(){ - book_clear(); - if (option_get_bool(Option,"Book")){ - my_log("POLYGLOT *** SETTING BOOK ***\n"); - my_log("POLYGLOT BOOK \"%s\"\n",option_get_string(Option,"BookFile")); - book_open(option_get_string(Option,"BookFile")); - if(!book_is_open()){ - my_log("POLYGLOT Unable to open book \"%s\"\n", - option_get_string(Option,"BookFile")); - } - } -} - // quit() @@ -467,10 +643,7 @@ void quit() { engine_close(Engine); } - if(option_get_bool(Option,"SaveSettingsOnExit")){ - write_ini(option_get_string(Option,"SaveFile"),Option,Uci->option); - } - my_log("POLYGLOT Calling exit\n"); + my_log("POLYGLOT Calling exit\n"); exit(EXIT_SUCCESS); } @@ -494,5 +667,5 @@ static void stop_search() { } -// end of main.cpp +// end of main.c