Rtypes.h

Go to the documentation of this file.

/* @(#)root/base:$Id$ */
 
/*************************************************************************
 * Copyright (C) 1995-2014, Rene Brun and Fons Rademakers.               *
 * All rights reserved.                                                  *
 *                                                                       *
 * For the licensing terms see $ROOTSYS/LICENSE.                         *
 * For the list of contributors see $ROOTSYS/README/CREDITS.             *
 *************************************************************************/
 
#ifndef ROOT_Rtypes
#define ROOT_Rtypes
 
//////////////////////////////////////////////////////////////////////////
//                                                                      //
// Rtypes                                                               //
//                                                                      //
// Basic types used by ROOT; ClassDef macros.                           //
//                                                                      //
//////////////////////////////////////////////////////////////////////////
 
 
#include "RtypesCore.h"
// #include "DllImport.h" // included via RtypesCore.h, not used here
 
#ifndef R__LESS_INCLUDES
#include <cstdio>
#include "strtok.h"     // provides R__STRTOK_R with <cstring> include
#include "strlcpy.h"    // part of string.h on systems that have it
#include "snprintf.h"   // part of stdio.h on systems that have it
#include <type_traits>
#endif
 
#include <typeinfo>
#include <atomic>
 
#ifndef __CLING__
// __attribute__ is not supported on Windows, but it is internally needed by Cling
// for autoloading and Clad rely on __attribute__((annotate("D")))
#if defined(R__WIN32)
#define __attribute__(unused)
#endif
#endif
 
//---- forward declared class types --------------------------------------------
 
class TClass;
class TBuffer;
class TDirectory;
class TMemberInspector;
class TObject;
class TNamed;
class TCollection;
class TFileMergeInfo;
class TString;
 
//Moved from TSystem.
enum ESysConstants {
   kMAXSIGNALS       = 16,
   kMAXPATHLEN       = 8192,
   kBUFFERSIZE       = 8192,
   kItimerResolution = 10      // interval-timer resolution in ms
};
 
enum EColor { kWhite =0,   kBlack =1,   kGray=920,
              kRed   =632, kGreen =416, kBlue=600, kYellow=400, kMagenta=616, kCyan=432,
              kOrange=800, kSpring=820, kTeal=840, kAzure =860, kViolet =880, kPink=900 };
 
// There is several streamer concepts.
class TClassStreamer;   // Streamer functor for a class
class TMemberStreamer;  // Streamer functor for a data member
typedef void (*ClassStreamerFunc_t)(TBuffer&, void*);  // Streamer function for a class
typedef void (*ClassConvStreamerFunc_t)(TBuffer&, void*, const TClass*);  // Streamer function for a class with conversion.
typedef void (*MemberStreamerFunc_t)(TBuffer&, void*, Int_t); // Streamer function for a data member
 
// This class is used to implement proxy around collection classes.
class TVirtualCollectionProxy;
 
typedef void    (*VoidFuncPtr_t)();  //pointer to void function
typedef TClass* (*DictFuncPtr_t)();  //pointer to dictionary function
// NOTE: the previous name must be changed.
 
//--- bit manipulation ---------------------------------------------------------
 
#define BIT(n)       (1ULL << (n))
#define SETBIT(n,i)  ((n) |= BIT(i))
#define CLRBIT(n,i)  ((n) &= ~BIT(i))
#define TESTBIT(n,i) ((Bool_t)(((n) & BIT(i)) != 0))
 
 
 
//---- ClassDef macros ---------------------------------------------------------
 
typedef void (*ShowMembersFunc_t)(const void *obj, TMemberInspector &R__insp, Bool_t isTransient);
class TVirtualIsAProxy;
typedef TClass *(*IsAGlobalFunc_t)(const TClass*, const void *obj);
 
// TBuffer.h declares and implements the following 2 operators
template <class Tmpl> TBuffer &operator>>(TBuffer &buf, Tmpl *&obj);
template <class Tmpl> TBuffer &operator<<(TBuffer &buf, const Tmpl *obj);
 
// This might get used if we implement setting a class version.
// template <class RootClass> Short_t GetClassVersion(RootClass *);
 
namespace ROOT {
 
