38 thread_local std::atomic_flag gDirectory_lock = ATOMIC_FLAG_INIT;
39 return &gDirectory_lock;
78 if (!initMotherDir) initMotherDir =
gDirectory;
80 if (strchr(
name,
'/')) {
81 ::Error(
"TDirectory::TDirectory",
"directory name (%s) cannot contain a slash",
name);
86 ::Error(
"TDirectory::TDirectory",
"directory name cannot be \"\"");
108 Fatal(
"~TDirectory",
"In %s:%p the fList (%p) is not using the RWLock\n",
123 Info(
"~TDirectory",
"dtor called for %s",
GetName());
145 fActiveDestructor =
true;
149 (*fDirectory).UnregisterContext(
this);
160 fActiveDestructor =
false;
161 while(fDirectoryWait);
201 if (!obj || !
fList)
return;
206 Warning(
"Append",
"Replacing existing %s: %s (Potential memory leak).",
236 while ((obj = nextin())) {
258 if (motherDir && strlen(
GetName()) != 0) motherDir->
Append(
this);
266 std::vector<TContext*> extraWait;
281 ctxt->fDirectory =
nullptr;
283 if (ctxt->fActiveDestructor) {
286 ctxt->fDirectoryWait =
false;
298 if (ptr->load() ==
this) {
300 if (!next || next ==
this) {
314 ptr->compare_exchange_strong(This, next);
318 for(
auto &&context : extraWait) {
321 while(context->fActiveDestructor);
323 context->fDirectoryWait =
false;
350 creator(
nullptr,2,args,&
result);
367 char *pobj = (
char*)obj->
IsA()->
New();
369 Fatal(
"CloneObject",
"Failed to create new object");
374 if (baseOffset==-1) {
378 Fatal(
"CloneObject",
"Incorrect detection of the inheritance from TObject for class %s.\n",
388 Fatal(
"CloneObject",
"Not able to create a TBuffer!");
423 thread_local shared_ptr_type currentDirectory =
426 return currentDirectory;
449 Bool_t printError,
const char *funcname)
452 if (apath) nch = strlen(apath);
457 if (funcname==
nullptr || strlen(funcname)==0) funcname =
"GetDirectory";
461 char *path =
new char[nch+1]; path[0] = 0;
462 if (nch) strlcpy(path,apath,nch+1);
463 char *s = (
char*)strrchr(path,
':');
472 if (s && *(s+1))
result =
f->GetDirectory(s+1,printError,funcname);
473 delete [] path;
return result;
475 if (printError)
Error(funcname,
"No such file %s", path);
476 delete [] path;
return nullptr;
481 if (path[0] ==
'/') {
484 delete [] path;
return result;
488 char *
slash = (
char*)strchr(path,
'/');
490 if (!strcmp(path,
"..")) {
492 delete [] path;
return result;
496 if (printError)
Error(funcname,
"Unknown directory %s", path);
497 delete [] path;
return nullptr;
502 if (printError)
Error(funcname,
"Object %s is not a directory", path);
503 delete [] path;
return nullptr;
509 slash = (
char*)strchr(subdir.
Data(),
'/');
512 if (!strcmp(subdir,
"..")) {
516 delete [] path;
return result;
520 if (printError)
Error(funcname,
"Unknown directory %s", subdir.
Data());
521 delete [] path;
return nullptr;
526 if (printError)
Error(funcname,
"Object %s is not a directory", subdir.
Data());
527 delete [] path;
return nullptr;
530 delete [] path;
return result;
544 thread_local_gdirectory->exchange(
this);
583 if (!apath || !apath[0])
620 if (!apath || !apath[0])
715 Info(
"Delete",
"Call for this = %s namecycle = %s",
716 GetName(), (namecycle ? namecycle :
"null"));
724 Int_t deletetree = 0;
725 if(strcmp(
name,
"*") == 0) deleteall = 1;
726 if(strcmp(
name,
"*T") == 0){ deleteall = 1; deletetree = 1;}
727 if(strcmp(
name,
"T*") == 0){ deleteall = 1; deletetree = 1;}
728 if(namecycle==
nullptr || !namecycle[0]){ deleteall = 1; deletetree = 1;}
735 if (
cycle >= 9999 ) {
738 while ((idcur = (
TNamed *) next())) {
745 if (!deletetree && deleteall) deleteOK = 0;
754 idcur->
Delete(deletetree ?
"T*;*" :
"*");
804 while( (obj = next()) ) {
807 TObject *subobj = subdir->TDirectory::FindObjectAny(aname);
874 for (
Int_t i = nch-1; i > 0; i--) {
875 if (
name[i] ==
'/') {
878 namobj =
name + i + 1;
880 return dirToSearch ? dirToSearch->
Get(namobj) :
nullptr;
888 if (idcur==
this && strlen(namobj)!=0) {
893 }
else if (
cycle == 9999) {
966 for (
Int_t i = nch-1; i > 0; i--) {
967 if (
name[i] ==
'/') {
970 namobj =
name + i + 1;
982 if (!expectedClass || expectedClass->
IsTObject()) {
985 if (objcur==
this && strlen(namobj)!=0) {
990 }
else if (
cycle == 9999) {
1012 static char *path =
nullptr;
1013 const int kMAXDEPTH = 128;
1016 int depth = 0,
len = 0;
1021 while (cur->
fMother && depth < kMAXDEPTH) {
1027 if (path)
delete [] path;
1028 path =
new char[
len+2];
1030 for (
int i = depth-1; i >= 0; i--) {
1033 strlcat(path,
":",
len+2);
1034 if (i == 0) strlcat(path,
"/",
len+2);
1036 strlcat(path,
"/",
len+2);
1104 if (returnExistingDirectory) {
1109 if (!
name || !title || !
name[0])
return nullptr;
1110 if (!title[0]) title =
name;
1111 if (
const char *
slash = strchr(
name,
'/')) {
1113 char *workname =
new char[
size+1];
1119 tmpdir =
mkdir(workname,title);
1121 if (!tmpdir)
return nullptr;
1159 }
else if (!opt.
IsNull())
1167 while ((obj = (
TObject *) nextobj())) {
1229 if ((
name==
nullptr) || (*
name==0))
return;
1257 if (fname.
Index(
".json") > 0) {
1259 nbytes =
gROOT->ProcessLine(cmd);
1261 cmd.
Form(
"TFile::Open(\"%s\",\"recreate\");",fname.
Data());
1264 if (!local)
return 0;
1265 nbytes = obj->
Write();
1293void TDirectory::EncodeNameCycle(
char *buffer,
const char *
name,
Short_t cycle)
1296 strcpy(buffer,
name);
1302 size_t unsafeSize = strlen(
name) + std::to_string(
cycle).length() + 1;
1317 const size_t namesize)
1325 const char *ni = strchr(buffer,
';');
1333 len = strlen(buffer);
1338 if (
len > namesize-1ul)
len = namesize-1;
1340 ::Warning(
"TDirectory::DecodeNameCycle",
1341 "Using unsafe version: invoke this method by specifying the buffer size");
1349 else if (isdigit(*ni)) {
1350 long parsed = strtol(ni,
nullptr,10);
1351 if (parsed >= (
long) std::numeric_limits<Short_t>::max())
1369 if (!current || !current->
IsBuilt())
1387 while(current->
fNext) {
1388 current = current->
fNext;
1390 current->
fNext = ctxt;
1417 const char *objname =
"no name specified";
1419 else if (obj) objname = obj->
GetName();
1420 Error(
"WriteTObject",
"The current directory (%s) is not associated with a file. The object (%s) has not been written.",
GetName(),objname);
size_t size(const MatrixT &matrix)
retrieve the size of a square matrix
void(* tcling_callfunc_Wrapper_t)(void *, int, void **, void *)
static std::atomic_flag * GetCurrentDirectoryLock()
static TBuffer * R__CreateBuffer()
Fast execution of 'new TBufferFile(TBuffer::kWrite,10000), without having a compile time circular dep...
winID h TVirtualViewer3D TVirtualGLPainter p
Option_t Option_t TPoint TPoint const char GetTextMagnitude GetFillStyle GetLineColor GetLineWidth GetMarkerStyle GetTextAlign GetTextColor GetTextSize void char Point_t Rectangle_t WindowAttributes_t Float_t Float_t Float_t Int_t Int_t UInt_t UInt_t Rectangle_t mask
Option_t Option_t TPoint TPoint const char GetTextMagnitude GetFillStyle GetLineColor GetLineWidth GetMarkerStyle GetTextAlign GetTextColor GetTextSize void char Point_t Rectangle_t WindowAttributes_t Float_t Float_t Float_t Int_t Int_t UInt_t UInt_t Rectangle_t Int_t Int_t Window_t TString Int_t GCValues_t GetPrimarySelectionOwner GetDisplay GetScreen GetColormap GetNativeEvent const char const char dpyName wid window const char font_name cursor keysym reg const char only_if_exist regb h Point_t winding char text const char depth char const char Int_t count const char ColorStruct_t color const char filename
Option_t Option_t TPoint TPoint const char GetTextMagnitude GetFillStyle GetLineColor GetLineWidth GetMarkerStyle GetTextAlign GetTextColor GetTextSize void char Point_t Rectangle_t WindowAttributes_t Float_t Float_t Float_t Int_t Int_t UInt_t UInt_t Rectangle_t result
Option_t Option_t TPoint TPoint const char GetTextMagnitude GetFillStyle GetLineColor GetLineWidth GetMarkerStyle GetTextAlign GetTextColor GetTextSize void char Point_t Rectangle_t WindowAttributes_t Float_t Float_t Float_t Int_t Int_t UInt_t UInt_t Rectangle_t Int_t Int_t Window_t TString Int_t GCValues_t GetPrimarySelectionOwner GetDisplay GetScreen GetColormap GetNativeEvent const char const char dpyName wid window const char font_name cursor keysym reg const char only_if_exist regb h Point_t winding char text const char depth char const char Int_t count const char ColorStruct_t color const char Pixmap_t Pixmap_t PictureAttributes_t attr const char char ret_data h unsigned char height h Atom_t Int_t ULong_t ULong_t unsigned char prop_list Atom_t Atom_t Atom_t Time_t UChar_t len
Option_t Option_t TPoint TPoint const char mode
Option_t Option_t TPoint TPoint const char GetTextMagnitude GetFillStyle GetLineColor GetLineWidth GetMarkerStyle GetTextAlign GetTextColor GetTextSize void reg
R__EXTERN TVirtualMutex * gROOTMutex
void Printf(const char *fmt,...)
Formats a string in a circular formatting buffer and prints the string.
R__EXTERN TSystem * gSystem
#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 Version_t ReadVersion(UInt_t *start=nullptr, UInt_t *bcnt=nullptr, const TClass *cl=nullptr)=0
virtual void SetByteCount(UInt_t cntpos, Bool_t packInVersion=kFALSE)=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.
void * New(ENewType defConstructor=kClassNew, Bool_t quiet=kFALSE) const
Return a pointer to a newly allocated object of this class.
ROOT::DirAutoAdd_t GetDirectoryAutoAdd() const
Return the wrapper around the directory auto add function.
Bool_t IsTObject() const
Return kTRUE is the class inherits from TObject.
Bool_t InheritsFrom(const char *cl) const override
Return kTRUE if this class inherits from a class with name "classname".
Int_t GetBaseClassOffset(const TClass *toBase, void *address=nullptr, bool isDerivedObject=true)
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(Bool_t enable=true)
Set this collection to use a RW lock upon access, making it thread safe.
R__ALWAYS_INLINE Bool_t IsUsingRWLock() const
TDirectory::TContext keeps track and restore the current directory.
std::atomic< bool > fDirectoryWait
Set to true during the destructor execution.
void RegisterCurrentDirectory()
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.
std::shared_ptr< std::atomic< TDirectory * > > SharedGDirectory_t
Pointer to a list of TContext object pointing to this TDirectory.
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.
std::atomic< size_t > fContextPeg
thread local gDirectory pointing to this object.
std::vector< SharedGDirectory_t > fGDirectories
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.
void RegisterGDirectory(SharedGDirectory_t &ptr)
Register a std::atomic<TDirectory*> that will soon be pointing to this TDirectory object.
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)
Write an object with proper type checking.
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 Bool_t cd()
Change current directory to "this" 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 Streamer(TBuffer &) override
TDirectory Streamer.
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 SharedGDirectory_t & GetSharedLocalCurrentDirectory()
Return the (address of) a shared pointer to the struct holding the actual thread local gDirectory poi...
static Bool_t fgAddDirectory
MSVC doesn't support = ATOMIC_FLAG_INIT;.
TDirectory * GetMotherDir() const
virtual const char * GetPathStatic() const
Returns the full path of the directory.
static std::atomic< TDirectory * > & CurrentDirectory()
Return the current directory for the current thread.
TClass * IsA() const override
void Browse(TBrowser *b) override
Browse the content of the directory.
void GetObject(const char *namecycle, T *&ptr)
Get an object with proper type checking.
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.
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...
void Clear(Option_t *option="") override
Remove all objects from the list.
TObject * FindObject(const char *name) const override
Find an object in this list using its name.
void RecursiveRemove(TObject *obj) override
Remove object from this collection and recursively remove the object from all other objects (and coll...
void Add(TObject *obj) override
TObject * Remove(TObject *obj) override
Remove object from the list.
virtual TObjLink * FirstLink() const
void Delete(Option_t *option="") override
Remove all objects from the list AND delete all heap based objects.
Each ROOT class (see TClass) has a linked list of methods.
The TNamed class is the base class for all named ROOT classes.
const char * GetName() const override
Returns name of object.
void Streamer(TBuffer &) override
Stream an object of class TObject.
virtual void SetName(const char *name)
Set the name of the TNamed.
TClass * IsA() const override
Wrapper around a TObject so it can be stored in a TList.
TObject * GetObject() const
Mother of all ROOT objects.
virtual const char * GetName() const
Returns name of object.
virtual void Streamer(TBuffer &)
Stream an object of class TObject.
virtual void Warning(const char *method, const char *msgfmt,...) const
Issue warning message.
virtual Int_t Write(const char *name=nullptr, Int_t option=0, Int_t bufsize=0)
Write this object to the current directory.
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 TClass * IsA() const
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.
virtual void Streamer(TBuffer &)
R__EXTERN TROOT * gROOTLocal
void(* DirAutoAdd_t)(void *, TDirectory *)