71 if (!initMotherDir) initMotherDir =
gDirectory;
73 if (strchr(
name,
'/')) {
74 ::Error(
"TDirectory::TDirectory",
"directory name (%s) cannot contain a slash",
name);
79 ::Error(
"TDirectory::TDirectory",
"directory name cannot be \"\"");
99 Fatal(
"~TDirectory",
"In %s:%p the fList (%p) is not using the RWLock\n",
114 Info(
"~TDirectory",
"dtor called for %s",
GetName());
136 fActiveDestructor =
true;
140 (*fDirectory).UnregisterContext(
this);
151 fActiveDestructor =
false;
152 while(fDirectoryWait);
192 if (!obj || !
fList)
return;
197 Warning(
"Append",
"Replacing existing %s: %s (Potential memory leak).",
224 while ((obj = nextin())) {
246 if (motherDir && strlen(
GetName()) != 0) motherDir->
Append(
this);
254 std::vector<TContext*> extraWait;
264 ctxt->fDirectory =
nullptr;
266 if (ctxt->fActiveDestructor) {
269 ctxt->fDirectoryWait =
false;
274 for(
auto &&context : extraWait) {
277 while(context->fActiveDestructor);
283 if (cursav && cursav !=
this) {
312 void *args[] = { &mode, &size };
314 creator(0,2,args,&result);
331 char *pobj = (
char*)obj->IsA()->New();
333 Fatal(
"CloneObject",
"Failed to create new object");
338 if (baseOffset==-1) {
342 Fatal(
"CloneObject",
"Incorrect detection of the inheritance from TObject for class %s.\n",
352 Fatal(
"CloneObject",
"Not able to create a TBuffer!");
356 const_cast<TObject*
>(obj)->Streamer(*buffer);
363 newobj->Streamer(*buffer);
382 static TDirectory *currentDirectory =
nullptr;
384 return currentDirectory;
401 Bool_t printError,
const char *funcname)
404 if (apath) nch = strlen(apath);
409 if (funcname==0 || strlen(funcname)==0) funcname =
"GetDirectory";
413 char *path =
new char[nch+1]; path[0] = 0;
414 if (nch) strlcpy(path,apath,nch+1);
415 char *
s = (
char*)strrchr(path,
':');
424 if (
s && *(
s+1)) result =
f->GetDirectory(
s+1,printError,funcname);
425 delete [] path;
return result;
427 if (printError)
Error(funcname,
"No such file %s", path);
428 delete [] path;
return nullptr;
433 if (path[0] ==
'/') {
436 delete [] path;
return result;
440 char *
slash = (
char*)strchr(path,
'/');
442 if (!strcmp(path,
"..")) {
444 delete [] path;
return result;
448 if (printError)
Error(funcname,
"Unknown directory %s", path);
449 delete [] path;
return nullptr;
454 if (printError)
Error(funcname,
"Object %s is not a directory", path);
455 delete [] path;
return nullptr;
461 slash = (
char*)strchr(subdir.
Data(),
'/');
464 if (!strcmp(subdir,
"..")) {
468 delete [] path;
return result;
472 if (printError)
Error(funcname,
"Unknown directory %s", subdir.
Data());
473 delete [] path;
return nullptr;
478 if (printError)
Error(funcname,
"Object %s is not a directory", subdir.
Data());
479 delete [] path;
return nullptr;
482 delete [] path;
return result;
518 if (apath) nch = strlen(apath);
558 if (apath) nch = strlen(apath);
559 if (!nch)
return kTRUE;
654 Info(
"Delete",
"Call for this = %s namecycle = %s",
655 GetName(), (namecycle ? namecycle :
"null"));
663 Int_t deletetree = 0;
664 if(strcmp(
name,
"*") == 0) deleteall = 1;
665 if(strcmp(
name,
"*T") == 0){ deleteall = 1; deletetree = 1;}
666 if(strcmp(
name,
"T*") == 0){ deleteall = 1; deletetree = 1;}
667 if(namecycle==0 || !namecycle[0]){ deleteall = 1; deletetree = 1;}
674 if (cycle >= 9999 ) {
677 while ((idcur = (
TNamed *) next())) {
680 if (deleteall ||
s.Index(re) !=
kNPOS) {
684 if (!deletetree && deleteall) deleteOK = 0;
693 idcur->
Delete(deletetree ?
"T*;*" :
"*");
743 while( (obj = next()) ) {
746 TObject *subobj = subdir->TDirectory::FindObjectAny(aname);
813 for (
Int_t i = nch-1; i > 0; i--) {
814 if (
name[i] ==
'/') {
817 namobj =
name + i + 1;
819 return dirToSearch ? dirToSearch->
Get(namobj) :
nullptr;
827 if (idcur==
this && strlen(namobj)!=0) {
832 }
else if (cycle == 9999) {
905 for (
Int_t i = nch-1; i > 0; i--) {
906 if (
name[i] ==
'/') {
909 namobj =
name + i + 1;
921 if (!expectedClass || expectedClass->
IsTObject()) {
924 if (objcur==
this && strlen(namobj)!=0) {
929 }
else if (cycle == 9999) {
931 if (expectedClass && objcur->IsA()->GetBaseClassOffset(expectedClass) == -1)
return nullptr;
951 static char *path =
nullptr;
952 const int kMAXDEPTH = 128;
955 int depth = 0, len = 0;
958 len = strlen(cur->
GetName()) + 1;
960 while (cur->
fMother && depth < kMAXDEPTH) {
963 len += strlen(cur->
GetName()) + 1;
966 if (path)
delete [] path;
967 path =
new char[len+2];
969 for (
int i = depth-1; i >= 0; i--) {
971 strlcpy(path,
d[i]->
GetName(),len+2);
972 strlcat(path,
":",len+2);
973 if (i == 0) strlcat(path,
"/",len+2);
975 strlcat(path,
"/",len+2);
976 strlcat(path,
d[i]->
GetName(),len+2);
1043 if (returnExistingDirectory) {
1048 if (!
name || !title || !
name[0])
return nullptr;
1049 if (!title[0]) title =
name;
1051 if (
const char *
slash = strchr(
name,
'/')) {
1053 char *workname =
new char[size+1];
1054 strncpy(workname,
name, size);
1059 tmpdir =
mkdir(workname,title);
1060 if (!tmpdir)
return nullptr;
1063 if (!tmpdir)
return nullptr;
1064 if (!newdir) newdir = tmpdir;
1100 reg = opt(2,opt.
Length());
1104 reg = opt(2,opt.
Length());
1105 }
else if (!opt.
IsNull())
1113 while ((obj = (
TObject *) nextobj())) {
1115 if (
s.Index(re) ==
kNPOS)
continue;
1174 if ((
name==0) || (*
name==0))
return;
1198 if (!filename || !filename[0]) {
1202 if (fname.
Index(
".json") > 0) {
1204 nbytes =
gROOT->ProcessLine(cmd);
1206 cmd.
Form(
"TFile::Open(\"%s\",\"recreate\");",fname.
Data());
1209 if (!local)
return 0;
1210 nbytes = obj->
Write();
1240 strcpy(buffer,
name);
1242 sprintf(buffer,
"%s;%d",
name, cycle);
1251 const size_t namesize)
1254 const char *ni = strchr(buffer,
';');
1262 len = strlen(buffer);
1267 if (len > namesize-1ul) len = namesize-1;
1269 ::Warning(
"TDirectory::DecodeNameCycle",
1270 "Using unsafe version: invoke this metod by specifying the buffer size");
1273 strncpy(
name, buffer, len);
1278 else if (isdigit(*ni)) {
1279 long parsed = strtol(ni,
nullptr,10);
1280 if (parsed >= (
long) std::numeric_limits<Short_t>::max())
1296 while(current->
fNext) {
1297 current = current->
fNext;
1299 current->
fNext = ctxt;
1311 const char *objname =
"no name specified";
1313 else if (obj) objname = obj->
GetName();
1314 Error(
"WriteTObject",
"The current directory (%s) is not associated with a file. The object (%s) has not been written.",
GetName(),objname);
1343void TDirectory::Streamer(
TBuffer &R__b)
1350 TNamed::Streamer(R__b);
1354 fUUID.Streamer(R__b);
1358 TNamed::Streamer(R__b);
1361 fUUID.Streamer(R__b);
void(* tcling_callfunc_Wrapper_t)(void *, int, void **, void *)
static TBuffer * R__CreateBuffer()
Fast execution of 'new TBufferFile(TBuffer::kWrite,10000), without having a compile time circular dep...
R__EXTERN TVirtualMutex * gROOTMutex
void Printf(const char *fmt,...)
typedef void((*Func_t)())
R__EXTERN TSystem * gSystem
R__EXTERN void **(* gThreadTsd)(void *, Int_t)
#define R__LOCKGUARD(mutex)
A spin mutex-as-code-guard class.
Using a TBrowser one can browse all ROOT objects.
Buffer base class used for serializing objects.
virtual void SetByteCount(UInt_t cntpos, Bool_t packInVersion=kFALSE)=0
virtual Version_t ReadVersion(UInt_t *start=0, UInt_t *bcnt=0, const TClass *cl=0)=0
virtual Int_t CheckByteCount(UInt_t startpos, UInt_t bcnt, const TClass *clss)=0
virtual void ResetMap()=0
void SetBufferOffset(Int_t offset=0)
void SetReadMode()
Set buffer in read mode.
virtual UInt_t WriteVersion(const TClass *cl, Bool_t useBcnt=kFALSE)=0
virtual void MapObject(const TObject *obj, UInt_t offset=1)=0
TClass instances represent classes, structs and namespaces in the ROOT type system.
Bool_t IsTObject() const
Return kTRUE is the class inherits from TObject.
static TClass * GetClass(const char *name, Bool_t load=kTRUE, Bool_t silent=kFALSE)
Static method returning pointer to TClass of the specified class name.
virtual bool UseRWLock()
Set this collection to use a RW lock upon access, making it thread safe.
R__ALWAYS_INLINE Bool_t IsUsingRWLock() const
Small helper to keep current directory context.
std::atomic< bool > fDirectoryWait
Set to true during the destructor execution.
void CdNull()
Set the current directory to null.
TContext * fPrevious
Set to true if a TDirectory might still access this object.
TContext * fNext
Pointer to the next TContext in the implied list of context pointing to fPrevious.
std::atomic< TDirectory * > fDirectory
Describe directory structure in memory.
Bool_t cd1(const char *path)
flag to add histograms, graphs,etc to the directory
void Delete(const char *namecycle="") override
Delete Objects or/and keys in a directory.
virtual void Close(Option_t *option="")
Delete all objects from memory and directory structure itself.
virtual TList * GetList() const
virtual TDirectory * GetDirectory(const char *namecycle, Bool_t printError=false, const char *funcname="GetDirectory")
Find a directory using apath.
virtual const char * GetPath() const
Returns the full path of the directory.
std::atomic_flag fSpinLock
Counter delaying the TDirectory destructor from finishing.
virtual TObject * Get(const char *namecycle)
Return pointer to object identified by namecycle.
virtual void * GetObjectUnchecked(const char *namecycle)
Return pointer to object identified by namecycle.
void Draw(Option_t *option="") override
Fill Graphics Structure and Paint.
virtual void DeleteAll(Option_t *option="")
Delete all objects from memory.
static TDirectory *& CurrentDirectory()
Return the current directory for the current thread.
virtual void rmdir(const char *name)
Removes subdirectory from the directory When directory is deleted, all keys in all subdirectories wil...
static Bool_t AddDirectoryStatus()
Static function: see TDirectory::AddDirectory for more comments.
void FillFullPath(TString &buf) const
Recursive method to fill full path for directory.
static void AddDirectory(Bool_t add=kTRUE)
Sets the flag controlling the automatic add objects like histograms, TGraph2D, etc in memory.
void CleanTargets()
Clean the pointers to this object (gDirectory, TContext, etc.).
void ls(Option_t *option="") const override
List Directory contents.
TContext * fContext
Buffer for GetPath() function.
virtual void Append(TObject *obj, Bool_t replace=kFALSE)
Append object to this directory.
TDirectory()
Directory default constructor.
static void DecodeNameCycle(const char *namecycle, char *name, Short_t &cycle, const size_t namesize=0)
Decode a namecycle "aap;2" into name "aap" and cycle "2".
static Bool_t Cd(const char *path)
Change current directory to "path".
void Clear(Option_t *option="") override
Delete all objects from a Directory list.
virtual Int_t WriteTObject(const TObject *obj, const char *name=nullptr, Option_t *="", Int_t=0)
See TDirectoryFile::WriteTObject for details.
virtual TFile * GetFile() const
TObject * FindObject(const char *name) const override
Find object by name in the list of memory objects.
void Print(Option_t *option="") const override
Print all objects in the directory.
virtual ~TDirectory()
Destructor.
static Bool_t Cd1(const char *path)
Change current directory to "path".
void UnregisterContext(TContext *ctxt)
UnRegister a TContext pointing to this TDirectory object.
void RecursiveRemove(TObject *obj) override
Recursively remove object from a Directory.
virtual Int_t SaveObjectAs(const TObject *, const char *="", Option_t *="") const
Save object in filename, if filename is 0 or "", a file with "objectname.root" is created.
virtual TDirectory * mkdir(const char *name, const char *title="", Bool_t returnExistingDirectory=kFALSE)
Create a sub-directory "a" or a hierarchy of sub-directories "a/b/c/...".
void SetName(const char *newname) override
Set the name for directory If the directory name is changed after the directory was written once,...
void BuildDirectory(TFile *motherFile, TDirectory *motherDir)
Initialise directory to defaults.
static Bool_t fgAddDirectory
MSVC doesn't support = ATOMIC_FLAG_INIT;.
TDirectory * GetMotherDir() const
static void EncodeNameCycle(char *buffer, const char *name, Short_t cycle)
Encode the name and cycle into buffer like: "aap;2".
virtual const char * GetPathStatic() const
Returns the full path of the directory.
void Browse(TBrowser *b) override
Browse the content of the directory.
void GetObject(const char *namecycle, T *&ptr)
virtual void pwd() const
Print the path of the directory.
virtual void * GetObjectChecked(const char *namecycle, const char *classname)
See documentation of TDirectory::GetObjectCheck(const char *namecycle, const TClass *cl)
virtual TObject * CloneObject(const TObject *obj, Bool_t autoadd=kTRUE)
Clone an object.
virtual TObject * Remove(TObject *)
Remove an object from the in-memory list.
void RegisterContext(TContext *ctxt)
Register a TContext pointing to this TDirectory object.
virtual Bool_t cd(const char *path=nullptr)
Change current directory to "this" directory.
void Paint(Option_t *option="") override
Paint all objects in the directory.
virtual TObject * FindObjectAny(const char *name) const
Find object by name in the list of memory objects of the current directory or its sub-directories.
A ROOT file is a suite of consecutive data records (TKey instances) with a well defined format.
THashList implements a hybrid collection class consisting of a hash table and a list to store TObject...
virtual void Add(TObject *obj)
virtual TObject * Remove(TObject *obj)
Remove object from the list.
virtual TObject * FindObject(const char *name) const
Find an object in this list using its name.
virtual TObjLink * FirstLink() const
virtual void RecursiveRemove(TObject *obj)
Remove object from this collection and recursively remove the object from all other objects (and coll...
virtual void Delete(Option_t *option="")
Remove all objects from the list AND delete all heap based objects.
virtual void Clear(Option_t *option="")
Remove all objects from the list.
Each ROOT class (see TClass) has a linked list of methods.
The TNamed class is the base class for all named ROOT classes.
virtual void SetName(const char *name)
Set the name of the TNamed.
virtual const char * GetName() const
Returns name of object.
Wrapper around a TObject so it can be stored in a TList.
TObject * GetObject() const
Mother of all ROOT objects.
virtual Int_t Write(const char *name=0, Int_t option=0, Int_t bufsize=0)
Write this object to the current directory.
virtual const char * GetName() const
Returns name of object.
virtual void Warning(const char *method, const char *msgfmt,...) const
Issue warning message.
virtual void Delete(Option_t *option="")
Delete this object.
void SetBit(UInt_t f, Bool_t set)
Set or unset the user status bits as specified in f.
virtual Bool_t InheritsFrom(const char *classname) const
Returns kTRUE if object inherits from class "classname".
virtual void Error(const char *method, const char *msgfmt,...) const
Issue error message.
virtual void Fatal(const char *method, const char *msgfmt,...) const
Issue fatal error message.
virtual void ls(Option_t *option="") const
The ls function lists the contents of a class on stdout.
@ kCanDelete
if object in a list can be deleted
@ kIsReferenced
if object is referenced by a TRef or TRefArray
@ kMustCleanup
if object destructor must call RecursiveRemove()
virtual void Info(const char *method, const char *msgfmt,...) const
Issue info message.
static Int_t IncreaseDirLevel()
Increase the indentation level for ls().
static void IndentLevel()
Functions used by ls() to indent an object hierarchy.
static Int_t DecreaseDirLevel()
Decrease the indentation level for ls().
Regular expression class.
static TString LLtoa(Long64_t value, Int_t base)
Converts a Long64_t to a TString with respect to the base specified (2-36).
void ToLower()
Change string to lower-case.
TSubString Strip(EStripType s=kTrailing, char c=' ') const
Return a substring of self stripped at beginning and/or end.
const char * Data() const
Bool_t BeginsWith(const char *s, ECaseCompare cmp=kExact) const
TString & Append(const char *cs)
void Form(const char *fmt,...)
Formats a string using a printf style format descriptor.
Bool_t Contains(const char *pat, ECaseCompare cmp=kExact) const
Ssiz_t Index(const char *pat, Ssiz_t i=0, ECaseCompare cmp=kExact) const
virtual Bool_t AccessPathName(const char *path, EAccessMode mode=kFileExists)
Returns FALSE if one can access a file using the specified access mode.
void(* DirAutoAdd_t)(void *, TDirectory *)
static constexpr double s