Import Geant4 0.0.0 source tree

2016-06-01 15:25:35 +02:00
parent 54d6b71f95
commit b97f8d0df7
3237 changed files with 807095 additions and 0 deletions
@@ -0,0 +1,70 @@
+// 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 2.2 1998/07/13 17:12:53 urbi Exp $
+// GEANT4 tag $Name: geant4-00 $
+//
+
+#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;
+}
+
+