+//______________________________________________________________________________________________
+
+UInt_t AliTPCPreprocessor::ExtractQA(Int_t sourceFXS)
+{
+ //
+ // Read Quality Assurance file from file exchage server
+ //
+
+ UInt_t result=0;
+
+ TList* list = GetFileSources(sourceFXS,"QA");
+
+ if (list && list->GetEntries()>0) {
+
+// only one QA objetc should be available!
+
+ AliTPCdataQA *calQA;
+
+ UInt_t nentries = list->GetEntries();
+ UInt_t index=0;
+ if ( nentries > 1) Log ( "More than one QA entry. First one processed");
+ TObjString* fileNameEntry = (TObjString*) list->At(index);
+ if (fileNameEntry!=NULL) {
+ TString fileName = GetFile(sourceFXS, "QA",
+ fileNameEntry->GetString().Data());
+ TFile *f = TFile::Open(fileName);
+ if (!f) {
+ Log ("Error opening QA file.");
+ result =2;
+ } else {
+ f->GetObject("tpcCalibQA",calQA);
+ if ( calQA ) {
+//
+// Store updated pedestal entry to OCDB
+//
+ AliCDBMetaData metaData;
+ metaData.SetBeamPeriod(0);
+ metaData.SetResponsible("Haavard Helstrup");
+ metaData.SetAliRootVersion(ALIROOT_SVN_BRANCH);
+ metaData.SetComment("Preprocessor AliTPC data base entries.");
+
+ Bool_t storeOK = Store("Calib", "QA", calQA, &metaData, 0, kTRUE);
+ if ( !storeOK ) ++result;
+ }
+ }
+ } else {
+ Log ("Error: no QA files on FXS!");
+ result = 2;
+ }
+ } else {
+ Log ("Error: no QA entries in FXS list!");
+ result = 1;
+ }
+ return result;
+}
+
+//______________________________________________________________________________________________
+
+
+UInt_t AliTPCPreprocessor::ExtractAltro(Int_t sourceFXS)
+{
+ //
+ // Read pulser calibration file from file exchage server
+ // Keep original entry from OCDB in case no new pulser calibration is available
+ //
+ TObjArray *altroObjects=0;
+ AliTPCCalPad *acqStart=0;
+ AliTPCCalPad *zsThr=0;
+ AliTPCCalPad *acqStop=0;
+ AliTPCCalPad *FPED=0;
+ AliTPCCalPad *masked=0;
+
+ AliCDBEntry* entry = GetFromOCDB("Calib", "Altro");
+ if (entry) altroObjects = (TObjArray*)entry->GetObject();
+ if ( altroObjects==NULL ) {
+ Log("AliTPCPreprocsessor: No previous TPC altro calibration entry available.\n");
+ altroObjects = new TObjArray;
+ }
+
+ acqStart = (AliTPCCalPad*)altroObjects->FindObject("AcqStart");
+ if ( !acqStart ) {
+ acqStart = new AliTPCCalPad("AcqStart","AcqStart");
+ altroObjects->Add(acqStart);
+ }
+ zsThr = (AliTPCCalPad*)altroObjects->FindObject("ZsThr");
+ if ( !zsThr ) {
+ zsThr = new AliTPCCalPad("ZsThr","ZsThr");
+ altroObjects->Add(zsThr);
+ }
+ FPED = (AliTPCCalPad*)altroObjects->FindObject("FPED");
+ if ( !FPED ) {
+ FPED = new AliTPCCalPad("FPED","FPED");
+ altroObjects->Add(FPED);
+ }
+ acqStop = (AliTPCCalPad*)altroObjects->FindObject("AcqStop");
+ if ( !acqStop ) {
+ acqStop = new AliTPCCalPad("AcqStop","AcqStop");
+ altroObjects->Add(acqStop);
+ }
+ masked = (AliTPCCalPad*)altroObjects->FindObject("Masked");
+ if ( !masked ) {
+ masked = new AliTPCCalPad("Masked","Masked");
+ altroObjects->Add(masked);
+ }
+
+
+
+ UInt_t result=0;
+ TString idFXS[2]={"AltroConfigA","AltroConfigC"};
+
+ Int_t nSectors = fROC->GetNSectors();
+ Bool_t changed=false;
+ for ( Int_t id=0; id<2; id++) {
+ TList* list = GetFileSources(sourceFXS,idFXS[id].Data());
+
+ if (list && list->GetEntries()>0) {
+ if (altroObjects == 0 ) altroObjects = new TObjArray;
+
+// loop through all files from LDCs
+
+ UInt_t index = 0;
+ while (list->At(index)!=NULL) {
+ TObjString* fileNameEntry = (TObjString*) list->At(index);
+ if (fileNameEntry!=NULL) {
+ TString fileName = GetFile(sourceFXS, idFXS[id].Data(),
+ fileNameEntry->GetString().Data());
+ TFile *f = TFile::Open(fileName);
+ if (!f) {
+ char message[40];
+ sprintf(message,"Error opening Altro configuration file, id = %d",id);
+ Log (message);
+ result =2;
+ break;
+ }
+ TObjArray *altroFXS;
+ f->GetObject("AltroConfig",altroFXS);
+ if ( !altroFXS ) {
+ Log ("No Altro configuration object in file.");
+ result = 2;
+ break;
+ }
+
+ // replace entries for the sectors available in the present file
+ AliTPCCalPad *acqStartFXS=(AliTPCCalPad*)altroFXS->FindObject("AcqStart");
+ AliTPCCalPad *zsThrFXS=(AliTPCCalPad*)altroFXS->FindObject("ZsThr");
+ AliTPCCalPad *acqStopFXS=(AliTPCCalPad*)altroFXS->FindObject("AcqStop");
+ AliTPCCalPad *FPEDFXS=(AliTPCCalPad*)altroFXS->FindObject("FPED");
+ AliTPCCalPad *maskedFXS=(AliTPCCalPad*)altroFXS->FindObject("Masked");
+
+ changed=true;
+ for (Int_t sector=0; sector<nSectors; sector++) {
+
+ if (acqStartFXS) {
+ AliTPCCalROC *rocAcqStart=acqStartFXS->GetCalROC(sector);
+ if ( rocAcqStart ) acqStart->SetCalROC(rocAcqStart,sector);
+ }
+ if (zsThrFXS ) {
+ AliTPCCalROC *rocZsThr=zsThrFXS->GetCalROC(sector);
+ if ( rocZsThr ) zsThr->SetCalROC(rocZsThr,sector);
+ }
+ if (acqStopFXS) {
+ AliTPCCalROC *rocAcqStop=acqStopFXS->GetCalROC(sector);
+ if ( rocAcqStop ) acqStop->SetCalROC(rocAcqStop,sector);
+ }
+ if (FPEDFXS ) {
+ AliTPCCalROC *rocFPED=FPEDFXS->GetCalROC(sector);
+ if ( rocFPED ) FPED->SetCalROC(rocFPED,sector);
+ }
+ if (maskedFXS) {
+ AliTPCCalROC *rocMasked=maskedFXS->GetCalROC(sector);
+ if ( rocMasked ) masked->SetCalROC(rocMasked,sector);
+ }
+ }
+ delete altroFXS;
+ f->Close();
+ }
+ ++index;
+ } // while(list)
+ } else {
+ Log ("Error: no entries in input file list!");
+ result = 1;
+ }
+
+ } // for - id
+//
+// Store updated pedestal entry to OCDB
+//
+ if (changed) {
+ AliCDBMetaData metaData;
+ metaData.SetBeamPeriod(0);
+ metaData.SetResponsible("Haavard Helstrup");
+ metaData.SetAliRootVersion(ALIROOT_SVN_BRANCH);
+ metaData.SetComment("Preprocessor AliTPC data base entries.");
+
+ Bool_t storeOK = Store("Calib", "AltroConfig", altroObjects, &metaData, 0, kTRUE);
+ if ( !storeOK ) ++result;
+ }
+
+ return result;
+}