--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/jdk/src/jdk.jdwp.agent/share/native/libjdwp/ObjectReferenceImpl.c Sun Aug 17 15:54:13 2014 +0100
@@ -0,0 +1,366 @@
+/*
+ * Copyright (c) 1998, 2005, 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. Oracle designates this
+ * particular file as subject to the "Classpath" exception as provided
+ * by Oracle in the LICENSE file that accompanied this code.
+ *
+ * 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 "util.h"
+#include "ObjectReferenceImpl.h"
+#include "commonRef.h"
+#include "inStream.h"
+#include "outStream.h"
+
+static jboolean
+referenceType(PacketInputStream *in, PacketOutputStream *out)
+{
+ JNIEnv *env;
+ jobject object;
+
+ env = getEnv();
+
+ object = inStream_readObjectRef(env, in);
+ if (inStream_error(in)) {
+ return JNI_TRUE;
+ }
+
+ WITH_LOCAL_REFS(env, 1) {
+
+ jbyte tag;
+ jclass clazz;
+
+ clazz = JNI_FUNC_PTR(env,GetObjectClass)(env, object);
+ tag = referenceTypeTag(clazz);
+
+ (void)outStream_writeByte(out, tag);
+ (void)outStream_writeObjectRef(env, out, clazz);
+
+ } END_WITH_LOCAL_REFS(env);
+
+ return JNI_TRUE;
+}
+
+static jboolean
+getValues(PacketInputStream *in, PacketOutputStream *out)
+{
+ sharedGetFieldValues(in, out, JNI_FALSE);
+ return JNI_TRUE;
+}
+
+
+static jvmtiError
+readFieldValue(JNIEnv *env, PacketInputStream *in, jclass clazz,
+ jobject object, jfieldID field, char *signature)
+{
+ jvalue value;
+ jvmtiError error;
+
+ switch (signature[0]) {
+ case JDWP_TAG(ARRAY):
+ case JDWP_TAG(OBJECT):
+ value.l = inStream_readObjectRef(env, in);
+ JNI_FUNC_PTR(env,SetObjectField)(env, object, field, value.l);
+ break;
+
+ case JDWP_TAG(BYTE):
+ value.b = inStream_readByte(in);
+ JNI_FUNC_PTR(env,SetByteField)(env, object, field, value.b);
+ break;
+
+ case JDWP_TAG(CHAR):
+ value.c = inStream_readChar(in);
+ JNI_FUNC_PTR(env,SetCharField)(env, object, field, value.c);
+ break;
+
+ case JDWP_TAG(FLOAT):
+ value.f = inStream_readFloat(in);
+ JNI_FUNC_PTR(env,SetFloatField)(env, object, field, value.f);
+ break;
+
+ case JDWP_TAG(DOUBLE):
+ value.d = inStream_readDouble(in);
+ JNI_FUNC_PTR(env,SetDoubleField)(env, object, field, value.d);
+ break;
+
+ case JDWP_TAG(INT):
+ value.i = inStream_readInt(in);
+ JNI_FUNC_PTR(env,SetIntField)(env, object, field, value.i);
+ break;
+
+ case JDWP_TAG(LONG):
+ value.j = inStream_readLong(in);
+ JNI_FUNC_PTR(env,SetLongField)(env, object, field, value.j);
+ break;
+
+ case JDWP_TAG(SHORT):
+ value.s = inStream_readShort(in);
+ JNI_FUNC_PTR(env,SetShortField)(env, object, field, value.s);
+ break;
+
+ case JDWP_TAG(BOOLEAN):
+ value.z = inStream_readBoolean(in);
+ JNI_FUNC_PTR(env,SetBooleanField)(env, object, field, value.z);
+ break;
+ }
+
+ error = JVMTI_ERROR_NONE;
+ if (JNI_FUNC_PTR(env,ExceptionOccurred)(env)) {
+ error = AGENT_ERROR_JNI_EXCEPTION;
+ }
+
+ return error;
+}
+
+static jboolean
+setValues(PacketInputStream *in, PacketOutputStream *out)
+{
+ JNIEnv *env;
+ jint count;
+ jvmtiError error;
+ jobject object;
+
+ env = getEnv();
+
+ object = inStream_readObjectRef(env, in);
+ if (inStream_error(in)) {
+ return JNI_TRUE;
+ }
+ count = inStream_readInt(in);
+ if (inStream_error(in)) {
+ return JNI_TRUE;
+ }
+
+ error = JVMTI_ERROR_NONE;
+
+ WITH_LOCAL_REFS(env, count + 1) {
+
+ jclass clazz;
+
+ clazz = JNI_FUNC_PTR(env,GetObjectClass)(env, object);
+
+ if (clazz != NULL ) {
+
+ int i;
+
+ for (i = 0; (i < count) && !inStream_error(in); i++) {
+
+ jfieldID field;
+ char *signature = NULL;
+
+ field = inStream_readFieldID(in);
+ if (inStream_error(in))
+ break;
+
+ error = fieldSignature(clazz, field, NULL, &signature, NULL);
+ if (error != JVMTI_ERROR_NONE) {
+ break;
+ }
+
+ error = readFieldValue(env, in, clazz, object, field, signature);
+ jvmtiDeallocate(signature);
+
+ if (error != JVMTI_ERROR_NONE) {
+ break;
+ }
+ }
+ }
+
+ if (error != JVMTI_ERROR_NONE) {
+ outStream_setError(out, map2jdwpError(error));
+ }
+
+ } END_WITH_LOCAL_REFS(env);
+
+ return JNI_TRUE;
+}
+
+static jboolean
+monitorInfo(PacketInputStream *in, PacketOutputStream *out)
+{
+ JNIEnv *env;
+ jobject object;
+
+ env = getEnv();
+
+ object = inStream_readObjectRef(env, in);
+ if (inStream_error(in)) {
+ return JNI_TRUE;
+ }
+
+ WITH_LOCAL_REFS(env, 1) {
+
+ jvmtiError error;
+ jvmtiMonitorUsage info;
+
+ (void)memset(&info, 0, sizeof(info));
+ error = JVMTI_FUNC_PTR(gdata->jvmti,GetObjectMonitorUsage)
+ (gdata->jvmti, object, &info);
+ if (error != JVMTI_ERROR_NONE) {
+ outStream_setError(out, map2jdwpError(error));
+ } else {
+ int i;
+ (void)outStream_writeObjectRef(env, out, info.owner);
+ (void)outStream_writeInt(out, info.entry_count);
+ (void)outStream_writeInt(out, info.waiter_count);
+ for (i = 0; i < info.waiter_count; i++) {
+ (void)outStream_writeObjectRef(env, out, info.waiters[i]);
+ }
+ }
+
+ if (info.waiters != NULL )
+ jvmtiDeallocate(info.waiters);
+
+ } END_WITH_LOCAL_REFS(env);
+
+ return JNI_TRUE;
+}
+
+static jboolean
+invokeInstance(PacketInputStream *in, PacketOutputStream *out)
+{
+ return sharedInvoke(in, out);
+}
+
+static jboolean
+disableCollection(PacketInputStream *in, PacketOutputStream *out)
+{
+ jlong id;
+ jvmtiError error;
+
+ id = inStream_readObjectID(in);
+ if (inStream_error(in)) {
+ return JNI_TRUE;
+ }
+
+ error = commonRef_pin(id);
+ if (error != JVMTI_ERROR_NONE) {
+ outStream_setError(out, map2jdwpError(error));
+ }
+
+ return JNI_TRUE;
+}
+
+static jboolean
+enableCollection(PacketInputStream *in, PacketOutputStream *out)
+{
+ jvmtiError error;
+ jlong id;
+
+ id = inStream_readObjectID(in);
+ if (inStream_error(in)) {
+ return JNI_TRUE;
+ }
+
+ error = commonRef_unpin(id);
+ if (error != JVMTI_ERROR_NONE) {
+ outStream_setError(out, map2jdwpError(error));
+ }
+
+ return JNI_TRUE;
+}
+
+static jboolean
+isCollected(PacketInputStream *in, PacketOutputStream *out)
+{
+ jobject ref;
+ jlong id;
+ JNIEnv *env;
+
+ env = getEnv();
+ id = inStream_readObjectID(in);
+ if (inStream_error(in)) {
+ return JNI_TRUE;
+ }
+
+ if (id == NULL_OBJECT_ID) {
+ outStream_setError(out, JDWP_ERROR(INVALID_OBJECT));
+ return JNI_TRUE;
+ }
+
+ ref = commonRef_idToRef(env, id);
+ (void)outStream_writeBoolean(out, (jboolean)(ref == NULL));
+
+ commonRef_idToRef_delete(env, ref);
+
+ return JNI_TRUE;
+}
+
+
+static jboolean
+referringObjects(PacketInputStream *in, PacketOutputStream *out)
+{
+ jobject object;
+ jint maxReferrers;
+ JNIEnv *env;
+
+ env = getEnv();
+
+ if (gdata->vmDead) {
+ outStream_setError(out, JDWP_ERROR(VM_DEAD));
+ return JNI_TRUE;
+ }
+
+ object = inStream_readObjectRef(env,in);
+ if (inStream_error(in)) {
+ return JNI_TRUE;
+ }
+
+ maxReferrers = inStream_readInt(in);
+ if (inStream_error(in)) {
+ return JNI_TRUE;
+ }
+
+ WITH_LOCAL_REFS(env, 1) {
+ jvmtiError error;
+ ObjectBatch referrerBatch;
+
+ error = objectReferrers(object, &referrerBatch, maxReferrers);
+ if (error != JVMTI_ERROR_NONE) {
+ outStream_setError(out, map2jdwpError(error));
+ } else {
+ int kk;
+
+ (void)outStream_writeInt(out, referrerBatch.count);
+ for (kk = 0; kk < referrerBatch.count; kk++) {
+ jobject ref;
+
+ ref = referrerBatch.objects[kk];
+ (void)outStream_writeByte(out, specificTypeKey(env, ref));
+ (void)outStream_writeObjectRef(env, out, ref);
+ }
+ jvmtiDeallocate(referrerBatch.objects);
+ }
+ } END_WITH_LOCAL_REFS(env);
+ return JNI_TRUE;
+}
+
+void *ObjectReference_Cmds[] = { (void *)10
+ ,(void *)referenceType
+ ,(void *)getValues
+ ,(void *)setValues
+ ,(void *)NULL /* no longer used */
+ ,(void *)monitorInfo
+ ,(void *)invokeInstance
+ ,(void *)disableCollection
+ ,(void *)enableCollection
+ ,(void *)isCollected
+ ,(void *)referringObjects
+ };