   class TGenericClassInfo;
   typedef void *(*NewFunc_t)(void *);
   typedef void *(*NewArrFunc_t)(Long_t size, void *arena);
   typedef void  (*DelFunc_t)(void *);
   typedef void  (*DelArrFunc_t)(void *);
   typedef void  (*DesFunc_t)(void *);
   typedef void  (*DirAutoAdd_t)(void *, TDirectory *);
   typedef Long64_t (*MergeFunc_t)(void *, TCollection *, TFileMergeInfo *);
   typedef void  (*ResetAfterMergeFunc_t)(void *, TFileMergeInfo *);
 
   template <class RootClass> Short_t SetClassVersion(RootClass *);
 
   extern TClass *CreateClass(const char *cname, Version_t id,
                              const std::type_info &info, TVirtualIsAProxy *isa,
                              const char *dfil, const char *ifil,
                              Int_t dl, Int_t il);
   extern void AddClass(const char *cname, Version_t id, const std::type_info &info,
                        DictFuncPtr_t dict, Int_t pragmabits);
   extern void RemoveClass(const char *cname);
   extern void ResetClassVersion(TClass*, const char*, Short_t);
   extern void AddClassAlternate(const char *normName, const char *alternate);
 
   extern TNamed *RegisterClassTemplate(const char *name,
                                        const char *file, Int_t line);
 
   extern void Class_ShowMembers(TClass *cl, const void *obj, TMemberInspector&);
 
#if 0
   // This function is only implemented in the dictionary file.
   // The parameter is 'only' for overloading resolution.
   // Used to be a template <class T> TGenericClassInfo *GenerateInitInstance(const T*);
   template <class T> TGenericClassInfo *GetClassInfo(const T* t) {
      TGenericClassInfo *GenerateInitInstance(const T*);
      return CreateInitInstance(t);
   };
#endif
 
   namespace Internal {
   class TInitBehavior {
      // This class defines the interface for the class registration and
      // the TClass creation. To modify the default behavior, one would
      // inherit from this class and overload ROOT::DefineBehavior().
      // See TQObject.h and table/inc/Ttypes.h for examples.
   public:
      virtual ~TInitBehavior() { }
 
      virtual void Register(const char *cname, Version_t id,
                            const std::type_info &info,
                            DictFuncPtr_t dict, Int_t pragmabits) const = 0;
      virtual void Unregister(const char *classname) const = 0;
      virtual TClass *CreateClass(const char *cname, Version_t id,
                                  const std::type_info &info, TVirtualIsAProxy *isa,
                                  const char *dfil, const char *ifil,
                                  Int_t dl, Int_t il) const = 0;
   };
 
   class TDefaultInitBehavior: public TInitBehavior {
   public:
      void Register(const char *cname, Version_t id,
                            const std::type_info &info,
                            DictFuncPtr_t dict, Int_t pragmabits) const override {
         ROOT::AddClass(cname, id, info, dict, pragmabits);
      }
 
      void Unregister(const char *classname) const override {
         ROOT::RemoveClass(classname);
      }
 
      TClass *CreateClass(const char *cname, Version_t id,
                                  const std::type_info &info, TVirtualIsAProxy *isa,
                                  const char *dfil, const char *ifil,
                                  Int_t dl, Int_t il) const override {
         return ROOT::CreateClass(cname, id, info, isa, dfil, ifil, dl, il);
      }
   };
 
   const TInitBehavior *DefineBehavior(void * /*parent_type*/,
                                       void * /*actual_type*/);
   } // namespace Internal
 
} // namespace ROOT
 
// The macros below use TGenericClassInfo and TInstrumentedIsAProxy, so let's
// ensure they are included.
#include "TGenericClassInfo.h"
 
typedef std::atomic<TClass*> atomic_TClass_ptr;
 
#include "TIsAProxy.h"
#include <string>
 
