--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/hotspot/src/share/vm/prims/jvmtiExtensions.cpp Sat Dec 01 00:00:00 2007 +0000
@@ -0,0 +1,277 @@
+/*
+ * Copyright 2003 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/_jvmtiExtensions.cpp.incl"
+
+// the list of extension functions
+GrowableArray<jvmtiExtensionFunctionInfo*>* JvmtiExtensions::_ext_functions;
+
+// the list of extension events
+GrowableArray<jvmtiExtensionEventInfo*>* JvmtiExtensions::_ext_events;
+
+
+// extension function
+static jvmtiError JNICALL IsClassUnloadingEnabled(const jvmtiEnv* env, jboolean* enabled, ...) {
+ if (enabled == NULL) {
+ return JVMTI_ERROR_NULL_POINTER;
+ }
+ *enabled = (jboolean)ClassUnloading;
+ return JVMTI_ERROR_NONE;
+}
+
+// register extension functions and events. In this implementation we
+// have a single extension function (to prove the API) that tests if class
+// unloading is enabled or disabled. We also have a single extension event
+// EXT_EVENT_CLASS_UNLOAD which is used to provide the JVMDI_EVENT_CLASS_UNLOAD
+// event. The function and the event are registered here.
+//
+void JvmtiExtensions::register_extensions() {
+ _ext_functions = new (ResourceObj::C_HEAP) GrowableArray<jvmtiExtensionFunctionInfo*>(1,true);
+ _ext_events = new (ResourceObj::C_HEAP) GrowableArray<jvmtiExtensionEventInfo*>(1,true);
+
+ // register our extension function
+ static jvmtiParamInfo func_params[] = {
+ { (char*)"IsClassUnloadingEnabled", JVMTI_KIND_OUT, JVMTI_TYPE_JBOOLEAN, JNI_FALSE }
+ };
+ static jvmtiExtensionFunctionInfo ext_func = {
+ (jvmtiExtensionFunction)IsClassUnloadingEnabled,
+ (char*)"com.sun.hotspot.functions.IsClassUnloadingEnabled",
+ (char*)"Tell if class unloading is enabled (-noclassgc)",
+ sizeof(func_params)/sizeof(func_params[0]),
+ func_params,
+ 0, // no non-universal errors
+ NULL
+ };
+ _ext_functions->append(&ext_func);
+
+ // register our extension event
+
+ static jvmtiParamInfo event_params[] = {
+ { (char*)"JNI Environment", JVMTI_KIND_IN, JVMTI_TYPE_JNIENV, JNI_FALSE },
+ { (char*)"Thread", JVMTI_KIND_IN, JVMTI_TYPE_JTHREAD, JNI_FALSE },
+ { (char*)"Class", JVMTI_KIND_IN, JVMTI_TYPE_JCLASS, JNI_FALSE }
+ };
+ static jvmtiExtensionEventInfo ext_event = {
+ EXT_EVENT_CLASS_UNLOAD,
+ (char*)"com.sun.hotspot.events.ClassUnload",
+ (char*)"CLASS_UNLOAD event",
+ sizeof(event_params)/sizeof(event_params[0]),
+ event_params
+ };
+ _ext_events->append(&ext_event);
+}
+
+
+// return the list of extension functions
+
+jvmtiError JvmtiExtensions::get_functions(JvmtiEnv* env,
+ jint* extension_count_ptr,
+ jvmtiExtensionFunctionInfo** extensions)
+{
+ guarantee(_ext_functions != NULL, "registration not done");
+
+ ResourceTracker rt(env);
+
+ jvmtiExtensionFunctionInfo* ext_funcs;
+ jvmtiError err = rt.allocate(_ext_functions->length() *
+ sizeof(jvmtiExtensionFunctionInfo),
+ (unsigned char**)&ext_funcs);
+ if (err != JVMTI_ERROR_NONE) {
+ return err;
+ }
+
+ for (int i=0; i<_ext_functions->length(); i++ ) {
+ ext_funcs[i].func = _ext_functions->at(i)->func;
+
+ char *id = _ext_functions->at(i)->id;
+ err = rt.allocate(strlen(id)+1, (unsigned char**)&(ext_funcs[i].id));
+ if (err != JVMTI_ERROR_NONE) {
+ return err;
+ }
+ strcpy(ext_funcs[i].id, id);
+
+ char *desc = _ext_functions->at(i)->short_description;
+ err = rt.allocate(strlen(desc)+1,
+ (unsigned char**)&(ext_funcs[i].short_description));
+ if (err != JVMTI_ERROR_NONE) {
+ return err;
+ }
+ strcpy(ext_funcs[i].short_description, desc);
+
+ // params
+
+ jint param_count = _ext_functions->at(i)->param_count;
+
+ ext_funcs[i].param_count = param_count;
+ if (param_count == 0) {
+ ext_funcs[i].params = NULL;
+ } else {
+ err = rt.allocate(param_count*sizeof(jvmtiParamInfo),
+ (unsigned char**)&(ext_funcs[i].params));
+ if (err != JVMTI_ERROR_NONE) {
+ return err;
+ }
+ jvmtiParamInfo* src_params = _ext_functions->at(i)->params;
+ jvmtiParamInfo* dst_params = ext_funcs[i].params;
+
+ for (int j=0; j<param_count; j++) {
+ err = rt.allocate(strlen(src_params[j].name)+1,
+ (unsigned char**)&(dst_params[j].name));
+ if (err != JVMTI_ERROR_NONE) {
+ return err;
+ }
+ strcpy(dst_params[j].name, src_params[j].name);
+
+ dst_params[j].kind = src_params[j].kind;
+ dst_params[j].base_type = src_params[j].base_type;
+ dst_params[j].null_ok = src_params[j].null_ok;
+ }
+ }
+
+ // errors
+
+ jint error_count = _ext_functions->at(i)->error_count;
+ ext_funcs[i].error_count = error_count;
+ if (error_count == 0) {
+ ext_funcs[i].errors = NULL;
+ } else {
+ err = rt.allocate(error_count*sizeof(jvmtiError),
+ (unsigned char**)&(ext_funcs[i].errors));
+ if (err != JVMTI_ERROR_NONE) {
+ return err;
+ }
+ memcpy(ext_funcs[i].errors, _ext_functions->at(i)->errors,
+ error_count*sizeof(jvmtiError));
+ }
+ }
+
+ *extension_count_ptr = _ext_functions->length();
+ *extensions = ext_funcs;
+ return JVMTI_ERROR_NONE;
+}
+
+
+// return the list of extension events
+
+jvmtiError JvmtiExtensions::get_events(JvmtiEnv* env,
+ jint* extension_count_ptr,
+ jvmtiExtensionEventInfo** extensions)
+{
+ guarantee(_ext_events != NULL, "registration not done");
+
+ ResourceTracker rt(env);
+
+ jvmtiExtensionEventInfo* ext_events;
+ jvmtiError err = rt.allocate(_ext_events->length() * sizeof(jvmtiExtensionEventInfo),
+ (unsigned char**)&ext_events);
+ if (err != JVMTI_ERROR_NONE) {
+ return err;
+ }
+
+ for (int i=0; i<_ext_events->length(); i++ ) {
+ ext_events[i].extension_event_index = _ext_events->at(i)->extension_event_index;
+
+ char *id = _ext_events->at(i)->id;
+ err = rt.allocate(strlen(id)+1, (unsigned char**)&(ext_events[i].id));
+ if (err != JVMTI_ERROR_NONE) {
+ return err;
+ }
+ strcpy(ext_events[i].id, id);
+
+ char *desc = _ext_events->at(i)->short_description;
+ err = rt.allocate(strlen(desc)+1,
+ (unsigned char**)&(ext_events[i].short_description));
+ if (err != JVMTI_ERROR_NONE) {
+ return err;
+ }
+ strcpy(ext_events[i].short_description, desc);
+
+ // params
+
+ jint param_count = _ext_events->at(i)->param_count;
+
+ ext_events[i].param_count = param_count;
+ if (param_count == 0) {
+ ext_events[i].params = NULL;
+ } else {
+ err = rt.allocate(param_count*sizeof(jvmtiParamInfo),
+ (unsigned char**)&(ext_events[i].params));
+ if (err != JVMTI_ERROR_NONE) {
+ return err;
+ }
+ jvmtiParamInfo* src_params = _ext_events->at(i)->params;
+ jvmtiParamInfo* dst_params = ext_events[i].params;
+
+ for (int j=0; j<param_count; j++) {
+ err = rt.allocate(strlen(src_params[j].name)+1,
+ (unsigned char**)&(dst_params[j].name));
+ if (err != JVMTI_ERROR_NONE) {
+ return err;
+ }
+ strcpy(dst_params[j].name, src_params[j].name);
+
+ dst_params[j].kind = src_params[j].kind;
+ dst_params[j].base_type = src_params[j].base_type;
+ dst_params[j].null_ok = src_params[j].null_ok;
+ }
+ }
+ }
+
+ *extension_count_ptr = _ext_events->length();
+ *extensions = ext_events;
+ return JVMTI_ERROR_NONE;
+}
+
+// set callback for an extension event and enable/disable it.
+
+jvmtiError JvmtiExtensions::set_event_callback(JvmtiEnv* env,
+ jint extension_event_index,
+ jvmtiExtensionEvent callback)
+{
+ guarantee(_ext_events != NULL, "registration not done");
+
+ jvmtiExtensionEventInfo* event = NULL;
+
+ // if there are extension events registered then validate that the
+ // extension_event_index matches one of the registered events.
+ if (_ext_events != NULL) {
+ for (int i=0; i<_ext_events->length(); i++ ) {
+ if (_ext_events->at(i)->extension_event_index == extension_event_index) {
+ event = _ext_events->at(i);
+ break;
+ }
+ }
+ }
+
+ // invalid event index
+ if (event == NULL) {
+ return JVMTI_ERROR_ILLEGAL_ARGUMENT;
+ }
+
+ JvmtiEventController::set_extension_event_callback(env, extension_event_index,
+ callback);
+
+ return JVMTI_ERROR_NONE;
+}