BesEmcDetectorMessenger.cc

Go to the documentation of this file.

//---------------------------------------------------------------------------//
//      BOOST --- BESIII Object_Oreiented Simulation Tool                    //
//---------------------------------------------------------------------------//
// Descpirtion: EMC detector
// Author: Fu Chengdong
// Created: Sep 4, 2003
// Comment:
//---------------------------------------------------------------------------//
//
#include "EmcSim/BesEmcDetectorMessenger.hh"
 
#include "EmcSim/BesEmcConstruction.hh"
#include "EmcSim/BesEmcGeometry.hh"
#include "G4Material.hh"
#include "G4ThreeVector.hh"
#include "G4UIcmdWith3VectorAndUnit.hh"
#include "G4UIcmdWithADoubleAndUnit.hh"
#include "G4UIcmdWithAString.hh"
#include "G4UIcmdWithAnInteger.hh"
#include "G4UIcmdWithoutParameter.hh"
#include "G4UIdirectory.hh"
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
 
BesEmcDetectorMessenger::BesEmcDetectorMessenger( BesEmcConstruction* BesDet,
                                                  BesEmcGeometry*     besEMCGeometry )
    : BesEmc( BesDet ) {
  fBesEmcGeometry = besEMCGeometry;
 
  BesdetDir = new G4UIdirectory( "/calor/" );
  BesdetDir->SetGuidance( "Bes calorimeter detector control." );
 
  verboseCmd = new G4UIcmdWithAnInteger( "/calor/verbose", this );
  verboseCmd->SetGuidance( "Set Verbose level of calor management category." );
  verboseCmd->SetGuidance( " 0 : Important information" );
  verboseCmd->SetGuidance( " 1 : Base information" );
  verboseCmd->SetGuidance( " 2 : More..." );
  verboseCmd->SetParameterName( "level", true );
  verboseCmd->SetRange( "level>=0" );
  verboseCmd->SetDefaultValue( 0 );
 
  CryMaterCmd = new G4UIcmdWithAString( "/calor/setCryMat", this );
  CryMaterCmd->SetGuidance( "Select Material of the Crystal." );
  CryMaterCmd->SetParameterName( "choice", true, true );
  //  CryMaterCmd->AvailableForStates(Idle);
 
  CasingMaterCmd = new G4UIcmdWithAString( "/calor/setCasMat", this );
  CasingMaterCmd->SetGuidance( "Select Material of the Casing." );
  CasingMaterCmd->SetParameterName( "choice", true, true );
  //  CasingMaterCmd->AvailableForStates(Idle);
 
  CasingThickCmd = new G4UIcmdWith3VectorAndUnit( "/calor/setCasThick", this );
  CasingThickCmd->SetGuidance( "Set Thickness of the Casing" );
  CasingThickCmd->SetParameterName( "TyvekThk", "AlThk", "MylarThk", true );
  CasingThickCmd->SetRange( "Size>=0." );
  CasingThickCmd->SetUnitCategory( "Length" );
  CasingThickCmd->SetDefaultValue( fBesEmcGeometry->GetCasingThickness() / mm );
  CasingThickCmd->SetDefaultUnit( "mm" );
  //  CasingThickCmd->AvailableForStates(Idle);
 
  SizeRminCmd = new G4UIcmdWithADoubleAndUnit( "/calor/setSizeRmin", this );
  SizeRminCmd->SetGuidance( "Set Rmin size of the barrel calorimeter" );
  SizeRminCmd->SetParameterName( "Size", true );
  SizeRminCmd->SetRange( "Size>0." );
  SizeRminCmd->SetUnitCategory( "Length" );
  SizeRminCmd->SetDefaultValue( fBesEmcGeometry->GetBSCRmin() / cm );
  SizeRminCmd->SetDefaultUnit( "cm" );
  //  SizeRminCmd->AvailableForStates(Idle);
 
  NbPhiCmd = new G4UIcmdWithAnInteger( "/calor/setNbPhi", this );
  NbPhiCmd->SetGuidance( "Set number of crystals at phi direction." );
  NbPhiCmd->SetParameterName( "NbCrystals", false );
  NbPhiCmd->SetRange( "NbCrystals>0 && NbCrystals<=150" );
  //  NbPhiCmd->AvailableForStates(Idle);
 
  NbThetaCmd = new G4UIcmdWithAnInteger( "/calor/setNbTheta", this );
  NbThetaCmd->SetGuidance( "Set number of crystals at theta direction." );
  NbThetaCmd->SetParameterName( "NbCrystals", false );
  NbThetaCmd->SetRange( "NbCrystals>0 && NbCrystals<=22" );
  //  NbThetaCmd->AvailableForStates(Idle);
 
  StartIDThetaCmd = new G4UIcmdWithAnInteger( "/calor/setStartTheta", this );
  StartIDThetaCmd->SetGuidance( "Set ID of starting crystals at theta direction." );
  StartIDThetaCmd->SetParameterName( "IDCrystal", false );
  StartIDThetaCmd->SetRange( "IDCrystal>=0 && IDCrystal<22" );
  //  StartIDThetaCmd->AvailableForStates(Idle);
 
  LengthCmd = new G4UIcmdWithADoubleAndUnit( "/calor/setCryLength", this );
  LengthCmd->SetGuidance( "Set Length of crystals of barrel calorimeter" );
  LengthCmd->SetParameterName( "Size", true );
  LengthCmd->SetRange( "Size>0." );
  LengthCmd->SetUnitCategory( "Length" );
  LengthCmd->SetDefaultValue( fBesEmcGeometry->GetBSCCryLength() / cm );
  LengthCmd->SetDefaultUnit( "cm" );
  //  LengthCmd->AvailableForStates(Idle);
 
  UpdateCmd = new G4UIcmdWithoutParameter( "/calor/update", this );
  UpdateCmd->SetGuidance( "Update calorimeter geometry." );
  UpdateCmd->SetGuidance( "This command MUST be applied before \"beamOn\" " );
  UpdateCmd->SetGuidance( "if you changed geometrical value(s)." );
  //  UpdateCmd->AvailableForStates(Idle);
 
  MagFieldCmd = new G4UIcmdWithADoubleAndUnit( "/calor/setField", this );
  MagFieldCmd->SetGuidance( "Define magnetic field." );
  MagFieldCmd->SetGuidance( "Magnetic field will be in Z direction." );
  MagFieldCmd->SetParameterName( "Bz", true );
  MagFieldCmd->SetRange( "Bz>=0." );
  MagFieldCmd->SetUnitCategory( "Magnetic flux density" );
  MagFieldCmd->SetDefaultValue( BesEmc->GetMagField() / tesla );
  MagFieldCmd->SetDefaultUnit( "tesla" );
  //  MagFieldCmd->AvailableForStates(Idle);
}
 
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
 
