duke@435: /*
duke@435:  * Copyright 1999-2006 Sun Microsystems, Inc.  All Rights Reserved.
duke@435:  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
duke@435:  *
duke@435:  * This code is free software; you can redistribute it and/or modify it
duke@435:  * under the terms of the GNU General Public License version 2 only, as
duke@435:  * published by the Free Software Foundation.
duke@435:  *
duke@435:  * This code is distributed in the hope that it will be useful, but WITHOUT
duke@435:  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
duke@435:  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
duke@435:  * version 2 for more details (a copy is included in the LICENSE file that
duke@435:  * accompanied this code).
duke@435:  *
duke@435:  * You should have received a copy of the GNU General Public License version
duke@435:  * 2 along with this work; if not, write to the Free Software Foundation,
duke@435:  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
duke@435:  *
duke@435:  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
duke@435:  * CA 95054 USA or visit www.sun.com if you need additional information or
duke@435:  * have any questions.
duke@435:  *
duke@435:  */
duke@435: 
duke@435: # include "incls/_precompiled.incl"
duke@435: # include "incls/_hpi_linux.cpp.incl"
duke@435: 
duke@435: # include <sys/param.h>
duke@435: # include <dlfcn.h>
duke@435: 
duke@435: typedef jint (JNICALL *init_t)(GetInterfaceFunc *, void *);
duke@435: 
duke@435: void hpi::initialize_get_interface(vm_calls_t *callbacks) {
duke@435:     char buf[JVM_MAXPATHLEN];
duke@435:     void *hpi_handle;
duke@435:     GetInterfaceFunc& getintf = _get_interface;
duke@435:     jint (JNICALL * DLL_Initialize)(GetInterfaceFunc *, void *);
duke@435: 
duke@435:     if (HPILibPath && HPILibPath[0]) {
duke@435:       strncpy(buf, HPILibPath, JVM_MAXPATHLEN - 1);
duke@435:       buf[JVM_MAXPATHLEN - 1] = '\0';
duke@435:     } else {
duke@435:       const char *thread_type = "native_threads";
duke@435: 
duke@435:       os::jvm_path(buf, JVM_MAXPATHLEN);
duke@435: 
duke@435: #ifdef PRODUCT
duke@435:       const char * hpi_lib = "/libhpi.so";
duke@435: #else
duke@435:       char * ptr = strrchr(buf, '/');
duke@435:       assert(strstr(ptr, "/libjvm") == ptr, "invalid library name");
duke@435:       const char * hpi_lib = strstr(ptr, "_g") ? "/libhpi_g.so" : "/libhpi.so";
duke@435: #endif
duke@435: 
duke@435:       *(strrchr(buf, '/')) = '\0';  /* get rid of /libjvm.so */
duke@435:       char* p = strrchr(buf, '/');
duke@435:       if (p != NULL) p[1] = '\0';   /* get rid of hotspot    */
duke@435:       strcat(buf, thread_type);
duke@435:       strcat(buf, hpi_lib);
duke@435:     }
duke@435: 
duke@435:     if (TraceHPI) tty->print_cr("Loading HPI %s ", buf);
duke@435: #ifdef SPARC
duke@435:     // On 64-bit Ubuntu Sparc RTLD_NOW leads to unresolved deps in libpthread.so
duke@435: #   define OPEN_MODE RTLD_LAZY
duke@435: #else
duke@435:     // We use RTLD_NOW because of bug 4032715
duke@435: #   define OPEN_MODE RTLD_NOW
duke@435: #endif
duke@435:     hpi_handle = dlopen(buf, OPEN_MODE);
duke@435: #undef OPEN_MODE
duke@435: 
duke@435:     if (hpi_handle == NULL) {
duke@435:         if (TraceHPI) tty->print_cr("HPI dlopen failed: %s", dlerror());
duke@435:         return;
duke@435:     }
duke@435:     DLL_Initialize = CAST_TO_FN_PTR(jint (JNICALL *)(GetInterfaceFunc *, void *),
duke@435:                                     dlsym(hpi_handle, "DLL_Initialize"));
duke@435:     if (TraceHPI && DLL_Initialize == NULL) tty->print_cr("HPI dlsym of DLL_Initialize failed: %s", dlerror());
duke@435:     if (DLL_Initialize == NULL ||
duke@435:         (*DLL_Initialize)(&getintf, callbacks) < 0) {
duke@435:         if (TraceHPI) tty->print_cr("HPI DLL_Initialize failed");
duke@435:         return;
duke@435:     }
duke@435:     if (TraceHPI)  tty->print_cr("HPI loaded successfully");
duke@435: }