0N/A/*
1879N/A * Copyright (c) 2001, 2010, Oracle and/or its affiliates. All rights reserved.
0N/A * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
0N/A *
0N/A * This code is free software; you can redistribute it and/or modify it
0N/A * under the terms of the GNU General Public License version 2 only, as
0N/A * published by the Free Software Foundation.
0N/A *
0N/A * This code is distributed in the hope that it will be useful, but WITHOUT
0N/A * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
0N/A * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
0N/A * version 2 for more details (a copy is included in the LICENSE file that
0N/A * accompanied this code).
0N/A *
0N/A * You should have received a copy of the GNU General Public License version
0N/A * 2 along with this work; if not, write to the Free Software Foundation,
0N/A * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
0N/A *
1472N/A * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
1472N/A * or visit www.oracle.com if you need additional information or have any
1472N/A * questions.
0N/A *
0N/A */
0N/A
1879N/A#include "precompiled.hpp"
1879N/A#include "classfile/vmSymbols.hpp"
1879N/A#include "memory/allocation.inline.hpp"
1879N/A#include "memory/resourceArea.hpp"
1879N/A#include "oops/oop.inline.hpp"
1879N/A#include "prims/jni.h"
1879N/A#include "prims/jvm.h"
1879N/A#include "runtime/interfaceSupport.hpp"
1879N/A#include "runtime/perfData.hpp"
1879N/A#include "runtime/perfMemory.hpp"
1879N/A
0N/A/*
0N/A * Implementation of class sun.misc.Perf
0N/A */
0N/A
0N/A
0N/A#define PERF_ENTRY(result_type, header) \
0N/A JVM_ENTRY(result_type, header)
0N/A
0N/A#define PERF_END JVM_END
0N/A
0N/A#define PerfWrapper(arg) /* Unimplemented at this time */
0N/A
0N/Astatic char* jstr_to_utf(JNIEnv *env, jstring str, TRAPS) {
0N/A
0N/A char* utfstr = NULL;
0N/A
0N/A if (str == NULL) {
0N/A THROW_0(vmSymbols::java_lang_NullPointerException());
0N/A //throw_new(env,"NullPointerException");
0N/A }
0N/A
0N/A int len = env->GetStringUTFLength(str);
0N/A int unicode_len = env->GetStringLength(str);
0N/A
0N/A utfstr = NEW_RESOURCE_ARRAY(char, len + 1);
0N/A
0N/A env->GetStringUTFRegion(str, 0, unicode_len, utfstr);
0N/A
0N/A return utfstr;
0N/A}
0N/A
0N/APERF_ENTRY(jobject, Perf_Attach(JNIEnv *env, jobject unused, jstring user, int vmid, int mode))
0N/A
0N/A PerfWrapper("Perf_Attach");
0N/A
0N/A char* address = 0;
0N/A size_t capacity = 0;
0N/A const char* user_utf = NULL;
0N/A
0N/A ResourceMark rm;
0N/A
0N/A {
0N/A ThreadToNativeFromVM ttnfv(thread);
0N/A
0N/A user_utf = user == NULL ? NULL : jstr_to_utf(env, user, CHECK_NULL);
0N/A }
0N/A
0N/A if (mode != PerfMemory::PERF_MODE_RO &&
0N/A mode != PerfMemory::PERF_MODE_RW) {
0N/A THROW_0(vmSymbols::java_lang_IllegalArgumentException());
0N/A }
0N/A
0N/A // attach to the PerfData memory region for the specified VM
0N/A PerfMemory::attach(user_utf, vmid, (PerfMemory::PerfMemoryMode) mode,
0N/A &address, &capacity, CHECK_NULL);
0N/A
0N/A {
0N/A ThreadToNativeFromVM ttnfv(thread);
0N/A return env->NewDirectByteBuffer(address, (jlong)capacity);
0N/A }
0N/A
0N/APERF_END
0N/A
0N/APERF_ENTRY(void, Perf_Detach(JNIEnv *env, jobject unused, jobject buffer))
0N/A
0N/A PerfWrapper("Perf_Detach");
0N/A
0N/A void* address = 0;
0N/A jlong capacity = 0;
0N/A
0N/A // get buffer address and capacity
0N/A {
0N/A ThreadToNativeFromVM ttnfv(thread);
0N/A address = env->GetDirectBufferAddress(buffer);
0N/A capacity = env->GetDirectBufferCapacity(buffer);
0N/A }
0N/A
0N/A PerfMemory::detach((char*)address, capacity, CHECK);
0N/A
0N/APERF_END
0N/A
0N/APERF_ENTRY(jobject, Perf_CreateLong(JNIEnv *env, jobject perf, jstring name,
0N/A int variability, int units, jlong value))
0N/A
0N/A PerfWrapper("Perf_CreateLong");
0N/A
0N/A char* name_utf = NULL;
0N/A
0N/A if (units <= 0 || units > PerfData::U_Last) {
0N/A debug_only(warning("unexpected units argument, units = %d", units));
0N/A THROW_0(vmSymbols::java_lang_IllegalArgumentException());
0N/A }
0N/A
0N/A ResourceMark rm;
0N/A
0N/A {
0N/A ThreadToNativeFromVM ttnfv(thread);
0N/A
0N/A name_utf = jstr_to_utf(env, name, CHECK_NULL);
0N/A }
0N/A
0N/A PerfLong* pl = NULL;
0N/A
0N/A // check that the PerfData name doesn't already exist
0N/A if (PerfDataManager::exists(name_utf)) {
0N/A THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), "PerfLong name already exists");
0N/A }
0N/A
0N/A switch(variability) {
0N/A case 1: /* V_Constant */
0N/A pl = PerfDataManager::create_long_constant(NULL_NS, (char *)name_utf,
0N/A (PerfData::Units)units, value,
0N/A CHECK_NULL);
0N/A break;
0N/A
0N/A case 2: /* V_Variable */
0N/A pl = PerfDataManager::create_long_variable(NULL_NS, (char *)name_utf,
0N/A (PerfData::Units)units, value,
0N/A CHECK_NULL);
0N/A break;
0N/A
0N/A case 3: /* V_Monotonic Counter */
0N/A pl = PerfDataManager::create_long_counter(NULL_NS, (char *)name_utf,
0N/A (PerfData::Units)units, value,
0N/A CHECK_NULL);
0N/A break;
0N/A
0N/A default: /* Illegal Argument */
0N/A debug_only(warning("unexpected variability value: %d", variability));
0N/A THROW_0(vmSymbols::java_lang_IllegalArgumentException());
0N/A break;
0N/A }
0N/A
0N/A long* lp = (long*)pl->get_address();
0N/A
0N/A {
0N/A ThreadToNativeFromVM ttnfv(thread);
0N/A return env->NewDirectByteBuffer(lp, sizeof(jlong));
0N/A }
0N/A
0N/APERF_END
0N/A
0N/APERF_ENTRY(jobject, Perf_CreateByteArray(JNIEnv *env, jobject perf,
0N/A jstring name, jint variability,
0N/A jint units, jbyteArray value,
0N/A jint maxlength))
0N/A
0N/A PerfWrapper("Perf_CreateByteArray");
0N/A
0N/A // check for valid byte array objects
0N/A if (name == NULL || value == NULL) {
0N/A THROW_0(vmSymbols::java_lang_NullPointerException());
0N/A }
0N/A
0N/A // check for valid variability classification
0N/A if (variability != PerfData::V_Constant &&
0N/A variability != PerfData::V_Variable) {
0N/A debug_only(warning("unexpected variability value: %d", variability));
0N/A THROW_0(vmSymbols::java_lang_IllegalArgumentException());
0N/A }
0N/A
0N/A // check for valid units
0N/A if (units != PerfData::U_String) {
0N/A // only String based ByteArray objects are currently supported
0N/A debug_only(warning("unexpected units value: %d", variability));
0N/A THROW_0(vmSymbols::java_lang_IllegalArgumentException());
0N/A }
0N/A
0N/A int value_length;
0N/A char* name_utf = NULL;
0N/A jbyte* value_local = NULL;
0N/A
0N/A ResourceMark rm;
0N/A
0N/A {
0N/A ThreadToNativeFromVM ttnfv(thread);
0N/A
0N/A name_utf = jstr_to_utf(env, name, CHECK_NULL);
0N/A
0N/A value_length = env->GetArrayLength(value);
0N/A
0N/A value_local = NEW_RESOURCE_ARRAY(jbyte, value_length + 1);
0N/A
0N/A env->GetByteArrayRegion(value, 0, value_length, value_local);
0N/A }
0N/A
0N/A // check that the counter name doesn't already exist
0N/A if (PerfDataManager::exists((char*)name_utf)) {
0N/A THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), "PerfByteArray name already exists");
0N/A }
0N/A
0N/A PerfByteArray* pbv = NULL;
0N/A
0N/A if (units == PerfData::U_String) {
0N/A
0N/A if (variability == PerfData::V_Constant) {
0N/A // create the string constant
0N/A pbv = PerfDataManager::create_string_constant(NULL_NS, (char*)name_utf,
0N/A (char*)value_local,
0N/A CHECK_NULL);
0N/A
0N/A assert(maxlength == value_length, "string constant length should be == maxlength");
0N/A maxlength = value_length;
0N/A }
0N/A else {
0N/A
0N/A // create the string variable
0N/A pbv = PerfDataManager::create_string_variable(NULL_NS, (char*)name_utf,
0N/A maxlength,
0N/A (char*)value_local,
0N/A CHECK_NULL);
0N/A
0N/A assert(maxlength >= value_length,"string variable length should be <= maxlength");
0N/A }
0N/A }
0N/A
0N/A char* cp = (char*)pbv->get_address();
0N/A
0N/A {
0N/A ThreadToNativeFromVM ttnfv(thread);
0N/A return env->NewDirectByteBuffer(cp, maxlength+1);
0N/A }
0N/A
0N/APERF_END
0N/A
0N/APERF_ENTRY(jlong, Perf_HighResCounter(JNIEnv *env, jobject perf))
0N/A
0N/A PerfWrapper("Perf_HighResCounter");
0N/A
0N/A // this should be a method in java.lang.System. This value could
0N/A // be acquired through access to a PerfData performance counter, but
0N/A // doing so would require that the PerfData monitoring overhead be
0N/A // incurred by all Java applications, which is unacceptable.
0N/A
0N/A return os::elapsed_counter();
0N/A
0N/APERF_END
0N/A
0N/APERF_ENTRY(jlong, Perf_HighResFrequency(JNIEnv *env, jobject perf))
0N/A
0N/A PerfWrapper("Perf_HighResFrequency");
0N/A
0N/A // this should be a method in java.lang.System. This value could
0N/A // be acquired through access to a PerfData performance counter, but
0N/A // doing so would require that the PerfData monitoring overhead be
0N/A // incurred by all Java applications, which is unacceptable.
0N/A
0N/A return os::elapsed_frequency();
0N/A
0N/APERF_END
0N/A
0N/A/// JVM_RegisterPerfMethods
0N/A
0N/A#define CC (char*) /*cast a literal from (const char*)*/
0N/A#define FN_PTR(f) CAST_FROM_FN_PTR(void*, &f)
0N/A#define BB "Ljava/nio/ByteBuffer;"
0N/A#define JLS "Ljava/lang/String;"
0N/A#define CL_ARGS CC"("JLS"IIJ)"BB
0N/A#define CBA_ARGS CC"("JLS"II[BI)"BB
0N/A
0N/Astatic JNINativeMethod perfmethods[] = {
0N/A
0N/A {CC"attach", CC"("JLS"II)"BB, FN_PTR(Perf_Attach)},
0N/A {CC"detach", CC"("BB")V", FN_PTR(Perf_Detach)},
0N/A {CC"createLong", CL_ARGS, FN_PTR(Perf_CreateLong)},
0N/A {CC"createByteArray", CBA_ARGS, FN_PTR(Perf_CreateByteArray)},
0N/A {CC"highResCounter", CC"()J", FN_PTR(Perf_HighResCounter)},
0N/A {CC"highResFrequency", CC"()J", FN_PTR(Perf_HighResFrequency)}
0N/A};
0N/A
0N/A#undef CBA_ARGS
0N/A#undef CL_ARGS
0N/A#undef JLS
0N/A#undef BB
0N/A#undef FN_PTR
0N/A#undef CC
0N/A
0N/A// This one function is exported, used by NativeLookup.
0N/AJVM_ENTRY(void, JVM_RegisterPerfMethods(JNIEnv *env, jclass perfclass))
0N/A PerfWrapper("JVM_RegisterPerfMethods");
0N/A {
0N/A ThreadToNativeFromVM ttnfv(thread);
0N/A int ok = env->RegisterNatives(perfclass, perfmethods, sizeof(perfmethods)/sizeof(JNINativeMethod));
0N/A guarantee(ok == 0, "register perf natives");
0N/A }
0N/AJVM_END