Previous commit had the bad side-effect of changing the behaviour of Raw QA to comput...
[u/mrichter/AliRoot.git] / MUON / AliMUONTriggerSubprocessor.cxx
1 /**************************************************************************
2 * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
3 *                                                                        *
4 * Author: The ALICE Off-line Project.                                    *
5 * Contributors are mentioned in the code where appropriate.              *
6 *                                                                        *
7 * Permission to use, copy, modify and distribute this software and its   *
8 * documentation strictly for non-commercial purposes is hereby granted   *
9 * without fee, provided that the above copyright notice appears in all   *
10 * copies and that both the copyright notice and this permission notice   *
11 * appear in the supporting documentation. The authors make no claims     *
12 * about the suitability of this software for any purpose. It is          *
13 * provided "as is" without express or implied warranty.                  *
14 **************************************************************************/
15
16 // $Id$
17
18 #include "AliMUONTriggerSubprocessor.h"
19
20 #include "AliCDBMetaData.h"
21 #include "AliLog.h"
22 #include "AliMUON1DArray.h"
23 #include "AliMUONGlobalCrateConfig.h"
24 #include "AliMUONRegionalTriggerConfig.h"
25 #include "AliMUONCalibParamNI.h"
26 #include "AliMUONPreprocessor.h"
27 #include "AliMUONTriggerIO.h"
28 #include "AliMUONTriggerLut.h"
29 #include "AliMpConstants.h"
30 #include <Riostream.h>
31 #include <TList.h>
32 #include <TObjString.h>
33 #include <TSystem.h>
34
35 /// \class AliMUONTriggerSubprocessor
36 ///
37 /// Implementation of AliMUONVSubprocessor for MUON trigger system
38 ///
39 /// Reads masks and LUT online files to feed the OCDB
40 ///
41 /// \author L. Aphecetche
42
43 /// \cond CLASSIMP
44 ClassImp(AliMUONTriggerSubprocessor)
45 /// \endcond
46
47 //_____________________________________________________________________________
48 AliMUONTriggerSubprocessor::AliMUONTriggerSubprocessor(AliMUONPreprocessor* master)
49 : AliMUONVSubprocessor(master,
50                        "Triggers",
51                        "Upload MUON Trigger masks and LUT to OCDB"),
52 fRegionalConfig(0x0),
53 fLocalMasks(0x0),
54 fGlobalConfig(0x0),
55 fLUT(0x0)
56 {
57   /// default ctor
58 }
59
60 //_____________________________________________________________________________
61 AliMUONTriggerSubprocessor::~AliMUONTriggerSubprocessor()
62 {
63   /// dtor
64   delete fRegionalConfig;
65   delete fLocalMasks;
66   delete fGlobalConfig;
67   delete fLUT;
68 }
69
70 //_____________________________________________________________________________
71 TString
72 AliMUONTriggerSubprocessor::GetFileName(const char* fid) const
73 {
74   /// Get filename for a given id
75   
76   const Int_t kSystem = AliMUONPreprocessor::kDAQ;
77   
78   TList* sources = Master()->GetFileSources(kSystem,fid);
79   if ( sources && sources->GetSize() == 1 ) 
80   {
81     return Master()->GetFile(kSystem,fid,static_cast<TObjString*>(sources->First())->GetName());
82   }
83   return "";
84 }
85
86 //_____________________________________________________________________________
87 void 
88 AliMUONTriggerSubprocessor::Initialize(Int_t run, UInt_t startTime, UInt_t endTime)
89 {
90   /// When starting a new run, reads in the trigger online files.
91   
92   // First thing to do (after cleanup, that is), is to check whether the DA
93   // was alive or not. If it was, it should have put the "MtgCurrent.dat" file
94   // on the FXS. 
95   //
96   
97   Bool_t da(kTRUE);
98   
99   TString exportedFiles(gSystem->ExpandPathName(GetFileName("EXPORTED").Data()));
100   
101   if ( exportedFiles == "" ) 
102   {
103     Master()->Log("exported files not specified !");
104     da = kFALSE;
105   }
106   
107   if ( gSystem->AccessPathName(exportedFiles.Data(),kFileExists) ) // mind the strange return value convention of that method !
108   {
109     Master()->Log(Form("%s is not there !",exportedFiles.Data()));
110     da = kFALSE;
111   }
112   
113   if (!da)
114   {
115     Master()->Log("FATAL ERROR : DA does not seem to have been run !!!");
116     Master()->Invalidate();
117     return;
118   }
119   
120   // OK. We have an exportedFiles.dat file at hand.
121   // Read it to know what other files should be there.
122   
123   Bool_t regionalFile(kFALSE);
124   Bool_t globalFile(kFALSE);
125   Bool_t localFile(kFALSE);
126   Bool_t lutFile(kFALSE);
127   
128   WhichFilesToRead(GetFileName("EXPORTED").Data(),
129                    globalFile,regionalFile,localFile,lutFile);
130   
131   if ((globalFile+regionalFile+localFile+lutFile) == 0) {
132     Master()->Log("No file(s) to be processed for this run. Exiting.");
133     return;
134   }
135   
136   delete fRegionalConfig; fRegionalConfig = 0x0;
137   delete fLocalMasks; fLocalMasks = 0x0;
138   delete fGlobalConfig; fGlobalConfig = 0x0;
139   delete fLUT; fLUT = 0x0;
140   
141   Master()->Log(Form("Reading trigger masks for Run %d startTime %ld endTime %ld",
142                      run,startTime,endTime));
143     
144   Int_t check = 
145     TestFile("REGIONAL",regionalFile) + 
146     TestFile("LOCAL",localFile) + 
147     TestFile("GLOBAL",globalFile) +
148     TestFile("LUT",lutFile);
149
150   if ( check ) 
151   {
152     Master()->Log("Could not read some input file(s). Aborting");
153     Master()->Invalidate();
154     return;
155   }
156   
157   if ( regionalFile ) fRegionalConfig = new AliMUONRegionalTriggerConfig();
158   if ( localFile ) fLocalMasks = new AliMUON1DArray(AliMpConstants::TotalNofLocalBoards()+1);
159   if ( globalFile )   fGlobalConfig   = new AliMUONGlobalCrateConfig();
160
161   AliMUONTriggerIO tio;
162   
163   Bool_t ok = tio.ReadConfig(localFile ? GetFileName("LOCAL").Data() : "",
164                              regionalFile ? GetFileName("REGIONAL").Data() : "",
165                              globalFile ? GetFileName("GLOBAL").Data() : "",
166                              fLocalMasks,fRegionalConfig,fGlobalConfig);
167   
168   if (!ok)
169   {
170     Master()->Log("ERROR : ReadConfig failed");
171     delete fLocalMasks;
172     delete fRegionalConfig;
173     delete fGlobalConfig;
174     fLocalMasks = 0x0;
175     fRegionalConfig = 0x0;
176     fGlobalConfig = 0x0;
177   }
178
179   if ( lutFile ) 
180   {
181     fLUT = new AliMUONTriggerLut;
182     
183     Master()->Log(Form("Reading trigger LUT for Run %d startTime %ld endTime %ld",
184                        run,startTime,endTime));
185   
186     ok = tio.ReadLUT(GetFileName("LUT").Data(),*fLUT);
187
188     if (!ok)
189     {
190       Master()->Log("ERROR : ReadLUT failed");
191       delete fLUT;
192       fLUT = 0x0;
193     }
194   }
195 }
196
197 //_____________________________________________________________________________
198 UInt_t 
199 AliMUONTriggerSubprocessor::Process(TMap* /*dcsAliasMap*/)
200 {
201   /// Store the trigger masks into the CDB
202   
203   if ( !fGlobalConfig && !fRegionalConfig && !fLocalMasks && !fLUT )
204   {
205     // nothing to do
206     return 0;
207   }
208   
209   Master()->Log(Form("N global = %d N regional = %d N local %d N lut %d",                     
210                      (fGlobalConfig ? 1 : 0 ),
211                      (fRegionalConfig ? fRegionalConfig->GetNofTriggerCrates() : 0 ),
212                      (fLocalMasks ? fLocalMasks->GetSize() : 0 ),
213                      (fLUT ? 1 : 0)));
214   
215   AliCDBMetaData metaData;
216         metaData.SetBeamPeriod(0);
217         metaData.SetResponsible("MUON TRG");
218         metaData.SetComment("Computed by AliMUONTriggerSubprocessor $Id$");
219   
220   Bool_t validToInfinity = kTRUE;
221
222         Bool_t result1(kTRUE);
223   Bool_t result2(kTRUE);
224   Bool_t result3(kTRUE);
225   Bool_t result4(kTRUE);
226   
227   if ( fGlobalConfig ) 
228   {
229     result1 = Master()->Store("Calib", "GlobalTriggerCrateConfig", fGlobalConfig, 
230                               &metaData, 0, validToInfinity);
231   }
232   
233   if ( fRegionalConfig && fRegionalConfig->GetNofTriggerCrates() > 0 )
234   {
235     result2 = Master()->Store("Calib", "RegionalTriggerConfig", fRegionalConfig, 
236                               &metaData, 0, validToInfinity);
237   }
238   
239   if ( fLocalMasks && fLocalMasks->GetSize() > 0 ) 
240   {
241     result3 = Master()->Store("Calib", "LocalTriggerBoardMasks", fLocalMasks, 
242                               &metaData, 0, validToInfinity);
243   }
244
245   if ( fLUT )
246   {
247     result4 = Master()->Store("Calib", "TriggerLut", fLUT, 
248                               &metaData, 0, validToInfinity);
249   }
250   
251   return ( result1 != kTRUE || result2 != kTRUE || result3 != kTRUE || result4 != kTRUE ); // return 0 if everything is ok.  
252 }
253
254 //_____________________________________________________________________________
255 Int_t
256 AliMUONTriggerSubprocessor::TestFile(const char* baseName, Bool_t shouldBeThere) const
257 {
258   /// Check if required file can be accessed 
259   if (!shouldBeThere) return 0; // all is ok
260   
261   TString fileName(gSystem->ExpandPathName(GetFileName(baseName).Data()));
262   
263   if ( gSystem->AccessPathName(fileName.Data(),kFileExists) ) 
264   {
265     // mind the strange return value convention of that method !
266     Master()->Log(Form("File %s does not exist",fileName.Data()));    
267     return 1; // this is an error
268   }
269   return 0; // all is ok.
270 }
271
272 //_____________________________________________________________________________
273 void
274 AliMUONTriggerSubprocessor::WhichFilesToRead(const char* exportedFiles,
275                                              Bool_t& globalFile,
276                                              Bool_t& regionalFile,
277                                              Bool_t& localFile,
278                                              Bool_t& lutFile) const
279 {
280   /// From the exportedFiles file, determine which other files will need
281   /// to be read in
282   ifstream in(gSystem->ExpandPathName(exportedFiles));
283   
284   globalFile = kFALSE;
285   regionalFile = kFALSE;
286   localFile = kFALSE;
287   lutFile = kFALSE;
288   
289   char line[1024];
290   
291   while ( in.getline(line,1024,'\n') )
292   {
293     TString sline(line);
294     sline.ToUpper();
295     
296     if ( sline.Contains("REGIONAL") ) regionalFile = kTRUE;
297     if ( sline.Contains("LUT") ) lutFile = kTRUE;
298     if ( sline.Contains("LOCAL") && sline.Contains("MASK") ) localFile = kTRUE;
299     if ( sline.Contains("GLOBAL") ) globalFile = kTRUE;
300   }
301     
302   if ( regionalFile || localFile || globalFile || lutFile ) 
303   {
304     Master()->Log(Form("Will have to read the following file types:"));
305     if ( globalFile) Master()->Log("GLOBAL");
306     if ( regionalFile ) Master()->Log("REGIONAL");
307     if ( localFile) Master()->Log("LOCAL");
308     if ( lutFile ) Master()->Log("LUT");
309   }
310 }
311