110 lines
3.6 KiB
C
110 lines
3.6 KiB
C
/*
|
|
* Copyright (c) 2010, 2018, Oracle and/or its affiliates. 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 Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
|
|
* or visit www.oracle.com if you need additional information or have any
|
|
* questions.
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <stdlib.h>
|
|
#include "jvmti.h"
|
|
#include "agent_common.h"
|
|
#include "JVMTITools.h"
|
|
#include "jvmti_tools.h"
|
|
#include "mlvmJvmtiUtils.h"
|
|
|
|
void copyFromJString(JNIEnv * pEnv, jstring src, char ** dst) {
|
|
const char * pStr;
|
|
jsize len;
|
|
|
|
if ( ! NSK_VERIFY((pStr = NSK_CPP_STUB3(GetStringUTFChars, pEnv, src, NULL)) != NULL) ) {
|
|
return;
|
|
}
|
|
|
|
len = NSK_CPP_STUB2(GetStringUTFLength, pEnv, src) + 1;
|
|
*dst = malloc(len);
|
|
strncpy(*dst, pStr, len);
|
|
|
|
NSK_CPP_STUB3(ReleaseStringUTFChars, pEnv, src, pStr);
|
|
}
|
|
|
|
struct MethodName * getMethodName(jvmtiEnv * pJvmtiEnv, jmethodID method) {
|
|
char * szName;
|
|
char * szSignature;
|
|
jclass clazz;
|
|
struct MethodName * mn;
|
|
|
|
if ( ! NSK_JVMTI_VERIFY(NSK_CPP_STUB5(GetMethodName, pJvmtiEnv, method, &szName, NULL, NULL)) ) {
|
|
return NULL;
|
|
}
|
|
|
|
if ( ! NSK_JVMTI_VERIFY(NSK_CPP_STUB3(GetMethodDeclaringClass, pJvmtiEnv, method, &clazz)) ) {
|
|
NSK_JVMTI_VERIFY(NSK_CPP_STUB2(Deallocate, pJvmtiEnv, (void *) szName));
|
|
return NULL;
|
|
}
|
|
|
|
if ( ! NSK_JVMTI_VERIFY(NSK_CPP_STUB4(GetClassSignature, pJvmtiEnv, clazz, &szSignature, NULL)) ) {
|
|
NSK_JVMTI_VERIFY(NSK_CPP_STUB2(Deallocate, pJvmtiEnv, (void *) szName));
|
|
return NULL;
|
|
}
|
|
|
|
mn = malloc(sizeof(MethodNameStruct));
|
|
strncpy(mn->methodName, szName, sizeof(mn->methodName));
|
|
strncpy(mn->classSig, szSignature, sizeof(mn->classSig));
|
|
|
|
NSK_JVMTI_VERIFY(NSK_CPP_STUB2(Deallocate, pJvmtiEnv, (void *) szName));
|
|
NSK_JVMTI_VERIFY(NSK_CPP_STUB2(Deallocate, pJvmtiEnv, (void *) szSignature));
|
|
return mn;
|
|
}
|
|
|
|
char * locationToString(jvmtiEnv * pJvmtiEnv, jmethodID method, jlocation location) {
|
|
struct MethodName * pMN;
|
|
// gcc 7.3 claims that snprintf below can output between 6 and 531 bytes. Setting buffer size to 600.
|
|
char r[600];
|
|
|
|
pMN = getMethodName(pJvmtiEnv, method);
|
|
if ( ! pMN )
|
|
return strdup("NONE");
|
|
|
|
snprintf(r, sizeof(r), "%s .%s :%lx", pMN->classSig, pMN->methodName, (long) location);
|
|
|
|
free(pMN);
|
|
|
|
return strdup(r);
|
|
}
|
|
|
|
void * getTLS(jvmtiEnv * pJvmtiEnv, jthread thread, jsize sizeToAllocate) {
|
|
void * tls;
|
|
if ( ! NSK_JVMTI_VERIFY(NSK_CPP_STUB3(GetThreadLocalStorage, pJvmtiEnv, thread, &tls)) )
|
|
return NULL;
|
|
|
|
if ( ! tls) {
|
|
if ( ! NSK_VERIFY((tls = malloc(sizeToAllocate)) != NULL) )
|
|
return NULL;
|
|
|
|
memset(tls, 0, sizeToAllocate);
|
|
|
|
if ( ! NSK_JVMTI_VERIFY(NSK_CPP_STUB3(SetThreadLocalStorage, pJvmtiEnv, thread, tls)) )
|
|
return NULL;
|
|
}
|
|
|
|
return tls;
|
|
}
|