namespace ROOT { namespace Internal {
 
class TCDGIILIBase {
public:
   // All implemented in TGenericClassInfo.cxx.
   static void SetInstance(::ROOT::TGenericClassInfo& R__instance,
                    NewFunc_t, NewArrFunc_t, DelFunc_t, DelArrFunc_t, DesFunc_t);
   static void SetName(const std::string& name, std::string& nameMember);
   static void SetfgIsA(atomic_TClass_ptr& isA, TClass*(*dictfun)());
};
 
template <typename T>
class ClassDefGenerateInitInstanceLocalInjector:
   public TCDGIILIBase {
      static atomic_TClass_ptr fgIsA;
      static ::ROOT::TGenericClassInfo *fgGenericInfo;
   public:
      static void *New(void *p) { return p ? new(p) T : new T; };
      static void *NewArray(Long_t nElements, void *p) {
         return p ? new(p) T[nElements] : new T[nElements]; }
      static void Delete(void *p) { delete ((T*)p); }
      static void DeleteArray(void *p) { delete[] ((T*)p); }
      static void Destruct(void *p) { ((T*)p)->~T();  }
      static ::ROOT::TGenericClassInfo *GenerateInitInstanceLocal() {
         static ::TVirtualIsAProxy* isa_proxy = new ::TInstrumentedIsAProxy<T>(0);
         static ::ROOT::TGenericClassInfo
            R__instance(T::Class_Name(), T::Class_Version(),
                        T::DeclFileName(), T::DeclFileLine(),
                        typeid(T), ::ROOT::Internal::DefineBehavior((T*)0, (T*)0),
                        &T::Dictionary, isa_proxy, 0, sizeof(T) );
         SetInstance(R__instance, &New, &NewArray, &Delete, &DeleteArray, &Destruct);
         return &R__instance;
      }
      // We need a reference to the template instance static member in a concrete function in order
      // to force its instantiation (even before the function is actually run)
      // Since we do have a reference to Dictionary (in T::Dictionary), using fgGenericInfo
      // here will insure that it is initialized at process start or library load time.
      static TClass *Dictionary() { fgIsA = fgGenericInfo->GetClass(); return fgIsA; }
      static TClass *Class() { SetfgIsA(fgIsA, &Dictionary); return fgIsA; }
      static const char* Name() {
         static std::string gName;
         if (gName.empty())
            SetName(GetDemangledTypeName(typeid(T)), gName);
         return gName.c_str();
      }
   };
 
   template<typename T>
   atomic_TClass_ptr ClassDefGenerateInitInstanceLocalInjector<T>::fgIsA{};
   template<typename T>
   ::ROOT::TGenericClassInfo *ClassDefGenerateInitInstanceLocalInjector<T>::fgGenericInfo {
      ClassDefGenerateInitInstanceLocalInjector<T>::GenerateInitInstanceLocal()
   };
 
   template <typename T>
   struct THashConsistencyHolder {
      static Bool_t fgHashConsistency;
   };
 
   template <typename T>
   Bool_t THashConsistencyHolder<T>::fgHashConsistency;
 
   void DefaultStreamer(TBuffer &R__b, const TClass *cl, void *objpointer);
   Bool_t HasConsistentHashMember(TClass &clRef);
   Bool_t HasConsistentHashMember(const char *clName);
}} // namespace ROOT::Internal
 
 
/// Common part being called both by \_ClassDefOutline\_ and \_ClassDefInline\_.
/// \note DeclFileLine() is not part of it, since Cling uses that as trigger for
/// associating as class title the comment string found right after the macro.
#define _ClassDefBase_(name, id, virtual_keyword, overrd)                                                       \
private:                                                                                                        \
   static_assert(std::is_integral<decltype(id)>::value,                                                         \
   "ClassDef(Inline) macro: the specified class version number is not an integer.");                            \
   /** \cond HIDDEN_SYMBOLS */ virtual_keyword Bool_t CheckTObjectHashConsistency() const overrd                \
   {                                                                                                            \
      static std::atomic<UChar_t> recurseBlocker(0);                                                            \
      if (R__likely(recurseBlocker >= 2)) {                                                                     \
         return ::ROOT::Internal::THashConsistencyHolder<decltype(*this)>::fgHashConsistency;                   \
      } else if (recurseBlocker == 1) {                                                                         \
         return false;                                                                                          \
      } else if (recurseBlocker++ == 0) {                                                                       \
         ::ROOT::Internal::THashConsistencyHolder<decltype(*this)>::fgHashConsistency =                         \
            ::ROOT::Internal::HasConsistentHashMember(_QUOTE_(name)) ||                                         \
            ::ROOT::Internal::HasConsistentHashMember(*IsA());                                                  \
         ++recurseBlocker;                                                                                      \
         return ::ROOT::Internal::THashConsistencyHolder<decltype(*this)>::fgHashConsistency;                   \
      }                                                                                                         \
      return false; /* unreacheable */                                                                          \
   } /** \endcond */                                                                                            \
                                                                                                                \
