Context.cpp

Go to the documentation of this file.

/*
 * DUNE DAQ modification notice:
 * This file has been modified from the original ATLAS ers source for the DUNE DAQ project.
 * Fork baseline commit: 8267df82a4f6fe6bf02c4014923eba19eddc4614 (2020-04-14).
 * Renamed since fork: yes (from src/Context.cxx to src/Context.cpp).
 *
 * Original copyright:
 * Copyright (C) 2001-2020 CERN for the benefit of the ATLAS collaboration.
 * Licensed under the Apache License, Version 2.0.
 */
 
/*
 *  Context.cxx
 *  ers
 *
 *  Created by Serguei Kolos on 26.11.05.
 *  Copyright 2004 CERN. All rights reserved.
 *
 */
#include <cxxabi.h>
#include <pwd.h>
#include <string.h>
#include <sys/types.h>
#include <unistd.h>
 
#include <iostream>
#include <sstream>
 
#ifndef __rtems__
#include <execinfo.h>
#else
char**
backtrace_symbols(void**, int size)
{
  return 0;
}
#endif
 
#include <ers/Configuration.hpp>
#include <ers/Context.hpp>
 
namespace {
std::string
demangle(char* mangled)
{
  int status;
  char* function_begin = ::strchr(mangled, '(');
  if (function_begin) {
    char* function_end = ::strchr(++function_begin, '+');
    if (function_end && function_end != function_begin) {
      std::string fname(function_begin, function_end - function_begin);
      char* name = abi::__cxa_demangle(fname.c_str(), 0, 0, &status);
 
      if (!name) {
        return std::string(mangled);
      }
 
      std::ostringstream out;
      out << std::string(mangled, function_begin - mangled) << name << function_end;
      free(name);
      return out.str();
    }
  }
  return std::string(mangled);
}
 
void
print_function(std::ostream& out, const char* function, int verbosity)
{
  if (verbosity) {
    out << function;
    return;
  }
 
  const char* end = strchr(function, '(');
  if (end) {
    const char* beg = end;
    while (beg > function) {
      if (*(beg - 1) == ' ') {
        break;
      }
      --beg;
    }
    out.write(beg, end - beg);
    out << "(...)";
  } else {
    out << function;
  }
}
}
 
std::vector<std::string>
ers::Context::stack() const
{
  std::vector<std::string> stack;
  stack.reserve(stack_size());
  char** symbols = backtrace_symbols((void**)stack_symbols(), stack_size());
 
  if (symbols) {
    for (int i = 1; i < stack_size(); i++) {
      stack.push_back(demangle(symbols[i]));
    }
    free(symbols);
  }
 
  return stack;
}

std::string
ers::Context::position(int verbosity) const
{
  std::ostringstream out;
  print_function(out, function_name(), verbosity);
  out << " at ";
 
  const char* file = file_name();
  if (file[0] == '.' && file[1] == '.' && file[2] == '/') // file name starts with "../"
  {
    out << package_name() << (file + 2);
  } else {
    out << file;
  }
  out << ":" << line_number();
  return out.str();
}