source: trunk/MagicSoft/Mars/datacenter/macros/plotdb.C@ 7352

Last change on this file since 7352 was 7142, checked in by tbretz, 19 years ago
*** empty log message ***
File size: 11.9 KB
Line 
1/* ======================================================================== *\
2!
3! *
4! * This file is part of MARS, the MAGIC Analysis and Reconstruction
5! * Software. It is distributed to you in the hope that it can be a useful
6! * and timesaving tool in analysing Data of imaging Cerenkov telescopes.
7! * It is distributed WITHOUT ANY WARRANTY.
8! *
9! * Permission to use, copy, modify and distribute this software and its
10! * documentation for any purpose is hereby granted without fee,
11! * provided that the above copyright notice appear in all copies and
12! * that both that copyright notice and this permission notice appear
13! * in supporting documentation. It is provided "as is" without express
14! * or implied warranty.
15! *
16!
17!
18! Author(s): Thomas Bretz, 05/2005 <mailto:tbretz@astro.uni-wuerzburg.de>
19! Author(s): Daniela Dorner, 05/2005 <mailto:dorner@astro.uni-wuerzburg.de>
20!
21! Copyright: MAGIC Software Development, 2000-2005
22!
23!
24\* ======================================================================== */
25
26/////////////////////////////////////////////////////////////////////////////
27//
28// plotdb.C
29// ========
30//
31// This macro is used to read quality parameters from the DB and plot them.
32//
33// The parameters are from the following files:
34// calib*.root:mean conversion factor, mean arrival time, rms arrival time
35// (each parameter for inner and outer camera)
36// signal*.root: mean pedestal rms (for inner and outer camera)
37// star*.root: PSF, # of Muons, Effective OnTime, Muon rate,
38// Ratio MC/Data(MuonSize) and mean number of islands
39//
40// In the DB these values are stored in the tables Calibration and Star.
41//
42// Usage:
43// .x plotdb.C --> all values in the DB are plotted
44// You can chose are certain period:
45// .x plotdb.C(25) --> all values from period 25 are plotted
46// or a time period from a certain date to a certain date
47// .x plotdb.C("2004-11-14 00:00:00", "2005-02-28 00:00:00")
48// --> all values from 14.11.2004 0h to 28.2.2005 0h are plotted
49//
50// Make sure, that database and password are corretly set in a resource
51// file called sql.rc and the resource file is found.
52//
53/////////////////////////////////////////////////////////////////////////////
54#include <iostream>
55
56#include <TH1.h>
57#include <TEnv.h>
58#include <TPad.h>
59#include <TLine.h>
60#include <TText.h>
61#include <TStyle.h>
62#include <TGraph.h>
63#include <TCanvas.h>
64#include <TSQLRow.h>
65#include <TSQLResult.h>
66
67#include "MTime.h"
68#include "MAstro.h"
69#include "MSQLServer.h"
70#include "MStatusDisplay.h"
71
72class MPlot : public MParContainer
73{
74private:
75 MSQLServer &fServer;
76
77 TString fRequestFrom;
78 TString fRequestTo;
79 Int_t fRequestPeriod;
80
81 Float_t fPlotMin;
82 Float_t fPlotMax;
83
84 Float_t fHistMin;
85 Float_t fHistMax;
86
87 TString fDescription;
88 TString fNameTab;
89
90 void PlotTable(TSQLResult &res, TString name, Float_t fmin, Float_t fmax, Float_t resolution)
91 {
92 gStyle->SetOptStat(111111);
93
94 TSQLRow *row;
95
96 TGraph g;
97 g.SetNameTitle(name, Form("%s vs Time", name.Data()));
98 g.SetMarkerStyle(kFullDotMedium);
99
100 TGraph g2;
101 g2.SetNameTitle(name, Form("%s vs <Zd>", name.Data()));
102 g2.SetMarkerStyle(kFullDotMedium);
103
104 if (fmax>fmin)
105 {
106 g.SetMinimum(fmin);
107 g.SetMaximum(fmax);
108 g2.SetMinimum(fmin);
109 g2.SetMaximum(fmax);
110 }
111
112 Int_t first = -1;
113 Int_t last = -1;
114
115 while ((row=res.Next()))
116 {
117 const char *date = (*row)[0];
118 const char *zd = (*row)[1];
119 const char *val = (*row)[2];
120 if (!date || !val || !zd)
121 continue;
122
123 MTime t(date);
124 if (!t.SetSqlDateTime(date))
125 continue;
126
127 if (fRequestPeriod>0 && MAstro::GetMagicPeriod(t.GetMjd())!=fRequestPeriod)
128 continue;
129
130 if (first<0)
131 first = TMath::Nint(TMath::Floor(t.GetMjd()));
132 last = TMath::Nint(TMath::Ceil(t.GetMjd()));
133
134 Float_t value = atof(val);
135 Float_t zenith = atof(zd);
136 g.SetPoint(g.GetN(), t.GetAxisTime(), value);
137 g2.SetPoint(g2.GetN(), zenith, value);
138 }
139
140 gROOT->SetSelectedPad(0);
141
142 TString title = fNameTab.IsNull() ? name(name.First('.')+2, name.Length()) : fNameTab;
143 TCanvas &c = fDisplay ? fDisplay->AddTab(title) : *new TCanvas;
144 c.Divide(1,2);
145
146 TVirtualPad *pad = gPad;
147 pad->cd(2);
148 gPad->SetBorderMode(0);
149 gPad->SetGridy();
150
151 TH1 *h = g.GetHistogram();
152
153 h->SetXTitle("Time");
154 h->SetYTitle(name);
155 h->GetXaxis()->SetTimeDisplay(1);
156
157 g.DrawClone("AP");
158
159 TLine l;
160 TText t;
161 Int_t num=0;
162 l.SetLineStyle(kDotted);
163 l.SetLineColor(kBlue);
164 t.SetTextColor(kBlue);
165 l.SetLineWidth(1);
166 t.SetTextSize(h->GetXaxis()->GetLabelSize());
167 t.SetTextAlign(21);
168 Int_t p0 = MAstro::GetMagicPeriod(first);
169 for (Int_t p = first; p<last; p++)
170 {
171 Int_t p1 = MAstro::GetMagicPeriod(p);
172 if (p1!=p0)
173 {
174 l.DrawLine(MTime(p).GetAxisTime(), h->GetMinimum(), MTime(p).GetAxisTime(), h->GetMaximum());
175 t.DrawText(MTime(p+15).GetAxisTime(), h->GetMaximum(), Form("%d", p1));
176 num++;
177 }
178 p0 = p1;
179 }
180 if (num<4)
181 gPad->SetGridx();
182
183 const Double_t min = fHistMin>fHistMax ? h->GetMinimum()-resolution/2 : fHistMin;
184 const Double_t max = fHistMin>fHistMax ? h->GetMaximum()+resolution/2 : fHistMax;
185
186 pad->cd(1);
187 gPad->SetBorderMode(0);
188 gPad->Divide(2,1);
189
190 TVirtualPad *pad2 = gPad;
191 pad2->cd(1);
192 gPad->SetBorderMode(0);
193 gPad->SetGridx();
194 gPad->SetGridy();
195
196 const Int_t n = resolution>0 ? TMath::Nint((max-min)/resolution) : 50;
197
198 TH1F hist("Hist", Form("Distribution of %s", fDescription.IsNull() ? name.Data() : fDescription.Data()), n, min, max);
199 hist.SetDirectory(0);
200
201 for (int i=0; i<g.GetN(); i++)
202 hist.Fill(g.GetY()[i]);
203
204 if (fDescription.IsNull())
205 hist.SetXTitle(name);
206 hist.SetYTitle("Counts");
207
208 hist.DrawCopy("");
209
210 pad2->cd(2);
211 gPad->SetBorderMode(0);
212 gPad->SetGridy();
213
214 TH1 *h2 = g2.GetHistogram();
215
216 h2->SetXTitle("Zd");
217 h2->SetYTitle(name);
218
219 g2.DrawClone("AP");
220
221 }
222
223public:
224 MPlot(MSQLServer &server) : fServer(server), fRequestPeriod(-1),
225 fPlotMin(0), fPlotMax(-1), fHistMin(0), fHistMax(-1)
226 {
227 }
228 void SetPlotRange(Float_t min, Float_t max, Int_t n=5)
229 { fPlotMin = min; fPlotMax = max; }
230 void SetHistRange(Float_t min, Float_t max)
231 { fHistMin = min; fHistMax = max; }
232 void SetRequestRange(const char *from="", const char *to="")
233 { fRequestFrom = from; fRequestTo = to; }
234 void SetRequestPeriod(Int_t n=-1)
235 { fRequestPeriod = n; }
236 void SetDescription(const char *d, const char *t=0) { fDescription = d; fNameTab = t; }
237
238 Bool_t Plot(const char *value, Float_t min=0, Float_t max=-1, Float_t resolution=0)
239 {
240 TString named = "Sequences.fRunStart";
241 TString named2 = "(Sequences.fZenithDistanceMin+Sequences.fZenithDistanceMax)/2";
242 TString namev = value;
243 TString join = "fSequenceFirst";
244
245 TString tablev = namev(0, namev.First('.'));
246 TString valuev = namev(namev.First('.')+1, namev.Length());
247
248 TString tabled = named(0, named.First('.'));
249 TString valued = named(named.First('.')+1, named.Length());
250
251 TString query;
252 query = Form("select %s, %s, %s ", valued.Data(), named2.Data(), valuev.Data());
253 query += Form("from %s left join %s ", tabled.Data(), tablev.Data());
254 query += Form("on %s.%s=%s.%s ", tabled.Data(), join.Data(), tablev.Data(), join.Data());
255
256 if (!fRequestFrom.IsNull() && !fRequestTo.IsNull())
257 query += Form("where fRunStart between '%s' and '%s' ",
258 fRequestFrom.Data(), fRequestTo.Data());
259
260 query += "order by fRunStart";
261
262 //cout << "q: " << query << endl;
263
264 TSQLResult *res = fServer.Query(query);
265 if (!res)
266 {
267 cout << "ERROR - Query failed: " << query << endl;
268 return kFALSE;
269 }
270
271 if (max>min)
272 PlotTable(*res, namev, min, max, resolution);
273 else
274 PlotTable(*res, namev, fPlotMin, fPlotMax, resolution);
275
276
277 delete res;
278 return kTRUE;
279 }
280};
281
282void plotall(MPlot &plot)
283{
284 //inner camera
285 //from calib*.root
286 plot.SetDescription("Conversion Factor inner Camera;C_{I} [phe/fadc cnts]", "ConvI");
287 plot.Plot("Calibration.fConvFactorInner", 0, 0.5, 0.001);
288 plot.SetDescription("Mean Arrival Time inner Camera;T_{I} [sl]", "ArrTmI");
289 plot.Plot("Calibration.fArrTimeMeanInner", 0, 9.0, 0.1);
290 plot.SetDescription("RMS Arrival Time inner Camera;\\sigma_{T,I} [sl]", "RmsArrTmI");
291 plot.Plot("Calibration.fArrTimeRmsInner", 0, 2.5, 0.1);
292 //from signal*.root
293 plot.SetDescription("Mean Pedestal RMS inner Camera;\\sigma_{P,I} [phe]", "PedRmsI");
294 plot.Plot("Calibration.fMeanPedRmsInner", 0, 3.5, 0.1);
295 //from star*.root
296 //muon
297 plot.SetDescription("Point Spred Function;PSF [mm]");
298 plot.Plot("Star.fPSF", 0, 40, 0.5);
299 plot.SetDescription("Muon Calibration Ratio Data/MC;r [1]", "MuonCal");
300 plot.Plot("Star.fRatio", 0, 200, 0.5);
301 plot.SetDescription("Muon Rate after Muon Cuts;R [Hz]");
302 plot.Plot("Star.fMuonRate", 0, 2.0, 0.05);
303 //imgpar
304 plot.SetDescription("Mean Number of Islands after cleaning;N [#]", "NumIsl");
305 plot.Plot("Star.fMeanNumberIslands", 0.5, 4.5, 0.1);
306 plot.SetDescription("Measures effective on time;T_{eff} [s]", "EffOn");
307 plot.Plot("Star.fEffOnTime", 0, 10000, 60);
308 plot.SetDescription("Datarate [Hz]", "Rate");
309 plot.Plot("Star.fDataRate", 0, 600, 10);
310 plot.SetDescription("Maximum Humidity [%]", "Hum");
311 plot.Plot("Star.fMaxHumidity", 0, 100, 1);
312 //muon
313 plot.SetDescription("Number of Muons after Muon Cuts;N [#]");
314 plot.Plot("Star.fMuonNumber", 0, 10000, 100);
315 //outer camera
316 //from calib*.root
317 plot.SetDescription("Conversion Factor outer Camera;C_{O} [phe/fadc cnts]", "ConvO");
318 plot.Plot("Calibration.fConvFactorOuter", 0, 2.0, 0.01);
319 plot.SetDescription("Mean Arrival Time outer Camera;T_{O} [sl]", "ArrTmO");
320 plot.Plot("Calibration.fArrTimeMeanOuter", 0, 8.5, 0.1);
321 plot.SetDescription("RMS Arrival Time outer Camera;\\sigma_{T,O} [sl]", "RmsArrTmO");
322 plot.Plot("Calibration.fArrTimeRmsOuter", 0, 2.5, 0.1);
323 //from signal*.root
324 plot.SetDescription("Mean Pedestal RMS outer Camera;\\sigma_{P,O} [phe]", "PedRmsO");
325 plot.Plot("Calibration.fMeanPedRmsOuter", 0, 4.0, 0.1);
326}
327
328void plotdb(TString from="", TString to="")
329{
330 TEnv env("sql.rc");
331
332 MSQLServer serv(env);
333 if (!serv.IsConnected())
334 {
335 cout << "ERROR - Connection to database failed." << endl;
336 return;
337 }
338
339 cout << "plotdb" << endl;
340 cout << "------" << endl;
341 cout << endl;
342 cout << "Connected to " << serv.GetName() << endl;
343 cout << endl;
344
345 MStatusDisplay *d = new MStatusDisplay;
346
347 MPlot plot(serv);
348 plot.SetDisplay(d);
349 plot.SetRequestRange(from, to);
350 plotall(plot);
351}
352
353void plotdb(Int_t period)
354{
355 TEnv env("sql.rc");
356
357 MSQLServer serv(env);
358 if (!serv.IsConnected())
359 {
360 cout << "ERROR - Connection to database failed." << endl;
361 return;
362 }
363
364 cout << "plotdb" << endl;
365 cout << "------" << endl;
366 cout << endl;
367 cout << "Connected to " << serv.GetName() << endl;
368 cout << endl;
369
370 MStatusDisplay *d = new MStatusDisplay;
371
372 MPlot plot(serv);
373 plot.SetDisplay(d);
374 plot.SetRequestPeriod(period);
375 plotall(plot);
376}
Note: See TracBrowser for help on using the repository browser.