public:                                                                                                         \
   /** \return Version of this class */ static Version_t Class_Version() { return id; }                         \
   /** \return TClass describing current object */ virtual_keyword TClass *IsA() const overrd                   \
   { return name::Class(); }                                                                                    \
   /** \cond HIDDEN_SYMBOLS */ virtual_keyword void ShowMembers(TMemberInspector &insp) const overrd            \
   {                                                                                                            \
      ::ROOT::Class_ShowMembers(name::Class(), this, insp);                                                     \
   } /** \endcond */                                                                                            \
   void StreamerNVirtual(TBuffer &ClassDef_StreamerNVirtual_b) { name::Streamer(ClassDef_StreamerNVirtual_b); } \
   /** \return Name of the file containing the class declaration */ static const char *DeclFileName() { return __FILE__; }
 
#define _ClassDefOutline_(name,id, virtual_keyword, overrd)                                                     \
   _ClassDefBase_(name,id, virtual_keyword, overrd)                                                             \
private:                                                                                                        \
   /** \cond HIDDEN_SYMBOLS \brief Pointer holding the address of the TClass describing this class */           \
   static atomic_TClass_ptr fgIsA; /** \endcond */                                                              \
public:                                                                                                         \
   /** \cond HIDDEN_SYMBOLS \deprecated */ static int ImplFileLine(); /** \endcond */                           \
   /** \cond HIDDEN_SYMBOLS \deprecated */ static const char *ImplFileName(); /** \endcond */                   \
   /** \return Name of this class */ static const char *Class_Name();                                           \
   /** \cond HIDDEN_SYMBOLS */ static TClass *Dictionary(); /** \endcond */                                     \
   /** \return TClass describing this class */ static TClass *Class();                                          \
   virtual_keyword void Streamer(TBuffer&) overrd;
 
#define _ClassDefInline_(name, id, virtual_keyword, overrd)                                                     \
   _ClassDefBase_(name, id, virtual_keyword, overrd) public :                                                   \
   /** \cond HIDDEN_SYMBOLS \deprecated */ static int ImplFileLine() { return -1; } /** \endcond */             \
   /** \cond HIDDEN_SYMBOLS \deprecated */ static const char *ImplFileName() { return 0; } /** \endcond */      \
   /** \return Name of this class */ static const char *Class_Name()                                            \
   {                                                                                                            \
      return ::ROOT::Internal::ClassDefGenerateInitInstanceLocalInjector<name>::Name();                         \
   }                                                                                                            \
   /** \cond HIDDEN_SYMBOLS */ static TClass *Dictionary()                                                      \
   {                                                                                                            \
      return ::ROOT::Internal::ClassDefGenerateInitInstanceLocalInjector<name>::Dictionary();                   \
   } /** \endcond */                                                                                            \
   /** \return TClass describing this class */ static TClass *Class()                                           \
   {                                                                                                            \
      return ::ROOT::Internal::ClassDefGenerateInitInstanceLocalInjector<name>::Class();                        \
   }                                                                                                            \
   virtual_keyword void Streamer(TBuffer &R__b) overrd                                                          \
   {                                                                                                            \
      ::ROOT::Internal::DefaultStreamer(R__b, name::Class(), this);                                             \
   }
 
#define ClassDef(name,id)                            \
   _ClassDefOutline_(name,id,virtual,)               \
   /** \cond HIDDEN_SYMBOLS */ static int DeclFileLine() { return __LINE__; } /** \endcond */
 
#define ClassDefOverride(name,id)                    \
   _ClassDefOutline_(name,id,,override)              \
   /** \cond HIDDEN_SYMBOLS */ static int DeclFileLine() { return __LINE__; } /** \endcond */
 
