G4MPIsession Class Reference

#include <Doxymodules_parallel.h>

Inheritance diagram for G4MPIsession:

Public Member Functions
	G4MPIsession (G4VUIshell *ashell=0)
	~G4MPIsession ()
void	SetPrompt (const G4String &prompt)
void	SetShell (G4VUIshell *ashell)
virtual G4UIsession *	SessionStart ()
Public Member Functions inherited from G4VMPIsession
	G4VMPIsession ()
	~G4VMPIsession ()
virtual void	PauseSessionStart (const G4String &msg)
virtual G4int	ReceiveG4cout (const G4String &coutString)
virtual G4int	ReceiveG4cerr (const G4String &cerrString)

Private Member Functions
G4String	GetCommand (const char *msg=0)
G4bool	TryForcedTerminate ()

Private Attributes
G4VUIshell *	shell_

Additional Inherited Members
Protected Member Functions inherited from G4VMPIsession
G4int	ExecCommand (const G4String &acommand)
G4String	TruncateCommand (const G4String &command) const
G4String	BypassCommand (const G4String &command) const
virtual G4bool	GetHelpChoice (G4int &aval)
virtual void	ExitHelp () const
Protected Attributes inherited from G4VMPIsession
G4MPImanager *	g4mpi_
G4bool	is_master_
G4bool	is_slave_
G4int	rank_

Detailed Description

Definition at line 68 of file Doxymodules_parallel.h.

Constructor & Destructor Documentation

G4MPIsession()

G4MPIsession::G4MPIsession

(

G4VUIshell *

ashell = 0

)

Definition at line 52 of file G4MPIsession.cc.

  : G4VMPIsession()
{
  ::UI-> SetSession(this);
  ::UI-> SetCoutDestination(this);
 
  // shell
  if( is_master_ ) {
    if( ashell ) {
      shell_ = ashell;
    } else {
      if ( g4mpi_-> GetTotalSize() == 1 && ::tcsh_build ) shell_ = new G4UItcsh;
      else shell_ = new G4UIcsh;
    }
  } else {
    shell_ = new G4UImpish;
  }
}

~G4MPIsession()

G4MPIsession::~G4MPIsession

(

)

Definition at line 72 of file G4MPIsession.cc.

{
  delete shell_;
 
  ::UI = G4UImanager::GetUIpointer();
  ::UI-> SetSession(0);
  ::UI-> SetCoutDestination(0);
}

Member Function Documentation

SetPrompt()

void G4MPIsession::SetPrompt

(

const G4String &

prompt

)

Definition at line 82 of file G4MPIsession.cc.

{
  shell_-> SetPrompt(prompt);
}

SetShell()

void G4MPIsession::SetShell

(

G4VUIshell *

ashell

)

Definition at line 88 of file G4MPIsession.cc.

{
  delete shell_;
  shell_ = ashell;
}

SessionStart()

G4UIsession * G4MPIsession::SessionStart ( )

virtual

Definition at line 178 of file G4MPIsession.cc.

{
  // execute init macro
  if( g4mpi_-> IsInitMacro() ) {
    g4mpi_-> ExecuteMacroFile(g4mpi_->GetInitFileName());
  }
 
  // batch mode
  if( g4mpi_-> IsBatchMode() ) {
    g4mpi_-> ExecuteMacroFile(g4mpi_->GetMacroFileName(), true);
    return NULL;
  }
 
  // interactive session
  G4String newCommand = "", scommand; // newCommand is always "" in slaves
 
  while(1) {
    if( is_master_ ) newCommand = GetCommand();
    // broadcast a new G4 command
    scommand = g4mpi_-> BcastCommand(newCommand);
    if( scommand == "exit" ) {
      G4bool qexit = TryForcedTerminate();
      if( qexit ) break;
      else scommand = "";
    }
    ExecCommand(scommand);
  }
 
  return NULL;
}

GetCommand()

G4String G4MPIsession::GetCommand ( const char *  msg = 0 )

private

Definition at line 95 of file G4MPIsession.cc.

