* Copyright (c) 1997, 2017, Oracle and/or its affiliates. All rights reserved.

#include "windbghelp.hpp"

  _can_decode_in_vm = true;

  if (!has_error()) {

    WindowsDbgHelp::symSetOptions(SYMOPT_UNDNAME | SYMOPT_DEFERRED_LOADS | SYMOPT_EXACT_SYMBOLS);

    if (!WindowsDbgHelp::symInitialize(hProcess, NULL, TRUE)) {

    char paths[MAX_PATH];

    int  len = sizeof(paths);

    if (!WindowsDbgHelp::symGetSearchPath(hProcess, paths, len)) {

      paths[0] = '\0';

    } else {

      // available spaces in path buffer

      len -= (int)strlen(paths);

    }

    char tmp_path[MAX_PATH];

    DWORD dwSize;

    HMODULE hJVM = ::GetModuleHandle("jvm.dll");

    tmp_path[0] = '\0';

    // append the path where jvm.dll is located

    if (hJVM != NULL && (dwSize = ::GetModuleFileName(hJVM, tmp_path, sizeof(tmp_path))) > 0) {

      while (dwSize > 0 && tmp_path[dwSize] != '\\') {

        dwSize --;

      tmp_path[dwSize] = '\0';

      if (dwSize > 0 && len > (int)dwSize + 1) {

        strncat(paths, tmp_path, dwSize);

        len -= dwSize + 1;

    }

    // append $JRE/bin. Arguments::get_java_home actually returns $JRE

    // path

    char *p = Arguments::get_java_home();

    assert(p != NULL, "empty java home");

    size_t java_home_len = strlen(p);

    if (len > (int)java_home_len + 5) {

      strncat(paths, os::path_separator(), 1);

      strncat(paths, p, java_home_len);

      strncat(paths, "\\bin", 4);

      len -= (int)(java_home_len + 5);

    }

    // append $JDK/bin path if it exists

    assert(java_home_len < MAX_PATH, "Invalid path length");

    // assume $JRE is under $JDK, construct $JDK/bin path and

    // see if it exists or not

    if (strncmp(&p[java_home_len - 3], "jre", 3) == 0) {

      strncpy(tmp_path, p, java_home_len - 3);

      tmp_path[java_home_len - 3] = '\0';

      strncat(tmp_path, "bin", 3);

      // if the directory exists

      DWORD dwAttrib = GetFileAttributes(tmp_path);

      if (dwAttrib != INVALID_FILE_ATTRIBUTES &&

          (dwAttrib & FILE_ATTRIBUTE_DIRECTORY)) {

        // tmp_path should have the same length as java_home_len, since we only

        // replaced 'jre' with 'bin'

        if (len > (int)java_home_len + 1) {

          strncat(paths, os::path_separator(), 1);

          strncat(paths, tmp_path, java_home_len);

    WindowsDbgHelp::symSetSearchPath(hProcess, paths);

    // find out if jvm.dll contains private symbols, by decoding

    // current function and comparing the result

    address addr = (address)Decoder::demangle;

    char buf[MAX_PATH];

    if (decode(addr, buf, sizeof(buf), NULL, NULL, true /* demangle */)) {

      _can_decode_in_vm = !strcmp(buf, "Decoder::demangle");

    }

void WindowsDecoder::uninitialize() {}

  if (!has_error()) {

    if (WindowsDbgHelp::symGetSymFromAddr64(::GetCurrentProcess(), (DWORD64)addr, &displacement, pSymbol)) {

  if (!has_error()) {

    return WindowsDbgHelp::unDecorateSymbolName(symbol, buf, buflen, UNDNAME_COMPLETE) > 0;

  return false;