#define ClassDefNV(name,id)                          \
   _ClassDefOutline_(name,id,,)                      \
   /** \cond HIDDEN_SYMBOLS */ static int DeclFileLine() { return __LINE__; } /** \endcond */
 
#define ClassDefInline(name,id)                      \
   _ClassDefInline_(name,id,virtual,)                \
   /** \cond HIDDEN_SYMBOLS */ static int DeclFileLine() { return __LINE__; } /** \endcond */
 
#define ClassDefInlineOverride(name,id)              \
   _ClassDefInline_(name,id,,override)               \
   /** \cond HIDDEN_SYMBOLS */ static int DeclFileLine() { return __LINE__; } /** \endcond */
 
#define ClassDefInlineNV(name,id)                    \
   _ClassDefInline_(name,id,,)                       \
   /** \cond HIDDEN_SYMBOLS */ static int DeclFileLine() { return __LINE__; } /** \endcond */
 
//#define _ClassDefInterp_(name,id) ClassDefInline(name,id)
 
#define R__UseDummy(name) \
   class _NAME2_(name,_c) { public: _NAME2_(name,_c)() { if (name) { } } }
 
#define ClassImpUnique(name,key)                                                                        \
   namespace ROOT {                                                                                     \
      /** \cond HIDDEN_SYMBOLS */ TGenericClassInfo *GenerateInitInstance(const name*); /** \endcond */ \
      namespace {                                                                                       \
         static int _R__UNIQUE_(_NAME2_(R__dummyint,key)) __attribute__((unused)) =                     \
            GenerateInitInstance((name*)0x0)->SetImplFile(__FILE__, __LINE__);                          \
         R__UseDummy(_R__UNIQUE_(_NAME2_(R__dummyint,key)));                                            \
      }                                                                                                 \
   }
 
/// \deprecated
#define ClassImp(name) ClassImpUnique(name,default)
 
/// Macro for Namespace
#define NamespaceImpUnique(name,key)                                        \
   namespace name {                                                         \
      namespace ROOTDict {                                                  \
         /** \cond HIDDEN_SYMBOLS */                                        \
         ::ROOT::TGenericClassInfo *GenerateInitInstance(); /** \endcond */ \
         namespace {                                                        \
            static int _R__UNIQUE_(_NAME2_(R__dummyint,key)) =              \
               GenerateInitInstance()->SetImplFile(__FILE__, __LINE__);     \
            R__UseDummy(_R__UNIQUE_(_NAME2_(R__dummyint,key)));             \
         }                                                                  \
      }                                                                     \
   }
 
#define NamespaceImp(name) NamespaceImpUnique(name,default)
 
//---- ClassDefT macros for templates with one template argument ---------------
// ClassDefT  corresponds to ClassDef
// ClassDefT2 goes in the same header as ClassDefT but must be
//            outside the class scope
// ClassImpT  corresponds to ClassImp
 
 
/// This ClassDefT is stricly redundant and is kept only for
/// backward compatibility. \deprecated
#define ClassDefT(name,id)                          \
   _ClassDefOutline_(name,id,virtual,)              \
   /** \cond HIDDEN_SYMBOLS */ static int DeclFileLine() { return __LINE__; } /** \endcond */
 
#define ClassDefTNV(name,id)                        \
   _ClassDefOutline_(name,id,virtual,)              \
   /** \cond HIDDEN_SYMBOLS */ static int DeclFileLine() { return __LINE__; } /** \endcond */
 
 
#define ClassDefT2(name,Tmpl)
 
#define templateClassImpUnique(name, key)                                                                           \
   namespace ROOT {                                                                                                 \
   /** \cond HIDDEN_SYMBOLS */ static TNamed *                                                                      \
      _R__UNIQUE_(_NAME2_(R__dummyholder, key)) = ::ROOT::RegisterClassTemplate(_QUOTE_(name), __FILE__, __LINE__); \
   /** \endcond */                                                                                                  \
   R__UseDummy(_R__UNIQUE_(_NAME2_(R__dummyholder, key)));                                                          \
   }
#define templateClassImp(name) templateClassImpUnique(name,default)
 
#define ClassImpT(name,Tmpl) templateClassImp(name)
 
