linker_md.c

来自「This is a resource based on j2me embedde」· C语言 代码 · 共 126 行

/*
 * @(#)linker_md.c	1.20 06/10/30
 *
 * Copyright  1990-2008 Sun Microsystems, Inc. All Rights Reserved.  
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER  
 *   
 * This program 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 program 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 at /legal/license.txt).   
 *   
 * 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 or visit www.sun.com if you need additional  
 * information or have any questions. 
 *
 */

#ifdef CVM_DYNAMIC_LINKING

#include "javavm/include/jni_md.h"
#include "javavm/include/porting/linker.h"
#include "javavm/include/porting/ansi/stdio.h"
#include "javavm/include/porting/ansi/string.h"
#include <dlfcn.h>
#include <assert.h>
#include <stdlib.h>

/*
 * create a string for the dynamic lib open call by adding the
 * appropriate pre and extensions to a filename and the path
 */
void
CVMdynlinkbuildLibName(char *holder, int holderlen, const char *pname,
                       char *fname)
{
    const int pnamelen = pname ? strlen(pname) : 0;
    char *suffix;

#ifdef CVM_DEBUG   
    suffix = "_g";
#else
    suffix = "";
#endif 

    /* Quietly truncate on buffer overflow.  Should be an error. */
    if (pnamelen + strlen(fname) + 10 > holderlen) {
        *holder = '\0';
        return;
    }

    if (pnamelen == 0) {
        sprintf(holder, "%s%s%s%s", JNI_LIB_PREFIX, fname, suffix,
		JNI_LIB_SUFFIX);
    } else {
        sprintf(holder, "%s/%s%s%s%s", pname, JNI_LIB_PREFIX, fname, suffix,
		JNI_LIB_SUFFIX);
    }
}

void *
CVMdynlinkOpen(const void *absolutePathName)
{
    void *handle;

    handle = dlopen((const char *) absolutePathName, RTLD_LAZY);
#ifdef CVM_DEBUG
    if (!handle) {
        fputs(dlerror(), stderr);
        fputs("\n", stderr);         
    }
#endif
    return handle;
}

void *
CVMdynlinkSym(void *dsoHandle, const void *name)
{
    assert(dsoHandle != NULL);
    /*
     * Some platforms (namely bsd) require that you prepend the
     * symbol with an underscore.
     */
#ifdef CVM_DYNLINKSYM_PREPEND_UNDERSCORE
    {
	void* result;
	char *buf = malloc(strlen(name) + 1 + 1);
	if (buf == NULL) {
	    return NULL;
	}
	strcpy(buf, "_");
	strcat(buf, name);
	result = dlsym(dsoHandle, (const char *) buf);
	free(buf);
	/* 
	 * On darwin, the dlcompat library requires that you prepend the
	 * underscore, but the Panther version (10.3?) of dlsym does not, so
	 * we need to try both.
	 */
	if (result == NULL) {
	    result = dlsym(dsoHandle, (const char *) name);
	}
	return result;
    }
#else
    return dlsym(dsoHandle, (const char *) name);
#endif
}

void
CVMdynlinkClose(void *dsoHandle)
{
    dlclose(dsoHandle);
}

#endif /* #defined CVM_DYNAMIC_LINKING */