{
  G4String newCommand;
  const G4String nullString = "";
 
  // get command from shell...
  newCommand = shell_-> GetCommandLineString(msg);
 
  G4String nC= G4StrUtil::lstrip_copy(newCommand);
  if( nC.length() == 0 ) {
    newCommand = nullString;
 
  } else if( nC[0] == '#' ) {
    G4cout << nC << G4endl;
    newCommand = nullString;
 
  } else if( nC == "ls" || nC.substr(0,3) == "ls " ) {  // list commands
    ListDirectory(nC);
    newCommand = nullString;
 
  } else if( nC == "lc" || nC.substr(0,3) == "lc " ) {  // ... by shell
    shell_-> ListCommand(nC.erase(0,2));
    newCommand = nullString;
 
  } else if( nC == "pwd" ) { // show current directory
    G4cout << "Current Command Directory : "
           << GetCurrentWorkingDirectory() << G4endl;
    newCommand = nullString;
 
  } else if( nC == "cwd" ) { // ... by shell
    shell_-> ShowCurrentDirectory();
    newCommand = nullString;
 
  } else if(nC == "cd" || nC.substr(0,3) == "cd " ) {  // "cd"
    ChangeDirectoryCommand(nC);
    shell_-> SetCurrentDirectory(GetCurrentWorkingDirectory());
    newCommand = nullString;
 
  } else if( nC == "help" || nC.substr(0,5) == "help " ) {  // "help"
    TerminalHelp(nC);
    newCommand = nullString;
 
  } else if( nC[0] == '?' ) {   // "show current value of a parameter"
    ShowCurrent(nC);
    newCommand = nullString;
 
  } else if( nC == "hist" || nC == "history" ) {     // "hist/history"
    G4int nh= ::UI-> GetNumberOfHistory();
    for( G4int i = 0; i<nh; i++ ) {
      G4cout << i << ": " << ::UI-> GetPreviousCommand(i) << G4endl;
    }
    newCommand = nullString;
 
  } else if( nC[0] == '!' ) {   // "!"
    G4String ss = nC.substr(1, nC.length()-1);
    G4int vl;
    const char* tt = ss;
    std::istringstream is(tt);
    is >> vl;
    G4int nh = ::UI-> GetNumberOfHistory();
    if( vl>=0 && vl<nh ) {
      newCommand = ::UI-> GetPreviousCommand(vl);
      G4cout << newCommand << G4endl;
    } else {
      G4cerr << "history " << vl << " is not found." << G4endl;
      newCommand = nullString;
    }
 
  } else if( nC.empty() ) { // NULL command
    newCommand = nullString;
 
  } else if( nC == "exit" ) { // "exit"
    return "exit";
 
  } else { // ...
 
  }
 
  newCommand = TruncateCommand(newCommand);
  return ModifyToFullPathCommand(newCommand);
}

TryForcedTerminate()

G4bool G4MPIsession::TryForcedTerminate ( )

private

Definition at line 210 of file G4MPIsession.cc.

{
  if(! g4mpi_-> CheckThreadStatus()) {
    return true;
  }
 
  G4String xmessage;
 
  // beamOn is still running
  if( is_master_ ) {
    char c[1024];
    while(1) {
      G4cout << "Run is still running. Do you abort a run? [y/N]:"
             << std::flush;
      G4cin.getline(c,1024);
      G4String yesno= c;
      if(yesno == "y" || yesno == "Y" ||
         yesno == "n" || yesno == "N" || yesno == "") {
        break;
      }
    }
    if(c[0] == 'y' || c[0] == 'Y') {
      G4cout << "Aborting a run..." << G4endl;
      xmessage = g4mpi_-> BcastCommand("kill me");
    } else {
      xmessage = g4mpi_-> BcastCommand("alive");
    }
  } else {
    xmessage = g4mpi_-> BcastCommand("");
  }
 
  if(xmessage == "kill me") {
    G4RunManager* runManager = G4RunManager::GetRunManager();
    runManager-> AbortRun(true);  // soft abort
  }
 
  return false;
}

Member Data Documentation

shell_

G4VUIshell* G4MPIsession::shell_

private

Definition at line 44 of file G4MPIsession.hh.

---

The documentation for this class was generated from the following files:

• .doxygen/Doxymodules_parallel.h
• extended/parallel/MPI/source/include/G4MPIsession.hh
• extended/parallel/MPI/source/src/G4MPIsession.cc