Corrected protection.
[u/mrichter/AliRoot.git] / STEER / AliCDBGrid.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 /////////////////////////////////////////////////////////////////////////////////////////////////
17 //                                                                                             //
18 // AliCDBGrid                                                                                  //
19 // access class to a DataBase in an AliEn storage                                              //
20 //                                                                                             //
21 /////////////////////////////////////////////////////////////////////////////////////////////////
22
23 #include <cstdlib>
24 #include <TGrid.h>
25 #include <TGridResult.h>
26 #include <TFile.h>
27 #include <TKey.h>
28 #include <TROOT.h>
29 #include <TList.h>
30 #include <TObjArray.h>
31 #include <TObjString.h>
32 #include <TRegexp.h>
33
34 #include "AliLog.h"
35 #include "AliCDBEntry.h"
36 #include "AliCDBGrid.h"
37 #include "AliCDBManager.h"
38
39
40 ClassImp(AliCDBGrid)
41
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) :
46 AliCDBStorage(),
47 fGridUrl(gridUrl),
48 fUser(user),
49 fDBFolder(dbFolder),
50 fSE(se),
51 fCacheFolder(cacheFolder),
52 fOperateDisconnected(operateDisconnected),
53 fCacheSize(cacheSize),
54 fCleanupInterval(cleanupInterval)
55 {
56 // constructor //
57
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...");
63                 if(gGrid){
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()));
66                 }
67                 TGrid::Connect(fGridUrl.Data(),fUser.Data());
68         }
69
70         if(!gGrid) {
71                 AliError("Connection failed!");
72                 return;
73         }
74
75         TString initDir(gGrid->Pwd(0));
76         if (fDBFolder[0] != '/') {
77                 fDBFolder.Prepend(initDir);
78         }
79
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__");
85                 if(result == "0"){
86                         AliFatal(Form("Cannot create folder <%s> !",fDBFolder.Data()));
87                         return;
88                 }
89         } else {
90                 AliDebug(2,Form("Folder <%s> found",fDBFolder.Data()));
91         }
92
93         // removes any '/' at the end of path, then append one '/'
94         while(fDBFolder.EndsWith("/")) fDBFolder.Remove(fDBFolder.Last('/')); 
95         fDBFolder+="/";
96
97         fType="alien";
98         fBaseFolder = fDBFolder;
99
100         // Setting the cache
101
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()));
110                 }
111
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()));
115                         fCacheFolder = "";
116                 } else {
117                         // reset fCacheFolder because the function may have
118                         // slightly changed the folder name (e.g. '/' added)
119                         fCacheFolder = TFile::GetCacheFileDir();
120                 }
121
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));
127                 }
128         }
129
130         // return to the initial directory
131         gGrid->Cd(initDir.Data(),0);
132 }
133
134 //_____________________________________________________________________________
135 AliCDBGrid::~AliCDBGrid()
136 {
137 // destructor
138         delete gGrid; gGrid=0;
139
140 }
141
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)
145
146         if(filename.Contains(fDBFolder)){
147                 filename = filename(fDBFolder.Length(),filename.Length()-fDBFolder.Length());
148         }
149
150         TString idPath = filename(0,filename.Last('/'));
151         id.SetPath(idPath);
152         if(!id.IsValid()) return kFALSE;
153
154         filename=filename(idPath.Length()+1,filename.Length()-idPath.Length());
155
156         Ssiz_t mSize;
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);
160         if (!mSize) {
161
162                 // TODO backward compatibility ... maybe remove later!
163                 Ssiz_t oldmSize;
164                 TRegexp oldKeyPattern("^Run[0-9]+_[0-9]+_v[0-9]+.root$");
165                 oldKeyPattern.Index(filename, &oldmSize);
166                 if(!oldmSize) {
167                         AliDebug(2,Form("Bad filename <%s>.", filename.Data()));
168                         return kFALSE;
169                 } else {
170                         AliDebug(2,Form("Old filename format <%s>.", filename.Data()));
171                         id.SetSubVersion(-11); // TODO trick to ensure backward compatibility
172                 }
173
174         } else {
175                 id.SetSubVersion(-1); // TODO trick to ensure backward compatibility
176         }
177
178         filename.Resize(filename.Length() - sizeof(".root") + 1);
179
180         TObjArray* strArray = (TObjArray*) filename.Tokenize("_");
181
182         TString firstRunString(((TObjString*) strArray->At(0))->GetString());
183         id.SetFirstRun(atoi(firstRunString.Data() + 3));
184         id.SetLastRun(atoi(((TObjString*) strArray->At(1))->GetString()));
185
186         TString verString(((TObjString*) strArray->At(2))->GetString());
187         id.SetVersion(atoi(verString.Data() + 1));
188
189         delete strArray;
190
191         return kTRUE;
192 }
193
194 //_____________________________________________________________________________
195 Bool_t AliCDBGrid::IdToFilename(const AliCDBId& id, TString& filename) const {
196 // build file name from AliCDBId (path, run range, version) and fDBFolder
197
198         if (!id.GetAliCDBRunRange().IsValid()) {
199                 AliDebug(2,Form("Invalid run range <%d, %d>.",
200                         id.GetFirstRun(), id.GetLastRun()));
201                 return kFALSE;
202         }
203
204         if (id.GetVersion() < 0) {
205                 AliDebug(2,Form("Invalid version <%d>.", id.GetVersion()));
206                 return kFALSE;
207         }
208
209         filename = Form("Run%d_%d_v%d",
210                                 id.GetFirstRun(),
211                                 id.GetLastRun(),
212                                 id.GetVersion());
213
214         if (id.GetSubVersion() != -11) filename += "_s0"; // TODO to ensure backward compatibility
215         filename += ".root";
216
217         filename.Prepend(fDBFolder + id.GetPath() + '/');
218
219         return kTRUE;
220 }
221
222 //_____________________________________________________________________________
223 Bool_t AliCDBGrid::PrepareId(AliCDBId& id) {
224 // prepare id (version) of the object that will be stored (called by PutEntry)
225
226         TString initDir(gGrid->Pwd(0));
227
228         TString dirName(fDBFolder);
229
230         Bool_t dirExist=kFALSE;
231
232
233
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);
238                 //cmd += 
239                 //gGrid->Command(cmd.Data());
240                 dirName+=Form("%s/",id.GetPathLevel(i).Data());
241                 dirExist=gGrid->Cd(dirName,0);
242                 if (!dirExist) {
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());
247                         return kFALSE;
248                         }
249
250                         // if folders are new add tags to them
251                         if(i == 1) {
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()));
259                                 //      }
260                                 //      return 0;
261                                 //}
262
263                         } else if(i == 2) {
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()));
269                                         }
270                                         return 0;
271                                 }
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()));
276                                         }
277                                         return 0;
278                                 }
279
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()));
289                                 //              }
290                                 //              return 0;
291                                 //      }
292                                 // } else {
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()));
298                                 //              }
299                                 //              return 0;
300                                 //      }
301                                 // }
302                         }
303                 }
304         }
305         gGrid->Cd(initDir,0);
306
307         TString filename;
308         AliCDBId anId; // the id got from filename
309         AliCDBRunRange lastRunRange(-1,-1); // highest runRange found
310         Int_t lastVersion=0; // highest version found
311
312         TGridResult *res = gGrid->Ls(dirName);
313
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();
321                 }
322
323         }
324         delete res;
325
326         // GRP entries with explicitly set version escape default incremental versioning
327         if(id.GetPath().Contains("GRP") && id.HasVersion() && lastVersion!=0)
328         {
329                 AliDebug(5,Form("Entry %s won't be put in the destination OCDB", id.ToString().Data()));
330                 return kFALSE;
331         }
332
333         id.SetVersion(lastVersion + 1);
334         id.SetSubVersion(0);
335
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",
339                                         id.GetVersion()));
340                 AliDebug(2, Form("and it will hide previously stored object with version %d!",
341                                         id.GetVersion()-1));
342         }
343
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()));
347
348         return kTRUE;
349 }
350
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)
354
355         if(validFileIds.GetEntriesFast() < 1)
356                 return NULL;
357
358         TIter iter(&validFileIds);
359
360         AliCDBId *anIdPtr=0;
361         AliCDBId* result=0;
362
363         while((anIdPtr = dynamic_cast<AliCDBId*> (iter.Next()))){
364                 if(anIdPtr->GetPath() != query.GetPath()) continue;
365
366                 //if(!CheckVersion(query, anIdPtr, result)) return NULL;
367
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()));
373                                 return NULL;
374                         }
375                         result = anIdPtr;
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()));
381                                 return NULL;
382                         }
383                         result = anIdPtr;
384                 }
385
386         }
387         
388         if (!result) return NULL;
389
390         return dynamic_cast<AliCDBId*> (result->Clone());
391 }
392
393 //_____________________________________________________________________________
394 AliCDBId* AliCDBGrid::GetEntryId(const AliCDBId& queryId) {
395 // get AliCDBId from the database
396 // User must delete returned object
397
398         AliCDBId* dataId=0;
399
400         AliCDBId selectedId(queryId);
401         if (!selectedId.HasVersion()) {
402                 // if version is not specified, first check the selection criteria list
403                 GetSelection(&selectedId);
404         }
405
406         TObjArray validFileIds;
407         validFileIds.SetOwner(1);
408
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);
416
417         } else {
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()));
421
422                 TString filter;
423                 MakeQueryFilter(selectedId.GetFirstRun(), selectedId.GetLastRun(), 0, filter);
424
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());
429                         optionQuery = "";
430                 }
431
432                 pattern += ".root";
433                 TString det = pattern(0,4);
434                 TString patternCopy(pattern);
435                 patternCopy.Remove(0,4);
436                 TString folderCopy(fDBFolder);
437                 folderCopy += det;
438
439                 if (optionQuery == "-y"){
440                         AliInfo("Only latest version will be returned");
441                 }
442
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());
445                 if (res) {
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());
452                         }
453                         delete res;
454                 }       
455                 dataId = GetId(validFileIds, selectedId);
456         }
457
458         return dataId;
459 }
460
461 //_____________________________________________________________________________
462 AliCDBEntry* AliCDBGrid::GetEntry(const AliCDBId& queryId) {
463 // get AliCDBEntry from the database
464
465         AliCDBId* dataId = GetEntryId(queryId);
466
467         if (!dataId) return NULL;
468
469         TString filename;
470         if (!IdToFilename(*dataId, filename)) {
471                 AliDebug(2,Form("Bad data ID encountered! Subnormal error!"));
472                 delete dataId;
473                 return NULL;
474         }
475
476         AliCDBEntry* anEntry = GetEntryFromFile(filename, dataId);
477
478         delete dataId;
479         return anEntry;
480 }
481
482 //_____________________________________________________________________________
483 AliCDBEntry* AliCDBGrid::GetEntryFromFile(TString& filename, AliCDBId* dataId){
484 // Get AliCBEntry object from file "filename"
485
486         AliDebug(2,Form("Opening file: %s",filename.Data()));
487
488         filename.Prepend("/alien");
489
490         // if option="CACHEREAD" TFile will use the local caching facility!
491         TString option="READ";
492         if(fCacheFolder != ""){
493
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);
501                 }
502
503                 option.Prepend("CACHE");
504         }
505
506         AliDebug(2, Form("Option: %s", option.Data()));
507
508         TFile *file = TFile::Open(filename, option);
509         if (!file) {
510                 AliDebug(2,Form("Can't open file <%s>!", filename.Data()));
511                 return NULL;
512         }
513
514         // get the only AliCDBEntry object from the file
515         // the object in the file is an AliCDBEntry entry named "AliCDBEntry"
516
517         AliCDBEntry* anEntry = dynamic_cast<AliCDBEntry*> (file->Get("AliCDBEntry"));
518
519         if (!anEntry) {
520                 AliDebug(2,Form("Bad storage data: file does not contain an AliCDBEntry object!"));
521                 file->Close();
522                 return NULL;
523         }
524
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.
528
529         if(anEntry){
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()));
537                 }
538                 dataId->SetSubVersion(tmpSubVersion);
539         }
540
541         anEntry->SetLastStorage("grid");
542
543         // Check whether entry contains a TTree. In case load the tree in memory!
544         LoadTreeFromFile(anEntry);
545
546         // close file, return retieved entry
547         file->Close(); delete file; file=0;
548
549         return anEntry;
550 }
551
552 //_____________________________________________________________________________
553 TList* AliCDBGrid::GetEntries(const AliCDBId& queryId) {
554 // multiple request (AliCDBStorage::GetAll)
555
556         TList* result = new TList();
557         result->SetOwner();
558
559         TObjArray validFileIds;
560         validFileIds.SetOwner(1);
561
562         Bool_t alreadyLoaded = kFALSE;
563
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()));
570
571                 alreadyLoaded = kTRUE;
572
573         } else {
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()));
577
578                 TString filter;
579                 MakeQueryFilter(queryId.GetFirstRun(), queryId.GetLastRun(), 0, filter);
580
581                 TString pattern = Form("%s/Run*.root", queryId.GetPath().Data());
582                 AliDebug(2,Form("pattern: %s", pattern.Data()));
583
584                 TString optionQuery("-y");
585                 if(queryId.GetVersion() >= 0) optionQuery = "";
586
587                 if (optionQuery == "-y"){
588                         AliInfo("Only latest version will be returned");
589                 }
590
591                 TGridResult *res = gGrid->Query(fDBFolder, pattern, filter, optionQuery.Data());
592
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());
599                 }
600                 delete res;
601         }
602
603         TIter *iter=0;
604         if(alreadyLoaded){
605                 iter = new TIter(&fValidFileIds);
606         } else {
607                 iter = new TIter(&validFileIds);
608         }
609
610         TObjArray selectedIds;
611         selectedIds.SetOwner(1);
612
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
615         AliCDBPath pathCopy;
616         AliCDBId* anIdPtr=0;
617         AliCDBId* dataId=0;
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;
623
624                 // check the selection criteria list for this query
625                 AliCDBId thisId(*anIdPtr);
626                 thisId.SetVersion(queryId.GetVersion());
627                 if(!thisId.HasVersion()) GetSelection(&thisId);
628
629                 if(alreadyLoaded){
630                         dataId = GetId(fValidFileIds, thisId);
631                 } else {
632                         dataId = GetId(validFileIds, thisId);
633                 }
634                 if(dataId) selectedIds.Add(dataId);
635         }
636
637         delete iter; iter=0;
638
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()))){
643                 TString filename;
644                 if (!IdToFilename(*anIdPtr, filename)) {
645                         AliDebug(2,Form("Bad data ID encountered! Subnormal error!"));
646                         continue;
647                 }
648
649                 AliCDBEntry* anEntry = GetEntryFromFile(filename, anIdPtr);
650
651                 if(anEntry) result->Add(anEntry);
652
653         }
654         delete iter; iter=0;
655
656         return result;
657 }
658
659 //_____________________________________________________________________________
660 Bool_t AliCDBGrid::PutEntry(AliCDBEntry* entry) {
661 // put an AliCDBEntry object into the database
662
663         AliCDBId& id = entry->GetId();
664
665         // set version for the entry to be stored
666         if (!PrepareId(id)) return kFALSE;
667
668         // build filename from entry's id
669         TString filename;
670         if (!IdToFilename(id, filename)) {
671                 AliError("Bad ID encountered! Subnormal error!");
672                 return kFALSE;
673         }
674
675         TString folderToTag = Form("%s%s",
676                                         fDBFolder.Data(),
677                                         id.GetPath().Data());
678
679         TDirectory* saveDir = gDirectory;
680
681         TString fullFilename = Form("/alien%s", filename.Data());
682         // specify SE to filename
683         if (fSE != "default") fullFilename += Form("?se=%s",fSE.Data());
684
685         // open file
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;
690                 return kFALSE;
691         }
692
693         file->cd();
694
695         //SetTreeToFile(entry, file);
696
697         entry->SetVersion(id.GetVersion());
698
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()));
702
703
704         if (saveDir) saveDir->cd(); else gROOT->cd();
705         file->Close(); delete file; file=0;
706
707         if(result) {
708         
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!");
713                         return kFALSE;
714                 }
715
716                 TagFileMetaData(filename, entry->GetMetaData());
717         }
718
719         AliInfo(Form("CDB object stored into file %s", filename.Data()));
720         AliInfo(Form("Storage Element: %s", fSE.Data()));
721         return result;
722 }
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
726
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()));
735                 result = kFALSE;
736         }
737         delete gridres;
738         return result;
739 }
740
741 //_____________________________________________________________________________
742 Bool_t AliCDBGrid::TagFileId(TString& filename, const AliCDBId* id){
743 // tag stored object in CDB table using object Id's parameters
744
745
746         TString dirname(filename);
747         Int_t dirNumber = gGrid->Mkdir(dirname.Remove(dirname.Last('/')),"-d");
748         
749         TString addTagValue1 = Form("addTagValue %s CDB ", filename.Data());
750         TString addTagValue2 = Form("first_run=%d last_run=%d version=%d ",
751                                         id->GetFirstRun(),
752                                         id->GetLastRun(),
753                                         id->GetVersion());
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",
761                                         addTagValue1.Data(),
762                                         addTagValue2.Data(),
763                                         addTagValue3.Data(),
764                                         addTagValue4.Data());
765
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 !",
772                                                 filename.Data()));
773                 result = kFALSE;
774         } else {
775                 AliDebug(2, "Object successfully tagged.");
776                 result = kTRUE;
777         }
778         delete res;
779         return result;
780
781 }
782
783 //_____________________________________________________________________________
784 Bool_t AliCDBGrid::TagShortLived(TString& filename, Bool_t value){
785 // tag folder with ShortLived tag
786
787         TString addTagValue = Form("addTagValue %s ShortLived_try value=%d", filename.Data(), value);
788
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()));
795                 result = kFALSE;
796         } else {
797                 AliDebug(2,"Object successfully tagged.");
798                 result = kTRUE;
799         }
800         delete res;
801         return result;
802
803 }
804
805 //_____________________________________________________________________________
806 Bool_t AliCDBGrid::TagFileMetaData(TString& filename, const AliCDBMetaData* md){
807 // tag stored object in CDB table using object Id's parameters
808
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(),
816                                         md->GetComment());
817         TString addTagValue = Form("%s%s%s",
818                                         addTagValue1.Data(),
819                                         addTagValue2.Data(),
820                                         addTagValue3.Data());
821
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 !",
828                                                 filename.Data()));
829                 result = kFALSE;
830         } else {
831                 AliDebug(2,"Object successfully tagged.");
832                 result = kTRUE;
833         }
834         return result;
835 }
836
837 //_____________________________________________________________________________
838 TList* AliCDBGrid::GetIdListFromFile(const char* fileName){
839
840         TString turl(fileName);
841         turl.Prepend("/alien" + fDBFolder);
842         turl += "?se="; turl += fSE.Data();
843         TFile *file = TFile::Open(turl);
844         if (!file) {
845                 AliError(Form("Can't open selection file <%s>!", turl.Data()));
846                 return NULL;
847         }
848
849         TList *list = new TList();
850         list->SetOwner();
851         int i=0;
852         TString keycycle;
853
854         AliCDBId *id;
855         while(1){
856                 i++;
857                 keycycle = "AliCDBId;";
858                 keycycle+=i;
859                 
860                 id = (AliCDBId*) file->Get(keycycle);
861                 if(!id) break;
862                 list->AddFirst(id);
863         }
864         file->Close(); delete file; file=0;
865         
866         return list;
867
868
869 }
870
871 //_____________________________________________________________________________
872 Bool_t AliCDBGrid::Contains(const char* path) const{
873 // check for path in storage's DBFolder
874
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);
881         return result;
882 }
883
884 //_____________________________________________________________________________
885 void AliCDBGrid::QueryValidFiles()
886 {
887 // Query the CDB for files valid for AliCDBStorage::fRun
888 // fills list fValidFileIds with AliCDBId objects created from file name
889
890         TString filter;
891         MakeQueryFilter(fRun, fRun, fMetaDataFilter, filter);
892
893         TString pattern = Form("%s/Run*", fPathFilter.GetPath().Data());
894         TString optionQuery = "-y";
895         if(fVersion >= 0) {
896                 pattern += Form("_v%d*", fVersion);
897                 optionQuery = "";
898         }
899         pattern += ".root";
900         AliDebug(2,Form("pattern: %s", pattern.Data()));
901
902         AliInfo(Form("fDBFolder = %s, pattern = %s, filter = %s",fDBFolder.Data(), pattern.Data(), filter.Data()));
903
904         if (optionQuery == "-y"){
905                 AliInfo("Only latest version will be returned");
906         } 
907
908         TGridResult *res = gGrid->Query(fDBFolder, pattern, filter, optionQuery.Data());  
909
910         if (!res) {
911                 AliError("Grid query failed");
912                 return;
913         }
914
915         TIter next(res);
916         TMap *map;
917         while ((map = (TMap*)next())) {
918           TObjString *entry;
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);
925             if(result) {
926               fValidFileIds.AddLast(validFileId);
927             }
928             else {
929               delete validFileId;
930             }
931           }
932         }
933         delete res;
934
935 }
936
937 //_____________________________________________________________________________
938 void AliCDBGrid::MakeQueryFilter(Int_t firstRun, Int_t lastRun,
939                                         const AliCDBMetaData* md, TString& result) const
940 {
941 // create filter for file query
942
943         result = Form("CDB:first_run<=%d and CDB:last_run>=%d", firstRun, lastRun);
944
945 //      if(version >= 0) {
946 //              result += Form(" and CDB:version=%d", version);
947 //      }
948 //      if(pathFilter.GetLevel0() != "*") {
949 //              result += Form(" and CDB:path_level_0=\"%s\"", pathFilter.GetLevel0().Data());
950 //      }
951 //      if(pathFilter.GetLevel1() != "*") {
952 //              result += Form(" and CDB:path_level_1=\"%s\"", pathFilter.GetLevel1().Data());
953 //      }
954 //      if(pathFilter.GetLevel2() != "*") {
955 //              result += Form(" and CDB:path_level_2=\"%s\"", pathFilter.GetLevel2().Data());
956 //      }
957
958         if(md){
959                 if(md->GetObjectClassName()[0] != '\0') {
960                         result += Form(" and CDB_MD:object_classname=\"%s\"", md->GetObjectClassName());
961                 }
962                 if(md->GetResponsible()[0] != '\0') {
963                         result += Form(" and CDB_MD:responsible=\"%s\"", md->GetResponsible());
964                 }
965                 if(md->GetBeamPeriod() != 0) {
966                         result += Form(" and CDB_MD:beam_period=%d", md->GetBeamPeriod());
967                 }
968                 if(md->GetAliRootVersion()[0] != '\0') {
969                         result += Form(" and CDB_MD:aliroot_version=\"%s\"", md->GetAliRootVersion());
970                 }
971                 if(md->GetComment()[0] != '\0') {
972                         result += Form(" and CDB_MD:comment=\"%s\"", md->GetComment());
973                 }
974         }
975         AliDebug(2, Form("filter: %s",result.Data()));
976
977 }
978
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
982
983         AliCDBPath aCDBPath(path);
984         if(!aCDBPath.IsValid() || aCDBPath.IsWildcard()) {
985                 AliError(Form("Invalid path in request: %s", path));
986                 return -1;
987         }
988         AliCDBId query(path, run, run, -1, -1);
989
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!",
995                                         run, path));
996                 dataId = GetId(fValidFileIds, query);
997                 if (!dataId) return -1;
998                 Int_t version = dataId->GetVersion();
999                 delete dataId;
1000                 return version;
1001
1002         }
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!",
1005                                 run, path));
1006
1007         TObjArray validFileIds;
1008         validFileIds.SetOwner(1);
1009
1010         TString filter;
1011         MakeQueryFilter(run, run, 0, filter);
1012
1013         TString pattern = Form("%s/Run*.root", path);
1014         AliDebug(2,Form("pattern: %s", pattern.Data()));
1015
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());
1025                 }
1026                 dataId = GetId(validFileIds, query);
1027                 if (!dataId) return -1;
1028                 
1029                 Int_t version = dataId->GetVersion();
1030                 delete dataId;
1031                 return version;
1032         }
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");
1037                         return -1;
1038                 }
1039                 if(FilenameToId(filename, validFileId)) return validFileId.GetVersion();
1040                 else{
1041                         AliError("Impossible to get FileId from filename");
1042                         return -1;
1043                 }
1044         }
1045         else {
1046                 AliError("No entries found");
1047                 return -1;
1048         }
1049
1050         delete res;
1051
1052
1053 }
1054
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!");
1059         return -1;
1060 }
1061
1062
1063 /////////////////////////////////////////////////////////////////////////////////////////////////
1064 //                                                                                             //
1065 // AliCDBGrid factory                                                                          //
1066 //                                                                                             //
1067 /////////////////////////////////////////////////////////////////////////////////////////////////
1068
1069 ClassImp(AliCDBGridFactory)
1070
1071 //_____________________________________________________________________________
1072 Bool_t AliCDBGridFactory::Validate(const char* gridString) {
1073 // check if the string is valid Grid URI
1074
1075         TRegexp gridPattern("^alien://.+$");
1076
1077         return TString(gridString).Contains(gridPattern);
1078 }
1079
1080 //_____________________________________________________________________________
1081 AliCDBParam* AliCDBGridFactory::CreateParameter(const char* gridString) {
1082 // create AliCDBGridParam class from the URI string
1083
1084         if (!Validate(gridString)) {
1085                 return NULL;
1086         }
1087
1088         TString buffer(gridString);
1089
1090         TString gridUrl         = "alien://";
1091         TString user            = "";
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;
1098
1099         TObjArray *arr = buffer.Tokenize('?');
1100         TIter iter(arr);
1101         TObjString *str = 0;
1102
1103         while((str = (TObjString*) iter.Next())){
1104                 TString entry(str->String());
1105                 Int_t indeq = entry.Index('=');
1106                 if(indeq == -1) {
1107                         if(entry.BeginsWith("alien://")) { // maybe it's a gridUrl!
1108                                 gridUrl = entry;
1109                                 continue;
1110                         } else {
1111                                 AliError(Form("Invalid entry! %s",entry.Data()));
1112                                 continue;
1113                         }
1114                 }
1115                 
1116                 TString key = entry(0,indeq);
1117                 TString value = entry(indeq+1,entry.Length()-indeq);
1118
1119                 if(key.Contains("grid",TString::kIgnoreCase)) {
1120                         gridUrl += value;
1121                 }
1122                 else if (key.Contains("user",TString::kIgnoreCase)){
1123                         user = value;
1124                 }
1125                 else if (key.Contains("se",TString::kIgnoreCase)){
1126                         se = value;
1127                 }
1128                 else if (key.Contains("cacheF",TString::kIgnoreCase)){
1129                         cacheFolder = value;
1130                         if (!cacheFolder.IsNull() && !cacheFolder.EndsWith("/"))
1131                                 cacheFolder += "/";
1132                 }
1133                 else if (key.Contains("folder",TString::kIgnoreCase)){
1134                         dbFolder = value;
1135                 }
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();
1143                         } else {
1144                                 AliError(Form("Invalid entry! %s",entry.Data()));
1145                                 return NULL;
1146                         }
1147                 }
1148                 else if (key.Contains("cacheS",TString::kIgnoreCase)){
1149                         if(value.IsDigit()) {
1150                                 cacheSize = value.Atoi();
1151                         } else {
1152                                 AliError(Form("Invalid entry! %s",entry.Data()));
1153                                 return NULL;
1154                         }
1155                 }
1156                 else if (key.Contains("cleanupInt",TString::kIgnoreCase)){
1157                         if(value.IsDigit()) {
1158                                 cleanupInterval = value.Atoi();
1159                         } else {
1160                                 AliError(Form("Invalid entry! %s",entry.Data()));
1161                                 return NULL;
1162                         }
1163                 }
1164                 else{
1165                         AliError(Form("Invalid entry! %s",entry.Data()));
1166                         return NULL;
1167                 }
1168         }
1169         delete arr; arr=0;
1170
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));
1179
1180         if(dbFolder == ""){
1181                 AliError("Base folder must be specified!");
1182                 return NULL;
1183         }
1184
1185         return new AliCDBGridParam(gridUrl.Data(), user.Data(),
1186                           dbFolder.Data(), se.Data(), cacheFolder.Data(),
1187                           operateDisconnected, cacheSize, cleanupInterval);
1188 }
1189
1190 //_____________________________________________________________________________
1191 AliCDBStorage* AliCDBGridFactory::Create(const AliCDBParam* param) {
1192 // create AliCDBGrid storage instance from parameters
1193         
1194         AliCDBGrid *grid = 0;
1195         if (AliCDBGridParam::Class() == param->IsA()) {
1196
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());
1206
1207         }
1208
1209         if(!gGrid && grid) {
1210                 delete grid; grid=0;
1211         }
1212
1213         return grid;
1214 }
1215
1216 /////////////////////////////////////////////////////////////////////////////////////////////////
1217 //                                                                                             //
1218 // AliCDBGrid Parameter class                                                                  //                                         //
1219 //                                                                                             //
1220 /////////////////////////////////////////////////////////////////////////////////////////////////
1221
1222 ClassImp(AliCDBGridParam)
1223
1224 //_____________________________________________________________________________
1225 AliCDBGridParam::AliCDBGridParam():
1226  AliCDBParam(),
1227  fGridUrl(),
1228  fUser(),
1229  fDBFolder(),
1230  fSE(),
1231  fCacheFolder(),
1232  fOperateDisconnected(),
1233  fCacheSize(),
1234  fCleanupInterval()
1235
1236  {
1237 // default constructor
1238
1239 }
1240
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):
1245  AliCDBParam(),
1246  fGridUrl(gridUrl),
1247  fUser(user),
1248  fDBFolder(dbFolder),
1249  fSE(se),
1250  fCacheFolder(cacheFolder),
1251  fOperateDisconnected(operateDisconnected),
1252  fCacheSize(cacheSize),
1253  fCleanupInterval(cleanupInterval)
1254 {
1255 // constructor
1256
1257         SetType("alien");
1258
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);
1264
1265         SetURI(uri.Data());
1266 }
1267
1268 //_____________________________________________________________________________
1269 AliCDBGridParam::~AliCDBGridParam() {
1270 // destructor
1271
1272 }
1273
1274 //_____________________________________________________________________________
1275 AliCDBParam* AliCDBGridParam::CloneParam() const {
1276 // clone parameter
1277
1278         return new AliCDBGridParam(fGridUrl.Data(), fUser.Data(),
1279                                         fDBFolder.Data(), fSE.Data(), fCacheFolder.Data(),
1280                                         fOperateDisconnected, fCacheSize, fCleanupInterval);
1281 }
1282
1283 //_____________________________________________________________________________
1284 ULong_t AliCDBGridParam::Hash() const {
1285 // return Hash function
1286
1287         return fGridUrl.Hash()+fUser.Hash()+fDBFolder.Hash()+fSE.Hash()+fCacheFolder.Hash();
1288 }
1289
1290 //_____________________________________________________________________________
1291 Bool_t AliCDBGridParam::IsEqual(const TObject* obj) const {
1292 // check if this object is equal to AliCDBParam obj
1293
1294         if (this == obj) {
1295                 return kTRUE;
1296         }
1297
1298         if (AliCDBGridParam::Class() != obj->IsA()) {
1299                 return kFALSE;
1300         }
1301
1302         AliCDBGridParam* other = (AliCDBGridParam*) obj;
1303
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;
1312         return kTRUE;
1313 }
1314