Geant4 Cross Reference |
1 // 1 // 2 // ******************************************* 2 // ******************************************************************** 3 // * License and Disclaimer 3 // * License and Disclaimer * 4 // * 4 // * * 5 // * The Geant4 software is copyright of th 5 // * The Geant4 software is copyright of the Copyright Holders of * 6 // * the Geant4 Collaboration. It is provided 6 // * the Geant4 Collaboration. It is provided under the terms and * 7 // * conditions of the Geant4 Software License 7 // * conditions of the Geant4 Software License, included in the file * 8 // * LICENSE and available at http://cern.ch/ 8 // * LICENSE and available at http://cern.ch/geant4/license . These * 9 // * include a list of copyright holders. 9 // * include a list of copyright holders. * 10 // * 10 // * * 11 // * Neither the authors of this software syst 11 // * Neither the authors of this software system, nor their employing * 12 // * institutes,nor the agencies providing fin 12 // * institutes,nor the agencies providing financial support for this * 13 // * work make any representation or warran 13 // * work make any representation or warranty, express or implied, * 14 // * regarding this software system or assum 14 // * regarding this software system or assume any liability for its * 15 // * use. Please see the license in the file 15 // * use. Please see the license in the file LICENSE and URL above * 16 // * for the full disclaimer and the limitatio 16 // * for the full disclaimer and the limitation of liability. * 17 // * 17 // * * 18 // * This code implementation is the result 18 // * This code implementation is the result of the scientific and * 19 // * technical work of the GEANT4 collaboratio 19 // * technical work of the GEANT4 collaboration. * 20 // * By using, copying, modifying or distri 20 // * By using, copying, modifying or distributing the software (or * 21 // * any work based on the software) you ag 21 // * any work based on the software) you agree to acknowledge its * 22 // * use in resulting scientific publicati 22 // * use in resulting scientific publications, and indicate your * 23 // * acceptance of all terms of the Geant4 Sof 23 // * acceptance of all terms of the Geant4 Software license. * 24 // ******************************************* 24 // ******************************************************************** 25 // 25 // 26 /// \file electromagnetic/TestEm5/src/Detector << 26 // $Id: DetectorMessenger.cc,v 1.4 2006/06/29 16:55:32 gunter Exp $ 27 /// \brief Implementation of the DetectorMesse << 27 // GEANT4 tag $Name: geant4-08-01-patch-01 $ 28 // << 29 // 28 // 30 //....oooOO0OOooo........oooOO0OOooo........oo 29 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 31 //....oooOO0OOooo........oooOO0OOooo........oo 30 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 32 31 33 #include "DetectorMessenger.hh" 32 #include "DetectorMessenger.hh" 34 33 35 #include "DetectorConstruction.hh" 34 #include "DetectorConstruction.hh" 36 << 35 #include "G4UIdirectory.hh" 37 #include "G4UIcmdWithADoubleAndUnit.hh" << 38 #include "G4UIcmdWithAString.hh" 36 #include "G4UIcmdWithAString.hh" 39 #include "G4UIcmdWithAnInteger.hh" 37 #include "G4UIcmdWithAnInteger.hh" >> 38 #include "G4UIcmdWithADoubleAndUnit.hh" 40 #include "G4UIcmdWithoutParameter.hh" 39 #include "G4UIcmdWithoutParameter.hh" 41 #include "G4UIdirectory.hh" << 42 40 43 //....oooOO0OOooo........oooOO0OOooo........oo 41 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 44 42 45 DetectorMessenger::DetectorMessenger(DetectorC << 43 DetectorMessenger::DetectorMessenger(DetectorConstruction * Det) 46 { << 44 :Detector(Det) 47 fTestemDir = new G4UIdirectory("/testem/"); << 45 { 48 fTestemDir->SetGuidance("UI commands specifi << 46 testemDir = new G4UIdirectory("/testem/"); 49 << 47 testemDir->SetGuidance("UI commands specific to this example."); 50 fDetDir = new G4UIdirectory("/testem/det/", << 48 51 fDetDir->SetGuidance("detector construction << 49 detDir = new G4UIdirectory("/testem/det/"); >> 50 detDir->SetGuidance("detector construction commands"); >> 51 >> 52 AbsMaterCmd = new G4UIcmdWithAString("/testem/det/setAbsMat",this); >> 53 AbsMaterCmd->SetGuidance("Select Material of the Absorber."); >> 54 AbsMaterCmd->SetParameterName("choice",false); >> 55 AbsMaterCmd->AvailableForStates(G4State_PreInit,G4State_Idle); >> 56 >> 57 WorldMaterCmd = new G4UIcmdWithAString("/testem/det/setWorldMat",this); >> 58 WorldMaterCmd->SetGuidance("Select Material of the World."); >> 59 WorldMaterCmd->SetParameterName("wchoice",false); >> 60 WorldMaterCmd->AvailableForStates(G4State_PreInit,G4State_Idle); >> 61 >> 62 AbsThickCmd = new G4UIcmdWithADoubleAndUnit("/testem/det/setAbsThick",this); >> 63 AbsThickCmd->SetGuidance("Set Thickness of the Absorber"); >> 64 AbsThickCmd->SetParameterName("SizeZ",false); >> 65 AbsThickCmd->SetRange("SizeZ>0."); >> 66 AbsThickCmd->SetUnitCategory("Length"); >> 67 AbsThickCmd->AvailableForStates(G4State_PreInit,G4State_Idle); >> 68 >> 69 AbsSizYZCmd = new G4UIcmdWithADoubleAndUnit("/testem/det/setAbsYZ",this); >> 70 AbsSizYZCmd->SetGuidance("Set sizeYZ of the Absorber"); >> 71 AbsSizYZCmd->SetParameterName("SizeYZ",false); >> 72 AbsSizYZCmd->SetRange("SizeYZ>0."); >> 73 AbsSizYZCmd->SetUnitCategory("Length"); >> 74 AbsSizYZCmd->AvailableForStates(G4State_PreInit,G4State_Idle); >> 75 >> 76 AbsXposCmd = new G4UIcmdWithADoubleAndUnit("/testem/det/setAbsXpos",this); >> 77 AbsXposCmd->SetGuidance("Set X pos. of the Absorber"); >> 78 AbsXposCmd->SetParameterName("Xpos",false); >> 79 AbsXposCmd->SetUnitCategory("Length"); >> 80 AbsXposCmd->AvailableForStates(G4State_PreInit,G4State_Idle); >> 81 >> 82 WorldXCmd = new G4UIcmdWithADoubleAndUnit("/testem/det/setWorldX",this); >> 83 WorldXCmd->SetGuidance("Set X size of the World"); >> 84 WorldXCmd->SetParameterName("WSizeX",false); >> 85 WorldXCmd->SetRange("WSizeX>0."); >> 86 WorldXCmd->SetUnitCategory("Length"); >> 87 WorldXCmd->AvailableForStates(G4State_PreInit,G4State_Idle); >> 88 >> 89 WorldYZCmd = new G4UIcmdWithADoubleAndUnit("/testem/det/setWorldYZ",this); >> 90 WorldYZCmd->SetGuidance("Set sizeYZ of the World"); >> 91 WorldYZCmd->SetParameterName("WSizeYZ",false); >> 92 WorldYZCmd->SetRange("WSizeYZ>0."); >> 93 WorldYZCmd->SetUnitCategory("Length"); >> 94 WorldYZCmd->AvailableForStates(G4State_PreInit,G4State_Idle); >> 95 >> 96 UpdateCmd = new G4UIcmdWithoutParameter("/testem/det/update",this); >> 97 UpdateCmd->SetGuidance("Update calorimeter geometry."); >> 98 UpdateCmd->SetGuidance("This command MUST be applied before \"beamOn\" "); >> 99 UpdateCmd->SetGuidance("if you changed geometrical value(s)."); >> 100 UpdateCmd->AvailableForStates(G4State_Idle); >> 101 >> 102 MagFieldCmd = new G4UIcmdWithADoubleAndUnit("/testem/det/setField",this); >> 103 MagFieldCmd->SetGuidance("Define magnetic field."); >> 104 MagFieldCmd->SetGuidance("Magnetic field will be in Z direction."); >> 105 MagFieldCmd->SetParameterName("Bz",false); >> 106 MagFieldCmd->SetUnitCategory("Magnetic flux density"); >> 107 MagFieldCmd->AvailableForStates(G4State_PreInit,G4State_Idle); 52 108 53 fAbsMaterCmd = new G4UIcmdWithAString("/test << 54 fAbsMaterCmd->SetGuidance("Select Material o << 55 fAbsMaterCmd->SetParameterName("choice", fal << 56 fAbsMaterCmd->AvailableForStates(G4State_Pre << 57 fAbsMaterCmd->SetToBeBroadcasted(false); << 58 << 59 fWorldMaterCmd = new G4UIcmdWithAString("/te << 60 fWorldMaterCmd->SetGuidance("Select Material << 61 fWorldMaterCmd->SetParameterName("wchoice", << 62 fWorldMaterCmd->AvailableForStates(G4State_P << 63 fWorldMaterCmd->SetToBeBroadcasted(false); << 64 << 65 fAbsThickCmd = new G4UIcmdWithADoubleAndUnit << 66 fAbsThickCmd->SetGuidance("Set Thickness of << 67 fAbsThickCmd->SetParameterName("SizeZ", fals << 68 fAbsThickCmd->SetRange("SizeZ>0."); << 69 fAbsThickCmd->SetUnitCategory("Length"); << 70 fAbsThickCmd->AvailableForStates(G4State_Pre << 71 fAbsThickCmd->SetToBeBroadcasted(false); << 72 << 73 fAbsSizYZCmd = new G4UIcmdWithADoubleAndUnit << 74 fAbsSizYZCmd->SetGuidance("Set sizeYZ of the << 75 fAbsSizYZCmd->SetParameterName("SizeYZ", fal << 76 fAbsSizYZCmd->SetRange("SizeYZ>0."); << 77 fAbsSizYZCmd->SetUnitCategory("Length"); << 78 fAbsSizYZCmd->AvailableForStates(G4State_Pre << 79 fAbsSizYZCmd->SetToBeBroadcasted(false); << 80 << 81 fAbsXposCmd = new G4UIcmdWithADoubleAndUnit( << 82 fAbsXposCmd->SetGuidance("Set X pos. of the << 83 fAbsXposCmd->SetParameterName("Xpos", false) << 84 fAbsXposCmd->SetUnitCategory("Length"); << 85 fAbsXposCmd->AvailableForStates(G4State_PreI << 86 fAbsXposCmd->SetToBeBroadcasted(false); << 87 << 88 fWorldXCmd = new G4UIcmdWithADoubleAndUnit(" << 89 fWorldXCmd->SetGuidance("Set X size of the W << 90 fWorldXCmd->SetParameterName("WSizeX", false << 91 fWorldXCmd->SetRange("WSizeX>0."); << 92 fWorldXCmd->SetUnitCategory("Length"); << 93 fWorldXCmd->AvailableForStates(G4State_PreIn << 94 fWorldXCmd->SetToBeBroadcasted(false); << 95 << 96 fWorldYZCmd = new G4UIcmdWithADoubleAndUnit( << 97 fWorldYZCmd->SetGuidance("Set sizeYZ of the << 98 fWorldYZCmd->SetParameterName("WSizeYZ", fal << 99 fWorldYZCmd->SetRange("WSizeYZ>0."); << 100 fWorldYZCmd->SetUnitCategory("Length"); << 101 fWorldYZCmd->AvailableForStates(G4State_PreI << 102 fWorldYZCmd->SetToBeBroadcasted(false); << 103 } 109 } 104 110 105 //....oooOO0OOooo........oooOO0OOooo........oo 111 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 106 112 107 DetectorMessenger::~DetectorMessenger() 113 DetectorMessenger::~DetectorMessenger() 108 { 114 { 109 delete fAbsMaterCmd; << 115 delete AbsMaterCmd; 110 delete fAbsThickCmd; << 116 delete AbsThickCmd; 111 delete fAbsSizYZCmd; << 117 delete AbsSizYZCmd; 112 delete fAbsXposCmd; << 118 delete AbsXposCmd; 113 delete fWorldMaterCmd; << 119 delete WorldMaterCmd; 114 delete fWorldXCmd; << 120 delete WorldXCmd; 115 delete fWorldYZCmd; << 121 delete WorldYZCmd; 116 delete fDetDir; << 122 delete UpdateCmd; 117 delete fTestemDir; << 123 delete MagFieldCmd; >> 124 delete detDir; >> 125 delete testemDir; 118 } 126 } 119 127 120 //....oooOO0OOooo........oooOO0OOooo........oo 128 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 121 129 122 void DetectorMessenger::SetNewValue(G4UIcomman << 130 void DetectorMessenger::SetNewValue(G4UIcommand* command,G4String newValue) 123 { << 131 { 124 if (command == fAbsMaterCmd) { << 132 if ( command == AbsMaterCmd ) 125 fDetector->SetAbsorberMaterial(newValue); << 133 {Detector->SetAbsorberMaterial(newValue);} 126 } << 134 127 << 135 if ( command == WorldMaterCmd ) 128 if (command == fWorldMaterCmd) { << 136 {Detector->SetWorldMaterial(newValue);} 129 fDetector->SetWorldMaterial(newValue); << 137 130 } << 138 if ( command == AbsThickCmd ) 131 << 139 {Detector->SetAbsorberThickness(AbsThickCmd->GetNewDoubleValue(newValue));} 132 if (command == fAbsThickCmd) { << 140 133 fDetector->SetAbsorberThickness(fAbsThickC << 141 if ( command == AbsSizYZCmd ) 134 } << 142 {Detector->SetAbsorberSizeYZ(AbsSizYZCmd->GetNewDoubleValue(newValue));} 135 << 143 136 if (command == fAbsSizYZCmd) { << 144 if ( command == AbsXposCmd ) 137 fDetector->SetAbsorberSizeYZ(fAbsSizYZCmd- << 145 {Detector->SetAbsorberXpos(AbsXposCmd->GetNewDoubleValue(newValue));} 138 } << 146 139 << 147 if ( command == WorldXCmd ) 140 if (command == fAbsXposCmd) { << 148 {Detector->SetWorldSizeX(WorldXCmd->GetNewDoubleValue(newValue));} 141 fDetector->SetAbsorberXpos(fAbsXposCmd->Ge << 149 142 } << 150 if ( command == WorldYZCmd ) 143 << 151 {Detector->SetWorldSizeYZ(WorldYZCmd->GetNewDoubleValue(newValue));} 144 if (command == fWorldXCmd) { << 152 145 fDetector->SetWorldSizeX(fWorldXCmd->GetNe << 153 if ( command == UpdateCmd ) 146 } << 154 {Detector->UpdateGeometry(); } 147 << 155 148 if (command == fWorldYZCmd) { << 156 if( command == MagFieldCmd ) 149 fDetector->SetWorldSizeYZ(fWorldYZCmd->Get << 157 {Detector->SetMagField(MagFieldCmd->GetNewDoubleValue(newValue));} 150 } << 151 } 158 } 152 159 153 //....oooOO0OOooo........oooOO0OOooo........oo 160 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 154 161