1 /**************************************************************************
2 * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
4 * Author: The ALICE Off-line Project. *
5 * Contributors are mentioned in the code where appropriate. *
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 **************************************************************************/
16 /////////////////////////////////////////////////////////////////////////////////////////////////
19 // access class to a DataBase in an AliEn storage //
21 /////////////////////////////////////////////////////////////////////////////////////////////////
25 #include <TGridResult.h>
30 #include <TObjArray.h>
31 #include <TObjString.h>
35 #include "AliCDBEntry.h"
36 #include "AliCDBGrid.h"
37 #include "AliCDBManager.h"
42 //_____________________________________________________________________________
43 AliCDBGrid::AliCDBGrid(const char *gridUrl, const char *user, const char *dbFolder,
44 const char *se, const char* cacheFolder, Bool_t operateDisconnected,
45 Long64_t cacheSize, Long_t cleanupInterval) :
51 fCacheFolder(cacheFolder),
52 fOperateDisconnected(operateDisconnected),
53 fCacheSize(cacheSize),
54 fCleanupInterval(cleanupInterval)
58 // if the same Grid is alreay active, skip connection
59 if (!gGrid || fGridUrl != gGrid->GridUrl()
60 || (( fUser != "" ) && ( fUser != gGrid->GetUser() )) ) {
61 // connection to the Grid
62 AliInfo("Connection to the Grid...");
64 AliInfo(Form("gGrid = %p; fGridUrl = %s; gGrid->GridUrl() = %s",gGrid,fGridUrl.Data(), gGrid->GridUrl()));
65 AliInfo(Form("fUser = %s; gGrid->GetUser() = %s",fUser.Data(), gGrid->GetUser()));
67 TGrid::Connect(fGridUrl.Data(),fUser.Data());
71 AliError("Connection failed!");
75 TString initDir(gGrid->Pwd(0));
76 if (fDBFolder[0] != '/') {
77 fDBFolder.Prepend(initDir);
80 // check DBFolder: trying to cd to DBFolder; if it does not exist, create it
81 if(!gGrid->Cd(fDBFolder.Data(),0)){
82 AliDebug(2,Form("Creating new folder <%s> ...",fDBFolder.Data()));
83 TGridResult* res = gGrid->Command(Form("mkdir -p %s",fDBFolder.Data()));
84 TString result = res->GetKey(0,"__result__");
86 AliFatal(Form("Cannot create folder <%s> !",fDBFolder.Data()));
90 AliDebug(2,Form("Folder <%s> found",fDBFolder.Data()));
93 // removes any '/' at the end of path, then append one '/'
94 while(fDBFolder.EndsWith("/")) fDBFolder.Remove(fDBFolder.Last('/'));
98 fBaseFolder = fDBFolder;
102 // Check if local cache folder is already defined
103 TString origCache(TFile::GetCacheFileDir());
104 if(fCacheFolder.Length() > 0) {
105 if(origCache.Length() == 0) {
106 AliInfo(Form("Setting local cache to: %s", fCacheFolder.Data()));
107 } else if(fCacheFolder != origCache) {
108 AliWarning(Form("Local cache folder was already defined, changing it to: %s",
109 fCacheFolder.Data()));
112 // default settings are: operateDisconnected=kTRUE, forceCacheread = kFALSE
113 if(!TFile::SetCacheFileDir(fCacheFolder.Data(), fOperateDisconnected)) {
114 AliError(Form("Could not set cache folder %s !", fCacheFolder.Data()));
117 // reset fCacheFolder because the function may have
118 // slightly changed the folder name (e.g. '/' added)
119 fCacheFolder = TFile::GetCacheFileDir();
122 // default settings are: cacheSize=1GB, cleanupInterval = 0
123 if(!TFile::ShrinkCacheFileDir(fCacheSize, fCleanupInterval)) {
124 AliError(Form("Could not set following values "
125 "to ShrinkCacheFileDir: cacheSize = %lld, cleanupInterval = %ld !",
126 fCacheSize, fCleanupInterval));
130 // return to the initial directory
131 gGrid->Cd(initDir.Data(),0);
134 //_____________________________________________________________________________
135 AliCDBGrid::~AliCDBGrid()
138 delete gGrid; gGrid=0;
142 //_____________________________________________________________________________
143 Bool_t AliCDBGrid::FilenameToId(TString& filename, AliCDBId& id) {
144 // build AliCDBId from full path filename (fDBFolder/path/Run#x_#y_v#z_s0.root)
146 if(filename.Contains(fDBFolder)){
147 filename = filename(fDBFolder.Length(),filename.Length()-fDBFolder.Length());
150 TString idPath = filename(0,filename.Last('/'));
152 if(!id.IsValid()) return kFALSE;
154 filename=filename(idPath.Length()+1,filename.Length()-idPath.Length());
157 // valid filename: Run#firstRun_#lastRun_v#version_s0.root
158 TRegexp keyPattern("^Run[0-9]+_[0-9]+_v[0-9]+_s0.root$");
159 keyPattern.Index(filename, &mSize);
162 // TODO backward compatibility ... maybe remove later!
164 TRegexp oldKeyPattern("^Run[0-9]+_[0-9]+_v[0-9]+.root$");
165 oldKeyPattern.Index(filename, &oldmSize);
167 AliDebug(2,Form("Bad filename <%s>.", filename.Data()));
170 AliDebug(2,Form("Old filename format <%s>.", filename.Data()));
171 id.SetSubVersion(-11); // TODO trick to ensure backward compatibility
175 id.SetSubVersion(-1); // TODO trick to ensure backward compatibility
178 filename.Resize(filename.Length() - sizeof(".root") + 1);
180 TObjArray* strArray = (TObjArray*) filename.Tokenize("_");
182 TString firstRunString(((TObjString*) strArray->At(0))->GetString());
183 id.SetFirstRun(atoi(firstRunString.Data() + 3));
184 id.SetLastRun(atoi(((TObjString*) strArray->At(1))->GetString()));
186 TString verString(((TObjString*) strArray->At(2))->GetString());
187 id.SetVersion(atoi(verString.Data() + 1));
194 //_____________________________________________________________________________
195 Bool_t AliCDBGrid::IdToFilename(const AliCDBId& id, TString& filename) const {
196 // build file name from AliCDBId (path, run range, version) and fDBFolder
198 if (!id.GetAliCDBRunRange().IsValid()) {
199 AliDebug(2,Form("Invalid run range <%d, %d>.",
200 id.GetFirstRun(), id.GetLastRun()));
204 if (id.GetVersion() < 0) {
205 AliDebug(2,Form("Invalid version <%d>.", id.GetVersion()));
209 filename = Form("Run%d_%d_v%d",
214 if (id.GetSubVersion() != -11) filename += "_s0"; // TODO to ensure backward compatibility
217 filename.Prepend(fDBFolder + id.GetPath() + '/');
222 //_____________________________________________________________________________
223 Bool_t AliCDBGrid::PrepareId(AliCDBId& id) {
224 // prepare id (version) of the object that will be stored (called by PutEntry)
226 TString initDir(gGrid->Pwd(0));
228 TString dirName(fDBFolder);
230 Bool_t dirExist=kFALSE;
234 // go to the path; if directory does not exist, create it
235 for(int i=0;i<3;i++){
236 //TString cmd("find -d ");
237 //cmd += Form("%s ",dirName);
239 //gGrid->Command(cmd.Data());
240 dirName+=Form("%s/",id.GetPathLevel(i).Data());
241 dirExist=gGrid->Cd(dirName,0);
243 AliDebug(2,Form("Creating new folder <%s> ...",dirName.Data()));
244 if(!gGrid->Mkdir(dirName,"",0)){
245 AliError(Form("Cannot create directory <%s> !",dirName.Data()));
246 gGrid->Cd(initDir.Data());
250 // if folders are new add tags to them
252 // TODO Currently disabled
253 // add short lived tag!
254 // AliInfo("Tagging level 1 folder with \"ShortLived\" tag");
255 // if(!AddTag(dirName,"ShortLived_try")){
256 // AliError(Form("Could not tag folder %s !", dirName.Data()));
257 // if(!gGrid->Rmdir(dirName.Data())){
258 // AliError(Form("Unexpected: could not remove %s directory!", dirName.Data()));
264 AliDebug(2,"Tagging level 2 folder with \"CDB\" and \"CDB_MD\" tag");
265 if(!AddTag(dirName,"CDB")){
266 AliError(Form("Could not tag folder %s !", dirName.Data()));
267 if(!gGrid->Rmdir(dirName.Data())){
268 AliError(Form("Unexpected: could not remove %s directory!", dirName.Data()));
272 if(!AddTag(dirName,"CDB_MD")){
273 AliError(Form("Could not tag folder %s !", dirName.Data()));
274 if(!gGrid->Rmdir(dirName.Data())){
275 AliError(Form("Unexpected: could not remove %s directory!", dirName.Data()));
280 // TODO Currently disabled
281 // add short lived tag!
282 // TString path=id.GetPath();
283 // if(AliCDBManager::Instance()->IsShortLived(path.Data())) {
284 // AliInfo(Form("Tagging %s as short lived", dirName.Data()));
285 // if(!TagShortLived(dirName, kTRUE)){
286 // AliError(Form("Could not tag folder %s !", dirName.Data()));
287 // if(!gGrid->Rmdir(dirName.Data())){
288 // AliError(Form("Unexpected: could not remove %s directory!", dirName.Data()));
293 // AliInfo(Form("Tagging %s as long lived", dirName.Data()));
294 // if(!TagShortLived(dirName, kFALSE)){
295 // AliError(Form("Could not tag folder %s !", dirName.Data()));
296 // if(!gGrid->Rmdir(dirName.Data())){
297 // AliError(Form("Unexpected: could not remove %s directory!", dirName.Data()));
305 gGrid->Cd(initDir,0);
308 AliCDBId anId; // the id got from filename
309 AliCDBRunRange lastRunRange(-1,-1); // highest runRange found
310 Int_t lastVersion=0; // highest version found
312 TGridResult *res = gGrid->Ls(dirName);
314 //loop on the files in the directory, look for highest version
315 for(int i=0; i < res->GetEntries(); i++){
316 filename=res->GetFileNamePath(i);
317 if (!FilenameToId(filename, anId)) continue;
318 if (anId.GetAliCDBRunRange().Overlaps(id.GetAliCDBRunRange()) && anId.GetVersion() > lastVersion) {
319 lastVersion = anId.GetVersion();
320 lastRunRange = anId.GetAliCDBRunRange();
326 // GRP entries with explicitly set version escape default incremental versioning
327 if(id.GetPath().Contains("GRP") && id.HasVersion() && lastVersion!=0)
329 AliDebug(5,Form("Entry %s won't be put in the destination OCDB", id.ToString().Data()));
333 id.SetVersion(lastVersion + 1);
336 TString lastStorage = id.GetLastStorage();
337 if(lastStorage.Contains(TString("new"), TString::kIgnoreCase) && id.GetVersion() > 1 ){
338 AliDebug(2, Form("A NEW object is being stored with version %d",
340 AliDebug(2, Form("and it will hide previously stored object with version %d!",
344 if(!lastRunRange.IsAnyRange() && !(lastRunRange.IsEqual(&id.GetAliCDBRunRange())))
345 AliWarning(Form("Run range modified w.r.t. previous version (Run%d_%d_v%d)",
346 lastRunRange.GetFirstRun(), lastRunRange.GetLastRun(), id.GetVersion()));
351 //_____________________________________________________________________________
352 AliCDBId* AliCDBGrid::GetId(const TObjArray& validFileIds, const AliCDBId& query) {
353 // look for the Id that matches query's requests (highest or exact version)
355 if(validFileIds.GetEntriesFast() < 1)
358 TIter iter(&validFileIds);
363 while((anIdPtr = dynamic_cast<AliCDBId*> (iter.Next()))){
364 if(anIdPtr->GetPath() != query.GetPath()) continue;
366 //if(!CheckVersion(query, anIdPtr, result)) return NULL;
368 if (!query.HasVersion()){ // look for highest version
369 if(result && result->GetVersion() > anIdPtr->GetVersion()) continue;
370 if(result && result->GetVersion() == anIdPtr->GetVersion()) {
371 AliError(Form("More than one object valid for run %d, version %d!",
372 query.GetFirstRun(), anIdPtr->GetVersion()));
376 } else { // look for specified version
377 if(query.GetVersion() != anIdPtr->GetVersion()) continue;
378 if(result && result->GetVersion() == anIdPtr->GetVersion()){
379 AliError(Form("More than one object valid for run %d, version %d!",
380 query.GetFirstRun(), anIdPtr->GetVersion()));
388 if (!result) return NULL;
390 return dynamic_cast<AliCDBId*> (result->Clone());
393 //_____________________________________________________________________________
394 AliCDBId* AliCDBGrid::GetEntryId(const AliCDBId& queryId) {
395 // get AliCDBId from the database
396 // User must delete returned object
400 AliCDBId selectedId(queryId);
401 if (!selectedId.HasVersion()) {
402 // if version is not specified, first check the selection criteria list
403 GetSelection(&selectedId);
406 TObjArray validFileIds;
407 validFileIds.SetOwner(1);
409 // look for file matching query requests (path, runRange, version)
410 if(selectedId.GetFirstRun() == fRun &&
411 fPathFilter.Comprises(selectedId.GetAliCDBPath()) && fVersion < 0 && !fMetaDataFilter){
412 // look into list of valid files previously loaded with AliCDBStorage::FillValidFileIds()
413 AliDebug(2, Form("List of files valid for run %d was loaded. Looking there for fileids valid for path %s!",
414 selectedId.GetFirstRun(), selectedId.GetPath().Data()));
415 dataId = GetId(fValidFileIds, selectedId);
418 // List of files valid for reqested run was not loaded. Looking directly into CDB
419 AliDebug(2, Form("List of files valid for run %d was not loaded. Looking directly into CDB for fileids valid for path %s!",
420 selectedId.GetFirstRun(), selectedId.GetPath().Data()));
423 MakeQueryFilter(selectedId.GetFirstRun(), selectedId.GetLastRun(), 0, filter);
425 TString pattern = Form("%s/Run*", selectedId.GetPath().Data());
426 TString optionQuery = "-y";
427 if(selectedId.GetVersion() >= 0) {
428 pattern += Form("_v%d*",selectedId.GetVersion());
433 TString det = pattern(0,4);
434 TString patternCopy(pattern);
435 patternCopy.Remove(0,4);
436 TString folderCopy(fDBFolder);
439 if (optionQuery == "-y"){
440 AliInfo("Only latest version will be returned");
443 AliDebug(2,Form("** fDBFolder = %s, pattern = %s, filter = %s",folderCopy.Data(), patternCopy.Data(), filter.Data()));
444 TGridResult *res = gGrid->Query(folderCopy, patternCopy, filter, optionQuery.Data());
446 AliCDBId validFileId;
447 for(int i=0; i<res->GetEntries(); i++){
448 TString filename = res->GetKey(i, "lfn");
449 if(filename == "") continue;
450 if(FilenameToId(filename, validFileId))
451 validFileIds.AddLast(validFileId.Clone());
455 dataId = GetId(validFileIds, selectedId);
461 //_____________________________________________________________________________
462 AliCDBEntry* AliCDBGrid::GetEntry(const AliCDBId& queryId) {
463 // get AliCDBEntry from the database
465 AliCDBId* dataId = GetEntryId(queryId);
467 if (!dataId) return NULL;
470 if (!IdToFilename(*dataId, filename)) {
471 AliDebug(2,Form("Bad data ID encountered! Subnormal error!"));
476 AliCDBEntry* anEntry = GetEntryFromFile(filename, dataId);
482 //_____________________________________________________________________________
483 AliCDBEntry* AliCDBGrid::GetEntryFromFile(TString& filename, AliCDBId* dataId){
484 // Get AliCBEntry object from file "filename"
486 AliDebug(2,Form("Opening file: %s",filename.Data()));
488 filename.Prepend("/alien");
490 // if option="CACHEREAD" TFile will use the local caching facility!
491 TString option="READ";
492 if(fCacheFolder != ""){
494 // Check if local cache folder was changed in the meanwhile
495 TString origCache(TFile::GetCacheFileDir());
496 if(fCacheFolder != origCache) {
497 AliWarning(Form("Local cache folder has been overwritten!! fCacheFolder = %s origCache = %s",
498 fCacheFolder.Data(), origCache.Data()));
499 TFile::SetCacheFileDir(fCacheFolder.Data(), fOperateDisconnected);
500 TFile::ShrinkCacheFileDir(fCacheSize, fCleanupInterval);
503 option.Prepend("CACHE");
506 AliDebug(2, Form("Option: %s", option.Data()));
508 TFile *file = TFile::Open(filename, option);
510 AliDebug(2,Form("Can't open file <%s>!", filename.Data()));
514 // get the only AliCDBEntry object from the file
515 // the object in the file is an AliCDBEntry entry named "AliCDBEntry"
517 AliCDBEntry* anEntry = dynamic_cast<AliCDBEntry*> (file->Get("AliCDBEntry"));
520 AliDebug(2,Form("Bad storage data: file does not contain an AliCDBEntry object!"));
525 // The object's Id is not reset during storage
526 // If object's Id runRange or version do not match with filename,
527 // it means that someone renamed file by hand. In this case a warning msg is issued.
530 AliCDBId entryId = anEntry->GetId();
531 Int_t tmpSubVersion = dataId->GetSubVersion();
532 dataId->SetSubVersion(entryId.GetSubVersion()); // otherwise filename and id may mismatch
533 if(!entryId.IsEqual(dataId)){
534 AliWarning(Form("Mismatch between file name and object's Id!"));
535 AliWarning(Form("File name: %s", dataId->ToString().Data()));
536 AliWarning(Form("Object's Id: %s", entryId.ToString().Data()));
538 dataId->SetSubVersion(tmpSubVersion);
541 anEntry->SetLastStorage("grid");
543 // Check whether entry contains a TTree. In case load the tree in memory!
544 LoadTreeFromFile(anEntry);
546 // close file, return retieved entry
547 file->Close(); delete file; file=0;
552 //_____________________________________________________________________________
553 TList* AliCDBGrid::GetEntries(const AliCDBId& queryId) {
554 // multiple request (AliCDBStorage::GetAll)
556 TList* result = new TList();
559 TObjArray validFileIds;
560 validFileIds.SetOwner(1);
562 Bool_t alreadyLoaded = kFALSE;
564 // look for file matching query requests (path, runRange)
565 if(queryId.GetFirstRun() == fRun &&
566 fPathFilter.Comprises(queryId.GetAliCDBPath()) && fVersion < 0 && !fMetaDataFilter){
567 // look into list of valid files previously loaded with AliCDBStorage::FillValidFileIds()
568 AliDebug(2,Form("List of files valid for run %d and for path %s was loaded. Looking there!",
569 queryId.GetFirstRun(), queryId.GetPath().Data()));
571 alreadyLoaded = kTRUE;
574 // List of files valid for reqested run was not loaded. Looking directly into CDB
575 AliDebug(2,Form("List of files valid for run %d and for path %s was not loaded. Looking directly into CDB!",
576 queryId.GetFirstRun(), queryId.GetPath().Data()));
579 MakeQueryFilter(queryId.GetFirstRun(), queryId.GetLastRun(), 0, filter);
581 TString pattern = Form("%s/Run*.root", queryId.GetPath().Data());
582 AliDebug(2,Form("pattern: %s", pattern.Data()));
584 TString optionQuery("-y");
585 if(queryId.GetVersion() >= 0) optionQuery = "";
587 if (optionQuery == "-y"){
588 AliInfo("Only latest version will be returned");
591 TGridResult *res = gGrid->Query(fDBFolder, pattern, filter, optionQuery.Data());
593 AliCDBId validFileId;
594 for(int i=0; i<res->GetEntries(); i++){
595 TString filename = res->GetKey(i, "lfn");
596 if(filename == "") continue;
597 if(FilenameToId(filename, validFileId))
598 validFileIds.AddLast(validFileId.Clone());
605 iter = new TIter(&fValidFileIds);
607 iter = new TIter(&validFileIds);
610 TObjArray selectedIds;
611 selectedIds.SetOwner(1);
613 // loop on list of valid Ids to select the right version to get.
614 // According to query and to the selection criteria list, version can be the highest or exact
618 AliCDBPath queryPath = queryId.GetAliCDBPath();
619 while((anIdPtr = dynamic_cast<AliCDBId*> (iter->Next()))){
620 AliCDBPath thisCDBPath = anIdPtr->GetAliCDBPath();
621 if(!(queryPath.Comprises(thisCDBPath)) || pathCopy.GetPath() == thisCDBPath.GetPath()) continue;
622 pathCopy = thisCDBPath;
624 // check the selection criteria list for this query
625 AliCDBId thisId(*anIdPtr);
626 thisId.SetVersion(queryId.GetVersion());
627 if(!thisId.HasVersion()) GetSelection(&thisId);
630 dataId = GetId(fValidFileIds, thisId);
632 dataId = GetId(validFileIds, thisId);
634 if(dataId) selectedIds.Add(dataId);
639 // selectedIds contains the Ids of the files matching all requests of query!
640 // All the objects are now ready to be retrieved
641 iter = new TIter(&selectedIds);
642 while((anIdPtr = dynamic_cast<AliCDBId*> (iter->Next()))){
644 if (!IdToFilename(*anIdPtr, filename)) {
645 AliDebug(2,Form("Bad data ID encountered! Subnormal error!"));
649 AliCDBEntry* anEntry = GetEntryFromFile(filename, anIdPtr);
651 if(anEntry) result->Add(anEntry);
659 //_____________________________________________________________________________
660 Bool_t AliCDBGrid::PutEntry(AliCDBEntry* entry) {
661 // put an AliCDBEntry object into the database
663 AliCDBId& id = entry->GetId();
665 // set version for the entry to be stored
666 if (!PrepareId(id)) return kFALSE;
668 // build filename from entry's id
670 if (!IdToFilename(id, filename)) {
671 AliError("Bad ID encountered! Subnormal error!");
675 TString folderToTag = Form("%s%s",
677 id.GetPath().Data());
679 TDirectory* saveDir = gDirectory;
681 TString fullFilename = Form("/alien%s", filename.Data());
682 // specify SE to filename
683 if (fSE != "default") fullFilename += Form("?se=%s",fSE.Data());
686 TFile *file = TFile::Open(fullFilename,"CREATE");
687 if(!file || !file->IsWritable()){
688 AliError(Form("Can't open file <%s>!", filename.Data()));
689 if(file && !file->IsWritable()) file->Close(); delete file; file=0;
695 //SetTreeToFile(entry, file);
697 entry->SetVersion(id.GetVersion());
699 // write object (key name: "AliCDBEntry")
700 Bool_t result = (file->WriteTObject(entry, "AliCDBEntry") != 0);
701 if (!result) AliError(Form("Can't write entry to file <%s>!", filename.Data()));
704 if (saveDir) saveDir->cd(); else gROOT->cd();
705 file->Close(); delete file; file=0;
709 if(!TagFileId(filename, &id)){
710 AliInfo(Form("CDB tagging failed. Deleting file %s!",filename.Data()));
711 if(!gGrid->Rm(filename.Data()))
712 AliError("Can't delete file!");
716 TagFileMetaData(filename, entry->GetMetaData());
719 AliInfo(Form("CDB object stored into file %s", filename.Data()));
720 AliInfo(Form("Storage Element: %s", fSE.Data()));
723 //_____________________________________________________________________________
724 Bool_t AliCDBGrid::AddTag(TString& folderToTag, const char* tagname){
725 // add "tagname" tag (CDB or CDB_MD) to folder where object will be stored
727 Bool_t result = kTRUE;
728 AliDebug(2, Form("adding %s tag to folder %s", tagname, folderToTag.Data()));
729 TString addTag = Form("addTag %s %s", folderToTag.Data(), tagname);
730 TGridResult *gridres = gGrid->Command(addTag.Data());
731 const char* resCode = gridres->GetKey(0,"__result__"); // '1' if success
732 if(resCode[0] != '1') {
733 AliError(Form("Couldn't add %s tags to folder %s !",
734 tagname, folderToTag.Data()));
741 //_____________________________________________________________________________
742 Bool_t AliCDBGrid::TagFileId(TString& filename, const AliCDBId* id){
743 // tag stored object in CDB table using object Id's parameters
746 TString dirname(filename);
747 Int_t dirNumber = gGrid->Mkdir(dirname.Remove(dirname.Last('/')),"-d");
749 TString addTagValue1 = Form("addTagValue %s CDB ", filename.Data());
750 TString addTagValue2 = Form("first_run=%d last_run=%d version=%d ",
754 TString addTagValue3 = Form("path_level_0=\"%s\" path_level_1=\"%s\" path_level_2=\"%s\" ",
755 id->GetPathLevel(0).Data(),
756 id->GetPathLevel(1).Data(),
757 id->GetPathLevel(2).Data());
758 //TString addTagValue4 = Form("version_path=\"%s\" dir_number=%d",Form("%d_%s",id->GetVersion(),filename.Data()),dirNumber);
759 TString addTagValue4 = Form("version_path=\"%09d%s\" dir_number=%d",id->GetVersion(),filename.Data(),dirNumber);
760 TString addTagValue = Form("%s%s%s%s",
764 addTagValue4.Data());
766 Bool_t result = kFALSE;
767 AliDebug(2, Form("Tagging file. Tag command: %s", addTagValue.Data()));
768 TGridResult* res = gGrid->Command(addTagValue.Data());
769 const char* resCode = res->GetKey(0,"__result__"); // '1' if success
770 if(resCode[0] != '1') {
771 AliError(Form("Couldn't add CDB tag value to file %s !",
775 AliDebug(2, "Object successfully tagged.");
783 //_____________________________________________________________________________
784 Bool_t AliCDBGrid::TagShortLived(TString& filename, Bool_t value){
785 // tag folder with ShortLived tag
787 TString addTagValue = Form("addTagValue %s ShortLived_try value=%d", filename.Data(), value);
789 Bool_t result = kFALSE;
790 AliDebug(2, Form("Tagging file. Tag command: %s", addTagValue.Data()));
791 TGridResult* res = gGrid->Command(addTagValue.Data());
792 const char* resCode = res->GetKey(0,"__result__"); // '1' if success
793 if(resCode[0] != '1') {
794 AliError(Form("Couldn't add ShortLived tag value to file %s !", filename.Data()));
797 AliDebug(2,"Object successfully tagged.");
805 //_____________________________________________________________________________
806 Bool_t AliCDBGrid::TagFileMetaData(TString& filename, const AliCDBMetaData* md){
807 // tag stored object in CDB table using object Id's parameters
809 TString addTagValue1 = Form("addTagValue %s CDB_MD ", filename.Data());
810 TString addTagValue2 = Form("object_classname=\"%s\" responsible=\"%s\" beam_period=%d ",
811 md->GetObjectClassName(),
812 md->GetResponsible(),
813 md->GetBeamPeriod());
814 TString addTagValue3 = Form("aliroot_version=\"%s\" comment=\"%s\"",
815 md->GetAliRootVersion(),
817 TString addTagValue = Form("%s%s%s",
820 addTagValue3.Data());
822 Bool_t result = kFALSE;
823 AliDebug(2, Form("Tagging file. Tag command: %s", addTagValue.Data()));
824 TGridResult* res = gGrid->Command(addTagValue.Data());
825 const char* resCode = res->GetKey(0,"__result__"); // '1' if success
826 if(resCode[0] != '1') {
827 AliWarning(Form("Couldn't add CDB_MD tag value to file %s !",
831 AliDebug(2,"Object successfully tagged.");
837 //_____________________________________________________________________________
838 TList* AliCDBGrid::GetIdListFromFile(const char* fileName){
840 TString turl(fileName);
841 turl.Prepend("/alien" + fDBFolder);
842 turl += "?se="; turl += fSE.Data();
843 TFile *file = TFile::Open(turl);
845 AliError(Form("Can't open selection file <%s>!", turl.Data()));
849 TList *list = new TList();
857 keycycle = "AliCDBId;";
860 id = (AliCDBId*) file->Get(keycycle);
864 file->Close(); delete file; file=0;
871 //_____________________________________________________________________________
872 Bool_t AliCDBGrid::Contains(const char* path) const{
873 // check for path in storage's DBFolder
875 TString initDir(gGrid->Pwd(0));
876 TString dirName(fDBFolder);
877 dirName += path; // dirName = fDBFolder/path
878 Bool_t result=kFALSE;
879 if (gGrid->Cd(dirName,0)) result=kTRUE;
880 gGrid->Cd(initDir.Data(),0);
884 //_____________________________________________________________________________
885 void AliCDBGrid::QueryValidFiles()
887 // Query the CDB for files valid for AliCDBStorage::fRun
888 // fills list fValidFileIds with AliCDBId objects created from file name
891 MakeQueryFilter(fRun, fRun, fMetaDataFilter, filter);
893 TString pattern = Form("%s/Run*", fPathFilter.GetPath().Data());
894 TString optionQuery = "-y";
896 pattern += Form("_v%d*", fVersion);
900 AliDebug(2,Form("pattern: %s", pattern.Data()));
902 AliInfo(Form("fDBFolder = %s, pattern = %s, filter = %s",fDBFolder.Data(), pattern.Data(), filter.Data()));
904 if (optionQuery == "-y"){
905 AliInfo("Only latest version will be returned");
908 TGridResult *res = gGrid->Query(fDBFolder, pattern, filter, optionQuery.Data());
911 AliError("Grid query failed");
917 while ((map = (TMap*)next())) {
919 if ((entry = (TObjString *) ((TMap *)map)->GetValue("lfn"))) {
920 TString& filename = entry->String();
921 if(filename.IsNull()) continue;
922 AliDebug(2,Form("Found valid file: %s", filename.Data()));
923 AliCDBId *validFileId = new AliCDBId;
924 Bool_t result = FilenameToId(filename, *validFileId);
926 fValidFileIds.AddLast(validFileId);
937 //_____________________________________________________________________________
938 void AliCDBGrid::MakeQueryFilter(Int_t firstRun, Int_t lastRun,
939 const AliCDBMetaData* md, TString& result) const
941 // create filter for file query
943 result = Form("CDB:first_run<=%d and CDB:last_run>=%d", firstRun, lastRun);
945 // if(version >= 0) {
946 // result += Form(" and CDB:version=%d", version);
948 // if(pathFilter.GetLevel0() != "*") {
949 // result += Form(" and CDB:path_level_0=\"%s\"", pathFilter.GetLevel0().Data());
951 // if(pathFilter.GetLevel1() != "*") {
952 // result += Form(" and CDB:path_level_1=\"%s\"", pathFilter.GetLevel1().Data());
954 // if(pathFilter.GetLevel2() != "*") {
955 // result += Form(" and CDB:path_level_2=\"%s\"", pathFilter.GetLevel2().Data());
959 if(md->GetObjectClassName()[0] != '\0') {
960 result += Form(" and CDB_MD:object_classname=\"%s\"", md->GetObjectClassName());
962 if(md->GetResponsible()[0] != '\0') {
963 result += Form(" and CDB_MD:responsible=\"%s\"", md->GetResponsible());
965 if(md->GetBeamPeriod() != 0) {
966 result += Form(" and CDB_MD:beam_period=%d", md->GetBeamPeriod());
968 if(md->GetAliRootVersion()[0] != '\0') {
969 result += Form(" and CDB_MD:aliroot_version=\"%s\"", md->GetAliRootVersion());
971 if(md->GetComment()[0] != '\0') {
972 result += Form(" and CDB_MD:comment=\"%s\"", md->GetComment());
975 AliDebug(2, Form("filter: %s",result.Data()));
979 //_____________________________________________________________________________
980 Int_t AliCDBGrid::GetLatestVersion(const char* path, Int_t run){
981 // get last version found in the database valid for run and path
983 AliCDBPath aCDBPath(path);
984 if(!aCDBPath.IsValid() || aCDBPath.IsWildcard()) {
985 AliError(Form("Invalid path in request: %s", path));
988 AliCDBId query(path, run, run, -1, -1);
990 AliCDBId* dataId = 0;
991 // look for file matching query requests (path, runRange, version)
992 if(run == fRun && fPathFilter.Comprises(aCDBPath) && fVersion < 0){
993 // look into list of valid files previously loaded with AliCDBStorage::FillValidFileIds()
994 AliDebug(2, Form("List of files valid for run %d and for path %s was loaded. Looking there!",
996 dataId = GetId(fValidFileIds, query);
997 if (!dataId) return -1;
998 Int_t version = dataId->GetVersion();
1003 // List of files valid for reqested run was not loaded. Looking directly into CDB
1004 AliDebug(2, Form("List of files valid for run %d and for path %s was not loaded. Looking directly into CDB!",
1007 TObjArray validFileIds;
1008 validFileIds.SetOwner(1);
1011 MakeQueryFilter(run, run, 0, filter);
1013 TString pattern = Form("%s/Run*.root", path);
1014 AliDebug(2,Form("pattern: %s", pattern.Data()));
1016 TGridResult *res = gGrid->Query(fDBFolder, pattern, filter, "-y");
1017 AliCDBId validFileId;
1018 if (res->GetEntries()>1){
1019 AliWarning("Number of found entries >1, even if option -y was used");
1020 for(int i=0; i<res->GetEntries(); i++){
1021 TString filename = res->GetKey(i, "lfn");
1022 if(filename == "") continue;
1023 if(FilenameToId(filename, validFileId))
1024 validFileIds.AddLast(validFileId.Clone());
1026 dataId = GetId(validFileIds, query);
1027 if (!dataId) return -1;
1029 Int_t version = dataId->GetVersion();
1033 else if (res->GetEntries()==1){
1034 TString filename = res->GetKey(0, "lfn");
1035 if(filename == "") {
1036 AliError("The only entry found has filename empty");
1039 if(FilenameToId(filename, validFileId)) return validFileId.GetVersion();
1041 AliError("Impossible to get FileId from filename");
1046 AliError("No entries found");
1055 //_____________________________________________________________________________
1056 Int_t AliCDBGrid::GetLatestSubVersion(const char* /*path*/, Int_t /*run*/, Int_t /*version*/){
1057 // get last subversion found in the database valid for run and path
1058 AliError("Objects in GRID storage have no sub version!");
1063 /////////////////////////////////////////////////////////////////////////////////////////////////
1065 // AliCDBGrid factory //
1067 /////////////////////////////////////////////////////////////////////////////////////////////////
1069 ClassImp(AliCDBGridFactory)
1071 //_____________________________________________________________________________
1072 Bool_t AliCDBGridFactory::Validate(const char* gridString) {
1073 // check if the string is valid Grid URI
1075 TRegexp gridPattern("^alien://.+$");
1077 return TString(gridString).Contains(gridPattern);
1080 //_____________________________________________________________________________
1081 AliCDBParam* AliCDBGridFactory::CreateParameter(const char* gridString) {
1082 // create AliCDBGridParam class from the URI string
1084 if (!Validate(gridString)) {
1088 TString buffer(gridString);
1090 TString gridUrl = "alien://";
1092 TString dbFolder = "";
1093 TString se = "default";
1094 TString cacheFolder = "";
1095 Bool_t operateDisconnected = kTRUE;
1096 Long64_t cacheSize = (UInt_t) 1024*1024*1024; // 1GB
1097 Long_t cleanupInterval = 0;
1099 TObjArray *arr = buffer.Tokenize('?');
1101 TObjString *str = 0;
1103 while((str = (TObjString*) iter.Next())){
1104 TString entry(str->String());
1105 Int_t indeq = entry.Index('=');
1107 if(entry.BeginsWith("alien://")) { // maybe it's a gridUrl!
1111 AliError(Form("Invalid entry! %s",entry.Data()));
1116 TString key = entry(0,indeq);
1117 TString value = entry(indeq+1,entry.Length()-indeq);
1119 if(key.Contains("grid",TString::kIgnoreCase)) {
1122 else if (key.Contains("user",TString::kIgnoreCase)){
1125 else if (key.Contains("se",TString::kIgnoreCase)){
1128 else if (key.Contains("cacheF",TString::kIgnoreCase)){
1129 cacheFolder = value;
1130 if (!cacheFolder.IsNull() && !cacheFolder.EndsWith("/"))
1133 else if (key.Contains("folder",TString::kIgnoreCase)){
1136 else if (key.Contains("operateDisc",TString::kIgnoreCase)){
1137 if(value == "kTRUE") {
1138 operateDisconnected = kTRUE;
1139 } else if (value == "kFALSE") {
1140 operateDisconnected = kFALSE;
1141 } else if (value == "0" || value == "1") {
1142 operateDisconnected = (Bool_t) value.Atoi();
1144 AliError(Form("Invalid entry! %s",entry.Data()));
1148 else if (key.Contains("cacheS",TString::kIgnoreCase)){
1149 if(value.IsDigit()) {
1150 cacheSize = value.Atoi();
1152 AliError(Form("Invalid entry! %s",entry.Data()));
1156 else if (key.Contains("cleanupInt",TString::kIgnoreCase)){
1157 if(value.IsDigit()) {
1158 cleanupInterval = value.Atoi();
1160 AliError(Form("Invalid entry! %s",entry.Data()));
1165 AliError(Form("Invalid entry! %s",entry.Data()));
1171 AliDebug(2, Form("gridUrl: %s", gridUrl.Data()));
1172 AliDebug(2, Form("user: %s", user.Data()));
1173 AliDebug(2, Form("dbFolder: %s", dbFolder.Data()));
1174 AliDebug(2, Form("s.e.: %s", se.Data()));
1175 AliDebug(2, Form("local cache folder: %s", cacheFolder.Data()));
1176 AliDebug(2, Form("local cache operate disconnected: %d", operateDisconnected));
1177 AliDebug(2, Form("local cache size: %lld", cacheSize));
1178 AliDebug(2, Form("local cache cleanup interval: %ld", cleanupInterval));
1181 AliError("Base folder must be specified!");
1185 return new AliCDBGridParam(gridUrl.Data(), user.Data(),
1186 dbFolder.Data(), se.Data(), cacheFolder.Data(),
1187 operateDisconnected, cacheSize, cleanupInterval);
1190 //_____________________________________________________________________________
1191 AliCDBStorage* AliCDBGridFactory::Create(const AliCDBParam* param) {
1192 // create AliCDBGrid storage instance from parameters
1194 AliCDBGrid *grid = 0;
1195 if (AliCDBGridParam::Class() == param->IsA()) {
1197 const AliCDBGridParam* gridParam = (const AliCDBGridParam*) param;
1198 grid = new AliCDBGrid(gridParam->GridUrl().Data(),
1199 gridParam->GetUser().Data(),
1200 gridParam->GetDBFolder().Data(),
1201 gridParam->GetSE().Data(),
1202 gridParam->GetCacheFolder().Data(),
1203 gridParam->GetOperateDisconnected(),
1204 gridParam->GetCacheSize(),
1205 gridParam->GetCleanupInterval());
1209 if(!gGrid && grid) {
1210 delete grid; grid=0;
1216 /////////////////////////////////////////////////////////////////////////////////////////////////
1218 // AliCDBGrid Parameter class // //
1220 /////////////////////////////////////////////////////////////////////////////////////////////////
1222 ClassImp(AliCDBGridParam)
1224 //_____________________________________________________________________________
1225 AliCDBGridParam::AliCDBGridParam():
1232 fOperateDisconnected(),
1237 // default constructor
1241 //_____________________________________________________________________________
1242 AliCDBGridParam::AliCDBGridParam(const char* gridUrl, const char* user, const char* dbFolder,
1243 const char* se, const char* cacheFolder, Bool_t operateDisconnected,
1244 Long64_t cacheSize, Long_t cleanupInterval):
1248 fDBFolder(dbFolder),
1250 fCacheFolder(cacheFolder),
1251 fOperateDisconnected(operateDisconnected),
1252 fCacheSize(cacheSize),
1253 fCleanupInterval(cleanupInterval)
1259 TString uri = Form("%s?User=%s?DBFolder=%s?SE=%s?CacheFolder=%s"
1260 "?OperateDisconnected=%d?CacheSize=%lld?CleanupInterval=%ld",
1261 fGridUrl.Data(), fUser.Data(),
1262 fDBFolder.Data(), fSE.Data(), fCacheFolder.Data(),
1263 fOperateDisconnected, fCacheSize, fCleanupInterval);
1268 //_____________________________________________________________________________
1269 AliCDBGridParam::~AliCDBGridParam() {
1274 //_____________________________________________________________________________
1275 AliCDBParam* AliCDBGridParam::CloneParam() const {
1278 return new AliCDBGridParam(fGridUrl.Data(), fUser.Data(),
1279 fDBFolder.Data(), fSE.Data(), fCacheFolder.Data(),
1280 fOperateDisconnected, fCacheSize, fCleanupInterval);
1283 //_____________________________________________________________________________
1284 ULong_t AliCDBGridParam::Hash() const {
1285 // return Hash function
1287 return fGridUrl.Hash()+fUser.Hash()+fDBFolder.Hash()+fSE.Hash()+fCacheFolder.Hash();
1290 //_____________________________________________________________________________
1291 Bool_t AliCDBGridParam::IsEqual(const TObject* obj) const {
1292 // check if this object is equal to AliCDBParam obj
1298 if (AliCDBGridParam::Class() != obj->IsA()) {
1302 AliCDBGridParam* other = (AliCDBGridParam*) obj;
1304 if(fGridUrl != other->fGridUrl) return kFALSE;
1305 if(fUser != other->fUser) return kFALSE;
1306 if(fDBFolder != other->fDBFolder) return kFALSE;
1307 if(fSE != other->fSE) return kFALSE;
1308 if(fCacheFolder != other->fCacheFolder) return kFALSE;
1309 if(fOperateDisconnected != other->fOperateDisconnected) return kFALSE;
1310 if(fCacheSize != other->fCacheSize) return kFALSE;
1311 if(fCleanupInterval != other->fCleanupInterval) return kFALSE;