Mercurial > hg > truffle
view src/os/windows/vm/hpi_windows.cpp @ 1433:efba53f86c4f
various fixes and enhancements
* correct refmap->oopmap conversion (register numbering, stack slot numbering)
* fixes for inlining (correct scoping in exception handler lookup, NPE in scope conversion)
* support for "jump to runtime stub" (patching code needs to be aware of jmp instruction)
* provide more information about methods (to allow inlining: has_balanced_monitors, etc.)
* fixes to signature type lookup
* isSubTypeOf: correct handling of array classes
* RiType: componentType/arrayOf
* prologue: inline cache check, icmiss stub
* klass state check (resolved but not initialized) in newinstance
* card table write barriers
* c1x classes are optional (to allow running c1 without them)
* correct for stored frame pointer in calling conventions (methods with arguments on stack)
* getType(Class<?>) for some basic types, used for optimizations and folding
* RiMethod/RiType: throw exception instead of silent failure on unsupported operations
* RiType: resolved/unresolved array type support
* refactoring: new on-demand template generation mechanism
* optimizations: template specialization for no_null_check, given length, etc.
author | Lukas Stadler <lukas.stadler@oracle.com> |
---|---|
date | Thu, 16 Sep 2010 19:42:20 -0700 |
parents | a61af66fc99e |
children | c18cbe5936b8 |
line wrap: on
line source
/* * Copyright 1998-2006 Sun Microsystems, Inc. All Rights Reserved. * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. * * This code is free software; you can redistribute it and/or modify it * under the terms of the GNU General Public License version 2 only, as * published by the Free Software Foundation. * * This code is distributed in the hope that it will be useful, but WITHOUT * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License * version 2 for more details (a copy is included in the LICENSE file that * accompanied this code). * * You should have received a copy of the GNU General Public License version * 2 along with this work; if not, write to the Free Software Foundation, * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. * * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara, * CA 95054 USA or visit www.sun.com if you need additional information or * have any questions. * */ # include "incls/_precompiled.incl" # include "incls/_hpi_windows.cpp.incl" typedef jint (JNICALL *init_t)(GetInterfaceFunc *, void *); void hpi::initialize_get_interface(vm_calls_t *callbacks) { // Build name of HPI. char lib_name[JVM_MAXPATHLEN]; if (HPILibPath && HPILibPath[0]) { strncpy(lib_name, HPILibPath, JVM_MAXPATHLEN - 1); lib_name[JVM_MAXPATHLEN - 1] = '\0'; } else { os::jvm_path(lib_name, sizeof lib_name); #ifdef PRODUCT const char *hpi_lib = "\\hpi.dll"; #else char *ptr = strrchr(lib_name, '\\'); // On Win98 GetModuleFileName() returns the path in the upper case. assert(_strnicmp(ptr, "\\jvm",4) == 0, "invalid library name"); const char *hpi_lib = (_strnicmp(ptr, "\\jvm_g",6) == 0) ? "\\hpi_g.dll" : "\\hpi.dll"; #endif *(::strrchr(lib_name, '\\')) = '\0'; /* get rid of "\\jvm.dll" */ char *p = ::strrchr(lib_name, '\\'); if (p != NULL) *p = '\0'; /* get rid of "\\hotspot" */ strcat(lib_name, hpi_lib); } // Load it. if (TraceHPI) tty->print_cr("Loading HPI %s ", lib_name); HINSTANCE lib_handle = LoadLibrary(lib_name); if (lib_handle == NULL) { if (TraceHPI) tty->print_cr("LoadLibrary failed, code = %d", GetLastError()); return; } // Find hpi initializer. init_t initer = (init_t)GetProcAddress(lib_handle, "DLL_Initialize"); if (initer == NULL) { if (TraceHPI) tty->print_cr("GetProcAddress failed, errcode = %d", GetLastError()); return; } // Call initializer. jint init_result = (*initer)(&_get_interface, callbacks); if (init_result < 0) { if (TraceHPI) tty->print_cr("DLL_Initialize failed, returned %ld", init_result); return; } if (TraceHPI) tty->print_cr("success"); return; }