src/cppcache/src/StackFrame.hpp

#pragma once

#ifndef GEODE_STACKFRAME_H_
#define GEODE_STACKFRAME_H_

/*
 * Licensed to the Apache Software Foundation (ASF) under one or more
 * contributor license agreements.  See the NOTICE file distributed with
 * this work for additional information regarding copyright ownership.
 * The ASF licenses this file to You under the Apache License, Version 2.0
 * (the "License"); you may not use this file except in compliance with
 * the License.  You may obtain a copy of the License at
 *
 *      http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include <ace/OS.h>

#ifdef _WIN32
#include <Windows.h>
#include <DbgHelp.h>
#else
// Since we dont compile with g++ on Sun
#ifdef _SOLARIS
#define DEMANGLED_SYMBOL_BUFSIZE 512
#include <demangle.h>
#else
#include <exception>
#include <cxxabi.h>
#endif
#endif

namespace apache {
namespace geode {
namespace client {

class StackFrame {
 public:
  char m_offset[12];
  char m_symbol[256];
  char m_module[700];
  char m_string[1024];

  StackFrame() {}
  char* asString();
  ~StackFrame() {}

#ifdef _WIN32
#ifndef _WIN64
  // ------------ WINDOWS -----------

  void init(const char* btline) {
    m_offset[0] = '\0';
    m_symbol[0] = '\0';
    m_module[0] = '\0';
    if (!UnDecorateSymbolName(btline, m_string, 1023, UNDNAME_COMPLETE)) {
      strncpy(m_string, btline, 1023);
    }
    m_string[1023] = '\0';
  }
#endif
#else
  // ------------ UNIX -----------

  void init(const char* btline) {
    m_string[0] = 0;
    int status = 0;
    char* symbol = extractSymbol(btline);
    char* demangled = NULL;
#ifdef _SOLARIS
    demangled = new char[DEMANGLED_SYMBOL_BUFSIZE];
    status = cplus_demangle(symbol, demangled, DEMANGLED_SYMBOL_BUFSIZE);
#else
    demangled = abi::__cxa_demangle(symbol, 0, 0, &status);
#endif
    if (status != 0) {
      ACE_OS::strncpy(m_symbol, symbol, sizeof(m_symbol));
    } else {
      ACE_OS::strncpy(m_symbol, demangled, sizeof(m_symbol));
    }
#ifdef _SOLARIS
    GF_SAFE_DELETE_ARRAY(demangled);
#else
    free(demangled);
#endif
    delete[] symbol;
  }

#endif
  // ------------ ALL -----------

  char* extractSymbol(const char* btline) {
    /*
    This code receives a stacktrace line in the forms:

    /export/hoth2/framework/lib/debug/libeventtest.so(_ZN7geode13testframework9EventTest17doEventOperationsEv+0x4a0)
    [0x93a1a0]
    /export/hoth2/framework/lib/debug/libeventtest.so(doRegionOperations+0x13d)
    [0x92c9e3]
    Client [0x804ae56]
    Client [0x804c9ca]
    /lib/tls/libc.so.6(__libc_start_main+0xda) [0xe1c79a]
    Client(_Znwj+0x41) [0x804a6ed]

    Sets members: m_module and m_offset
    returns the symbol

    */

    size_t btlen = strlen(btline);
    char* symbol =
        new char[btlen + 1];  // COVERTY --> 30298 Out-of-bounds access
    symbol[0] = '\0';
    m_module[0] = '\0';
    m_offset[0] = '\0';

    if (strchr(btline, '+')) {
      sscanf(btline, "%[^(](%[^+]+%[^)])", m_module, symbol, m_offset);
    } else {
      sscanf(btline, "%[^ ] [%[x01-9a-f]]", m_module, m_offset);
    }
    char* shortmodule = NULL;
    if (NULL != (shortmodule = strrchr(m_module, '/'))) {
      char* tmp =
          new char[btlen + 1];  // COVERTY --> 30298 Out-of-bounds access
      ACE_OS::strncpy(tmp, shortmodule + 1, btlen);
      ACE_OS::strncpy(m_module, tmp, btlen);
      delete[] tmp;
    }
    return symbol;
  }
};
}  // namespace client
}  // namespace geode
}  // namespace apache

#endif // GEODE_STACKFRAME_H_