//---- ClassDefT macros for templates with two template arguments --------------
// ClassDef2T2 goes in the same header as ClassDefT but must be
//             outside the class scope
// ClassImp2T  corresponds to ClassImpT
 
#define ClassDef2T2(name,Tmpl1,Tmpl2)
#define ClassImp2T(name,Tmpl1,Tmpl2) templateClassImp(name)
 
 
//---- ClassDefT macros for templates with three template arguments ------------
// ClassDef3T2 goes in the same header as ClassDefT but must be
//             outside the class scope
// ClassImp3T  corresponds to ClassImpT
 
#define ClassDef3T2(name,Tmpl1,Tmpl2,Tmpl3)
#define ClassImp3T(name,Tmpl1,Tmpl2,Tmpl3) templateClassImp(name)
 
 
//---- Macro to set the class version of non instrumented classes --------------
 
#define RootClassVersion(name,VersionNumber)                             \
namespace ROOT { /** \cond HIDDEN_SYMBOLS */                             \
   TGenericClassInfo *GenerateInitInstance(const name*); /** \endcond */ \
   /** \cond HIDDEN_SYMBOLS */                                           \
   static Short_t _R__UNIQUE_(R__dummyVersionNumber) =                   \
           GenerateInitInstance((name*)0x0)->SetVersion(VersionNumber);  \
   /** \endcond */                                                       \
   R__UseDummy(_R__UNIQUE_(R__dummyVersionNumber));                      \
}
 
#define RootStreamer(name,STREAMER)                                      \
namespace ROOT {                                                         \
   /** \cond HIDDEN_SYMBOLS */                                           \
   TGenericClassInfo *GenerateInitInstance(const name*); /** \endcond */ \
   /** \cond HIDDEN_SYMBOLS */                                           \
   static Short_t _R__UNIQUE_(R__dummyStreamer) =                        \
           GenerateInitInstance((name*)0x0)->SetStreamer(STREAMER);      \
   /** \endcond */                                                       \
   R__UseDummy(_R__UNIQUE_(R__dummyStreamer));                           \
}
 
//---- Macro to load a library into the interpreter --------------
// Call as R__LOAD_LIBRARY(libEvent)
// This macro intentionally does not take string as argument, to
// prevent compilation errors with complex diagnostics due to
//   TString BAD_DO_NOT_TRY = "lib";
//   R__LOAD_LIBRARY(BAD_DO_NOT_TRY + "BAD_DO_NOT_TRY.so") // ERROR!
#ifdef __CLING__
# define _R_PragmaStr(x) _Pragma(#x)
# define R__LOAD_LIBRARY(LIBRARY) _R_PragmaStr(cling load ( #LIBRARY ))
# define R__ADD_INCLUDE_PATH(PATH) _R_PragmaStr(cling add_include_path ( #PATH ))
# define R__ADD_LIBRARY_PATH(PATH) _R_PragmaStr(cling add_library_path ( #PATH ))
#elif defined(R__WIN32)
# define _R_PragmaStr(x) __pragma(#x)
# define R__LOAD_LIBRARY(LIBRARY) _R_PragmaStr(comment(lib, #LIBRARY))
# define R__ADD_INCLUDE_PATH(PATH) _R_PragmaStr(comment(path, #PATH))
# define R__ADD_LIBRARY_PATH(PATH) _R_PragmaStr(comment(path, #PATH))
#else
// No way to inform linker though preprocessor :-(
// We could even inform the user:
/*
# define R__LOAD_LIBRARY(LIBRARY) \
   _R_PragmaStr(message "Compiler cannot handle linking against " #LIBRARY \
                ". Use -L and -l instead.")
*/
# define R__LOAD_LIBRARY(LIBRARY)
# define R__ADD_INCLUDE_PATH(PATH)
# define R__ADD_LIBRARY_PATH(PATH)
#endif
 
// Convenience macros to disable cling pointer check.
#ifdef __CLING__
# define R__CLING_PTRCHECK(ONOFF) __attribute__((annotate("__cling__ptrcheck(" #ONOFF ")")))
#else
# define R__CLING_PTRCHECK(ONOFF)
#endif
 
#endif