OW_StackTrace.cpp

Go to the documentation of this file.

/*******************************************************************************
* Copyright (C) 2001-2004 Vintela, Inc. All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions are met:
*
*  - Redistributions of source code must retain the above copyright notice,
*    this list of conditions and the following disclaimer.
*
*  - Redistributions in binary form must reproduce the above copyright notice,
*    this list of conditions and the following disclaimer in the documentation
*    and/or other materials provided with the distribution.
*
*  - Neither the name of Vintela, Inc. nor the names of its
*    contributors may be used to endorse or promote products derived from this
*    software without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS ``AS IS''
* AND ANY EXPRESS 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 Vintela, Inc. OR THE 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.
*******************************************************************************/

#include "OW_config.h"
#include "OW_StackTrace.hpp"

#ifdef OW_WIN32
#include <iostream>  // for cerr
namespace OW_NAMESPACE
{
using std::cerr;
using std::endl;
void StackTrace::printStackTrace()
{
   cerr << "StackTrace::printStackTrace not implemented yet" << endl;
}
}
#else

#include "OW_Exec.hpp"
#include "OW_UnnamedPipe.hpp"
#include "OW_Format.hpp"
#include "OW_Array.hpp"
#include <fstream>
#include <iostream>  // for cerr

#if defined(OW_HAVE_BACKTRACE)
#include <execinfo.h>
#endif

#if defined(OW_HAVE_CXXABI_H)
#include <cxxabi.h>
#endif

#ifdef OW_HAVE_UNISTD_H
extern "C"
{
#include <unistd.h> // for getpid()
}
#endif

namespace OW_NAMESPACE
{

using std::ifstream;
using std::ofstream;
using std::flush;

#ifndef OW_DEFAULT_GDB_PATH
#define OW_DEFAULT_GDB_PATH "/usr/bin/gdb"
#endif

// static
void StackTrace::printStackTrace()
{
   if (getenv("OW_STACKTRACE"))
   {
      // if we have the GNU backtrace functions we use them.  They don't give
      // as good information as gdb does, but they are orders of magnitude
      // faster!
#ifdef OW_HAVE_BACKTRACE
      void *array[200];
      
      size_t size = backtrace (array, 200);
      char **strings = backtrace_symbols (array, size);
      
      String bt;
      
      size_t i;
      for (i = 0; i < size; i++)
      {
#if defined(OW_HAVE_CXXABI_H)
         bt += strings[i];
         int status;
         // extract the identifier from strings[i].  It's inside of parens.
         char* firstparen = ::strchr(strings[i], '(');
         char* lastparen = ::strchr(strings[i], '+');
         if (firstparen != 0 && lastparen != 0 && firstparen < lastparen)
         {
            bt += ": ";
            *lastparen = '\0';
            char* realname = abi::__cxa_demangle(firstparen+1, 0, 0, &status);
            bt += realname;
            free(realname);
         }
#else
         bt += strings[i];
#endif
         bt += "\n";
      }
      
      free (strings);
      
      std::cerr << bt << std::endl;
#else
      ifstream file(OW_DEFAULT_GDB_PATH);
      if (file)
      {
         file.close();
         String scriptName("/tmp/owgdb-");
         String outputName("/tmp/owgdbout-");
         // TODO: don't use getppid, get it from somewhere else!
         outputName += String(UInt32(::getpid()));
         scriptName += String(UInt32(::getpid())) + ".sh";
         String exeName("/proc/");
         exeName += String(UInt32(::getpid())) + "/exe";
         
         ofstream scriptFile(scriptName.c_str(), std::ios::out);
         scriptFile << "#!/bin/sh\n"
            << "gdb " << exeName << " " << ::getpid() << " << EOS > " << outputName << " 2>&1\n"
// doesn't work with gdb 5.1           << "thread apply all bt\n"
            << "bt\n"
            << "detach\n"
            << "q\n"
            << "EOS\n" << flush;
         scriptFile.close();
         Array<String> command;
         command.push_back( "/bin/sh" );
         command.push_back( scriptName );
         Exec::safeSystem(command);
         ifstream outputFile(outputName.c_str(), std::ios::in);
         String output;
         while (outputFile)
         {
            output += String::getLine(outputFile) + "\n";
         }
         outputFile.close();
         unlink(outputName.c_str());
         unlink(scriptName.c_str());
         std::cerr << output << std::endl;
      }
#endif
   }
}

} // end namespace OW_NAMESPACE

#endif   // ifdef OW_WIN32

---