decoder_windows.cpp revision 3084
1929N/A/*
3084N/A * Copyright (c) 1997, 2011, Oracle and/or its affiliates. All rights reserved.
1929N/A * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
1929N/A *
1929N/A * This code is free software; you can redistribute it and/or modify it
1929N/A * under the terms of the GNU General Public License version 2 only, as
1929N/A * published by the Free Software Foundation.
1929N/A *
1929N/A * This code is distributed in the hope that it will be useful, but WITHOUT
1929N/A * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
1929N/A * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
1929N/A * version 2 for more details (a copy is included in the LICENSE file that
1929N/A * accompanied this code).
1929N/A *
1929N/A * You should have received a copy of the GNU General Public License version
1929N/A * 2 along with this work; if not, write to the Free Software Foundation,
1929N/A * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
1929N/A *
1929N/A * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
1929N/A * or visit www.oracle.com if you need additional information or have any
1929N/A * questions.
1929N/A *
1929N/A */
1929N/A
1929N/A#include "precompiled.hpp"
1929N/A#include "prims/jvm.h"
3084N/A#include "decoder_windows.hpp"
3084N/A
3084N/AWindowsDecoder::WindowsDecoder() {
3084N/A _dbghelp_handle = NULL;
3084N/A _can_decode_in_vm = false;
3084N/A _pfnSymGetSymFromAddr64 = NULL;
3084N/A _pfnUndecorateSymbolName = NULL;
1929N/A
3084N/A _decoder_status = no_error;
3084N/A initialize();
3084N/A}
1929N/A
3084N/Avoid WindowsDecoder::initialize() {
3084N/A if (!has_error() && _dbghelp_handle == NULL) {
3084N/A HMODULE handle = ::LoadLibrary("dbghelp.dll");
1929N/A if (!handle) {
1929N/A _decoder_status = helper_not_found;
3084N/A return;
1929N/A }
1929N/A
1929N/A _dbghelp_handle = handle;
1929N/A
1929N/A pfn_SymSetOptions _pfnSymSetOptions = (pfn_SymSetOptions)::GetProcAddress(handle, "SymSetOptions");
1929N/A pfn_SymInitialize _pfnSymInitialize = (pfn_SymInitialize)::GetProcAddress(handle, "SymInitialize");
1929N/A _pfnSymGetSymFromAddr64 = (pfn_SymGetSymFromAddr64)::GetProcAddress(handle, "SymGetSymFromAddr64");
1929N/A _pfnUndecorateSymbolName = (pfn_UndecorateSymbolName)GetProcAddress(handle, "UnDecorateSymbolName");
1929N/A
1929N/A if (_pfnSymSetOptions == NULL || _pfnSymInitialize == NULL || _pfnSymGetSymFromAddr64 == NULL) {
1929N/A _pfnSymGetSymFromAddr64 = NULL;
1929N/A _pfnUndecorateSymbolName = NULL;
1929N/A ::FreeLibrary(handle);
1929N/A _dbghelp_handle = NULL;
1929N/A _decoder_status = helper_func_error;
1929N/A return;
1929N/A }
1929N/A
1929N/A _pfnSymSetOptions(SYMOPT_UNDNAME | SYMOPT_DEFERRED_LOADS);
1929N/A if (!_pfnSymInitialize(GetCurrentProcess(), NULL, TRUE)) {
1929N/A _pfnSymGetSymFromAddr64 = NULL;
1929N/A _pfnUndecorateSymbolName = NULL;
1929N/A ::FreeLibrary(handle);
1929N/A _dbghelp_handle = NULL;
1929N/A _decoder_status = helper_init_error;
1929N/A return;
1929N/A }
1929N/A
1929N/A // find out if jvm.dll contains private symbols, by decoding
1929N/A // current function and comparing the result
3084N/A address addr = (address)Decoder::decode;
1929N/A char buf[MAX_PATH];
3084N/A if (decode(addr, buf, sizeof(buf), NULL)) {
3084N/A _can_decode_in_vm = !strcmp(buf, "Decoder::decode");
1929N/A }
1929N/A }
1929N/A}
1929N/A
3084N/Avoid WindowsDecoder::uninitialize() {
1929N/A _pfnSymGetSymFromAddr64 = NULL;
1929N/A _pfnUndecorateSymbolName = NULL;
1929N/A if (_dbghelp_handle != NULL) {
1929N/A ::FreeLibrary(_dbghelp_handle);
1929N/A }
3084N/A _dbghelp_handle = NULL;
1929N/A}
1929N/A
3084N/Abool WindowsDecoder::can_decode_C_frame_in_vm() const {
3084N/A return (!has_error() && _can_decode_in_vm);
1929N/A}
1929N/A
1929N/A
3084N/Abool WindowsDecoder::decode(address addr, char *buf, int buflen, int* offset, const char* modulepath) {
1929N/A if (_pfnSymGetSymFromAddr64 != NULL) {
1929N/A PIMAGEHLP_SYMBOL64 pSymbol;
1929N/A char symbolInfo[MAX_PATH + sizeof(IMAGEHLP_SYMBOL64)];
1929N/A pSymbol = (PIMAGEHLP_SYMBOL64)symbolInfo;
1929N/A pSymbol->MaxNameLength = MAX_PATH;
1929N/A pSymbol->SizeOfStruct = sizeof(IMAGEHLP_SYMBOL64);
1929N/A DWORD64 displacement;
1929N/A if (_pfnSymGetSymFromAddr64(::GetCurrentProcess(), (DWORD64)addr, &displacement, pSymbol)) {
1929N/A if (buf != NULL) {
3084N/A if (demangle(pSymbol->Name, buf, buflen)) {
1929N/A jio_snprintf(buf, buflen, "%s", pSymbol->Name);
1929N/A }
1929N/A }
3084N/A if(offset != NULL) *offset = (int)displacement;
3084N/A return true;
1929N/A }
1929N/A }
3084N/A if (buf != NULL && buflen > 0) buf[0] = '\0';
3084N/A if (offset != NULL) *offset = -1;
3084N/A return false;
1929N/A}
1929N/A
3084N/Abool WindowsDecoder::demangle(const char* symbol, char *buf, int buflen) {
1929N/A return _pfnUndecorateSymbolName != NULL &&
1929N/A _pfnUndecorateSymbolName(symbol, buf, buflen, UNDNAME_COMPLETE);
1929N/A}
1929N/A