X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/528fa2ce6be027b5428d122666ffc37706155449..cc4eceb15c80a597e44222b8c0ff60caf85db959:/src/xbt/backtrace.cpp diff --git a/src/xbt/backtrace.cpp b/src/xbt/backtrace.cpp index e64eab1add..b9f4009f05 100644 --- a/src/xbt/backtrace.cpp +++ b/src/xbt/backtrace.cpp @@ -1,69 +1,139 @@ -/* Copyright (c) 2005-2016. The SimGrid Team. - * All rights reserved. */ - -/* Copyright (c) 2002-2004 Ralf S. Engelschall */ -/* Copyright (c) 2002-2004 The OSSP Project */ -/* Copyright (c) 2002-2004 Cable & Wireless */ -/* All rights reserved. */ - -/* This code is inspirated from the OSSP version (as retrieved back in 2004)*/ -/* It was heavily modified to fit the SimGrid framework. */ - -/* The OSSP version has the following copyright notice: -** OSSP ex - Exception Handling -** Copyright (c) 2002-2004 Ralf S. Engelschall -** Copyright (c) 2002-2004 The OSSP Project -** Copyright (c) 2002-2004 Cable & Wireless -** -** This file is part of OSSP ex, an exception handling library -** which can be found at http://www.ossp.org/pkg/lib/ex/. -** -** Permission to use, copy, modify, and distribute this software for -** any purpose with or without fee is hereby granted, provided that -** the above copyright notice and this permission notice appear in all -** copies. -** -** THIS SOFTWARE IS PROVIDED `AS IS'' AND ANY EXPRESSED OR IMPLIED -** WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF -** MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. -** IN NO EVENT SHALL THE AUTHORS AND COPYRIGHT HOLDERS AND THEIR -** CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, -** SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT -** LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF -** USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND -** ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, -** OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT -** OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF -** SUCH DAMAGE. - */ - -/* The extensions made for the SimGrid project can either be distributed */ -/* under the same license, or under the LGPL v2.1 */ +/* Copyright (c) 2005-2019. The SimGrid Team. All rights reserved. */ -#include +/* This program is free software; you can redistribute it and/or modify it + * under the terms of the license (GNU LGPL) which comes with this package. */ + +#include "src/internal_config.h" +#include "simgrid/simix.h" /* SIMIX_process_self_get_name() */ +#include #include -#include +#include +#include -#include "src/internal_config.h" +#include +#include +#include +#include +#include +#include +#include -extern "C" { +#include + +// Try to detect and use the C++ itanium ABI for name demangling: +#ifdef __GXX_ABI_VERSION +#include +#endif + +#if HAVE_BOOST_STACKTRACE +#define BOOST_STACKTRACE_USE_BACKTRACE +#include +#endif XBT_LOG_NEW_DEFAULT_SUBCATEGORY(xbt_backtrace, xbt, "Backtrace"); +/** @brief show the backtrace of the current point (lovely while debugging) */ +void xbt_backtrace_display_current() +{ + simgrid::xbt::Backtrace().display(); +} + +namespace simgrid { +namespace xbt { + +std::unique_ptr demangle(const char* name) +{ +#ifdef __GXX_ABI_VERSION + int status; + auto res = std::unique_ptr(abi::__cxa_demangle(name, nullptr, nullptr, &status), &std::free); + if (res != nullptr) + return res; + // We did not manage to resolve this. Probably because this is not a mangled symbol: +#endif + // Return the symbol: + return std::unique_ptr(xbt_strdup(name), &std::free); +} + +class BacktraceImpl { + short refcount_ = 1; + +public: + void ref() { refcount_++; } + bool unref() + { + refcount_--; + return refcount_ == 0; + } +#if HAVE_BOOST_STACKTRACE + boost::stacktrace::stacktrace st; +#endif +}; + +Backtrace::Backtrace() +{ +#if HAVE_BOOST_STACKTRACE + impl_ = new BacktraceImpl(); + impl_->st = boost::stacktrace::stacktrace(); +#endif +} +Backtrace::Backtrace(const Backtrace& bt) +{ + impl_ = bt.impl_; + if (impl_) + impl_->ref(); +} + +Backtrace::Backtrace(Backtrace&& bt) +{ + impl_ = bt.impl_; + bt.impl_ = nullptr; +} + +Backtrace& Backtrace::operator=(const Backtrace& rhs) +{ + impl_ = rhs.impl_; + if (impl_) + impl_->ref(); + return *this; } -/** \brief show the backtrace of the current point (lovely while debuging) */ -void xbt_backtrace_display_current(void) +Backtrace& Backtrace::operator=(Backtrace&& rhs) { - const std::size_t size = 10; - xbt_backtrace_location_t bt[size]; - size_t used = xbt_backtrace_current(bt, size); - xbt_backtrace_display(bt, used); + impl_ = rhs.impl_; + rhs.impl_ = nullptr; + return *this; } -#if HAVE_BACKTRACE && HAVE_EXECINFO_H && HAVE_POPEN && defined(ADDR2LINE) -# include "src/xbt/backtrace_linux.cpp" -#else -# include "src/xbt/backtrace_dummy.cpp" +Backtrace::~Backtrace() +{ + if (impl_ != nullptr && impl_->unref()) { + delete impl_; + } +} + +std::string const Backtrace::resolve() const +{ + std::string result(""); + +#if HAVE_BOOST_STACKTRACE + std::stringstream ss; + ss << impl_->st; + result.append(ss.str()); #endif + return result; +} + +void Backtrace::display() const +{ + std::string backtrace = resolve(); + if (backtrace.empty()) { + fprintf(stderr, "(backtrace not set -- did you install Boost.Stacktrace?)\n"); + return; + } + fprintf(stderr, "Backtrace (displayed in actor %s):\n", SIMIX_process_self_get_name()); + std::fprintf(stderr, "%s\n", backtrace.c_str()); +} + +} // namespace xbt +} // namespace simgrid