Lock access to gROOT->fGlobalFunctions

The list of global functions must be protected from simultaneous writes/reads.
Dr15Jones · Oct 2, 2014 · cc40a20 · cc40a20
1 parent 933bf24
commit cc40a20
Show file tree

Hide file tree

Showing 2 changed files with 23 additions and 9 deletions.
diff --git a/core/base/src/TROOT.cxx b/core/base/src/TROOT.cxx
@@ -1167,12 +1167,14 @@ TFunction *TROOT::GetGlobalFunction(const char *function, const char *params,
    // of all currently defined global functions from CINT (more expensive).
    // The param string must be of the form: "3189,\"aap\",1.3".
 
-   if (!params)
+   if (!params) {
+      R__LOCKGUARD2(gROOTMutex);
       return (TFunction *)GetListOfGlobalFunctions(load)->FindObject(function);
-   else {
+   } else {
       if (!fInterpreter)
          Fatal("GetGlobalFunction", "fInterpreter not initialized");
 
+      R__LOCKGUARD2(gROOTMutex);
       TFunction *f;
       TIter      next(GetListOfGlobalFunctions(load));
 
@@ -1194,18 +1196,20 @@ TFunction *TROOT::GetGlobalFunctionWithPrototype(const char *function,
    // of all currently defined global functions from CINT (more expensive).
    // The proto string must be of the form: "int, char*, float".
 
-   if (!proto)
+   if (!proto) {
+      R__LOCKGUARD2(gROOTMutex);
       return (TFunction *)GetListOfGlobalFunctions(load)->FindObject(function);
-   else {
+   } else {
       if (!fInterpreter)
          Fatal("GetGlobalFunctionWithPrototype", "fInterpreter not initialized");
 
-      TFunction *f;
-      TIter      next(GetListOfGlobalFunctions(load));
-
       TString mangled = gInterpreter->GetMangledNameWithPrototype(0,
                                                                      function,
                                                                      proto);
+      R__LOCKGUARD2(gROOTMutex);
+      TFunction *f;
+      TIter      next(GetListOfGlobalFunctions(load));
+
       while ((f = (TFunction *) next())) {
          if (mangled == f->GetMangledName()) return f;
       }

diff --git a/core/meta/src/TCint.cxx b/core/meta/src/TCint.cxx
@@ -839,13 +839,23 @@ void TCint::UpdateListOfGlobalFunctions()
    // Update the list of pointers to global functions. This function
    // is called by TROOT::GetListOfGlobalFunctions().
 
-   if (!gROOT->fGlobalFunctions) {
+   bool globalFunctionsAvailable = false;
+   {
+     R__LOCKGUARD(gROOTMutex);
+     globalFunctionsAvailable = gROOT->fGlobalFunctions != 0;
+   }
+   if (!globalFunctionsAvailable) {
       // No global functions registered yet, trigger it:
       gROOT->GetListOfGlobalFunctions();
       // We were already called by TROOT::GetListOfGlobalFunctions()
       return;
    }
-
+
+   //NOTE: At the moment gROOTMutex== gCINTMutex so we only need to lock one.
+   // In the future, if they are seperated, then the locks must be taken in 
+   // the proper order.
+   // gROOTMutex is used to protect gROOT->fGlobalFunctions
+   //R__LOCKGUARD2(gROOTMutex);
    R__LOCKGUARD2(gCINTMutex);
 
    G__MethodInfo t, *a;