script.hpp iostream iomanip fstream cstring csignal /usr/include/gecode/driver.hh iomanip /usr/include/gecode/driver/script.hpp fstream iostream csignal cstring /usr/include/gecode/flatzinc.hh /usr/include/gecode/driver/script.hpp /usr/include/gecode/driver.hh /usr/include/gecode/flatzinc/parser.hh /usr/include/gecode/flatzinc/registry.hh Gecode::Driver::CombinedStop Gecode::Driver::EngineToMeta Gecode Gecode::Driver /*-*-mode:C++;c-basic-offset:2;indent-tabs-mode:nil-*-*/ /* *Mainauthors: *ChristianSchulte<schulte@gecode.org> * *Copyright: *ChristianSchulte,2004 * *Lastmodified: *$Date:2013-07-1502:49:56+0200(Mon,15Jul2013)$by$Author:tack$ *$Revision:13879$ * *ThisfileispartofGecode,thegenericconstraint *developmentenvironment: *http://www.gecode.org * * *Permissionisherebygranted,freeofcharge,toanypersonobtaining *acopyofthissoftwareandassociateddocumentationfiles(the *"Software"),todealintheSoftwarewithoutrestriction,including *withoutlimitationtherightstouse,copy,modify,merge,publish, *distribute,sublicense,and/orsellcopiesoftheSoftware,andto *permitpersonstowhomtheSoftwareisfurnishedtodoso,subjectto *thefollowingconditions: * *Theabovecopyrightnoticeandthispermissionnoticeshallbe *includedinallcopiesorsubstantialportionsoftheSoftware. * *THESOFTWAREISPROVIDED"ASIS",WITHOUTWARRANTYOFANYKIND, *EXPRESSORIMPLIED,INCLUDINGBUTNOTLIMITEDTOTHEWARRANTIESOF *MERCHANTABILITY,FITNESSFORAPARTICULARPURPOSEAND *NONINFRINGEMENT.INNOEVENTSHALLTHEAUTHORSORCOPYRIGHTHOLDERSBE *LIABLEFORANYCLAIM,DAMAGESOROTHERLIABILITY,WHETHERINANACTION *OFCONTRACT,TORTOROTHERWISE,ARISINGFROM,OUTOFORINCONNECTION *WITHTHESOFTWAREORTHEUSEOROTHERDEALINGSINTHESOFTWARE. * */ #include<iostream> #include<iomanip> #include<fstream> #include<cstring> #ifndefGECODE_THREADS_WINDOWS #include<csignal> #endif namespaceGecode{namespaceDriver{ classCombinedStop:publicSearch::Stop{ private: Search::NodeStop*ns; Search::FailStop*fs; Search::TimeStop*ts; GECODE_DRIVER_EXPORT staticboolsigint; CombinedStop(unsignedintnode,unsignedintfail,unsignedinttime) :ns((node>0)?newSearch::NodeStop(node):NULL), fs((fail>0)?newSearch::FailStop(fail):NULL), ts((time>0)?newSearch::TimeStop(time):NULL){ sigint=false; } public: enum{ SR_NODE=1<<0, SR_FAIL=1<<1, SR_TIME=1<<2, SR_INT=1<<3 }; virtualboolstop(constSearch::Statistics&s,constSearch::Options&o){ return sigint|| ((ns!=NULL)&&ns->stop(s,o))|| ((fs!=NULL)&&fs->stop(s,o))|| ((ts!=NULL)&&ts->stop(s,o)); } intreason(constSearch::Statistics&s,constSearch::Options&o){ return (((ns!=NULL)&&ns->stop(s,o))?SR_NODE:0)| (((fs!=NULL)&&fs->stop(s,o))?SR_FAIL:0)| (((ts!=NULL)&&ts->stop(s,o))?SR_TIME:0)| (sigint?SR_INT:0); } staticSearch::Stop* create(unsignedintnode,unsignedintfail,unsignedinttime, boolintr){ if((!intr)&&(node==0)&&(fail==0)&&(time==0)) returnNULL; else returnnewCombinedStop(node,fail,time); } #ifdefGECODE_THREADS_WINDOWS staticBOOLinterrupt(DWORDt){ if(t==CTRL_C_EVENT){ sigint=true; installCtrlHandler(false,true); returntrue; } returnfalse; } #else staticvoid interrupt(int){ sigint=true; installCtrlHandler(false,true); } #endif staticvoidinstallCtrlHandler(boolinstall,boolforce=false){ if(force||!sigint){ #ifdefGECODE_THREADS_WINDOWS SetConsoleCtrlHandler((PHANDLER_ROUTINE)interrupt,install); #else std::signal(SIGINT,install?interrupt:SIG_DFL); #endif } } ~CombinedStop(void){ deletens;deletefs;deletets; } }; GECODE_DRIVER_EXPORTvoid stop(Support::Timer&t,std::ostream&os); GECODE_DRIVER_EXPORTdouble am(doublet[],intn); GECODE_DRIVER_EXPORTdouble dev(doublet[],intn); template<classOptions> inlineSearch::Cutoff* createCutoff(constOptions&o){ switch(o.restart()){ caseRM_NONE: returnNULL; caseRM_CONSTANT: returnSearch::Cutoff::constant(o.restart_scale()); caseRM_LINEAR: returnSearch::Cutoff::linear(o.restart_scale()); caseRM_LUBY: returnSearch::Cutoff::luby(o.restart_scale()); caseRM_GEOMETRIC: returnSearch::Cutoff::geometric(o.restart_scale(),o.restart_base()); default:GECODE_NEVER; } returnNULL; } #ifdefGECODE_HAS_GIST template<classEngine> classGistEngine{ public: staticvoidexplore(Space*root,constGist::Options&opt){ (void)Gist::dfs(root,opt); } }; template<typenameS> classGistEngine<DFS<S>>{ public: staticvoidexplore(S*root,constGist::Options&opt){ (void)Gist::dfs(root,opt); } }; template<typenameS> classGistEngine<BAB<S>>{ public: staticvoidexplore(S*root,constGist::Options&opt){ (void)Gist::bab(root,opt); } }; #endif template<classSpace> std::ostream& ScriptBase<Space>::select_ostream(constchar*name,std::ofstream&ofs){ if(strcmp(name,"stdout")==0){ returnstd::cout; }elseif(strcmp(name,"stdlog")==0){ returnstd::clog; }elseif(strcmp(name,"stderr")==0){ returnstd::cerr; }else{ ofs.open(name); returnofs; } } template<template<class>classE,classT> classEngineToMeta:publicE<T>{ public: EngineToMeta(T*s,constSearch::Options&o):E<T>(s,o){} }; template<classSpace> template<classScript,template<class>classEngine,classOptions> void ScriptBase<Space>::run(constOptions&o,Script*s){ if(o.restart()==RM_NONE){ runMeta<Script,Engine,Options,EngineToMeta>(o,s); }else{ runMeta<Script,Engine,Options,RBS>(o,s); } } template<classSpace> template<classScript,template<class>classEngine,classOptions, template<template<class>class,class>classMeta> void ScriptBase<Space>::runMeta(constOptions&o,Script*s){ usingnamespacestd; ofstreamsol_file,log_file; ostream&s_out=select_ostream(o.out_file(),sol_file); ostream&l_out=select_ostream(o.log_file(),log_file); try{ switch(o.mode()){ caseSM_GIST: #ifdefGECODE_HAS_GIST { Gist::Print<Script>pi(o.name()); Gist::VarComparator<Script>vc(o.name()); Gist::Optionsopt; opt.inspect.click(&pi); opt.inspect.compare(&vc); opt.clone=false; opt.c_d=o.c_d(); opt.a_d=o.a_d(); for(inti=0;o.inspect.click(i)!=NULL;i++) opt.inspect.click(o.inspect.click(i)); for(inti=0;o.inspect.solution(i)!=NULL;i++) opt.inspect.solution(o.inspect.solution(i)); for(inti=0;o.inspect.move(i)!=NULL;i++) opt.inspect.move(o.inspect.move(i)); for(inti=0;o.inspect.compare(i)!=NULL;i++) opt.inspect.compare(o.inspect.compare(i)); if(s==NULL) s=newScript(o); (void)GistEngine<Engine<Script>>::explore(s,opt); } break; //IfGistisnotavailable,fallthrough #endif caseSM_SOLUTION: { l_out<<o.name()<<endl; Support::Timert; inti=o.solutions(); t.start(); if(s==NULL) s=newScript(o); unsignedintn_p=s->propagators(); unsignedintn_b=s->branchers(); Search::Optionsso; so.threads=o.threads(); so.c_d=o.c_d(); so.a_d=o.a_d(); so.stop=CombinedStop::create(o.node(),o.fail(),o.time(), o.interrupt()); so.cutoff=createCutoff(o); so.clone=false; so.nogoods_limit=o.nogoods()?o.nogoods_limit():0U; if(o.interrupt()) CombinedStop::installCtrlHandler(true); { Meta<Engine,Script>e(s,so); if(o.print_last()){ Script*px=NULL; do{ Script*ex=e.next(); if(ex==NULL){ if(px!=NULL){ px->print(s_out); deletepx; } break; }else{ deletepx; px=ex; } }while(--i!=0); }else{ do{ Script*ex=e.next(); if(ex==NULL) break; ex->print(s_out); deleteex; }while(--i!=0); } if(o.interrupt()) CombinedStop::installCtrlHandler(false); Search::Statisticsstat=e.statistics(); s_out<<endl; if(e.stopped()){ l_out<<"Searchenginestopped..."<<endl <<"\treason:"; intr=static_cast<CombinedStop*>(so.stop)->reason(stat,so); if(r&CombinedStop::SR_INT) l_out<<"userinterrupt"<<endl; else{ if(r&CombinedStop::SR_NODE) l_out<<"node"; if(r&CombinedStop::SR_FAIL) l_out<<"fail"; if(r&CombinedStop::SR_TIME) l_out<<"time"; l_out<<"limitreached"<<endl<<endl; } } l_out<<"Initial"<<endl <<"\tpropagators:"<<n_p<<endl <<"\tbranchers:"<<n_b<<endl <<endl <<"Summary"<<endl <<"\truntime:"; stop(t,l_out); l_out<<endl <<"\tsolutions:" <<::abs(static_cast<int>(o.solutions())-i)<<endl <<"\tpropagations:"<<stat.propagate<<endl <<"\tnodes:"<<stat.node<<endl <<"\tfailures:"<<stat.fail<<endl <<"\trestarts:"<<stat.restart<<endl <<"\tno-goods:"<<stat.nogood<<endl <<"\tpeakdepth:"<<stat.depth<<endl #ifdefGECODE_PEAKHEAP <<"\tpeakmemory:" <<static_cast<int>((heap.peak()+1023)/1024)<<"KB" <<endl #endif <<endl; } deleteso.stop; } break; caseSM_STAT: { l_out<<o.name()<<endl; Support::Timert; inti=o.solutions(); t.start(); if(s==NULL) s=newScript(o); unsignedintn_p=s->propagators(); unsignedintn_b=s->branchers(); Search::Optionsso; so.clone=false; so.threads=o.threads(); so.c_d=o.c_d(); so.a_d=o.a_d(); so.stop=CombinedStop::create(o.node(),o.fail(),o.time(), o.interrupt()); so.cutoff=createCutoff(o); so.nogoods_limit=o.nogoods()?o.nogoods_limit():0U; if(o.interrupt()) CombinedStop::installCtrlHandler(true); { Meta<Engine,Script>e(s,so); do{ Script*ex=e.next(); if(ex==NULL) break; deleteex; }while(--i!=0); if(o.interrupt()) CombinedStop::installCtrlHandler(false); Search::Statisticsstat=e.statistics(); l_out<<endl <<"\tpropagators:"<<n_p<<endl <<"\tbranchers:"<<n_b<<endl <<"\truntime:"; stop(t,l_out); l_out<<endl <<"\tsolutions:" <<::abs(static_cast<int>(o.solutions())-i)<<endl <<"\tpropagations:"<<stat.propagate<<endl <<"\tnodes:"<<stat.node<<endl <<"\tfailures:"<<stat.fail<<endl <<"\trestarts:"<<stat.restart<<endl <<"\tno-goods:"<<stat.nogood<<endl <<"\tpeakdepth:"<<stat.depth<<endl #ifdefGECODE_PEAKHEAP <<"\tpeakmemory:" <<static_cast<int>((heap.peak()+1023)/1024)<<"KB" <<endl #endif <<endl; } deleteso.stop; } break; caseSM_TIME: { l_out<<o.name()<<endl; Support::Timert; double*ts=newdouble[o.samples()]; boolstopped=false; for(unsignedints=o.samples();!stopped&&s--;){ t.start(); for(unsignedintk=o.iterations();!stopped&&k--;){ unsignedinti=o.solutions(); Script*s=newScript(o); Search::Optionsso; so.clone=false; so.threads=o.threads(); so.c_d=o.c_d(); so.a_d=o.a_d(); so.stop=CombinedStop::create(o.node(),o.fail(),o.time(), false); so.cutoff=createCutoff(o); so.nogoods_limit=o.nogoods()?o.nogoods_limit():0U; { Meta<Engine,Script>e(s,so); do{ Script*ex=e.next(); if(ex==NULL) break; deleteex; }while(--i!=0); if(e.stopped()) stopped=true; } deleteso.stop; } ts[s]=t.stop()/o.iterations(); } if(stopped){ l_out<<"\tSTOPPED"<<endl; }else{ doublem=am(ts,o.samples()); doubled=dev(ts,o.samples())*100.0; l_out<<"\truntime:" <<setw(20)<<right <<showpoint<<fixed <<setprecision(6)<<m<<"ms" <<setprecision(2)<<"("<<d<<"%deviation)" <<endl; } delete[]ts; } break; } }catch(Exception&e){ cerr<<"Exception:"<<e.what()<<"."<<endl <<"Stopping..."<<endl; if(sol_file.is_open()) sol_file.close(); if(log_file.is_open()) log_file.close(); exit(EXIT_FAILURE); } if(sol_file.is_open()) sol_file.close(); if(log_file.is_open()) log_file.close(); } }} //STATISTICS:driver-any