Geant4 Cross Reference |
1 // 1 2 // ******************************************* 3 // * License and Disclaimer 4 // * 5 // * The Geant4 software is copyright of th 6 // * the Geant4 Collaboration. It is provided 7 // * conditions of the Geant4 Software License 8 // * LICENSE and available at http://cern.ch/ 9 // * include a list of copyright holders. 10 // * 11 // * Neither the authors of this software syst 12 // * institutes,nor the agencies providing fin 13 // * work make any representation or warran 14 // * regarding this software system or assum 15 // * use. Please see the license in the file 16 // * for the full disclaimer and the limitatio 17 // * 18 // * This code implementation is the result 19 // * technical work of the GEANT4 collaboratio 20 // * By using, copying, modifying or distri 21 // * any work based on the software) you ag 22 // * use in resulting scientific publicati 23 // * acceptance of all terms of the Geant4 Sof 24 // ******************************************* 25 // 26 // G4GDMLMessenger implementation 27 // 28 // Author: Witold Pokorski, October 2010 29 // ------------------------------------------- 30 31 #include "G4GDMLMessenger.hh" 32 #include "G4GDMLParser.hh" 33 34 #include "globals.hh" 35 #include "G4RunManager.hh" 36 #include "G4UIdirectory.hh" 37 #include "G4UIcmdWithAString.hh" 38 #include "G4UIcmdWithABool.hh" 39 #include "G4UIcmdWithoutParameter.hh" 40 #include "G4GeometryManager.hh" 41 #include "G4LogicalVolumeStore.hh" 42 #include "G4PhysicalVolumeStore.hh" 43 #include "G4SolidStore.hh" 44 45 // ------------------------------------------- 46 G4GDMLMessenger::G4GDMLMessenger(G4GDMLParser* 47 : myParser(myPars) 48 { 49 persistencyDir = new G4UIdirectory("/persist 50 persistencyDir->SetGuidance("UI commands spe 51 52 gdmlDir = new G4UIdirectory("/persistency/gd 53 gdmlDir->SetGuidance("GDML parser and writer 54 55 ReaderSchema = new G4UIcmdWithAString("/pers 56 ReaderSchema->SetGuidance("Set alternative G 57 ReaderSchema->SetParameterName("schema_path_ 58 ReaderSchema->AvailableForStates(G4State_Pre 59 ReaderSchema->SetToBeBroadcasted(false); 60 61 ReaderCmd = new G4UIcmdWithAString("/persist 62 ReaderCmd->SetGuidance("Read GDML file."); 63 ReaderCmd->SetParameterName("filename", fals 64 ReaderCmd->AvailableForStates(G4State_PreIni 65 ReaderCmd->SetToBeBroadcasted(false); 66 67 TopVolCmd = new G4UIcmdWithAString("/persist 68 TopVolCmd->SetGuidance("Set the top volume f 69 TopVolCmd->SetParameterName("topvol", false) 70 TopVolCmd->SetToBeBroadcasted(false); 71 72 WriterCmd = new G4UIcmdWithAString("/persist 73 WriterCmd->SetGuidance("Write GDML file."); 74 WriterCmd->SetParameterName("filename", fals 75 WriterCmd->AvailableForStates(G4State_Idle); 76 WriterCmd->SetToBeBroadcasted(false); 77 78 StripCmd = new G4UIcmdWithABool("/persistenc 79 StripCmd->SetGuidance("Enable/disable stripp 80 StripCmd->SetGuidance("when reading a GDML f 81 StripCmd->SetParameterName("strip_pointers", 82 StripCmd->SetDefaultValue(true); 83 StripCmd->AvailableForStates(G4State_Idle); 84 StripCmd->SetToBeBroadcasted(false); 85 86 AppendCmd = new G4UIcmdWithABool("/persisten 87 AppendCmd->SetGuidance("Enable/disable appen 88 AppendCmd->SetGuidance("when writing a GDML 89 AppendCmd->SetParameterName("append_pointers 90 AppendCmd->SetDefaultValue(true); 91 AppendCmd->AvailableForStates(G4State_Idle); 92 AppendCmd->SetToBeBroadcasted(false); 93 94 RegionCmd = new G4UIcmdWithABool("/persisten 95 RegionCmd->SetGuidance("Enable export of geo 96 RegionCmd->SetGuidance("for storing producti 97 RegionCmd->SetParameterName("export_regions" 98 RegionCmd->SetDefaultValue(false); 99 RegionCmd->AvailableForStates(G4State_Idle); 100 RegionCmd->SetToBeBroadcasted(false); 101 102 EcutsCmd = new G4UIcmdWithABool("/persistenc 103 EcutsCmd->SetGuidance("Enable export of ener 104 EcutsCmd->SetGuidance("to logical volumes.") 105 EcutsCmd->SetGuidance("NOTE: may increase co 106 EcutsCmd->SetGuidance(" GDML file! Inf 107 EcutsCmd->SetGuidance(" for import."); 108 EcutsCmd->SetParameterName("export_Ecuts", f 109 EcutsCmd->SetDefaultValue(false); 110 EcutsCmd->AvailableForStates(G4State_Idle); 111 EcutsCmd->SetToBeBroadcasted(false); 112 113 SDCmd = new G4UIcmdWithABool("/persistency/g 114 SDCmd->SetGuidance("Enable export of SD asso 115 SDCmd->SetGuidance("to logical volumes."); 116 SDCmd->SetParameterName("export_SD", false); 117 SDCmd->SetDefaultValue(false); 118 SDCmd->AvailableForStates(G4State_Idle); 119 SDCmd->SetToBeBroadcasted(false); 120 121 ClearCmd = new G4UIcmdWithoutParameter("/per 122 ClearCmd->SetGuidance("Clear geometry (befor 123 ClearCmd->AvailableForStates(G4State_Idle); 124 ClearCmd->SetToBeBroadcasted(false); 125 } 126 127 // ------------------------------------------- 128 G4GDMLMessenger::~G4GDMLMessenger() 129 { 130 delete ReaderSchema; 131 delete ReaderCmd; 132 delete WriterCmd; 133 delete ClearCmd; 134 delete TopVolCmd; 135 delete RegionCmd; 136 delete EcutsCmd; 137 delete SDCmd; 138 delete persistencyDir; 139 delete gdmlDir; 140 delete StripCmd; 141 delete AppendCmd; 142 } 143 144 // ------------------------------------------- 145 void G4GDMLMessenger::SetNewValue(G4UIcommand* 146 { 147 if(command == StripCmd) 148 { 149 G4bool mode = StripCmd->GetNewBoolValue(ne 150 myParser->SetStripFlag(mode); 151 } 152 153 if(command == AppendCmd) 154 { 155 pFlag = AppendCmd->GetNewBoolValue(newValu 156 myParser->SetAddPointerToName(pFlag); 157 } 158 159 if(command == ReaderSchema) 160 { 161 myParser->SetImportSchema(newValue); 162 } 163 164 if(command == ReaderCmd) 165 { 166 G4GeometryManager::GetInstance()->OpenGeom 167 myParser->Read(newValue); 168 G4RunManager::GetRunManager()->DefineWorld 169 myParser->GetWorldVolume()); 170 G4RunManager::GetRunManager()->GeometryDir 171 } 172 173 if(command == RegionCmd) 174 { 175 G4bool mode = RegionCmd->GetNewBoolValue(n 176 myParser->SetRegionExport(mode); 177 } 178 179 if(command == EcutsCmd) 180 { 181 G4bool mode = EcutsCmd->GetNewBoolValue(ne 182 myParser->SetEnergyCutsExport(mode); 183 } 184 185 if(command == SDCmd) 186 { 187 G4bool mode = SDCmd->GetNewBoolValue(newVa 188 myParser->SetSDExport(mode); 189 } 190 191 if(command == TopVolCmd) 192 { 193 topvol = G4LogicalVolumeStore::GetInstance 194 } 195 196 if(command == WriterCmd) 197 { 198 myParser->Write(newValue, topvol, pFlag); 199 } 200 201 if(command == ClearCmd) 202 { 203 myParser->Clear(); 204 G4RunManager::GetRunManager()->Reinitializ 205 } 206 } 207