Gabriele Cosmo
71 lines
1.7 KiB
C++
71 lines
1.7 KiB
C++
// This code implementation is the intellectual property of
|
|
// the RD44 GEANT4 collaboration.
|
|
//
|
|
// By copying, distributing or modifying the Program (or any work
|
|
// based on the Program) you indicate your acceptance of this statement,
|
|
// and all its terms.
|
|
//
|
|
// $Id: G4UIbatch.cc,v 1.1 1999/01/07 16:09:25 gunter Exp $
|
|
// GEANT4 tag $Name: geant4-00-01 $
|
|
//
|
|
|
|
#include "G4UIbatch.hh"
|
|
#include "G4UImanager.hh"
|
|
#include "G4ios.hh"
|
|
|
|
G4UIbatch::G4UIbatch(G4String fileName,G4UIsession* prevSession)
|
|
:macroFileName(fileName),previousSession(prevSession),
|
|
openFailed(false)
|
|
{
|
|
const char* theFileName = fileName;
|
|
UImanager = G4UImanager::GetUIpointer();
|
|
UImanager->SetSession(this);
|
|
macroFile.open((char*)theFileName);
|
|
if(macroFile.fail())
|
|
{
|
|
G4cerr << "macro file <" << fileName << "> could not open."
|
|
<< endl;
|
|
openFailed = true;
|
|
}
|
|
}
|
|
|
|
G4UIbatch::~G4UIbatch()
|
|
{
|
|
if(!openFailed) macroFile.close();
|
|
}
|
|
|
|
G4UIsession * G4UIbatch::SessionStart()
|
|
{
|
|
if(!openFailed)
|
|
{
|
|
char commandLine[256];
|
|
int lineLength = 255;
|
|
|
|
while(1)
|
|
{
|
|
macroFile.getline( commandLine, lineLength );
|
|
if( macroFile.bad() )
|
|
{
|
|
G4cout << "Cannot read " << macroFileName << "." << endl;
|
|
break;
|
|
}
|
|
if( macroFile.eof() ) break;
|
|
commandLine[lineLength] = '\0';
|
|
if( commandLine[0] != '#' )
|
|
{ UImanager->ApplyCommand(commandLine); }
|
|
else
|
|
{ G4cout << commandLine << endl; }
|
|
}
|
|
}
|
|
return previousSession;
|
|
}
|
|
|
|
void G4UIbatch::PauseSessionStart(G4String Prompt)
|
|
{
|
|
G4cout << "Pause session <" << Prompt << "> start." << endl;
|
|
SessionStart();
|
|
G4cout << "Pause session <" << Prompt << "> Terminate." << endl;
|
|
}
|
|
|
|
|