233 lines
8.0 KiB
C++
233 lines
8.0 KiB
C++
//
|
|
// ********************************************************************
|
|
// * DISCLAIMER *
|
|
// * *
|
|
// * The following disclaimer summarizes all the specific disclaimers *
|
|
// * of contributors to this software. The specific disclaimers,which *
|
|
// * govern, are listed with their locations in: *
|
|
// * http://cern.ch/geant4/license *
|
|
// * *
|
|
// * Neither the authors of this software system, nor their employing *
|
|
// * institutes,nor the agencies providing financial support for this *
|
|
// * work make any representation or warranty, express or implied, *
|
|
// * regarding this software system or assume any liability for its *
|
|
// * use. *
|
|
// * *
|
|
// * This code implementation is the intellectual property of the *
|
|
// * 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: ParRunManager.cc,v 1.6 2004/06/19 20:51:09 cooperma Exp $
|
|
// GEANT4 tag $Name: geant4-06-02 $
|
|
//
|
|
// --------------------------------------------------------------------
|
|
// Parallel Library for Geant4
|
|
//
|
|
// Gene Cooperman <gene@ccs.neu.edu>, 2001
|
|
// --------------------------------------------------------------------
|
|
|
|
#ifdef G4USE_TOPC
|
|
|
|
// G4Timer.hh has to be loaded *before* globals.hh...
|
|
//
|
|
#include "G4Timer.hh"
|
|
|
|
#include "G4RunManager.hh"
|
|
|
|
#include "Randomize.hh"
|
|
#include "G4Run.hh"
|
|
#include "G4RunMessenger.hh"
|
|
#include "G4VUserDetectorConstruction.hh"
|
|
#include "G4VUserPhysicsList.hh"
|
|
#include "G4UserRunAction.hh"
|
|
#include "G4VUserPrimaryGeneratorAction.hh"
|
|
#include "G4GeometryManager.hh"
|
|
#include "G4SDManager.hh"
|
|
#include "G4TransportationManager.hh"
|
|
#include "G4VPhysicalVolume.hh"
|
|
#include "G4ApplicationState.hh"
|
|
#include "G4StateManager.hh"
|
|
#include "G4VPersistencyManager.hh"
|
|
#include "G4UImanager.hh"
|
|
#include "G4ParticleTable.hh"
|
|
#include "G4ProcessTable.hh"
|
|
#include "G4UnitsTable.hh"
|
|
#include "G4VVisManager.hh"
|
|
|
|
#include "ParRunManager.hh"
|
|
#include "ParMarshaledObj.hh"
|
|
#include "ParRandomState.hh"
|
|
|
|
#include "G4ios.hh"
|
|
#include <strstream>
|
|
|
|
// Define static data members of ParRunManager
|
|
// They are set by ImportDoEventLoopLocals
|
|
G4StateManager* ParRunManager::stateManager;
|
|
G4int ParRunManager::n_event;
|
|
G4int ParRunManager::n_select;
|
|
G4String ParRunManager::msg;
|
|
ParRunManager* ParRunManager::myRunManager = NULL;
|
|
|
|
// TOP-C callbacks (static functions)
|
|
// If this->*(&ParRunManager::GenerateEventInput), created a thunk,
|
|
// it would be ideal here.
|
|
TOPC_BUF ParRunManager::MyGenerateEventInput()
|
|
{ return myRunManager->GenerateEventInput(); }
|
|
TOPC_BUF ParRunManager::MyDoEvent( void *input_buf )
|
|
{ return myRunManager->DoEvent(input_buf); }
|
|
TOPC_ACTION ParRunManager::MyCheckEventResult( void * input_buf, void *buf )
|
|
{ return myRunManager->CheckEventResult(input_buf, buf); }
|
|
|
|
static void trace_event_input( void *input )
|
|
{ G4cout << "Event " << *(G4int *)input << G4endl; }
|
|
|
|
void ParRunManager::DoEventLoop(G4int n_event,const char* macroFile,G4int n_select)
|
|
{
|
|
TOPC_OPT_trace_input = trace_event_input;
|
|
|
|
G4StateManager* stateManager = G4StateManager::GetStateManager();
|
|
|
|
#ifdef G4_ORIGINAL
|
|
cout << "ParRunManager::DoEventLoop" << endl;
|
|
G4RunManager::DoEventLoop(n_event, macroFile, n_select);
|
|
return;
|
|
#endif
|
|
|
|
if(verboseLevel>0)
|
|
{ timer->Start(); }
|
|
|
|
G4String msg;
|
|
if(macroFile!=NULL)
|
|
{
|
|
if(n_select<0) n_select = n_event;
|
|
msg = "/control/execute ";
|
|
msg += macroFile;
|
|
}
|
|
else
|
|
{ n_select = -1; }
|
|
|
|
// BeginOfEventAction() and EndOfEventAction() would normally be
|
|
// called inside G4EventManager::ProcessOneEvent() in ParRunManager::DoEvent
|
|
// on slave. Since this is often where hits are collected and where
|
|
// histogram data is first stored, must do it
|
|
// on master instead, to process hits. So, set user event action to NULL.
|
|
// Keep private copy, and execute it in CheckTaskResult().
|
|
// If user later does: SetUserAction( (G4UserEventAction *)NULL );
|
|
// we won't notice and copy it to origUserEventAction.
|
|
// How paranoid do we want to be? Should we create trvialUserEventAction?
|
|
if ( eventManager->GetUserEventAction() )
|
|
{
|
|
origUserEventAction = eventManager->GetUserEventAction();
|
|
SetUserAction( (G4UserEventAction *)NULL );
|
|
}
|
|
|
|
// Make these variables accessible to TOP-C callback functions
|
|
ImportDoEventLoopLocals( stateManager, n_event, n_select, msg );
|
|
|
|
// This is where all the parallelism occurs
|
|
i_event = -1; // ParRunManager::GenerateEventInput() will increment this.
|
|
TOPC_master_slave(MyGenerateEventInput, MyDoEvent, MyCheckEventResult, NULL);
|
|
|
|
if(verboseLevel>0)
|
|
{
|
|
timer->Stop();
|
|
G4cout << "Run terminated." << G4endl;
|
|
G4cout << "Run Summary" << G4endl;
|
|
if(runAborted)
|
|
/*
|
|
{ G4cout << " Run Aborted after " << i_event << " events processed." << G4endl; }
|
|
*/
|
|
{ G4cout << " Run Aborted." << G4endl; }
|
|
else
|
|
{ G4cout << " Number of events processed : " << n_event << G4endl; }
|
|
G4cout << " " << *timer << G4endl;
|
|
}
|
|
|
|
}
|
|
|
|
TOPC_BUF ParRunManager::GenerateEventInput()
|
|
{
|
|
if(runAborted) return NOTASK;
|
|
|
|
i_event++;
|
|
if (i_event >= n_event) return NOTASK;
|
|
else
|
|
{ ParMarshaledRandomState buf = ParMarshaledRandomState( i_event );
|
|
return TOPC_MSG( buf.GetBuffer(), buf.BufferSize() );
|
|
}
|
|
// else return TOPC_MSG( &i_event, sizeof(i_event) );
|
|
}
|
|
|
|
TOPC_BUF ParRunManager::DoEvent( void *input_buf )
|
|
{
|
|
G4int i_event;
|
|
ParMarshaledRandomState buf = ParMarshaledRandomState( input_buf );
|
|
buf.unmarshalEventIDandSetState( i_event );
|
|
|
|
// removed for Geant4.6
|
|
// stateManager->SetNewState(G4State_EventProc);
|
|
|
|
currentEvent = GenerateEvent(i_event);
|
|
|
|
eventManager->ProcessOneEvent(currentEvent);
|
|
|
|
MarshaledObj *aMarshaledObj = new MarshaledHCofThisEvent(currentEvent);
|
|
return TOPC_MSG(aMarshaledObj->GetBuffer(), aMarshaledObj->BufferSize());
|
|
}
|
|
|
|
TOPC_ACTION ParRunManager::CheckEventResult( void * input_buf, void *output_buf )
|
|
{
|
|
G4int i_event;
|
|
MarshaledObj buf = MarshaledObj(input_buf);
|
|
buf.Unmarshal(i_event);
|
|
|
|
// removed for Geant4.6
|
|
//stateManager->SetNewState(G4State_EventProc);
|
|
// Geant4.6 requires the state to be G4State_GeomClosed
|
|
// before calling EventManager::ProcessOneEvent(..)
|
|
|
|
if(!userPrimaryGeneratorAction)
|
|
{
|
|
G4Exception
|
|
("G4RunManager::BeamOn - G4VUserPrimaryGeneratorAction is not defined.");
|
|
}
|
|
|
|
// This creates a trivial event in lieu of GenerateEvent(i_event);
|
|
currentEvent = new G4Event(i_event);
|
|
|
|
// Original UserEventAction was saved and set to NULL. Do it now on master.
|
|
if (origUserEventAction)
|
|
origUserEventAction->BeginOfEventAction( currentEvent );
|
|
|
|
// When Geant4 4.0 sees empty event, it still calls userStackingAction.
|
|
// On master, only trivial events exist, so we delete userStackingAction
|
|
SetUserAction( (G4UserStackingAction*)NULL );
|
|
|
|
eventManager->ProcessOneEvent(currentEvent); // Processing the trivial event
|
|
|
|
// Called with output_buf and no size, creates object for unmarshaling
|
|
MarshaledHCofThisEvent marshaledObj(output_buf);
|
|
marshaledObj.UnmarshalSlaveHCofThisEvent();
|
|
// UnmarshalSlaveHCofThisEvent placed slave Hits in ParRunManager::currentEvent
|
|
|
|
// Original UserEventAction was saved and set to NULL. Do it now on master.
|
|
if (origUserEventAction)
|
|
origUserEventAction->EndOfEventAction( currentEvent );
|
|
|
|
AnalyzeEvent(currentEvent);
|
|
|
|
if(i_event<n_select) G4UImanager::GetUIpointer()->ApplyCommand(msg);
|
|
stateManager->SetNewState(G4State_GeomClosed);
|
|
StackPreviousEvent(currentEvent);
|
|
currentEvent = NULL;
|
|
// Move this to GenerateEventInput:
|
|
// if(runAborted) break;
|
|
return NO_ACTION;
|
|
}
|
|
|
|
#endif
|