| /* |
| * 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 |
| }; |