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

Last change on this file since 7388 was 7388, checked in by tbretz, 19 years ago
*** empty log message ***
File size: 12.3 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 <TFrame.h>
62#include <TStyle.h>
63#include <TGraph.h>
64#include <TCanvas.h>
65#include <TSQLRow.h>
66#include <TSQLResult.h>
67
68#include "MTime.h"
69#include "MAstro.h"
70#include "MSQLServer.h"
71#include "MStatusDisplay.h"
72
73class MPlot : public MParContainer
74{
75private:
76 MSQLServer &fServer;
77
78 TString fRequestFrom;
79 TString fRequestTo;
80 Int_t fRequestPeriod;
81
82 Float_t fPlotMin;
83 Float_t fPlotMax;
84
85 Float_t fHistMin;
86 Float_t fHistMax;
87
88 TString fDescription;
89 TString fNameTab;
90
91 void PlotTable(TSQLResult &res, TString name, Float_t fmin, Float_t fmax, Float_t resolution)
92 {
93 gStyle->SetOptStat(111111);
94
95 TSQLRow *row;
96
97 TGraph g;
98 g.SetNameTitle(name, Form("%s vs Time", name.Data()));
99 g.SetMarkerStyle(kFullDotMedium);
100
101 TGraph g2;
102 g2.SetNameTitle(name, Form("%s vs <Zd>", name.Data()));
103 g2.SetMarkerStyle(kFullDotMedium);
104
105 if (fmax>fmin)
106 {
107 g.SetMinimum(fmin);
108 g.SetMaximum(fmax);
109 g2.SetMinimum(fmin);
110 g2.SetMaximum(fmax);
111 }
112
113 Int_t first = -1;
114 Int_t last = -1;
115
116 while ((row=res.Next()))
117 {
118 const char *date = (*row)[0];
119 const char *zd = (*row)[1];
120 const char *val = (*row)[2];
121 if (!date || !val || !zd)
122 continue;
123
124 MTime t(date);
125 if (!t.SetSqlDateTime(date))
126 continue;
127
128 if (fRequestPeriod>0 && MAstro::GetMagicPeriod(t.GetMjd())!=fRequestPeriod)
129 continue;
130
131 if (first<0)
132 first = TMath::Nint(TMath::Floor(t.GetMjd()));
133 last = TMath::Nint(TMath::Ceil(t.GetMjd()));
134
135 Float_t value = atof(val);
136 Float_t zenith = atof(zd);
137 g.SetPoint(g.GetN(), t.GetAxisTime(), value);
138 g2.SetPoint(g2.GetN(), zenith, value);
139 }
140
141 gROOT->SetSelectedPad(0);
142
143 TString title = fNameTab.IsNull() ? name(name.First('.')+2, name.Length()) : fNameTab;
144 TCanvas &c = fDisplay ? fDisplay->AddTab(title) : *new TCanvas;
145 c.SetFillColor(kWhite);
146 c.SetBorderMode(0);
147 c.Divide(1,2);
148
149 TVirtualPad *pad = gPad;
150 pad->cd(2);
151 gPad->SetBorderMode(0);
152 gPad->SetGridy();
153
154 TH1 *h = g.GetHistogram();
155
156 h->SetXTitle("Time");
157 h->SetYTitle(name);
158 h->GetXaxis()->SetTimeDisplay(1);
159
160 g.DrawClone("AP");
161
162 TLine l;
163 TText t;
164 Int_t num=0;
165 l.SetLineStyle(kDotted);
166 l.SetLineColor(kBlue);
167 t.SetTextColor(kBlue);
168 l.SetLineWidth(1);
169 t.SetTextSize(h->GetXaxis()->GetLabelSize());
170 t.SetTextAlign(21);
171 Int_t p0 = MAstro::GetMagicPeriod(first);
172 for (Int_t p = first; p<last; p++)
173 {
174 Int_t p1 = MAstro::GetMagicPeriod(p);
175 if (p1!=p0)
176 {
177 l.DrawLine(MTime(p).GetAxisTime(), h->GetMinimum(), MTime(p).GetAxisTime(), h->GetMaximum());
178 t.DrawText(MTime(p+15).GetAxisTime(), h->GetMaximum(), Form("%d", p1));
179 num++;
180 }
181 p0 = p1;
182 }
183 if (num<4)
184 gPad->SetGridx();
185
186 const Double_t min = fHistMin>fHistMax ? h->GetMinimum()-resolution/2 : fHistMin;
187 const Double_t max = fHistMin>fHistMax ? h->GetMaximum()+resolution/2 : fHistMax;
188
189 pad->cd(1);
190 gPad->SetBorderMode(0);
191 gPad->Divide(2,1);
192
193 TVirtualPad *pad2 = gPad;
194 pad2->cd(1);
195 gPad->SetBorderMode(0);
196 gPad->SetGridx();
197 gPad->SetGridy();
198
199 const Int_t n = resolution>0 ? TMath::Nint((max-min)/resolution) : 50;
200
201 TH1F hist("Hist", Form("Distribution of %s", fDescription.IsNull() ? name.Data() : fDescription.Data()), n, min, max);
202 hist.SetDirectory(0);
203
204 for (int i=0; i<g.GetN(); i++)
205 hist.Fill(g.GetY()[i]);
206
207 if (fDescription.IsNull())
208 hist.SetXTitle(name);
209 hist.SetYTitle("Counts");
210
211 hist.DrawCopy("");
212
213 pad2->cd(2);
214 gPad->SetBorderMode(0);
215 gPad->SetGridy();
216
217 TH1 *h2 = g2.GetHistogram();
218
219 h2->SetXTitle("Zd");
220 h2->SetYTitle(name);
221
222 g2.DrawClone("AP");
223 }
224
225public:
226 MPlot(MSQLServer &server) : fServer(server), fRequestPeriod(-1),
227 fPlotMin(0), fPlotMax(-1), fHistMin(0), fHistMax(-1)
228 {
229 }
230 void SetPlotRange(Float_t min, Float_t max, Int_t n=5)
231 { fPlotMin = min; fPlotMax = max; }
232 void SetHistRange(Float_t min, Float_t max)
233 { fHistMin = min; fHistMax = max; }
234 void SetRequestRange(const char *from="", const char *to="")
235 { fRequestFrom = from; fRequestTo = to; }
236 void SetRequestPeriod(Int_t n=-1)
237 { fRequestPeriod = n; }
238 void SetDescription(const char *d, const char *t=0) { fDescription = d; fNameTab = t; }
239
240 Bool_t Plot(const char *value, Float_t min=0, Float_t max=-1, Float_t resolution=0)
241 {
242 TString named = "Sequences.fRunStart";
243 TString named2 = "(Sequences.fZenithDistanceMin+Sequences.fZenithDistanceMax)/2";
244 TString namev = value;
245 TString join = "fSequenceFirst";
246
247 TString tablev = namev(0, namev.First('.'));
248 TString valuev = namev(namev.First('.')+1, namev.Length());
249
250 TString tabled = named(0, named.First('.'));
251 TString valued = named(named.First('.')+1, named.Length());
252
253 TString query;
254 query = Form("select %s, %s, %s ", valued.Data(), named2.Data(), valuev.Data());
255 query += Form("from %s left join %s ", tabled.Data(), tablev.Data());
256 query += Form("on %s.%s=%s.%s ", tabled.Data(), join.Data(), tablev.Data(), join.Data());
257
258 if (!fRequestFrom.IsNull() && !fRequestTo.IsNull())
259 query += Form("where fRunStart between '%s' and '%s' ",
260 fRequestFrom.Data(), fRequestTo.Data());
261
262 query += "order by fRunStart";
263
264 //cout << "q: " << query << endl;
265
266 TSQLResult *res = fServer.Query(query);
267 if (!res)
268 {
269 cout << "ERROR - Query failed: " << query << endl;
270 return kFALSE;
271 }
272
273 if (max>min)
274 PlotTable(*res, namev, min, max, resolution);
275 else
276 PlotTable(*res, namev, fPlotMin, fPlotMax, resolution);
277
278
279 delete res;
280 return kTRUE;
281 }
282};
283
284void plotall(MPlot &plot)
285{
286 //inner camera
287 //from calib*.root
288 plot.SetDescription("Conversion Factor inner Camera;C_{I} [phe/fadc cnts]", "ConvI");
289 plot.Plot("Calibration.fConvFactorInner", 0, 0.5, 0.001);
290 plot.SetDescription("Mean Arrival Time inner Camera;T_{I} [sl]", "ArrTmI");
291 plot.Plot("Calibration.fArrTimeMeanInner", 0, 9.0, 0.1);
292 plot.SetDescription("RMS Arrival Time inner Camera;\\sigma_{T,I} [sl]", "RmsArrTmI");
293 plot.Plot("Calibration.fArrTimeRmsInner", 0, 2.5, 0.1);
294 //from signal*.root
295 plot.SetDescription("Mean Pedestal RMS inner Camera;\\sigma_{P,I} [phe]", "PedRmsI");
296 plot.Plot("Calibration.fMeanPedRmsInner", 0, 3.5, 0.05);
297 plot.SetDescription("Mean Signal inner Camera;S_{I} [phe]", "SignalI");
298 plot.Plot("Calibration.fMeanSignalInner", 0, 7.0, 0.05);
299 //from star*.root
300 //muon
301 plot.SetDescription("Point Spred Function;PSF [mm]");
302 plot.Plot("Star.fPSF", 0, 40, 0.5);
303 plot.SetDescription("Muon Calibration Ratio Data/MC;r [1]", "MuonCal");
304 plot.Plot("Star.fRatio", 0, 200, 0.5);
305 plot.SetDescription("Muon Rate after Muon Cuts;R [Hz]");
306 plot.Plot("Star.fMuonRate", 0, 2.0, 0.05);
307 //imgpar
308 plot.SetDescription("Mean Number of Islands after cleaning;N [#]", "NumIsl");
309 plot.Plot("Star.fMeanNumberIslands", 0.5, 4.5, 0.01);
310 plot.SetDescription("Measures effective on time;T_{eff} [s]", "EffOn");
311 plot.Plot("Star.fEffOnTime", 0, 10000, 150);
312 plot.SetDescription("Datarate [Hz]", "Rate");
313 plot.Plot("Star.fDataRate", 0, 600, 10);
314 plot.SetDescription("Maximum Humidity [%]", "Hum");
315 plot.Plot("Star.fMaxHumidity", 0, 100, 1);
316 //muon
317 plot.SetDescription("Number of Muons after Muon Cuts;N [#]");
318 plot.Plot("Star.fMuonNumber", 0, 10000, 100);
319 //outer camera
320 //from calib*.root
321 plot.SetDescription("Conversion Factor outer Camera;C_{O} [phe/fadc cnts]", "ConvO");
322 plot.Plot("Calibration.fConvFactorOuter", 0, 2.0, 0.01);
323 plot.SetDescription("Mean Arrival Time outer Camera;T_{O} [sl]", "ArrTmO");
324 plot.Plot("Calibration.fArrTimeMeanOuter", 0, 8.5, 0.1);
325 plot.SetDescription("RMS Arrival Time outer Camera;\\sigma_{T,O} [sl]", "RmsArrTmO");
326 plot.Plot("Calibration.fArrTimeRmsOuter", 0, 2.5, 0.1);
327 //from signal*.root
328 plot.SetDescription("Mean Pedestal RMS outer Camera;\\sigma_{P,O} [phe]", "PedRmsO");
329 plot.Plot("Calibration.fMeanPedRmsOuter", 0, 4.0, 0.05);
330 plot.SetDescription("Mean Signal outer Camera;S_{O} [phe]", "SignalO");
331 plot.Plot("Calibration.fMeanSignalOuter", 0, 4.0, 0.05);
332}
333
334void plotdb(TString from="", TString to="")
335{
336 TEnv env("sql.rc");
337
338 MSQLServer serv(env);
339 if (!serv.IsConnected())
340 {
341 cout << "ERROR - Connection to database failed." << endl;
342 return;
343 }
344
345 cout << "plotdb" << endl;
346 cout << "------" << endl;
347 cout << endl;
348 cout << "Connected to " << serv.GetName() << endl;
349 cout << endl;
350
351 MStatusDisplay *d = new MStatusDisplay;
352
353 MPlot plot(serv);
354 plot.SetDisplay(d);
355 plot.SetRequestRange(from, to);
356 plotall(plot);
357 //d->SaveAsPS("plotdb.ps");
358}
359
360void plotdb(Int_t period)
361{
362 TEnv env("sql.rc");
363
364 MSQLServer serv(env);
365 if (!serv.IsConnected())
366 {
367 cout << "ERROR - Connection to database failed." << endl;
368 return;
369 }
370
371 cout << "plotdb" << endl;
372 cout << "------" << endl;
373 cout << endl;
374 cout << "Connected to " << serv.GetName() << endl;
375 cout << endl;
376
377 MStatusDisplay *d = new MStatusDisplay;
378 MPlot plot(serv);
379 plot.SetDisplay(d);
380 plot.SetRequestPeriod(period);
381 plotall(plot);
382 //d->SaveAsPS("plotdb.ps");
383}
Note: See TracBrowser for help on using the repository browser.