Engine::Engine(){
try {
cFactory = CommandFactory::getInstance();
+ mout = MothurOut::getInstance();
}
catch(exception& e) {
- errorOut(e, "Engine", "Engine");
+ mout->errorOut(e, "Engine", "Engine");
exit(1);
}
}
globaldata = GlobalData::getInstance();
globaldata->argv = path;
+
}
/***********************************************************************/
while(quitCommandCalled != 1){
- mothurOutEndLine();
+ mout->mothurOutEndLine();
+
+ input = getCommand();
+ mout->mothurOutEndLine();
- input = getCommand();
+ if (mout->control_pressed) { input = "quit()"; }
//allow user to omit the () on the quit command
if (input == "quit") { input = "quit()"; }
options = parser.getOptionString();
if (commandName != "") {
-
- //executes valid command
- Command* command = cFactory->getCommand(commandName, options);
- quitCommandCalled = command->execute();
-
- }else {
- mothurOut("Your input contains errors. Please try again.");
- mothurOutEndLine();
- }
+ mout->executing = true;
+ #ifdef USE_MPI
+ int pid;
+ MPI_Comm_rank(MPI_COMM_WORLD, &pid);
+
+ if ((pid != 0) && !(cFactory->MPIEnabled(commandName))) {
+cout << pid << " is waiting " << commandName << endl;
+ char buf[4];
+ MPI_Bcast(buf, 4, MPI_CHAR, 0, MPI_COMM_WORLD); //make everyone wait - just in case
+ }
+
+cout << pid << " is here " << commandName << endl;
+ if ((cFactory->MPIEnabled(commandName)) || (pid == 0)) {
+ #endif
+ //executes valid command
+ Command* command = cFactory->getCommand(commandName, options);
+ quitCommandCalled = command->execute();
+ mout->control_pressed = 0;
+ mout->executing = false;
+
+ #ifdef USE_MPI
+ if (!(cFactory->MPIEnabled(commandName))) {
+ char buf[4];
+ strcpy(buf, "done");
+
+ MPI_Bcast(buf, 4, MPI_CHAR, 0, MPI_COMM_WORLD); //make everyone wait - just in case
+ cout << pid << " is broadcasting " << endl;
+ }
+ }
+ #endif
+ }else {
+ mout->mothurOut("Invalid.");
+ mout->mothurOutEndLine();
+ }
}
return 1;
}
catch(exception& e) {
- errorOut(e, "InteractEngine", "getInput");
+ mout->errorOut(e, "InteractEngine", "getInput");
exit(1);
}
}
if(nextCommand != NULL) { add_history(nextCommand); }
else{ //^D causes null string and we want it to quit mothur
nextCommand = "quit";
- cout << nextCommand << endl;
+ mout->mothurOut(nextCommand);
}
- mothurOutJustToLog("mothur > " + toString(nextCommand));
+ mout->mothurOutJustToLog("mothur > " + toString(nextCommand));
return nextCommand;
#else
string nextCommand = "";
- mothurOut("mothur > ");
+ mout->mothurOut("mothur > ");
getline(cin, nextCommand);
- mothurOutJustToLog("mothur > " + toString(nextCommand));
+ mout->mothurOutJustToLog("mothur > " + toString(nextCommand));
+
return nextCommand;
#endif
#else
- string nextCommand = "";
- mothurOut("mothur > ");
- getline(cin, nextCommand);
- mothurOutJustToLog("mothur > " + toString(nextCommand));
- return nextCommand;
+ string nextCommand = "";
+
+ mout->mothurOut("mothur > ");
+ getline(cin, nextCommand);
+ mout->mothurOutJustToLog(toString(nextCommand));
+
+ return nextCommand;
#endif
-
- mothurOutEndLine();
+
}
catch(exception& e) {
- errorOut(e, "Engine", "getCommand");
+ mout->errorOut(e, "Engine", "getCommand");
exit(1);
}
}
}
catch(exception& e) {
- errorOut(e, "BatchEngine", "BatchEngine");
+ mout->errorOut(e, "BatchEngine", "BatchEngine");
exit(1);
}
}
try {
//check if this is a valid batchfile
if (openedBatch == 1) {
- mothurOut("unable to open batchfile");
- mothurOutEndLine();
+ mout->mothurOut("unable to open batchfile");
+ mout->mothurOutEndLine();
return 1;
}
if (input[0] != '#') {
- mothurOutEndLine();
- mothurOut("mothur > " + input);
- mothurOutEndLine();
-
+ mout->mothurOutEndLine();
+ mout->mothurOut("mothur > " + input);
+ mout->mothurOutEndLine();
+
+ if (mout->control_pressed) { input = "quit()"; }
//allow user to omit the () on the quit command
if (input == "quit") { input = "quit()"; }
options = parser.getOptionString();
if (commandName != "") {
-
+ mout->executing = true;
+ #ifdef USE_MPI
+ int pid;
+ MPI_Comm_rank(MPI_COMM_WORLD, &pid);
+
+ if ((pid != 0) && !(cFactory->MPIEnabled(commandName))) {
+cout << pid << " is waiting " << commandName << endl;
+ char buf[4];
+ MPI_Bcast(buf, 4, MPI_CHAR, 0, MPI_COMM_WORLD); //make everyone wait - just in case
+ }
+
+cout << pid << " is here " << commandName << endl;
+ if ((cFactory->MPIEnabled(commandName)) || (pid == 0)) {
+ #endif
//executes valid command
Command* command = cFactory->getCommand(commandName, options);
quitCommandCalled = command->execute();
+ mout->control_pressed = 0;
+ mout->executing = false;
+
+ #ifdef USE_MPI
+ if (!(cFactory->MPIEnabled(commandName))) {
+ char buf[4];
+ strcpy(buf, "done");
+
+ MPI_Bcast(buf, 4, MPI_CHAR, 0, MPI_COMM_WORLD); //make everyone wait - just in case
+ cout << pid << " is broadcasting " << endl;
+ }
+ }
+ #endif
}else {
- mothurOut("Invalid.");
- mothurOutEndLine();
+ mout->mothurOut("Invalid.");
+ mout->mothurOutEndLine();
}
}
return 1;
}
catch(exception& e) {
- errorOut(e, "BatchEngine", "getInput");
+ mout->errorOut(e, "BatchEngine", "getInput");
exit(1);
}
}
listOfCommands = commandString.substr(1, (commandString.length()-1));
globaldata->argv = path;
-
+
}
catch(exception& e) {
- errorOut(e, "ScriptEngine", "ScriptEngine");
+ mout->errorOut(e, "ScriptEngine", "ScriptEngine");
exit(1);
}
}
if (input == "") { input = "quit()"; }
+ mout->mothurOutEndLine();
+ mout->mothurOut("mothur > " + input);
+ mout->mothurOutEndLine();
- mothurOutEndLine();
- mothurOut("mothur > " + input);
- mothurOutEndLine();
-
+ if (mout->control_pressed) { input = "quit()"; }
//allow user to omit the () on the quit command
if (input == "quit") { input = "quit()"; }
options = parser.getOptionString();
if (commandName != "") {
+ mout->executing = true;
+ #ifdef USE_MPI
+ int pid, numProcesses;
+ MPI_Status status;
+ //MPI_Request request;
+
+ MPI_Comm_rank(MPI_COMM_WORLD, &pid);
+ MPI_Comm_size(MPI_COMM_WORLD, &numProcesses);
+
+ if ((pid != 0) && (!(cFactory->MPIEnabled(commandName)))) {
+cout << pid << " is waiting " << commandName << endl;
+ char buf[12];
+
+ MPI_Recv(buf, 12, MPI_CHAR, 0, 2001, MPI_COMM_WORLD, &status); //make everyone wait - just in case
+ //MPI_Wait(&request, &status);
+ cout << pid << " received " << buf << endl;
+ }
+
+
+cout << pid << " is here " << commandName << endl;
+ if ((cFactory->MPIEnabled(commandName)) || (pid == 0)) {
+ cout << pid << " is in execute" << endl;
+ #endif
+ //executes valid command
+ Command* command = cFactory->getCommand(commandName, options);
+ quitCommandCalled = command->execute();
+ mout->control_pressed = 0;
+ mout->executing = false;
+
+ #ifdef USE_MPI
+ cout << pid << " is done in execute" << endl;
+ if ((pid == 0) && (!(cFactory->MPIEnabled(commandName)))) {
+ char buf[12];
+ strcpy(buf, "command done");
+
+ for(int i = 1; i < numProcesses; i++) {
+ MPI_Send(buf, 12, MPI_CHAR, i, 2001, MPI_COMM_WORLD); //make everyone wait - just in case
+ //MPI_Wait(&request, &status);
+ cout << pid << " sent " << buf << endl;
+ }
+ cout << pid << " is sending " << endl;
+ }
+ }
+ #endif
+ }else {
+ mout->mothurOut("Invalid.");
+ mout->mothurOutEndLine();
+ }
- //executes valid command
- Command* command = cFactory->getCommand(commandName, options);
- quitCommandCalled = command->execute();
- }else {
- mothurOut("Invalid.");
- mothurOutEndLine();
- }
}
return 1;
}
catch(exception& e) {
- errorOut(e, "ScriptEngine", "getInput");
+ mout->errorOut(e, "ScriptEngine", "getInput");
exit(1);
}
}
/***********************************************************************/
string ScriptEngine::getNextCommand(string& commandString) {
try {
+
+ #ifdef USE_MPI
+ int ierr = MPI_Barrier(MPI_COMM_WORLD);
+cout << "barrier = " << ierr << endl;
+ #endif
+
string nextcommand = "";
int count = 0;
if (commandString.length() == 0) { break; }
}
}
-
+
return nextcommand;
}
catch(exception& e) {
- errorOut(e, "ScriptEngine", "getNextCommand");
+ mout->errorOut(e, "ScriptEngine", "getNextCommand");
exit(1);
}
}