source: tags/Mars-V1.2/star.cc@ 10438

Last change on this file since 10438 was 8434, checked in by tbretz, 18 years ago
*** empty log message ***
File size: 8.8 KB
Line 
1#include <TROOT.h>
2#include <TClass.h>
3#include <TSystem.h>
4#include <TGClient.h>
5#include <TApplication.h>
6#include <TObjectTable.h>
7
8#include "MLog.h"
9#include "MLogManip.h"
10
11#include "MEnv.h"
12#include "MArgs.h"
13#include "MArray.h"
14#include "MDirIter.h"
15
16#include "MStatusDisplay.h"
17
18#include "MSequence.h"
19#include "MJStar.h"
20
21using namespace std;
22
23static void StartUpMessage()
24{
25 gLog << all << endl;
26
27 // 1 2 3 4 5 6
28 // 123456789012345678901234567890123456789012345678901234567890
29 gLog << "========================================================" << endl;
30 gLog << " Star - MARS V" << MARSVER << endl;
31 gLog << " MARS -- STandard Analysis and Reconstruction" << endl;
32 gLog << " Compiled with ROOT v" << ROOT_RELEASE << " on <" << __DATE__ << ">" << endl;
33 gLog << "========================================================" << endl;
34 gLog << endl;
35}
36
37static void Usage()
38{
39 // 1 2 3 4 5 6 7 8
40 // 12345678901234567890123456789012345678901234567890123456789012345678901234567890
41 gLog << all << endl;
42 gLog << "Sorry the usage is:" << endl;
43 gLog << " star [options] sequence.txt|number" << endl << endl;
44 gLog << " Arguments:" << endl;
45 gLog << " sequence.txt: Ascii file defining a sequence of runs" << endl;
46 gLog << " number: The sequence number (using file in the datacenter)" << endl;
47 gLog << " For more details see MSequence" << endl;
48 gLog << " Root Options:" << endl;
49 gLog << " -b Batch mode (no graphical output to screen)" << endl<<endl;
50 gLog << " Options:" << endl;
51 gLog.Usage();
52 gLog << " --debug-env=0 Disable debugging setting resources <default>" << endl;
53 gLog << " --debug-env[=1] Display untouched resources after program execution" << endl;
54 gLog << " --debug-env=2 Display untouched resources after eventloop setup" << endl;
55 gLog << " --debug-env=3 Debug setting resources from resource file" << endl;
56 gLog << " --debug-mem Debug memory usage" << endl << endl;
57 gLog << endl;
58 gLog << " Input Options:" << endl;
59 gLog << " -mc You must use this for MC files (PRELIMINARY)" << endl << endl;
60 gLog << " Output options:" << endl;
61 gLog << " -q Quit when job is finished" << endl;
62 gLog << " -f Force overwrite of existing files" << endl;
63 gLog << " -ff Force execution if not all files found" << endl;
64 gLog << " --ind=path Path where to search for the calibrated data (Y)" << endl;
65 gLog << " [default=standard path in datacenter]" << endl;
66 gLog << " --out=path Path to write the all results to [def=local path]" << endl;
67 gLog << " (overwrites --outc and --outy)" << endl;
68 gLog << " --no-muons Switch off Muon analysis (for fast tests)" << endl;
69 gLog << " --print-seq Print Sequence information" << endl;
70 gLog << " --print-files Print Files taken from Sequence" << endl;
71 gLog << " --print-found Print Files found from Sequence" << endl;
72 gLog << " --config=star.rc Resource file [default=star.rc]" << endl;
73 gLog << endl;
74 gLog << " --version, -V Show startup message with version number" << endl;
75 gLog << " -?, -h, --help This help" << endl << endl;
76}
77
78static void PrintFiles(const MSequence &seq, const TString &kInpathD, Bool_t allopt)
79{
80 const char *prep = allopt ? "Found" : "Scheduled";
81
82 MDirIter Next;
83 seq.SetupDatRuns(Next, MSequence::kCalibrated, kInpathD);
84
85 gLog << all;
86 gLog.Separator(Form("%s Data Files", prep));
87 Next.Print(allopt?"all":"");
88 gLog << endl;
89}
90
91int main(int argc, char **argv)
92{
93 if (!MARS::CheckRootVer())
94 return 0xff;
95
96 MLog::RedirectErrorHandler(MLog::kColor);
97
98 //
99 // Evaluate arguments
100 //
101 MArgs arg(argc, argv, kTRUE);
102 gLog.Setup(arg);
103
104 StartUpMessage();
105
106 if (arg.HasOnly("-V") || arg.HasOnly("--version"))
107 return 0;
108
109 if (arg.HasOnly("-?") || arg.HasOnly("-h") || arg.HasOnly("--help"))
110 {
111 Usage();
112 return 2;
113 }
114
115 const TString kConfig = arg.GetStringAndRemove("--config=", "star.rc");
116
117 const Bool_t kPrintSeq = arg.HasOnlyAndRemove("--print-seq");
118 const Bool_t kPrintFiles = arg.HasOnlyAndRemove("--print-files");
119 const Bool_t kPrintFound = arg.HasOnlyAndRemove("--print-found");
120 const Bool_t kDebugMem = arg.HasOnlyAndRemove("--debug-mem");
121 Int_t kDebugEnv = arg.HasOnlyAndRemove("--debug-env") ? 1 : 0;
122 kDebugEnv = arg.GetIntAndRemove("--debug-env=", kDebugEnv);
123
124 const Bool_t kQuit = arg.HasOnlyAndRemove("-q");
125 const Bool_t kBatch = arg.HasOnlyAndRemove("-b");
126 const Bool_t kOverwrite = arg.HasOnlyAndRemove("-f");
127 //const Bool_t kForceExec = arg.HasOnlyAndRemove("-ff");
128 const Bool_t kIsMC = arg.HasOnlyAndRemove("-mc");
129 const Bool_t kNoMuons = arg.HasOnlyAndRemove("--no-muons");
130
131 const TString kInpath = arg.GetStringAndRemove("--ind=", "");
132 const TString kOutpath = arg.GetStringAndRemove("--out=", ".");
133
134 if (arg.GetNumOptions()>0)
135 {
136 gLog << warn << "WARNING - Unknown commandline options..." << endl;
137 arg.Print("options");
138 gLog << endl;
139 return 2;
140 }
141
142 //
143 // check for the right usage of the program
144 //
145 if (arg.GetNumArguments()!=1)
146 {
147 Usage();
148 return 2;
149 }
150
151 //
152 // Setup sequence file and check for its existance
153 //
154 TString kSequence = arg.GetArgumentStr(0);
155
156 //
157 // Something special for datacenter access
158 //
159 if (!MSequence::InflatePath(kSequence, kIsMC))
160 return 2;
161
162 if (gSystem->AccessPathName(kConfig, kFileExists))
163 {
164 gLog << err << "Sorry, config file '" << kConfig << "' doesn't exist." << endl;
165 return 2;
166 }
167
168 //
169 // Setup sequence and check its validity
170 //
171 MSequence seq(kSequence, kInpath);
172 if (!seq.IsMonteCarlo())
173 seq.SetMonteCarlo(kIsMC);
174 if (kPrintSeq)
175 {
176 gLog << all;
177 gLog.Separator(kSequence);
178 seq.Print();
179 gLog << endl;
180 }
181 if (!seq.IsValid())
182 {
183 gLog << err << "Sequence read but not valid!" << endl << endl;
184 return 2;
185 }
186
187 //
188 // Process print options
189 //
190 if (kPrintFiles)
191 PrintFiles(seq, kInpath, kFALSE);
192 if (kPrintFound)
193 PrintFiles(seq, kInpath, kTRUE);
194
195 //
196 // Initialize root
197 //
198 MArray::Class()->IgnoreTObjectStreamer();
199 MParContainer::Class()->IgnoreTObjectStreamer();
200
201 TApplication app("star", &argc, argv);
202 if (!gROOT->IsBatch() && !gClient || gROOT->IsBatch() && !kBatch)
203 {
204 gLog << err << "Bombing... maybe your DISPLAY variable is not set correctly!" << endl;
205 return 1;
206 }
207
208 //
209 // Update frequency by default = 1Hz
210 //
211 MStatusDisplay *d = new MStatusDisplay;
212
213 // From now on each 'Exit' means: Terminate the application
214 d->SetBit(MStatusDisplay::kExitLoopOnExit);
215 d->SetTitle(kSequence);
216
217 if (kDebugMem)
218 TObject::SetObjectStat(kTRUE);
219
220 //
221 // Do calibration in a block (debug mem)
222 //
223 MEnv env(kConfig);
224 if (!env.IsValid())
225 {
226 gLog << err << "Configuration file " << kConfig << " not found." << endl;
227 return 0xfe;
228 }
229
230 {
231 MJStar job(Form("MJStar #%d", seq.GetSequence()));
232 job.SetSequence(seq);
233 job.SetEnv(&env);
234 job.SetEnvDebug(kDebugEnv);
235 job.SetDisplay(d);;
236 job.SetOverwrite(kOverwrite);
237 job.SetPathOut(kOutpath);
238 // job.SetPathIn(kInpath); // not yet needed
239 if (kNoMuons)
240 job.DisableMuonAnalysis();
241
242 if (!job.Process())
243 {
244 gLog << err << "Calculation of image parameters failed." << endl << endl;
245 return 2;
246 }
247
248 if (kDebugEnv>0)
249 env.PrintUntouched();
250
251 if (!job.GetDisplay())
252 {
253 gLog << warn << "Display closed by user... execution aborted." << endl << endl;
254 return 1;
255 }
256 }
257
258 if (kBatch || kQuit)
259 delete d;
260 else
261 {
262 // From now on each 'Close' means: Terminate the application
263 d->SetBit(MStatusDisplay::kExitLoopOnClose);
264
265 // Wait until the user decides to exit the application
266 app.Run(kFALSE);
267 }
268
269 if (TObject::GetObjectStat())
270 {
271 TObject::SetObjectStat(kFALSE);
272 gObjectTable->Print();
273 }
274
275 return 0;
276}
Note: See TracBrowser for help on using the repository browser.