BesEmcDetectorMessenger::~BesEmcDetectorMessenger() {
  delete verboseCmd;
  delete LengthCmd;
  delete NbPhiCmd;
  delete NbThetaCmd;
  delete StartIDThetaCmd;
  delete CryMaterCmd;
  delete CasingMaterCmd;
  delete CasingThickCmd;
  delete SizeRminCmd;
  delete UpdateCmd;
  delete MagFieldCmd;
  delete BesdetDir;
}
 
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
 
void BesEmcDetectorMessenger::SetNewValue( G4UIcommand* command, G4String newValue ) {
  if ( command == verboseCmd )
  { BesEmc->SetVerboseLevel( verboseCmd->GetNewIntValue( newValue ) ); }
 
  if ( command == CryMaterCmd ) { BesEmc->SetCrystalMaterial( newValue ); }
 
  if ( command == CasingMaterCmd ) { BesEmc->SetCasingMaterial( newValue ); }
 
  if ( command == CasingThickCmd )
  { BesEmc->SetCasingThickness( CasingThickCmd->GetNew3VectorValue( newValue ) ); }
 
  if ( command == SizeRminCmd )
  { BesEmc->SetBSCRmin( SizeRminCmd->GetNewDoubleValue( newValue ) ); }
 
  if ( command == NbPhiCmd ) { BesEmc->SetBSCNbPhi( NbPhiCmd->GetNewIntValue( newValue ) ); }
 
  if ( command == NbThetaCmd )
  { BesEmc->SetBSCNbTheta( NbThetaCmd->GetNewIntValue( newValue ) ); }
 
  if ( command == StartIDThetaCmd )
  { BesEmc->SetStartIDTheta( StartIDThetaCmd->GetNewIntValue( newValue ) ); }
 
  if ( command == LengthCmd )
  { BesEmc->SetBSCCrystalLength( LengthCmd->GetNewDoubleValue( newValue ) ); }
 
  if ( command == UpdateCmd ) { BesEmc->UpdateGeometry(); }
 
  if ( command == MagFieldCmd )
  { BesEmc->SetMagField( MagFieldCmd->GetNewDoubleValue( newValue ) ); }
}
 
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
 
G4String BesEmcDetectorMessenger::GetCurrentValue( G4UIcommand* command ) {
  G4String cv;
 
  if ( command == verboseCmd )
  { cv = verboseCmd->ConvertToString( BesEmc->GetVerboseLevel() ); }
 
  if ( command == CryMaterCmd ) { cv = BesEmc->GetCrystalMaterial()->GetName(); }
 
  if ( command == CasingMaterCmd ) { cv = BesEmc->GetCasingMaterial()->GetName(); }
 
  return cv;
}
 
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......