TSMethodCall.cxx

Go to the documentation of this file.

/*
  Copyright (C) 2002-2023 CERN for the benefit of the ATLAS collaboration
*/
 
#include "RootUtils/TSMethodCall.h"
#include "TMethod.h"
#include "TError.h"
#include "TInterpreter.h"
#include "CxxUtils/checker_macros.h"
 
 
namespace RootUtils {
 
 
TSMethodCall::TSMethodCall()
  : m_cls(nullptr),
    m_mode (ROOT::kExactMatch),
    m_meth (std::make_unique<TMethodCall>()),
    m_initialized(false)
{
}
 
 
TSMethodCall::TSMethodCall (const TSMethodCall& other)
  : m_cls (other.m_cls),
    m_fname (other.m_fname),
    m_args (other.m_args),
    m_mode (other.m_mode),
    m_meth (std::make_unique<TMethodCall> (*other.m_meth)),
    m_initialized (false)
{
  // Don't copy m_tsMeth.
}
 
 
TSMethodCall& TSMethodCall::operator= (const TSMethodCall& other)
{
  if (this != &other) {
    m_cls = other.m_cls;
    m_fname = other.m_fname;
    m_args = other.m_args;
    *m_meth = *other.m_meth;
    m_mode = other.m_mode;
    m_initialized = false;
 
    // Don't copy m_tsMeth.
  }
  return *this;
}
 
 
TSMethodCall::~TSMethodCall()
{
  // Don't try to run the TMethodCall destructor if gCling is gone.
  TInterpreter* cling ATLAS_THREAD_SAFE = gCling;
  if (!cling) {
    (void)m_meth.release();
    m_tsMeth.release();
  }
}
 
 
void TSMethodCall::setProto (TClass* cls,
                             const std::string& fname,
                             const std::string& args,
                             ROOT::EFunctionMatchMode mode /*=ROOT::kExactMatch*/)
{
  m_cls = cls;
  m_fname = fname;
  m_args = args;
  m_mode = mode;
  m_initialized = false;
}
 
 
TMethodCall* TSMethodCall::call()
{
  // Fail if this isn't a class type.
  if (m_cls == 0) return nullptr;
 
  if (!m_initialized) {
    // Not initialized ... try to do so now.  First take the lock.
    std::lock_guard<std::mutex> lock (m_mutex);
    // cppcheck-suppress identicalInnerCondition; false positive
    if (!m_initialized) {
      m_meth->InitWithPrototype (m_cls, m_fname.c_str(), m_args.c_str(),
                                false, m_mode);
      if (!m_meth->IsValid()) {
        ::Warning ("RootUtils::Type",
                   "Can't get method for type `%s': %s (%s).",
                   m_cls->GetName(), m_fname.c_str(), m_args.c_str());
      }
      m_initialized = true;
    }
  }
 
  if (!m_meth->IsValid()) return nullptr;
 
  if (m_tsMeth.get() == 0)
    m_tsMeth.reset (new TMethodCall (*m_meth));
 
  return m_tsMeth.get();
}
 
 
} // namespace RootUtils