0N/A/*
2362N/A * Copyright (c) 1998, 2005, 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
2362N/A * published by the Free Software Foundation. Oracle designates this
0N/A * particular file as subject to the "Classpath" exception as provided
2362N/A * by Oracle in the LICENSE file that accompanied this code.
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 *
2362N/A * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
2362N/A * or visit www.oracle.com if you need additional information or have any
2362N/A * questions.
0N/A */
0N/A
0N/A#include "util.h"
0N/A#include "ObjectReferenceImpl.h"
0N/A#include "commonRef.h"
0N/A#include "inStream.h"
0N/A#include "outStream.h"
0N/A
0N/Astatic jboolean
0N/AreferenceType(PacketInputStream *in, PacketOutputStream *out)
0N/A{
0N/A JNIEnv *env;
0N/A jobject object;
0N/A
0N/A env = getEnv();
0N/A
0N/A object = inStream_readObjectRef(env, in);
0N/A if (inStream_error(in)) {
0N/A return JNI_TRUE;
0N/A }
0N/A
0N/A WITH_LOCAL_REFS(env, 1) {
0N/A
0N/A jbyte tag;
0N/A jclass clazz;
0N/A
0N/A clazz = JNI_FUNC_PTR(env,GetObjectClass)(env, object);
0N/A tag = referenceTypeTag(clazz);
0N/A
0N/A (void)outStream_writeByte(out, tag);
0N/A (void)outStream_writeObjectRef(env, out, clazz);
0N/A
0N/A } END_WITH_LOCAL_REFS(env);
0N/A
0N/A return JNI_TRUE;
0N/A}
0N/A
0N/Astatic jboolean
0N/AgetValues(PacketInputStream *in, PacketOutputStream *out)
0N/A{
0N/A sharedGetFieldValues(in, out, JNI_FALSE);
0N/A return JNI_TRUE;
0N/A}
0N/A
0N/A
0N/Astatic jvmtiError
0N/AreadFieldValue(JNIEnv *env, PacketInputStream *in, jclass clazz,
0N/A jobject object, jfieldID field, char *signature)
0N/A{
0N/A jvalue value;
0N/A jvmtiError error;
0N/A
0N/A switch (signature[0]) {
0N/A case JDWP_TAG(ARRAY):
0N/A case JDWP_TAG(OBJECT):
0N/A value.l = inStream_readObjectRef(env, in);
0N/A JNI_FUNC_PTR(env,SetObjectField)(env, object, field, value.l);
0N/A break;
0N/A
0N/A case JDWP_TAG(BYTE):
0N/A value.b = inStream_readByte(in);
0N/A JNI_FUNC_PTR(env,SetByteField)(env, object, field, value.b);
0N/A break;
0N/A
0N/A case JDWP_TAG(CHAR):
0N/A value.c = inStream_readChar(in);
0N/A JNI_FUNC_PTR(env,SetCharField)(env, object, field, value.c);
0N/A break;
0N/A
0N/A case JDWP_TAG(FLOAT):
0N/A value.f = inStream_readFloat(in);
0N/A JNI_FUNC_PTR(env,SetFloatField)(env, object, field, value.f);
0N/A break;
0N/A
0N/A case JDWP_TAG(DOUBLE):
0N/A value.d = inStream_readDouble(in);
0N/A JNI_FUNC_PTR(env,SetDoubleField)(env, object, field, value.d);
0N/A break;
0N/A
0N/A case JDWP_TAG(INT):
0N/A value.i = inStream_readInt(in);
0N/A JNI_FUNC_PTR(env,SetIntField)(env, object, field, value.i);
0N/A break;
0N/A
0N/A case JDWP_TAG(LONG):
0N/A value.j = inStream_readLong(in);
0N/A JNI_FUNC_PTR(env,SetLongField)(env, object, field, value.j);
0N/A break;
0N/A
0N/A case JDWP_TAG(SHORT):
0N/A value.s = inStream_readShort(in);
0N/A JNI_FUNC_PTR(env,SetShortField)(env, object, field, value.s);
0N/A break;
0N/A
0N/A case JDWP_TAG(BOOLEAN):
0N/A value.z = inStream_readBoolean(in);
0N/A JNI_FUNC_PTR(env,SetBooleanField)(env, object, field, value.z);
0N/A break;
0N/A }
0N/A
0N/A error = JVMTI_ERROR_NONE;
0N/A if (JNI_FUNC_PTR(env,ExceptionOccurred)(env)) {
0N/A error = AGENT_ERROR_JNI_EXCEPTION;
0N/A }
0N/A
0N/A return error;
0N/A}
0N/A
0N/Astatic jboolean
0N/AsetValues(PacketInputStream *in, PacketOutputStream *out)
0N/A{
0N/A JNIEnv *env;
0N/A jint count;
0N/A jvmtiError error;
0N/A jobject object;
0N/A
0N/A env = getEnv();
0N/A
0N/A object = inStream_readObjectRef(env, in);
0N/A if (inStream_error(in)) {
0N/A return JNI_TRUE;
0N/A }
0N/A count = inStream_readInt(in);
0N/A if (inStream_error(in)) {
0N/A return JNI_TRUE;
0N/A }
0N/A
0N/A error = JVMTI_ERROR_NONE;
0N/A
0N/A WITH_LOCAL_REFS(env, count + 1) {
0N/A
0N/A jclass clazz;
0N/A
0N/A clazz = JNI_FUNC_PTR(env,GetObjectClass)(env, object);
0N/A
0N/A if (clazz != NULL ) {
0N/A
0N/A int i;
0N/A
0N/A for (i = 0; (i < count) && !inStream_error(in); i++) {
0N/A
0N/A jfieldID field;
0N/A char *signature = NULL;
0N/A
0N/A field = inStream_readFieldID(in);
0N/A if (inStream_error(in))
0N/A break;
0N/A
0N/A error = fieldSignature(clazz, field, NULL, &signature, NULL);
0N/A if (error != JVMTI_ERROR_NONE) {
0N/A break;
0N/A }
0N/A
0N/A error = readFieldValue(env, in, clazz, object, field, signature);
0N/A jvmtiDeallocate(signature);
0N/A
0N/A if (error != JVMTI_ERROR_NONE) {
0N/A break;
0N/A }
0N/A }
0N/A }
0N/A
0N/A if (error != JVMTI_ERROR_NONE) {
0N/A outStream_setError(out, map2jdwpError(error));
0N/A }
0N/A
0N/A } END_WITH_LOCAL_REFS(env);
0N/A
0N/A return JNI_TRUE;
0N/A}
0N/A
0N/Astatic jboolean
0N/AmonitorInfo(PacketInputStream *in, PacketOutputStream *out)
0N/A{
0N/A JNIEnv *env;
0N/A jobject object;
0N/A
0N/A env = getEnv();
0N/A
0N/A object = inStream_readObjectRef(env, in);
0N/A if (inStream_error(in)) {
0N/A return JNI_TRUE;
0N/A }
0N/A
0N/A WITH_LOCAL_REFS(env, 1) {
0N/A
0N/A jvmtiError error;
0N/A jvmtiMonitorUsage info;
0N/A
0N/A (void)memset(&info, 0, sizeof(info));
0N/A error = JVMTI_FUNC_PTR(gdata->jvmti,GetObjectMonitorUsage)
0N/A (gdata->jvmti, object, &info);
0N/A if (error != JVMTI_ERROR_NONE) {
0N/A outStream_setError(out, map2jdwpError(error));
0N/A } else {
0N/A int i;
0N/A (void)outStream_writeObjectRef(env, out, info.owner);
0N/A (void)outStream_writeInt(out, info.entry_count);
0N/A (void)outStream_writeInt(out, info.waiter_count);
0N/A for (i = 0; i < info.waiter_count; i++) {
0N/A (void)outStream_writeObjectRef(env, out, info.waiters[i]);
0N/A }
0N/A }
0N/A
0N/A if (info.waiters != NULL )
0N/A jvmtiDeallocate(info.waiters);
0N/A
0N/A } END_WITH_LOCAL_REFS(env);
0N/A
0N/A return JNI_TRUE;
0N/A}
0N/A
0N/Astatic jboolean
0N/AinvokeInstance(PacketInputStream *in, PacketOutputStream *out)
0N/A{
0N/A return sharedInvoke(in, out);
0N/A}
0N/A
0N/Astatic jboolean
0N/AdisableCollection(PacketInputStream *in, PacketOutputStream *out)
0N/A{
0N/A jlong id;
0N/A jvmtiError error;
0N/A
0N/A id = inStream_readObjectID(in);
0N/A if (inStream_error(in)) {
0N/A return JNI_TRUE;
0N/A }
0N/A
0N/A error = commonRef_pin(id);
0N/A if (error != JVMTI_ERROR_NONE) {
0N/A outStream_setError(out, map2jdwpError(error));
0N/A }
0N/A
0N/A return JNI_TRUE;
0N/A}
0N/A
0N/Astatic jboolean
0N/AenableCollection(PacketInputStream *in, PacketOutputStream *out)
0N/A{
0N/A jvmtiError error;
0N/A jlong id;
0N/A
0N/A id = inStream_readObjectID(in);
0N/A if (inStream_error(in)) {
0N/A return JNI_TRUE;
0N/A }
0N/A
0N/A error = commonRef_unpin(id);
0N/A if (error != JVMTI_ERROR_NONE) {
0N/A outStream_setError(out, map2jdwpError(error));
0N/A }
0N/A
0N/A return JNI_TRUE;
0N/A}
0N/A
0N/Astatic jboolean
0N/AisCollected(PacketInputStream *in, PacketOutputStream *out)
0N/A{
0N/A jobject ref;
0N/A jlong id;
0N/A JNIEnv *env;
0N/A
0N/A env = getEnv();
0N/A id = inStream_readObjectID(in);
0N/A if (inStream_error(in)) {
0N/A return JNI_TRUE;
0N/A }
0N/A
0N/A if (id == NULL_OBJECT_ID) {
0N/A outStream_setError(out, JDWP_ERROR(INVALID_OBJECT));
0N/A return JNI_TRUE;
0N/A }
0N/A
0N/A ref = commonRef_idToRef(env, id);
0N/A (void)outStream_writeBoolean(out, (jboolean)(ref == NULL));
0N/A
0N/A commonRef_idToRef_delete(env, ref);
0N/A
0N/A return JNI_TRUE;
0N/A}
0N/A
0N/A
0N/Astatic jboolean
0N/AreferringObjects(PacketInputStream *in, PacketOutputStream *out)
0N/A{
0N/A jobject object;
0N/A jint maxReferrers;
0N/A JNIEnv *env;
0N/A
0N/A env = getEnv();
0N/A
0N/A if (gdata->vmDead) {
0N/A outStream_setError(out, JDWP_ERROR(VM_DEAD));
0N/A return JNI_TRUE;
0N/A }
0N/A
0N/A object = inStream_readObjectRef(env,in);
0N/A if (inStream_error(in)) {
0N/A return JNI_TRUE;
0N/A }
0N/A
0N/A maxReferrers = inStream_readInt(in);
0N/A if (inStream_error(in)) {
0N/A return JNI_TRUE;
0N/A }
0N/A
0N/A WITH_LOCAL_REFS(env, 1) {
0N/A jvmtiError error;
0N/A ObjectBatch referrerBatch;
0N/A
0N/A error = objectReferrers(object, &referrerBatch, maxReferrers);
0N/A if (error != JVMTI_ERROR_NONE) {
0N/A outStream_setError(out, map2jdwpError(error));
0N/A } else {
0N/A int kk;
0N/A
0N/A (void)outStream_writeInt(out, referrerBatch.count);
0N/A for (kk = 0; kk < referrerBatch.count; kk++) {
0N/A jobject ref;
0N/A
0N/A ref = referrerBatch.objects[kk];
0N/A (void)outStream_writeByte(out, specificTypeKey(env, ref));
0N/A (void)outStream_writeObjectRef(env, out, ref);
0N/A }
0N/A jvmtiDeallocate(referrerBatch.objects);
0N/A }
0N/A } END_WITH_LOCAL_REFS(env);
0N/A return JNI_TRUE;
0N/A}
0N/A
0N/Avoid *ObjectReference_Cmds[] = { (void *)10
0N/A ,(void *)referenceType
0N/A ,(void *)getValues
0N/A ,(void *)setValues
0N/A ,(void *)NULL /* no longer used */
0N/A ,(void *)monitorInfo
0N/A ,(void *)invokeInstance
0N/A ,(void *)disableCollection
0N/A ,(void *)enableCollection
0N/A ,(void *)isCollected
0N/A ,(void *)referringObjects
0N/A };