Gabriele Cosmo
159 lines
6.4 KiB
C++
159 lines
6.4 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: DetectorMessenger.cc,v 1.7 2004/11/23 14:05:31 maire Exp $
|
|
// GEANT4 tag $Name: geant4-07-01 $
|
|
//
|
|
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
|
|
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
|
|
|
|
#include "DetectorMessenger.hh"
|
|
|
|
#include "DetectorConstruction.hh"
|
|
#include "G4UIdirectory.hh"
|
|
#include "G4UIcommand.hh"
|
|
#include "G4UIparameter.hh"
|
|
#include "G4UIcmdWithAnInteger.hh"
|
|
#include "G4UIcmdWithADoubleAndUnit.hh"
|
|
#include "G4UIcmdWithoutParameter.hh"
|
|
|
|
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
|
|
|
|
DetectorMessenger::DetectorMessenger(DetectorConstruction * Det)
|
|
:Detector(Det)
|
|
{
|
|
testemDir = new G4UIdirectory("/testem/");
|
|
testemDir->SetGuidance("UI commands specific to this example");
|
|
|
|
detDir = new G4UIdirectory("/testem/det/");
|
|
detDir->SetGuidance("detector construction commands");
|
|
|
|
SizeYZCmd = new G4UIcmdWithADoubleAndUnit("/testem/det/setSizeYZ",this);
|
|
SizeYZCmd->SetGuidance("Set tranverse size of the calorimeter");
|
|
SizeYZCmd->SetParameterName("Size",false);
|
|
SizeYZCmd->SetRange("Size>0.");
|
|
SizeYZCmd->SetUnitCategory("Length");
|
|
SizeYZCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
|
|
|
|
NbLayersCmd = new G4UIcmdWithAnInteger("/testem/det/setNbOfLayers",this);
|
|
NbLayersCmd->SetGuidance("Set number of layers.");
|
|
NbLayersCmd->SetParameterName("NbLayers",false);
|
|
NbLayersCmd->SetRange("NbLayers>0 && NbLayers<500");
|
|
NbLayersCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
|
|
|
|
NbAbsorCmd = new G4UIcmdWithAnInteger("/testem/det/setNbOfAbsor",this);
|
|
NbAbsorCmd->SetGuidance("Set number of Absorbers.");
|
|
NbAbsorCmd->SetParameterName("NbAbsor",false);
|
|
NbAbsorCmd->SetRange("NbAbsor>0");
|
|
NbAbsorCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
|
|
|
|
AbsorCmd = new G4UIcommand("/testem/det/setAbsor",this);
|
|
AbsorCmd->SetGuidance("Set the absor nb, the material, the thickness.");
|
|
AbsorCmd->SetGuidance(" absor number : from 1 to NbOfAbsor");
|
|
AbsorCmd->SetGuidance(" material name");
|
|
AbsorCmd->SetGuidance(" thickness (with unit) : t>0.");
|
|
//
|
|
G4UIparameter* AbsNbPrm = new G4UIparameter("AbsorNb",'i',false);
|
|
AbsNbPrm->SetGuidance("absor number : from 1 to NbOfAbsor");
|
|
AbsNbPrm->SetParameterRange("AbsorNb>0");
|
|
AbsorCmd->SetParameter(AbsNbPrm);
|
|
//
|
|
G4UIparameter* MatPrm = new G4UIparameter("material",'s',false);
|
|
MatPrm->SetGuidance("material name");
|
|
AbsorCmd->SetParameter(MatPrm);
|
|
//
|
|
G4UIparameter* ThickPrm = new G4UIparameter("thickness",'d',false);
|
|
ThickPrm->SetGuidance("thickness of absorber");
|
|
ThickPrm->SetParameterRange("thickness>0.");
|
|
AbsorCmd->SetParameter(ThickPrm);
|
|
//
|
|
G4UIparameter* unitPrm = new G4UIparameter("unit",'s',false);
|
|
unitPrm->SetGuidance("unit of thickness");
|
|
G4String unitList = G4UIcommand::UnitsList(G4UIcommand::CategoryOf("mm"));
|
|
unitPrm->SetParameterCandidates(unitList);
|
|
AbsorCmd->SetParameter(unitPrm);
|
|
//
|
|
AbsorCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
|
|
|
|
MagFieldCmd = new G4UIcmdWithADoubleAndUnit("/testem/det/setField",this);
|
|
MagFieldCmd->SetGuidance("Define magnetic field.");
|
|
MagFieldCmd->SetGuidance("Magnetic field will be in Z direction.");
|
|
MagFieldCmd->SetParameterName("Bz",false);
|
|
MagFieldCmd->SetUnitCategory("Magnetic flux density");
|
|
MagFieldCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
|
|
|
|
UpdateCmd = new G4UIcmdWithoutParameter("/testem/det/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(G4State_Idle);
|
|
}
|
|
|
|
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
|
|
|
|
DetectorMessenger::~DetectorMessenger()
|
|
{
|
|
delete SizeYZCmd;
|
|
delete NbLayersCmd;
|
|
delete NbAbsorCmd;
|
|
delete AbsorCmd;
|
|
delete MagFieldCmd;
|
|
delete UpdateCmd;
|
|
delete detDir;
|
|
delete testemDir;
|
|
}
|
|
|
|
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
|
|
|
|
void DetectorMessenger::SetNewValue(G4UIcommand* command,G4String newValue)
|
|
{
|
|
if( command == SizeYZCmd )
|
|
{ Detector->SetCalorSizeYZ(SizeYZCmd->GetNewDoubleValue(newValue));}
|
|
|
|
if( command == NbLayersCmd )
|
|
{ Detector->SetNbOfLayers(NbLayersCmd->GetNewIntValue(newValue));}
|
|
|
|
if( command == NbAbsorCmd )
|
|
{ Detector->SetNbOfAbsor(NbAbsorCmd->GetNewIntValue(newValue));}
|
|
|
|
if (command == AbsorCmd)
|
|
{
|
|
G4int num; G4double tick;
|
|
char mat[30],unts[30];
|
|
const char* t = newValue;
|
|
std::istrstream is((char*)t);
|
|
is >> num >> mat >> tick >> unts;
|
|
G4String material=mat, unt=unts;
|
|
tick *= G4UIcommand::ValueOf(unt);
|
|
Detector->SetAbsorMaterial (num,material);
|
|
Detector->SetAbsorThickness(num,tick);
|
|
}
|
|
|
|
if( command == MagFieldCmd )
|
|
{ Detector->SetMagField(MagFieldCmd->GetNewDoubleValue(newValue));}
|
|
|
|
if( command == UpdateCmd )
|
|
{ Detector->UpdateGeometry();}
|
|
}
|
|
|
|
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
|