| Geant4 Cross Reference |
1 //
2 // ********************************************************************
3 // * License and Disclaimer *
4 // * *
5 // * The Geant4 software is copyright of the Copyright Holders of *
6 // * the Geant4 Collaboration. It is provided under the terms and *
7 // * conditions of the Geant4 Software License, included in the file *
8 // * LICENSE and available at http://cern.ch/geant4/license . These *
9 // * include a list of copyright holders. *
10 // * *
11 // * Neither the authors of this software system, nor their employing *
12 // * institutes,nor the agencies providing financial support for this *
13 // * work make any representation or warranty, express or implied, *
14 // * regarding this software system or assume any liability for its *
15 // * use. Please see the license in the file LICENSE and URL above *
16 // * for the full disclaimer and the limitation of liability. *
17 // * *
18 // * This code implementation is the result of the scientific and *
19 // * technical work of the GEANT4 collaboration. *
20 // * By using, copying, modifying or distributing the software (or *
21 // * any work based on the software) you agree to acknowledge its *
22 // * use in resulting scientific publications, and indicate your *
23 // * acceptance of all terms of the Geant4 Software license. *
24 // ********************************************************************
25 //
26 // G4ParticleMessenger class implementation
27 //
28 // Author: H. Kurashige, 13 June 1997 - 1st version created
29 // --------------------------------------------------------------------
30
31 #include "G4ParticleMessenger.hh"
32
33 #include "G4IonTable.hh"
34 #include "G4ParticleDefinition.hh"
35 #include "G4ParticlePropertyMessenger.hh"
36 #include "G4ParticleTable.hh"
37 #include "G4UIcmdWithAString.hh"
38 #include "G4UIcmdWithAnInteger.hh"
39 #include "G4UIcmdWithoutParameter.hh"
40 #include "G4UIdirectory.hh"
41 #include "G4UImanager.hh"
42 #include "G4ios.hh"
43
44 #include <iomanip> // Include from 'system'
45
46 G4ParticleMessenger::G4ParticleMessenger(G4ParticleTable* pTable)
47 {
48 // get the pointer to ParticleTable
49 if (pTable == nullptr) {
50 theParticleTable = G4ParticleTable::GetParticleTable();
51 }
52 else {
53 theParticleTable = pTable;
54 }
55
56 // Directory /particle/
57 thisDirectory = new G4UIdirectory("/particle/");
58 thisDirectory->SetGuidance("Particle control commands.");
59
60 // Command /particle/select
61 selectCmd = new G4UIcmdWithAString("/particle/select", this);
62 selectCmd->SetGuidance("Select particle ");
63 selectCmd->SetDefaultValue("none");
64 selectCmd->SetParameterName("particle name", false);
65 selectCmd->AvailableForStates(G4State_PreInit, G4State_Idle);
66
67 // Command /particle/list
68 listCmd = new G4UIcmdWithAString("/particle/list", this);
69 listCmd->SetGuidance("List name of particles.");
70 listCmd->SetGuidance(" all(default)/lepton/baryon/meson/nucleus/quarks");
71 listCmd->SetParameterName("particle type", true);
72 listCmd->SetDefaultValue("all");
73 listCmd->SetCandidates("all lepton baryon meson nucleus quarks");
74 listCmd->AvailableForStates(G4State_PreInit, G4State_Idle);
75
76 // Command /particle/find
77 findCmd = new G4UIcmdWithAnInteger("/particle/find", this);
78 findCmd->SetGuidance("Find particle by encoding");
79 findCmd->SetDefaultValue(0);
80 findCmd->SetParameterName("encoding", false);
81 findCmd->AvailableForStates(G4State_PreInit, G4State_Idle);
82
83 // Command /particle/createAllIon
84 createAllIonCmd = new G4UIcmdWithoutParameter("/particle/createAllIon", this);
85 createAllIonCmd->SetGuidance("Create All ions (ground state)");
86 createAllIonCmd->AvailableForStates(G4State_Idle);
87 createAllIonCmd->SetToBeBroadcasted(false);
88
89 // Command /particle/createAllIsomer
90 createAllIsomerCmd = new G4UIcmdWithoutParameter("/particle/createAllIsomer", this);
91 createAllIsomerCmd->SetGuidance("Create All isomers");
92 createAllIsomerCmd->AvailableForStates(G4State_Idle);
93 createAllIsomerCmd->SetToBeBroadcasted(false);
94
95 // -- particle/property/Verbose ---
96 verboseCmd = new G4UIcmdWithAnInteger("/particle/verbose", this);
97 verboseCmd->SetGuidance("Set Verbose level of particle table.");
98 verboseCmd->SetGuidance(" 0 : Silent (default)");
99 verboseCmd->SetGuidance(" 1 : Display warning messages");
100 verboseCmd->SetGuidance(" 2 : Display more");
101 verboseCmd->SetParameterName("verbose_level", true);
102 verboseCmd->SetDefaultValue(0);
103 verboseCmd->SetRange("verbose_level >=0");
104
105 // UI messenger for Particle Properties
106 fParticlePropertyMessenger = new G4ParticlePropertyMessenger(theParticleTable);
107 }
108
109 G4ParticleMessenger::~G4ParticleMessenger()
110 {
111 delete fParticlePropertyMessenger;
112
113 delete listCmd;
114 delete selectCmd;
115 delete findCmd;
116 delete createAllIonCmd;
117 delete createAllIsomerCmd;
118 delete verboseCmd;
119
120 delete thisDirectory;
121 }
122
123 void G4ParticleMessenger::SetNewValue(G4UIcommand* command, G4String newValues)
124 {
125 if (command == listCmd) {
126 // Command /particle/List
127 G4int counter = 0;
128 G4ParticleTable::G4PTblDicIterator* piter = theParticleTable->GetIterator();
129 piter->reset();
130
131 while ((*piter)()) // Loop checking, 09.08.2015, K.Kurashige
132 {
133 G4ParticleDefinition* particle = piter->value();
134 if ((newValues == "all") || (newValues == particle->GetParticleType())) {
135 G4cout << std::setw(19) << particle->GetParticleName();
136 if ((counter++) % 4 == 3) {
137 G4cout << G4endl;
138 }
139 else {
140 G4cout << ",";
141 }
142 }
143 }
144 G4cout << G4endl;
145 if (counter == 0) {
146 G4cout << newValues << " is not found " << G4endl;
147 }
148
149 // Command /particle/select
150 // set candidate List
151 G4String candidates("none");
152 piter->reset();
153 while ((*piter)()) // Loop checking, 09.08.2015, K.Kurashige
154 {
155 G4ParticleDefinition* particle = piter->value();
156 candidates += " " + particle->GetParticleName();
157 }
158 selectCmd->SetCandidates((const char*)(candidates));
159 }
160 else if (command == selectCmd) {
161 // Command /particle/select
162 theParticleTable->SelectParticle(newValues);
163 }
164 else if (command == findCmd) {
165 // Command /particle/find
166 G4ParticleDefinition* tmp = theParticleTable->FindParticle(findCmd->GetNewIntValue(newValues));
167 if (tmp == nullptr) {
168 G4cout << "Unknown particle [" << newValues << "]. Command ignored." << G4endl;
169 }
170 else {
171 G4cout << tmp->GetParticleName() << G4endl;
172 tmp->DumpTable();
173 }
174 }
175 else if (command == createAllIonCmd) {
176 // Command /particle/createAllIon
177 theParticleTable->GetIonTable()->CreateAllIon();
178 }
179 else if (command == createAllIsomerCmd) {
180 // Command /particle/createAllIsomer
181 theParticleTable->GetIonTable()->CreateAllIsomer();
182 }
183 else if (command == verboseCmd) {
184 // Command /particle/verbose
185 theParticleTable->SetVerboseLevel(verboseCmd->GetNewIntValue(newValues));
186 }
187 }
188
189 G4String G4ParticleMessenger::GetCurrentValue(G4UIcommand* command)
190 {
191 if (command == selectCmd) {
192 // Command /particle/select
193 // set candidate List
194 G4String candidates("none");
195 G4ParticleTable::G4PTblDicIterator* piter = theParticleTable->GetIterator();
196 piter->reset();
197 while ((*piter)()) // Loop checking, 09.08.2015, K.Kurashige
198 {
199 G4ParticleDefinition* particle = piter->value();
200 candidates += " " + particle->GetParticleName();
201 }
202 selectCmd->SetCandidates((const char*)(candidates));
203
204 const G4ParticleDefinition* currentParticle = theParticleTable->GetSelectedParticle();
205 return (currentParticle == nullptr) ? G4String("none") : currentParticle->GetParticleName();
206 }
207 if (command == verboseCmd) {
208 // Command /particle/verbose
209 return verboseCmd->ConvertToString(theParticleTable->GetVerboseLevel());
210 }
211 return "";
212 }
213