void getOSiLFromGams(OSCommandLine *oscommandline) { try { #ifdef COIN_HAS_GAMSIO OSgams2os *gams2os = NULL; gams2os = new OSgams2os(oscommandline); gams2os->createOSObjects(); OSiLWriter *osilwriter = NULL; osilwriter = new OSiLWriter(); oscommandline->osil = osilwriter->writeOSiL(gams2os->osinstance); if (gams2os->osoption != NULL) { OSoLWriter *osolwriter = NULL; osolwriter = new OSoLWriter(); oscommandline->osol = osolwriter->writeOSoL(gams2os->osoption); delete osolwriter; osolwriter = NULL; } delete gams2os; gams2os = NULL; delete osilwriter; osilwriter = NULL; #else throw ErrorClass( "trying to convert Gams control file to osil without GAMSUTILS configured"); #endif } catch (const ErrorClass& eclass) { std::cout << eclass.errormsg << std::endl; throw ErrorClass(eclass.errormsg); } }//getOSiLFromGams
void makeStrings(OSCommandLine *oscommandline) { // convert the osinstance and osoption objects to strings if (oscommandline->osil == "") { OSiLWriter *osilwriter = new OSiLWriter(); oscommandline->osil = osilwriter->writeOSiL(oscommandline->osinstance); #ifndef NDEBUG osoutput->OSPrint(ENUM_OUTPUT_AREA_main, ENUM_OUTPUT_LEVEL_trace, oscommandline->osil); #endif delete osilwriter; osilwriter = NULL; } /** With the options we need to be a little more careful: * Options can be in osol and jobID strings (either can be missing) * or in an osoption object (which would include both of the above) * or missing entirely (in which case a dummy string needs to be created) */ OSoLReader *osolreader = NULL; if (oscommandline->osoption != NULL || oscommandline->jobID != "" || oscommandline->osol == "") { if (oscommandline->osoption == NULL) { oscommandline->osoption = new OSOption(); if (oscommandline->osol != "") { osolreader = new OSoLReader(); oscommandline->osoption = osolreader->readOSoL(oscommandline->osol); } if (oscommandline->jobID != "") oscommandline->osoption->setJobID(oscommandline->jobID); } OSoLWriter *osolwriter = new OSoLWriter(); oscommandline->osol = osolwriter->writeOSoL(oscommandline->osoption); #ifndef NDEBUG osoutput->OSPrint(ENUM_OUTPUT_AREA_main, ENUM_OUTPUT_LEVEL_trace, oscommandline->osol); #endif delete osolwriter; osolwriter = NULL; } if (osolreader != NULL) { delete osolreader; oscommandline->osoption = NULL; // no longer needed, and memory may have just been freed } osolreader = NULL; }
void getOSiLFromMps(OSCommandLine *oscommandline) { try { OSmps2osil *mps2osil = NULL; mps2osil = new OSmps2osil(oscommandline->mpsFile); mps2osil->createOSInstance(); OSiLWriter *osilwriter = NULL; osilwriter = new OSiLWriter(); oscommandline->osil = osilwriter->writeOSiL(mps2osil->osinstance); delete mps2osil; mps2osil = NULL; delete osilwriter; osilwriter = NULL; } catch (const ErrorClass& eclass) { std::cout << eclass.errormsg << std::endl; throw ErrorClass(eclass.errormsg); } }//getOSiLFromMps
void getOSiLFromNl(OSCommandLine *oscommandline) { #if 0 try { #ifdef COIN_HAS_ASL OSnl2os *nl2os = NULL; nl2os = new OSnl2os(oscommandline); nl2os->createOSObjects(); OSiLWriter *osilwriter = NULL; osilwriter = new OSiLWriter(); oscommandline->osil = osilwriter->writeOSiL(nl2os->osinstance); if (nl2os->osoption != NULL) { OSoLWriter *osolwriter = NULL; osolwriter = new OSoLWriter(); oscommandline->osol = osolwriter->writeOSoL(nl2os->osoption); delete osolwriter; osolwriter = NULL; } delete nl2os; nl2os = NULL; delete osilwriter; osilwriter = NULL; #else throw ErrorClass( "trying to convert nl to osil without AMPL ASL configured"); #endif } catch (const ErrorClass& eclass) { std::cout << eclass.errormsg << std::endl; throw ErrorClass(eclass.errormsg); } #endif }//getOSiLFromNl
int main(int argc, char **argv) { WindowsErrorPopupBlocker(); std::ostringstream outStr; OSnl2OS *nl2OS = new OSnl2OS(); OSiLReader* osilreader = new OSiLReader(); FileUtil *fileUtil = NULL; ostringstream echo_cl; // initialize the command line structure OSCommandLine *oscommandline;// = new OSCommandLine(); OSCommandLineReader *oscommandlinereader = new OSCommandLineReader(); DefaultSolver *solverType = NULL; char* stub = NULL; if (argc > 0) stub = argv[1]; // getting the OSAmplClient_options into a std::string is a bit of a pain... char* temp = getenv("OSAmplClient_options"); ostringstream temp2; std::string amplclient_options; if (temp != NULL) { temp2 << temp; amplclient_options = temp2.str(); std::cout << amplclient_options << std::endl; } else // amplclient_options = ""; amplclient_options = "serviceMethod retrieve serviceLocation http://74.94.100.129:8080/OSServer/services/OSSolverService printLevel 4 jobID gus-10-apr-2013-0001"; // this output must be held in abeyance until the command line // has been processed and printLevel has been set... #ifndef NDEBUG echo_cl << "HERE ARE THE AMPLCLIENT OPTIONS "; echo_cl << amplclient_options; echo_cl << endl << endl; echo_cl << "Try to open file "; echo_cl << stub << ".nl"; echo_cl << endl; #endif // Now read the command line try { oscommandline = oscommandlinereader->readCommandLine(amplclient_options); } catch (const ErrorClass& eclass) { reportErrors(oscommandline, eclass.errormsg, nl2OS); delete oscommandlinereader; oscommandlinereader = NULL; return 1; } if (stub) oscommandline->nlFile = stub; /** Deal with action items: -printLevel, -logFile, -filePrintLevel, --help, --version **/ try { outStr.str(""); outStr.clear(); outStr << std::endl << "using print level " << oscommandline->printLevel << " for stdout" << std::endl; if (oscommandline->printLevel != DEFAULT_OUTPUT_LEVEL) { osoutput->SetPrintLevel("stdout", (ENUM_OUTPUT_LEVEL)oscommandline->printLevel); #ifndef NDEBUG osoutput->OSPrint(ENUM_OUTPUT_AREA_main, ENUM_OUTPUT_LEVEL_trace, echo_cl.str()); #endif osoutput->OSPrint(ENUM_OUTPUT_AREA_main, ENUM_OUTPUT_LEVEL_info, outStr.str()); } #ifndef NDEBUG else { osoutput->OSPrint(ENUM_OUTPUT_AREA_main, ENUM_OUTPUT_LEVEL_trace, echo_cl.str()); osoutput->OSPrint(ENUM_OUTPUT_AREA_main, ENUM_OUTPUT_LEVEL_debug, outStr.str()); } #endif if (oscommandline->logFile != "") { int status = osoutput->AddChannel(oscommandline->logFile); switch(status) { case 0: osoutput->OSPrint(ENUM_OUTPUT_AREA_main, ENUM_OUTPUT_LEVEL_info, "Added channel " + oscommandline->logFile); break; case 1: osoutput->OSPrint(ENUM_OUTPUT_AREA_main, ENUM_OUTPUT_LEVEL_info, "Output channel " + oscommandline->logFile + " previously defined"); break; default: throw ErrorClass("Could not add output channel " + oscommandline->logFile); }//end switch outStr.str(""); outStr.clear(); outStr << std::endl << "using print level " << oscommandline->filePrintLevel; outStr << " for " << oscommandline->logFile << std::endl; if (oscommandline->filePrintLevel != DEFAULT_OUTPUT_LEVEL) { osoutput->SetPrintLevel(oscommandline->logFile, (ENUM_OUTPUT_LEVEL)oscommandline->filePrintLevel); } else { osoutput->OSPrint(ENUM_OUTPUT_AREA_main, ENUM_OUTPUT_LEVEL_debug, outStr.str()); } } if (oscommandline->invokeHelp == true) { outStr.str(""); outStr.clear(); outStr << std::endl << std::endl << get_help() << std::endl; osoutput->OSPrint(ENUM_OUTPUT_AREA_main, ENUM_OUTPUT_LEVEL_always, outStr.str()); delete oscommandlinereader; oscommandlinereader = NULL; return 0; } if (oscommandline->writeVersion == true) { outStr.str(""); outStr.clear(); outStr << std::endl << std::endl << OSgetVersionInfo() << std::endl; osoutput->OSPrint(ENUM_OUTPUT_AREA_main, ENUM_OUTPUT_LEVEL_always, outStr.str()); delete oscommandlinereader; oscommandlinereader = NULL; return 0; } } catch (const ErrorClass& eclass) { reportErrors(oscommandline, eclass.errormsg, nl2OS); delete oscommandlinereader; oscommandlinereader = NULL; return 1; } #ifndef NDEBUG outStr.str(""); outStr.clear(); outStr << "HERE ARE THE OPTION VALUES:" << endl; if(oscommandline->configFile != "") outStr << "Config file = " << oscommandline->configFile << endl; if(oscommandline->osilFile != "") outStr << "OSiL file = " << oscommandline->osilFile << endl; if(oscommandline->osolFile != "") outStr << "OSoL file = " << oscommandline->osolFile << endl; if(oscommandline->osrlFile != "") outStr << "OSrL file = " << oscommandline->osrlFile << endl; //if(oscommandline->insListFile != "") outStr << "Instruction List file = " << oscommandline->insListFile << endl; if(oscommandline->osplInputFile != "") outStr << "OSpL Input file = " << oscommandline->osplInputFile << endl; if(oscommandline->serviceMethod != "") outStr << "Service Method = " << oscommandline->serviceMethod << endl; if(oscommandline->mpsFile != "") outStr << "MPS File Name = " << oscommandline->mpsFile << endl; if(oscommandline->nlFile != "") outStr << "NL File Name = " << oscommandline->nlFile << endl; if(oscommandline->gamsControlFile != "") outStr << "gams Control File Name = " << oscommandline->gamsControlFile << endl; if(oscommandline->browser != "") outStr << "Browser Value = " << oscommandline->browser << endl; if(oscommandline->solverName != "") outStr << "Selected Solver = " << oscommandline->solverName << endl; if(oscommandline->serviceLocation != "") outStr << "Service Location = " << oscommandline->serviceLocation << endl; if(oscommandline->jobID != "") outStr << "Job ID = " << oscommandline->jobID << endl; if(oscommandline->printModel) outStr << "print model prior to solve/send" << endl; if(oscommandline->printRowNumberAsString != "") outStr << "print model row " << oscommandline->printRowNumberAsString << " prior to solve/send" << endl; outStr << "print level for stdout: " << oscommandline->printLevel << endl; if(oscommandline->logFile != "") { outStr << "also send output to " << oscommandline->logFile << endl; outStr << "print level for file output: " << oscommandline->filePrintLevel << endl; } osoutput->OSPrint(ENUM_OUTPUT_AREA_main, ENUM_OUTPUT_LEVEL_debug, outStr.str()); #endif //convert solver name to lower case so there is no ambiguity unsigned int k; for (k = 0; k < oscommandline->solverName.length(); k++) { oscommandline->solverName[k] = (char)tolower(oscommandline->solverName[k]); } // now call the correct serviceMethod // solve is the default if (oscommandline->serviceMethod == "") oscommandline->serviceMethod = "solve"; try { // for local use only the solve method is available if (oscommandline->serviceLocation == "") if (oscommandline->serviceMethod != "solve") throw ErrorClass("No serviceLocation given. Only \'solve\' is available locally."); if (oscommandline->serviceMethod[0] == 's') { // for solve or send commands we must have an instance if (oscommandline->osil == "") { if (!findInstance(oscommandline, nl2OS)) throw ErrorClass("No instance could be found"); } // write out the model or portion thereof, if directed by the user if (oscommandline->printModel == true) { if (oscommandline->osinstance == NULL) { oscommandline->osinstance = osilreader->readOSiL(oscommandline->osil); } osoutput->OSPrint(ENUM_OUTPUT_AREA_main, ENUM_OUTPUT_LEVEL_always, oscommandline->osinstance->printModel()); } else if (oscommandline->printRowNumberAsString != "") { if (oscommandline->osinstance == NULL) { oscommandline->osinstance = osilreader->readOSiL(oscommandline->osil); } doPrintRow(oscommandline->osinstance, oscommandline->printRowNumberAsString); } // write the instance to an OSiL file, if directed by the user if (oscommandline->osilOutputFile != "") { fileUtil = new FileUtil(); if (oscommandline->osil == "") { OSiLWriter* osilwriter = new OSiLWriter(); oscommandline->osil = osilwriter->writeOSiL(oscommandline->osinstance); delete osilwriter; osilwriter = NULL; } fileUtil->writeFileFromString(oscommandline->osilOutputFile, oscommandline->osil); delete fileUtil; fileUtil = NULL; } // write the solver options to an OSoL file, if directed by the user if (oscommandline->osolOutputFile != "") { fileUtil = new FileUtil(); if (oscommandline->osol != "" && oscommandline->osoption == NULL) fileUtil->writeFileFromString(oscommandline->osolOutputFile, oscommandline->osol); else { if (oscommandline->osoption == NULL) oscommandline->osoption = new OSOption(); OSoLWriter* osolwriter = new OSoLWriter(); fileUtil->writeFileFromString(oscommandline->osolOutputFile, osolwriter->writeOSoL(oscommandline->osoption)); delete osolwriter; osolwriter = NULL; } delete fileUtil; fileUtil = NULL; } // if no serviceLocation was given, do a local solve if (oscommandline->serviceLocation == "") { std::string osrl; if (oscommandline->osinstance != NULL) if (oscommandline->osoption != NULL) osrl = runSolver(oscommandline->solverName, oscommandline->osoption, oscommandline->osinstance); else osrl = runSolver(oscommandline->solverName, oscommandline->osol, oscommandline->osinstance); else if (oscommandline->osoption != NULL) osrl = runSolver(oscommandline->solverName, oscommandline->osoption, oscommandline->osil); else osrl = runSolver(oscommandline->solverName, oscommandline->osol, oscommandline->osil); reportResults(oscommandline, osrl, nl2OS); } // remote solve or send else { if (oscommandline->serviceMethod[1] == 'e') send(oscommandline, nl2OS); else solve(oscommandline, nl2OS); } } else //call one of the other methods { switch (oscommandline->serviceMethod[0]) { case 'g': getJobID(oscommandline, nl2OS); break; case 'r': retrieve(oscommandline, nl2OS); break; case 'k': if (oscommandline->serviceMethod[1] == 'i') kill(oscommandline, nl2OS); else knock(oscommandline, nl2OS); break; default: break; } } // garbage collection if (osilreader != NULL) delete osilreader; oscommandline->osinstance = NULL; osilreader = NULL; delete oscommandlinereader; oscommandlinereader = NULL; delete fileUtil; fileUtil = NULL; if (nl2OS != NULL) delete nl2OS; nl2OS = NULL; return 0; } catch (const ErrorClass& eclass) { reportErrors(oscommandline, eclass.errormsg, nl2OS); if (osilreader != NULL) delete osilreader; oscommandline->osinstance = NULL; osilreader = NULL; delete oscommandlinereader; oscommandlinereader = NULL; delete fileUtil; fileUtil = NULL; if (nl2OS != NULL) delete nl2OS; nl2OS = NULL; return 1; } }// end of main()
OSServiceMethods::OSServiceMethods(OSCommandLine *oscommandline): resultString("") { #ifdef DEBUG_OSSERVICEMETHODS cout << "Inside the OSServiceMethods Constructor" << endl; #endif FileUtil *fileUtil = NULL; OSiLReader *osilreader = NULL; OSoLReader *osolreader = NULL; OSiLWriter *osilwriter = NULL; OSoLWriter *osolwriter = NULL; OSmps2osil *mps2osil = NULL; #ifdef COIN_HAS_ASL // OSnl2os *nl2os = NULL; OSnl2osil *nl2osil = NULL; #endif #ifdef COIN_HAS_GAMSUTILS OSgams2os *gams2os = NULL; #endif try { fileUtil = new FileUtil(); /** Prepare the OSInstance and OSOption objects if needed. * The objects are needed if * 1. any output is based on the instance ((i.e, printModel, * printRow or osilOutputFile is specified) OR * 2. a solve/send command is based on input other than OSiL format */ if ( (oscommandline->printModel || oscommandline->printRowNumberAsString != "" || oscommandline->osilOutputFile != "") || ((oscommandline->serviceMethod[0] = 's') && (oscommandline->osilFile == ""))) { /** Search for an instance in the following order * 1. osil file * 2. non-proprietary formats (only MPS for now) * 3. proprietary formats (AMPL nl, GAMS dat, etc.) */ if (oscommandline->osilFile != "") { osilreader = new OSiLReader(); oscommandline->osil = fileUtil->getFileAsString( (oscommandline->osilFile).c_str()); oscommandline->osinstance = osilreader->readOSiL(oscommandline->osil); if (oscommandline->osolFile != "") { oscommandline->osol = fileUtil->getFileAsString( (oscommandline->osolFile).c_str()); osolreader = new OSoLReader(); oscommandline->osoption = osolreader->readOSoL(oscommandline->osol); } } else if (oscommandline->mpsFile != "") { mps2osil = new OSmps2osil(oscommandline->mpsFile); mps2osil->createOSInstance(); oscommandline->osinstance = mps2osil->osinstance; if (oscommandline->osolFile != "") { oscommandline->osol = fileUtil->getFileAsString( (oscommandline->osolFile).c_str()); osolreader = new OSoLReader(); oscommandline->osoption = osolreader->readOSoL(oscommandline->osol); } } else if (oscommandline->nlFile != "") { #ifdef COIN_HAS_ASL // nl2os = new OSnl2os(oscommandline); // nl2os->createOSObjects(); // osinstance = nl2os->osinstance; // osoption = nl2os->osoption; nl2osil = new OSnl2osil(oscommandline->nlFile); nl2osil->createOSInstance(); oscommandline->osinstance = nl2osil->osinstance; #else throw ErrorClass( "nl file specified locally but ASL not present"); #endif } else if (oscommandline->gamsControlFile != "") { #ifdef COIN_HAS_GAMSUTILS gams2os = new OSgams2os(oscommandline); gams2os->createOSObjects(); osinstance = gams2os->osinstance; osoption = gams2os->osoption; #else throw ErrorClass( "a Gams Control specified locally but GAMSIP not present"); #endif } else { if (oscommandline->osolFile != "" && oscommandline->serviceLocation != "") { oscommandline->osol = fileUtil->getFileAsString( (oscommandline->osolFile).c_str()); osolreader = new OSoLReader(); oscommandline->osoption = osolreader->readOSoL(oscommandline->osol); if (oscommandline->solverName != "") oscommandline->osoption->setSolverToInvoke(oscommandline->solverName); } if (oscommandline->osol.find( "<instanceLocation") == std::string::npos) throw ErrorClass( "Error: no optimization instance found"); } // Make sure the solver name is recorded properly if (oscommandline->solverName != "") { if (oscommandline->osol == "" && oscommandline->osolFile != "") oscommandline->osol = fileUtil->getFileAsString( (oscommandline->osolFile).c_str()); oscommandline->osoption->setSolverToInvoke(oscommandline->solverName); } // convert OS objects to strings if necessary if (oscommandline->serviceLocation != "" && oscommandline->osil == "") { osilwriter= new OSiLWriter(); oscommandline->osil = osilwriter->writeOSiL(oscommandline->osinstance); } if (oscommandline->serviceLocation != "" && oscommandline->osoption != NULL) { osolwriter= new OSoLWriter(); oscommandline->osol = osolwriter->writeOSoL(oscommandline->osoption); } } // cleanup if (fileUtil != NULL) delete fileUtil; fileUtil = NULL; if (osilreader != NULL) delete osilreader; osilreader = NULL; if (osolreader != NULL) delete osolreader; osolreader = NULL; if (osilwriter != NULL) delete osilwriter; osilwriter = NULL; if (osolwriter != NULL) delete osolwriter; osolwriter = NULL; if (mps2osil != NULL) delete mps2osil; mps2osil = NULL; #ifdef COIN_HAS_ASL // if (nl2os != NULL) delete nl2os; // nl2os = NULL; if (nl2osil != NULL) delete nl2osil; nl2osil = NULL; #endif #ifdef COIN_HAS_GAMSUTILS if (gams2os != NULL) delete gams2os; gams2os = NULL; #endif } catch(const ErrorClass& eclass) { if (fileUtil != NULL) delete fileUtil; fileUtil = NULL; if (osilreader != NULL) delete osilreader; osilreader = NULL; if (osolreader != NULL) delete osolreader; osolreader = NULL; if (osilwriter != NULL) delete osilwriter; osilwriter = NULL; if (osolwriter != NULL) delete osolwriter; osolwriter = NULL; if (mps2osil != NULL) delete mps2osil; mps2osil = NULL; #ifdef COIN_HAS_ASL if (nl2osil != NULL) delete nl2osil; nl2osil = NULL; #endif #ifdef COIN_HAS_GAMSUTILS if (gams2os != NULL) delete gams2os; gams2os = NULL; #endif throw ErrorClass(eclass.errormsg); } }//end nonstandard OSServiceMethods constructor