]> git.uio.no Git - u/mrichter/AliRoot.git/blame - STEER/AliCDBGrid.cxx
git://git.uio.no / u / mrichter / AliRoot.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Correct initialization of optical properties needed by Geant4 (Andrei)
[u/mrichter/AliRoot.git] / STEER / AliCDBGrid.cxx
CommitLineData
9e1ceb13 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
24#include <TGrid.h>
25#include <TGridResult.h>
26#include <TFile.h>
6dc56e97 27#include <TKey.h>
9e1ceb13 28#include <TROOT.h>
f430a9ce 29//#include <TSystem.h>
9e1ceb13 30#include <TObjArray.h>
31#include <TObjString.h>
32#include <TRegexp.h>
33
34#include "AliLog.h"
fdf65bb5 35#include "AliCDBEntry.h"
9e1ceb13 36#include "AliCDBGrid.h"
37
38
39ClassImp(AliCDBGrid)
40
41//_____________________________________________________________________________
b05400be 42AliCDBGrid::AliCDBGrid(const char *gridUrl, const char *user, const char *dbFolder, const char *se) :
9e1ceb13 43AliCDBStorage(),
b05400be 44fGridUrl(gridUrl),
9e1ceb13 45fUser(user),
b05400be 46fDBFolder(dbFolder),
9e1ceb13 47fSE(se)
48{
49// constructor //
50
9e1ceb13 51 // if the same Grid is alreay active, skip connection
b05400be 52 if (!gGrid || fGridUrl != gGrid->GridUrl()
024cf675 53 || (( fUser != "" ) && ( fUser != gGrid->GetUser() )) ) {
9e1ceb13 54 // connection to the Grid
62032124 55 AliInfo("Connection to the Grid...");
024cf675 56 if(gGrid){
57 AliInfo(Form("gGrid = %x; fGridUrl = %s; gGrid->GridUrl() = %s",gGrid,fGridUrl.Data(), gGrid->GridUrl()));
58 AliInfo(Form("fUser = %s; gGrid->GetUser() = %s",fUser.Data(), gGrid->GetUser()));
59 }
b05400be 60 TGrid::Connect(fGridUrl.Data(),fUser.Data());
9e1ceb13 61 }
62
63 if(!gGrid) {
64 AliError("Connection failed!");
65 return;
66 }
67
68 TString initDir(gGrid->Pwd(0));
b05400be 69 if (fDBFolder[0] != '/') {
70 fDBFolder.Prepend(initDir);
9e1ceb13 71 }
72
73 // check DBFolder: trying to cd to DBFolder; if it does not exist, create it
b05400be 74 if(!gGrid->Cd(fDBFolder.Data(),0)){
75 AliDebug(2,Form("Creating new folder <%s> ...",fDBFolder.Data()));
76 if(!gGrid->Mkdir(fDBFolder.Data(),"",0)){
77 AliError(Form("Cannot create folder <%s> !",fDBFolder.Data()));
9e1ceb13 78 }
79 } else {
b05400be 80 AliDebug(2,Form("Folder <%s> found",fDBFolder.Data()));
9e1ceb13 81 }
82
83 // removes any '/' at the end of path, then append one '/'
b05400be 84 while(fDBFolder.EndsWith("/")) fDBFolder.Remove(fDBFolder.Last('/'));
85 fDBFolder+="/";
9e1ceb13 86
62032124 87 fType="alien";
88 fBaseFolder = fDBFolder;
89
9e1ceb13 90 // return to the initial directory
91 gGrid->Cd(initDir.Data(),0);
92}
93
94//_____________________________________________________________________________
95AliCDBGrid::~AliCDBGrid()
96{
97// destructor
62032124 98 delete gGrid; gGrid=0;
9e1ceb13 99
100}
101
102//_____________________________________________________________________________
62032124 103Bool_t AliCDBGrid::FilenameToId(TString& filename, AliCDBId& id) {
4005d0b5 104// build AliCDBId from full path filename (fDBFolder/path/Run#x_#y_v#z_s0.root)
62032124 105
106 if(filename.Contains(fDBFolder)){
107 filename = filename(fDBFolder.Length(),filename.Length()-fDBFolder.Length());
108 }
109
110 TString idPath = filename(0,filename.Last('/'));
111 id.SetPath(idPath);
112 if(!id.IsValid()) return kFALSE;
113
114 filename=filename(idPath.Length()+1,filename.Length()-idPath.Length());
9e1ceb13 115
116 Ssiz_t mSize;
4005d0b5 117 // valid filename: Run#firstRun_#lastRun_v#version_s0.root
118 TRegexp keyPattern("^Run[0-9]+_[0-9]+_v[0-9]+_s0.root$");
9e1ceb13 119 keyPattern.Index(filename, &mSize);
120 if (!mSize) {
4005d0b5 121
122 // TODO backward compatibility ... maybe remove later!
123 Ssiz_t oldmSize;
124 TRegexp oldKeyPattern("^Run[0-9]+_[0-9]+_v[0-9]+.root$");
125 oldKeyPattern.Index(filename, &oldmSize);
126 if(!oldmSize) {
127 AliDebug(2,Form("Bad filename <%s>.", filename.Data()));
128 return kFALSE;
129 } else {
130 AliDebug(2,Form("Old filename format <%s>.", filename.Data()));
131 id.SetSubVersion(-11); // TODO trick to ensure backward compatibility
132 }
133
134 } else {
135 id.SetSubVersion(-1); // TODO trick to ensure backward compatibility
136 }
9e1ceb13 137
62032124 138 filename.Resize(filename.Length() - sizeof(".root") + 1);
9e1ceb13 139
62032124 140 TObjArray* strArray = (TObjArray*) filename.Tokenize("_");
9e1ceb13 141
142 TString firstRunString(((TObjString*) strArray->At(0))->GetString());
62032124 143 id.SetFirstRun(atoi(firstRunString.Data() + 3));
144 id.SetLastRun(atoi(((TObjString*) strArray->At(1))->GetString()));
145
9e1ceb13 146 TString verString(((TObjString*) strArray->At(2))->GetString());
62032124 147 id.SetVersion(atoi(verString.Data() + 1));
9e1ceb13 148
149 delete strArray;
150
151 return kTRUE;
152}
153
154//_____________________________________________________________________________
c3a7b59a 155Bool_t AliCDBGrid::IdToFilename(const AliCDBId& id, TString& filename) const {
62032124 156// build file name from AliCDBId (path, run range, version) and fDBFolder
9e1ceb13 157
62032124 158 if (!id.GetAliCDBRunRange().IsValid()) {
159 AliDebug(2,Form("Invalid run range <%d, %d>.",
160 id.GetFirstRun(), id.GetLastRun()));
9e1ceb13 161 return kFALSE;
162 }
163
62032124 164 if (id.GetVersion() < 0) {
165 AliDebug(2,Form("Invalid version <%d>.", id.GetVersion()));
9e1ceb13 166 return kFALSE;
167 }
62032124 168
4005d0b5 169 filename = Form("Run%d_%d_v%d",
62032124 170 id.GetFirstRun(),
171 id.GetLastRun(),
172 id.GetVersion());
173
4005d0b5 174 if (id.GetSubVersion() != -11) filename += "_s0"; // TODO to ensure backward compatibility
175 filename += ".root";
176
62032124 177 filename.Prepend(fDBFolder + id.GetPath() + '/');
9e1ceb13 178
179 return kTRUE;
180}
181
182//_____________________________________________________________________________
183Bool_t AliCDBGrid::PrepareId(AliCDBId& id) {
184// prepare id (version) of the object that will be stored (called by PutEntry)
185
186 TString initDir(gGrid->Pwd(0));
187 TString pathName= id.GetPath();
188
b05400be 189 TString dirName(fDBFolder);
9e1ceb13 190
191 Bool_t dirExist=kFALSE;
4005d0b5 192
9e1ceb13 193 // go to the path; if directory does not exist, create it
194 TObjArray *arrName=pathName.Tokenize("/");
195 for(int i=0;i<arrName->GetEntries();i++){
196 TString buffer((arrName->At(i))->GetName());
197 dirName+=buffer; dirName+="/";
198 dirExist=gGrid->Cd(dirName,0);
199 if (!dirExist) {
b05400be 200 AliDebug(2,Form("Creating new folder <%s> ...",dirName.Data()));
9e1ceb13 201 if(!gGrid->Mkdir(dirName,"",0)){
202 AliError(Form("Cannot create directory <%s> !",dirName.Data()));
203 gGrid->Cd(initDir.Data());
204 return kFALSE;
205 }
206 }
207 }
208 delete arrName;
209 gGrid->Cd(initDir,0);
210
62032124 211 TString filename;
212 AliCDBId anId; // the id got from filename
9e1ceb13 213 AliCDBRunRange lastRunRange(-1,-1); // highest runRange found
9e1ceb13 214 Int_t lastVersion=0; // highest version found
215
216 TGridResult *res = gGrid->Ls(dirName);
217
218 //loop on the files in the directory, look for highest version
219 for(int i=0; i < res->GetEntries(); i++){
62032124 220 filename=res->GetFileNamePath(i);
221 if (!FilenameToId(filename, anId)) continue;
222 if (anId.GetAliCDBRunRange().Overlaps(id.GetAliCDBRunRange()) && anId.GetVersion() > lastVersion) {
223 lastVersion = anId.GetVersion();
224 lastRunRange = anId.GetAliCDBRunRange();
9e1ceb13 225 }
226
227 }
4005d0b5 228 delete res;
229
9e1ceb13 230 id.SetVersion(lastVersion + 1);
4005d0b5 231 id.SetSubVersion(0);
9e1ceb13 232
233 TString lastStorage = id.GetLastStorage();
234 if(lastStorage.Contains(TString("new"), TString::kIgnoreCase) && id.GetVersion() > 1 ){
84090f85 235 AliDebug(2, Form("A NEW object is being stored with version %d",
9e1ceb13 236 id.GetVersion()));
84090f85 237 AliDebug(2, Form("and it will hide previously stored object with version %d!",
9e1ceb13 238 id.GetVersion()-1));
239 }
240
4005d0b5 241 if(!lastRunRange.IsAnyRange() && !(lastRunRange.IsEqual(&id.GetAliCDBRunRange())))
9e1ceb13 242 AliWarning(Form("Run range modified w.r.t. previous version (Run%d_%d_v%d)",
243 lastRunRange.GetFirstRun(), lastRunRange.GetLastRun(), id.GetVersion()));
4005d0b5 244
9e1ceb13 245 return kTRUE;
246}
247
248//_____________________________________________________________________________
6dc56e97 249AliCDBId* AliCDBGrid::GetId(const TObjArray& validFileIds, const AliCDBId& query) {
62032124 250// look for the Id that matches query's requests (highest or exact version)
9e1ceb13 251
6dc56e97 252 if(validFileIds.GetEntriesFast() < 1) {
62032124 253 return NULL;
6dc56e97 254 } else if (validFileIds.GetEntriesFast() == 1) {
62032124 255 return dynamic_cast<AliCDBId*> (validFileIds.At(0));
256 }
9e1ceb13 257
62032124 258 TIter iter(&validFileIds);
9e1ceb13 259
62032124 260 AliCDBId *anIdPtr=0;
261 AliCDBId* result=0;
9e1ceb13 262
62032124 263 while((anIdPtr = dynamic_cast<AliCDBId*> (iter.Next()))){
62032124 264 if(anIdPtr->GetPath() != query.GetPath()) continue;
265
266 //if(!CheckVersion(query, anIdPtr, result)) return NULL;
9e1ceb13 267
268 if (!query.HasVersion()){ // look for highest version
62032124 269 if(result && result->GetVersion() > anIdPtr->GetVersion()) continue;
270 if(result && result->GetVersion() == anIdPtr->GetVersion()) {
271 AliDebug(2,Form("More than one object valid for run %d, version %d!",
272 query.GetFirstRun(), anIdPtr->GetVersion()));
273 return NULL;
9e1ceb13 274 }
62032124 275 result = anIdPtr;
9e1ceb13 276 } else { // look for specified version
62032124 277 if(query.GetVersion() != anIdPtr->GetVersion()) continue;
278 if(result && result->GetVersion() == anIdPtr->GetVersion()){
279 AliDebug(2,Form("More than one object valid for run %d, version %d!",
280 query.GetFirstRun(), anIdPtr->GetVersion()));
281 return NULL;
9e1ceb13 282 }
62032124 283 result = anIdPtr;
9e1ceb13 284 }
62032124 285
286 }
287
288
289 return result;
290}
291
9e1ceb13 292//_____________________________________________________________________________
293AliCDBEntry* AliCDBGrid::GetEntry(const AliCDBId& queryId) {
294// get AliCDBEntry from the database
295
62032124 296 AliCDBId* dataId=0;
297
298 AliCDBId selectedId(queryId);
299 if (!selectedId.HasVersion()) {
9e1ceb13 300 // if version is not specified, first check the selection criteria list
4b5e0dce 301 GetSelection(&selectedId);
62032124 302 }
303
6dc56e97 304 TObjArray validFileIds;
62032124 305 validFileIds.SetOwner(1);
306
307 // look for file matching query requests (path, runRange, version)
308 if(selectedId.GetFirstRun() == fRun &&
c3a7b59a 309 fPathFilter.Comprises(selectedId.GetAliCDBPath()) && fVersion < 0 && !fMetaDataFilter){
62032124 310 // look into list of valid files previously loaded with AliCDBStorage::FillValidFileIds()
311 AliDebug(2, Form("List of files valid for run %d and for path %s was loaded. Looking there!",
312 selectedId.GetFirstRun(), selectedId.GetPath().Data()));
313 dataId = GetId(fValidFileIds, selectedId);
314
9e1ceb13 315 } else {
62032124 316 // List of files valid for reqested run was not loaded. Looking directly into CDB
317 AliDebug(2, Form("List of files valid for run %d and for path %s was not loaded. Looking directly into CDB!",
318 selectedId.GetFirstRun(), selectedId.GetPath().Data()));
319
320 TString filter;
6dc56e97 321 MakeQueryFilter(selectedId.GetFirstRun(), selectedId.GetLastRun(), 0, filter);
62032124 322
6dc56e97 323 TString pattern = Form("%s/Run*", selectedId.GetPath().Data());
4005d0b5 324 if(selectedId.GetVersion() >= 0) pattern += Form("_v%d*",selectedId.GetVersion());
6dc56e97 325 pattern += ".root";
326 AliDebug(2,Form("pattern: %s", pattern.Data()));
327
328 TGridResult *res = gGrid->Query(fDBFolder, pattern, filter, "");
62032124 329 AliCDBId validFileId;
330 for(int i=0; i<res->GetEntries(); i++){
331 TString filename = res->GetKey(i, "lfn");
c3a7b59a 332 if(filename == "") continue;
62032124 333 if(FilenameToId(filename, validFileId))
334 validFileIds.AddLast(validFileId.Clone());
335 }
336 delete res;
337 dataId = GetId(validFileIds, selectedId);
9e1ceb13 338 }
339
62032124 340 if (!dataId) return NULL;
9e1ceb13 341
342 TString filename;
62032124 343 if (!IdToFilename(*dataId, filename)) {
024cf675 344 AliDebug(2,Form("Bad data ID encountered! Subnormal error!"));
9e1ceb13 345 return NULL;
346 }
347
62032124 348 AliCDBEntry* anEntry = GetEntryFromFile(filename, dataId);
349
350 return anEntry;
351}
352
353//_____________________________________________________________________________
8e245d15 354AliCDBEntry* AliCDBGrid::GetEntryFromFile(TString& filename, AliCDBId* dataId){
62032124 355// Get AliCBEntry object from file "filename"
9e1ceb13 356
024cf675 357 AliDebug(2,Form("Opening file: %s",filename.Data()));
62032124 358
359 filename.Prepend("/alien");
9e1ceb13 360 TFile *file = TFile::Open(filename);
361 if (!file) {
024cf675 362 AliDebug(2,Form("Can't open file <%s>!", filename.Data()));
9e1ceb13 363 return NULL;
364 }
365
366 // get the only AliCDBEntry object from the file
367 // the object in the file is an AliCDBEntry entry named "AliCDBEntry"
368
62032124 369 AliCDBEntry* anEntry = dynamic_cast<AliCDBEntry*> (file->Get("AliCDBEntry"));
9e1ceb13 370
62032124 371 if (!anEntry) {
372 AliDebug(2,Form("Bad storage data: file does not contain an AliCDBEntry object!"));
373 file->Close();
9e1ceb13 374 return NULL;
375 }
376
9e1ceb13 377 // The object's Id is not reset during storage
378 // If object's Id runRange or version do not match with filename,
379 // it means that someone renamed file by hand. In this case a warning msg is issued.
62032124 380
381 if(anEntry){
382 AliCDBId entryId = anEntry->GetId();
4005d0b5 383 Int_t tmpSubVersion = dataId->GetSubVersion();
384 dataId->SetSubVersion(entryId.GetSubVersion()); // otherwise filename and id may mismatch
8e245d15 385 if(!entryId.IsEqual(dataId)){
b8ec52f6 386 AliWarning(Form("Mismatch between file name and object's Id!"));
387 AliWarning(Form("File name: %s", dataId->ToString().Data()));
388 AliWarning(Form("Object's Id: %s", entryId.ToString().Data()));
62032124 389 }
4005d0b5 390 dataId->SetSubVersion(tmpSubVersion);
9e1ceb13 391 }
392
62032124 393 anEntry->SetLastStorage("grid");
394
9e1ceb13 395 // close file, return retieved entry
396 file->Close(); delete file; file=0;
62032124 397
398 return anEntry;
9e1ceb13 399}
400
401//_____________________________________________________________________________
62032124 402TList* AliCDBGrid::GetEntries(const AliCDBId& queryId) {
9e1ceb13 403// multiple request (AliCDBStorage::GetAll)
404
62032124 405 TList* result = new TList();
406 result->SetOwner();
9e1ceb13 407
6dc56e97 408 TObjArray validFileIds;
62032124 409 validFileIds.SetOwner(1);
9e1ceb13 410
62032124 411 Bool_t alreadyLoaded = kFALSE;
9e1ceb13 412
62032124 413 // look for file matching query requests (path, runRange)
414 if(queryId.GetFirstRun() == fRun &&
c3a7b59a 415 fPathFilter.Comprises(queryId.GetAliCDBPath()) && fVersion < 0 && !fMetaDataFilter){
62032124 416 // look into list of valid files previously loaded with AliCDBStorage::FillValidFileIds()
417 AliDebug(2,Form("List of files valid for run %d and for path %s was loaded. Looking there!",
418 queryId.GetFirstRun(), queryId.GetPath().Data()));
9e1ceb13 419
62032124 420 alreadyLoaded = kTRUE;
9e1ceb13 421
62032124 422 } else {
423 // List of files valid for reqested run was not loaded. Looking directly into CDB
424 AliDebug(2,Form("List of files valid for run %d and for path %s was not loaded. Looking directly into CDB!",
425 queryId.GetFirstRun(), queryId.GetPath().Data()));
426
427 TString filter;
6dc56e97 428 MakeQueryFilter(queryId.GetFirstRun(), queryId.GetLastRun(), 0, filter);
429
430 TString pattern = Form("%s/Run*.root", queryId.GetPath().Data());
431 AliDebug(2,Form("pattern: %s", pattern.Data()));
432
433 TGridResult *res = gGrid->Query(fDBFolder, pattern, filter, "");
62032124 434
62032124 435 AliCDBId validFileId;
436 for(int i=0; i<res->GetEntries(); i++){
437 TString filename = res->GetKey(i, "lfn");
c3a7b59a 438 if(filename == "") continue;
62032124 439 if(FilenameToId(filename, validFileId))
440 validFileIds.AddLast(validFileId.Clone());
441 }
442 delete res;
9e1ceb13 443 }
444
62032124 445 TIter *iter=0;
446 if(alreadyLoaded){
447 iter = new TIter(&fValidFileIds);
448 } else {
449 iter = new TIter(&validFileIds);
450 }
9e1ceb13 451
6dc56e97 452 TObjArray selectedIds;
62032124 453 selectedIds.SetOwner(1);
454
455 // loop on list of valid Ids to select the right version to get.
456 // According to query and to the selection criteria list, version can be the highest or exact
457 AliCDBPath pathCopy;
458 AliCDBId* anIdPtr=0;
459 AliCDBId* dataId=0;
460 AliCDBPath queryPath = queryId.GetAliCDBPath();
461 while((anIdPtr = dynamic_cast<AliCDBId*> (iter->Next()))){
462 AliCDBPath thisCDBPath = anIdPtr->GetAliCDBPath();
463 if(!(queryPath.Comprises(thisCDBPath)) || pathCopy.GetPath() == thisCDBPath.GetPath()) continue;
464 pathCopy = thisCDBPath;
465
466 // check the selection criteria list for this query
467 AliCDBId thisId(*anIdPtr);
468 thisId.SetVersion(queryId.GetVersion());
469 if(!thisId.HasVersion()) GetSelection(&thisId);
470
471 if(alreadyLoaded){
472 dataId = GetId(fValidFileIds, thisId);
473 } else {
474 dataId = GetId(validFileIds, thisId);
9e1ceb13 475 }
62032124 476 if(dataId) selectedIds.Add(dataId->Clone());
9e1ceb13 477 }
9e1ceb13 478
62032124 479 delete iter; iter=0;
9e1ceb13 480
62032124 481 // selectedIds contains the Ids of the files matching all requests of query!
482 // All the objects are now ready to be retrieved
483 iter = new TIter(&selectedIds);
484 while((anIdPtr = dynamic_cast<AliCDBId*> (iter->Next()))){
485 TString filename;
486 if (!IdToFilename(*anIdPtr, filename)) {
487 AliDebug(2,Form("Bad data ID encountered! Subnormal error!"));
488 continue;
489 }
9e1ceb13 490
62032124 491 AliCDBEntry* anEntry = GetEntryFromFile(filename, anIdPtr);
9e1ceb13 492
62032124 493 if(anEntry) result->Add(anEntry);
9e1ceb13 494
62032124 495 }
496 delete iter; iter=0;
497
498 return result;
9e1ceb13 499}
500
501//_____________________________________________________________________________
502Bool_t AliCDBGrid::PutEntry(AliCDBEntry* entry) {
503// put an AliCDBEntry object into the database
62032124 504
9e1ceb13 505 AliCDBId& id = entry->GetId();
506
507 // set version for the entry to be stored
62032124 508 if (!PrepareId(id)) return kFALSE;
9e1ceb13 509
510 // build filename from entry's id
511 TString filename;
62032124 512 if (!IdToFilename(id, filename)) {
9e1ceb13 513 AliError("Bad ID encountered! Subnormal error!");
514 return kFALSE;
62032124 515 }
516
517 TString folderToTag = Form("%s%s",
518 fDBFolder.Data(),
519 id.GetPath().Data());
520
521 // add CDB and CDB_MD tag to folder
522 // TODO how to check that folder has already tags?
c3a7b59a 523 AddTag(folderToTag,"CDB");
524 AddTag(folderToTag,"CDB_MD");
9e1ceb13 525
9e1ceb13 526 TDirectory* saveDir = gDirectory;
527
62032124 528 // specify SE to filename
529 TString fullFilename = Form("/alien%s?se=%s", filename.Data(), fSE.Data());
530
9e1ceb13 531 // open file
62032124 532 TFile *file = TFile::Open(fullFilename,"CREATE");
9e1ceb13 533 if(!file || !file->IsWritable()){
62032124 534 AliError(Form("Can't open file <%s>!", filename.Data()));
9e1ceb13 535 if(file && !file->IsWritable()) file->Close(); delete file; file=0;
536 return kFALSE;
537 }
62032124 538
539 file->cd();
9e1ceb13 540
541 entry->SetVersion(id.GetVersion());
542
543 // write object (key name: "AliCDBEntry")
4005d0b5 544 Bool_t result = (entry->Write("AliCDBEntry") != 0);
62032124 545 if (!result) AliError(Form("Can't write entry to file <%s>!", filename.Data()));
9e1ceb13 546
547
548 if (saveDir) saveDir->cd(); else gROOT->cd();
549 file->Close(); delete file; file=0;
c3a7b59a 550
9e1ceb13 551 if(result) {
62032124 552 AliInfo(Form("CDB object stored into file %s", filename.Data()));
9e1ceb13 553 AliInfo(Form("using S.E. %s", fSE.Data()));
62032124 554
c3a7b59a 555 if(!TagFileId(filename, &id)){
556 AliInfo(Form("CDB tagging failed. Deleting file %s!",filename.Data()));
557 if(!gGrid->Rm(filename.Data()))
558 AliError("Can't delete file!");
559 return kFALSE;
560 }
561
562 TagFileMetaData(filename, entry->GetMetaData());
9e1ceb13 563 }
62032124 564
565 return result;
566}
567//_____________________________________________________________________________
568Bool_t AliCDBGrid::AddTag(TString& folderToTag, const char* tagname){
569// add "tagname" tag (CDB or CDB_MD) to folder where object will be stored
570
571 Bool_t result = kTRUE;
572 AliDebug(2, Form("adding %s tag to folder %s", tagname, folderToTag.Data()));
573 TString addTag = Form("addTag %s %s", folderToTag.Data(), tagname);
574 TGridResult *gridres = gGrid->Command(addTag.Data());
575 const char* resCode = gridres->GetKey(0,"__result__"); // '1' if success
576 if(resCode[0] != '1') {
577 AliError(Form("Couldn't add %s tags to folder %s !",
578 tagname, folderToTag.Data()));
579 result = kFALSE;
580 }
581 delete gridres;
9e1ceb13 582 return result;
583}
584
62032124 585//_____________________________________________________________________________
c3a7b59a 586Bool_t AliCDBGrid::TagFileId(TString& filename, const AliCDBId* id){
62032124 587// tag stored object in CDB table using object Id's parameters
588
f430a9ce 589 TString addTagValue1 = Form("addTagValue %s CDB ", filename.Data());
590 TString addTagValue2 = Form("first_run=%d last_run=%d version=%d ",
62032124 591 id->GetFirstRun(),
592 id->GetLastRun(),
593 id->GetVersion());
f430a9ce 594 TString addTagValue3 = Form("path_level_0=\"%s\" path_level_1=\"%s\" path_level_2=\"%s\"",
62032124 595 id->GetLevel0().Data(),
596 id->GetLevel1().Data(),
597 id->GetLevel2().Data());
598 TString addTagValue = Form("%s%s%s",
f430a9ce 599 addTagValue1.Data(),
600 addTagValue2.Data(),
601 addTagValue3.Data());
62032124 602
c3a7b59a 603 Bool_t result = kFALSE;
62032124 604 AliDebug(2, Form("Tagging file. Tag command: %s", addTagValue.Data()));
605 TGridResult* res = gGrid->Command(addTagValue.Data());
606 const char* resCode = res->GetKey(0,"__result__"); // '1' if success
607 if(resCode[0] != '1') {
c3a7b59a 608 AliError(Form("Couldn't add CDB tag value to file %s !",
62032124 609 filename.Data()));
c3a7b59a 610 result = kFALSE;
62032124 611 } else {
612 AliInfo("Object successfully tagged.");
c3a7b59a 613 result = kTRUE;
62032124 614 }
615 delete res;
c3a7b59a 616 return result;
62032124 617
618}
619
620//_____________________________________________________________________________
c3a7b59a 621Bool_t AliCDBGrid::TagFileMetaData(TString& filename, const AliCDBMetaData* md){
62032124 622// tag stored object in CDB table using object Id's parameters
623
f430a9ce 624 TString addTagValue1 = Form("addTagValue %s CDB_MD ", filename.Data());
625 TString addTagValue2 = Form("object_classname=\"%s\" responsible=\"%s\" beam_period=%d ",
62032124 626 md->GetObjectClassName(),
627 md->GetResponsible(),
628 md->GetBeamPeriod());
f430a9ce 629 TString addTagValue3 = Form("aliroot_version=\"%s\" comment=\"%s\"",
62032124 630 md->GetAliRootVersion(),
631 md->GetComment());
632 TString addTagValue = Form("%s%s%s",
f430a9ce 633 addTagValue1.Data(),
634 addTagValue2.Data(),
635 addTagValue3.Data());
62032124 636
c3a7b59a 637 Bool_t result = kFALSE;
62032124 638 AliDebug(2, Form("Tagging file. Tag command: %s", addTagValue.Data()));
639 TGridResult* res = gGrid->Command(addTagValue.Data());
640 const char* resCode = res->GetKey(0,"__result__"); // '1' if success
641 if(resCode[0] != '1') {
642 AliWarning(Form("Couldn't add CDB_MD tag value to file %s !",
643 filename.Data()));
c3a7b59a 644 result = kFALSE;
62032124 645 } else {
646 AliInfo("Object successfully tagged.");
c3a7b59a 647 result = kTRUE;
62032124 648 }
c3a7b59a 649 return result;
62032124 650}
651
b05400be 652//_____________________________________________________________________________
653TList* AliCDBGrid::GetIdListFromFile(const char* fileName){
6dc56e97 654
b05400be 655 TString turl(fileName);
656 turl.Prepend("/alien" + fDBFolder);
62032124 657 turl += "?se="; turl += fSE.Data();
b05400be 658 TFile *file = TFile::Open(turl);
659 if (!file) {
660 AliError(Form("Can't open selection file <%s>!", turl.Data()));
661 return NULL;
662 }
663
664 TList *list = new TList();
665 list->SetOwner();
666 int i=0;
667 TString keycycle;
62032124 668
b05400be 669 AliCDBId *id;
670 while(1){
671 i++;
672 keycycle = "AliCDBId;";
673 keycycle+=i;
674
675 id = (AliCDBId*) file->Get(keycycle);
676 if(!id) break;
677 list->AddFirst(id);
678 }
679 file->Close(); delete file; file=0;
680
681 return list;
682
683
684}
685
686//_____________________________________________________________________________
687Bool_t AliCDBGrid::Contains(const char* path) const{
688// check for path in storage's DBFolder
689
690 TString initDir(gGrid->Pwd(0));
691 TString dirName(fDBFolder);
692 dirName += path; // dirName = fDBFolder/path
693 Bool_t result=kFALSE;
694 if (gGrid->Cd(dirName,0)) result=kTRUE;
695 gGrid->Cd(initDir.Data(),0);
696 return result;
697}
698
62032124 699//_____________________________________________________________________________
700void AliCDBGrid::QueryValidFiles()
701{
702// Query the CDB for files valid for AliCDBStorage::fRun
703// fills list fValidFileIds with AliCDBId objects created from file name
704
705 TString filter;
6dc56e97 706 MakeQueryFilter(fRun, fRun, fMetaDataFilter, filter);
707
708 TString pattern = Form("%s/Run*", fPathFilter.GetPath().Data());
4005d0b5 709 if(fVersion >= 0) pattern += Form("_v%d*", fVersion);
6dc56e97 710 pattern += ".root";
711 AliDebug(2,Form("pattern: %s", pattern.Data()));
712
713 TGridResult *res = gGrid->Query(fDBFolder, pattern, filter, "");
62032124 714
62032124 715 AliCDBId validFileId;
716 for(int i=0; i<res->GetEntries(); i++){
717 TString filename = res->GetKey(i, "lfn");
c3a7b59a 718 if(filename == "") continue;
62032124 719 AliDebug(2,Form("Found valid file: %s", filename.Data()));
720 Bool_t result = FilenameToId(filename, validFileId);
721 if(result) {
722 fValidFileIds.AddLast(validFileId.Clone());
723 }
724 }
725 delete res;
726
727}
728
729//_____________________________________________________________________________
c3a7b59a 730void AliCDBGrid::MakeQueryFilter(Int_t firstRun, Int_t lastRun,
62032124 731 const AliCDBMetaData* md, TString& result) const
732{
733// create filter for file query
734
c3a7b59a 735 result = Form("CDB:first_run<=%d and CDB:last_run>=%d", firstRun, lastRun);
62032124 736
6dc56e97 737// if(version >= 0) {
738// result += Form(" and CDB:version=%d", version);
739// }
740// if(pathFilter.GetLevel0() != "*") {
741// result += Form(" and CDB:path_level_0=\"%s\"", pathFilter.GetLevel0().Data());
742// }
743// if(pathFilter.GetLevel1() != "*") {
744// result += Form(" and CDB:path_level_1=\"%s\"", pathFilter.GetLevel1().Data());
745// }
746// if(pathFilter.GetLevel2() != "*") {
747// result += Form(" and CDB:path_level_2=\"%s\"", pathFilter.GetLevel2().Data());
748// }
62032124 749
750 if(md){
751 if(md->GetObjectClassName()[0] != '\0') {
752 result += Form(" and CDB_MD:object_classname=\"%s\"", md->GetObjectClassName());
753 }
754 if(md->GetResponsible()[0] != '\0') {
755 result += Form(" and CDB_MD:responsible=\"%s\"", md->GetResponsible());
756 }
757 if(md->GetBeamPeriod() != 0) {
758 result += Form(" and CDB_MD:beam_period=%d", md->GetBeamPeriod());
759 }
760 if(md->GetAliRootVersion()[0] != '\0') {
761 result += Form(" and CDB_MD:aliroot_version=\"%s\"", md->GetAliRootVersion());
762 }
763 if(md->GetComment()[0] != '\0') {
764 result += Form(" and CDB_MD:comment=\"%s\"", md->GetComment());
765 }
766 }
767 AliDebug(2, Form("filter: %s",result.Data()));
768
769}
770
c3a7b59a 771//_____________________________________________________________________________
772Int_t AliCDBGrid::GetLatestVersion(const char* path, Int_t run){
773// get last version found in the database valid for run and path
774
6dc56e97 775 TObjArray validFileIds;
c3a7b59a 776 validFileIds.SetOwner(1);
777
778 AliCDBPath aCDBPath(path);
779 if(!aCDBPath.IsValid() || aCDBPath.IsWildcard()) {
780 AliError(Form("Invalid path in request: %s", path));
781 return -1;
782 }
783 AliCDBId query(path, run, run, -1, -1);
784 AliCDBId* dataId = 0;
785
786 // look for file matching query requests (path, runRange, version)
6dc56e97 787 if(run == fRun && fPathFilter.Comprises(aCDBPath) && fVersion < 0){
c3a7b59a 788 // look into list of valid files previously loaded with AliCDBStorage::FillValidFileIds()
789 AliDebug(2, Form("List of files valid for run %d and for path %s was loaded. Looking there!",
790 run, path));
791 dataId = GetId(fValidFileIds, query);
792 if (!dataId) return -1;
793 return dataId->GetVersion();
794
795 }
796 // List of files valid for reqested run was not loaded. Looking directly into CDB
797 AliDebug(2, Form("List of files valid for run %d and for path %s was not loaded. Looking directly into CDB!",
798 run, path));
799
800 TString filter;
6dc56e97 801 MakeQueryFilter(run, run, 0, filter);
802
803 TString pattern = Form("%s/Run*.root", path);
804 AliDebug(2,Form("pattern: %s", pattern.Data()));
c3a7b59a 805
6dc56e97 806 TGridResult *res = gGrid->Query(fDBFolder, pattern, filter, "");
c3a7b59a 807 AliCDBId validFileId;
808 for(int i=0; i<res->GetEntries(); i++){
809 TString filename = res->GetKey(i, "lfn");
810 if(filename == "") continue;
811 if(FilenameToId(filename, validFileId))
812 validFileIds.AddLast(validFileId.Clone());
813 }
814 delete res;
815
816 dataId = GetId(validFileIds, query);
817 if (!dataId) return -1;
818
819 return dataId->GetVersion();
820
821}
822
823//_____________________________________________________________________________
824Int_t AliCDBGrid::GetLatestSubVersion(const char* /*path*/, Int_t /*run*/, Int_t /*version*/){
825// get last subversion found in the database valid for run and path
826 AliError("Objects in GRID storage have no sub version!");
827 return -1;
828}
829
830
9e1ceb13 831/////////////////////////////////////////////////////////////////////////////////////////////////
832// //
833// AliCDBGrid factory //
834// //
835/////////////////////////////////////////////////////////////////////////////////////////////////
836
837ClassImp(AliCDBGridFactory)
838
839//_____________________________________________________________________________
840Bool_t AliCDBGridFactory::Validate(const char* gridString) {
841// check if the string is valid Grid URI
842
843 // pattern: alien://hostName:Port;user;dbPath;SE
844 // example of a valid pattern:
845 // "alien://aliendb4.cern.ch:9000;colla;DBTest;ALICE::CERN::Server"
b05400be 846// TRegexp gridPattern("^alien://.+:[0-9]+;[a-zA-Z0-9_-.]+;.+;.+$");
847 TRegexp gridPattern("^alien://.+$");
9e1ceb13 848
849 return TString(gridString).Contains(gridPattern);
850}
851
852//_____________________________________________________________________________
853AliCDBParam* AliCDBGridFactory::CreateParameter(const char* gridString) {
854// create AliCDBGridParam class from the URI string
855
856 if (!Validate(gridString)) {
857 return NULL;
858 }
b05400be 859 //TString buffer(gridString + sizeof("alien://") - 1);
860 TString buffer(gridString);
c3a7b59a 861
862 TString gridUrl = "alien://";
b05400be 863 TString user = "";
864 TString dbFolder = "DBGrid";
865 TString se = "ALICE::CERN::se01";
866
867 TObjArray *arr = buffer.Tokenize('?');
868 TIter iter(arr);
62032124 869 TObjString *str = 0;
9e1ceb13 870
b05400be 871 while((str = (TObjString*) iter.Next())){
872 TString entry(str->String());
873 Int_t indeq = entry.Index('=');
874 if(indeq == -1) {
875 if(entry.BeginsWith("alien://")) { // maybe it's a gridUrl!
876 gridUrl = entry;
877 continue;
878 } else {
879 AliError(Form("Invalid entry! %s",entry.Data()));
880 continue;
881 }
882 }
883
884 TString key = entry(0,indeq);
885 TString value = entry(indeq+1,entry.Length()-indeq);
886
887 if(key.Contains("grid",TString::kIgnoreCase)) {
888 gridUrl += value;
889 }
890 else if (key.Contains("user",TString::kIgnoreCase)){
891 user = value;
892 }
893 else if (key.Contains("folder",TString::kIgnoreCase)){
894 dbFolder = value;
895 }
896 else if (key.Contains("se",TString::kIgnoreCase)){
897 se = value;
898 }
899 else{
900 AliError(Form("Invalid entry! %s",entry.Data()));
901 }
902 }
903 delete arr; arr=0;
904
0f678e35 905 AliDebug(2, Form("gridUrl: %s",gridUrl.Data()));
906 AliDebug(2, Form("user: %s",user.Data()));
907 AliDebug(2, Form("dbFolder: %s",dbFolder.Data()));
908 AliDebug(2, Form("s.e.: %s",se.Data()));
9e1ceb13 909
62032124 910 return new AliCDBGridParam(gridUrl.Data(), user.Data(), dbFolder.Data(), se.Data());
9e1ceb13 911}
912
913//_____________________________________________________________________________
914AliCDBStorage* AliCDBGridFactory::Create(const AliCDBParam* param) {
915// create AliCDBGrid storage instance from parameters
916
62032124 917 AliCDBGrid *grid = 0;
9e1ceb13 918 if (AliCDBGridParam::Class() == param->IsA()) {
62032124 919
9e1ceb13 920 const AliCDBGridParam* gridParam = (const AliCDBGridParam*) param;
62032124 921 grid = new AliCDBGrid(gridParam->GridUrl().Data(),
922 gridParam->GetUser().Data(),
923 gridParam->GetDBFolder().Data(),
924 gridParam->GetSE().Data());
9e1ceb13 925
9e1ceb13 926 }
927
c3a7b59a 928 if(!gGrid && grid) {
929 delete grid; grid=0;
930 }
931
62032124 932 return grid;
9e1ceb13 933}
934
935/////////////////////////////////////////////////////////////////////////////////////////////////
936// //
937// AliCDBGrid Parameter class // //
938// //
939/////////////////////////////////////////////////////////////////////////////////////////////////
940
941ClassImp(AliCDBGridParam)
942
943//_____________________________________________________________________________
62032124 944AliCDBGridParam::AliCDBGridParam():
945 AliCDBParam(),
946 fGridUrl(),
947 fUser(),
948 fDBFolder(),
949 fSE()
950 {
9e1ceb13 951// default constructor
952
953}
954
955//_____________________________________________________________________________
b05400be 956AliCDBGridParam::AliCDBGridParam(const char* gridUrl,
62032124 957 const char* user,
b05400be 958 const char* dbFolder,
9e1ceb13 959 const char* se):
62032124 960 AliCDBParam(),
b05400be 961 fGridUrl(gridUrl),
9e1ceb13 962 fUser(user),
b05400be 963 fDBFolder(dbFolder),
9e1ceb13 964 fSE(se)
965{
966// constructor
967
968 SetType("alien");
969
62032124 970 TString uri = Form("%s?User=%s?DBFolder=%s?SE=%s",
971 fGridUrl.Data(), fUser.Data(),
972 fDBFolder.Data(), fSE.Data());
973
974 SetURI(uri.Data());
9e1ceb13 975}
976
977//_____________________________________________________________________________
978AliCDBGridParam::~AliCDBGridParam() {
979// destructor
980
981}
982
983//_____________________________________________________________________________
984AliCDBParam* AliCDBGridParam::CloneParam() const {
985// clone parameter
986
62032124 987 return new AliCDBGridParam(fGridUrl.Data(), fUser.Data(),
988 fDBFolder.Data(), fSE.Data());
9e1ceb13 989}
990
991//_____________________________________________________________________________
992ULong_t AliCDBGridParam::Hash() const {
993// return Hash function
994
b05400be 995 return fGridUrl.Hash()+fUser.Hash()+fDBFolder.Hash()+fSE.Hash();
9e1ceb13 996}
997
998//_____________________________________________________________________________
999Bool_t AliCDBGridParam::IsEqual(const TObject* obj) const {
1000// check if this object is equal to AliCDBParam obj
1001
1002 if (this == obj) {
1003 return kTRUE;
1004 }
1005
1006 if (AliCDBGridParam::Class() != obj->IsA()) {
1007 return kFALSE;
1008 }
1009
1010 AliCDBGridParam* other = (AliCDBGridParam*) obj;
1011
b05400be 1012 if(fGridUrl != other->fGridUrl) return kFALSE;
9e1ceb13 1013 if(fUser != other->fUser) return kFALSE;
b05400be 1014 if(fDBFolder != other->fDBFolder) return kFALSE;
9e1ceb13 1015 if(fSE != other->fSE) return kFALSE;
1016 return kTRUE;
1017}
1018