jdk/src/share/back/ObjectReferenceImpl.c
changeset 2 90ce3da70b43
child 5506 202f599c92aa
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/jdk/src/share/back/ObjectReferenceImpl.c	Sat Dec 01 00:00:00 2007 +0000
@@ -0,0 +1,366 @@
+/*
+ * Copyright 1998-2005 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.  Sun designates this
+ * particular file as subject to the "Classpath" exception as provided
+ * by Sun 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 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 "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
+    };