1 /*
2 * Copyright (c) 1998, 2005, Oracle and/or its affiliates. All rights reserved.
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * This code is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License version 2 only, as
7 * published by the Free Software Foundation. Oracle designates this
8 * particular file as subject to the "Classpath" exception as provided
9 * by Oracle in the LICENSE file that accompanied this code.
10 *
11 * This code is distributed in the hope that it will be useful, but WITHOUT
12 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
14 * version 2 for more details (a copy is included in the LICENSE file that
15 * accompanied this code).
16 *
17 * You should have received a copy of the GNU General Public License version
18 * 2 along with this work; if not, write to the Free Software Foundation,
19 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
20 *
21 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
22 * or visit www.oracle.com if you need additional information or have any
23 * questions.
24 */
25
26 #include "util.h"
27 #include "ObjectReferenceImpl.h"
28 #include "commonRef.h"
29 #include "inStream.h"
30 #include "outStream.h"
31
32 static jboolean
referenceType(PacketInputStream * in,PacketOutputStream * out)33 referenceType(PacketInputStream *in, PacketOutputStream *out)
34 {
35 JNIEnv *env;
36 jobject object;
37
38 env = getEnv();
39
40 object = inStream_readObjectRef(env, in);
41 if (inStream_error(in)) {
42 return JNI_TRUE;
43 }
44
45 WITH_LOCAL_REFS(env, 1) {
46
47 jbyte tag;
48 jclass clazz;
49
50 clazz = JNI_FUNC_PTR(env,GetObjectClass)(env, object);
51 tag = referenceTypeTag(clazz);
52
53 (void)outStream_writeByte(out, tag);
54 (void)outStream_writeObjectRef(env, out, clazz);
55
56 } END_WITH_LOCAL_REFS(env);
57
58 return JNI_TRUE;
59 }
60
61 static jboolean
getValues(PacketInputStream * in,PacketOutputStream * out)62 getValues(PacketInputStream *in, PacketOutputStream *out)
63 {
64 sharedGetFieldValues(in, out, JNI_FALSE);
65 return JNI_TRUE;
66 }
67
68
69 static jvmtiError
readFieldValue(JNIEnv * env,PacketInputStream * in,jclass clazz,jobject object,jfieldID field,char * signature)70 readFieldValue(JNIEnv *env, PacketInputStream *in, jclass clazz,
71 jobject object, jfieldID field, char *signature)
72 {
73 jvalue value;
74 jvmtiError error;
75
76 switch (signature[0]) {
77 case JDWP_TAG(ARRAY):
78 case JDWP_TAG(OBJECT):
79 value.l = inStream_readObjectRef(env, in);
80 JNI_FUNC_PTR(env,SetObjectField)(env, object, field, value.l);
81 break;
82
83 case JDWP_TAG(BYTE):
84 value.b = inStream_readByte(in);
85 JNI_FUNC_PTR(env,SetByteField)(env, object, field, value.b);
86 break;
87
88 case JDWP_TAG(CHAR):
89 value.c = inStream_readChar(in);
90 JNI_FUNC_PTR(env,SetCharField)(env, object, field, value.c);
91 break;
92
93 case JDWP_TAG(FLOAT):
94 value.f = inStream_readFloat(in);
95 JNI_FUNC_PTR(env,SetFloatField)(env, object, field, value.f);
96 break;
97
98 case JDWP_TAG(DOUBLE):
99 value.d = inStream_readDouble(in);
100 JNI_FUNC_PTR(env,SetDoubleField)(env, object, field, value.d);
101 break;
102
103 case JDWP_TAG(INT):
104 value.i = inStream_readInt(in);
105 JNI_FUNC_PTR(env,SetIntField)(env, object, field, value.i);
106 break;
107
108 case JDWP_TAG(LONG):
109 value.j = inStream_readLong(in);
110 JNI_FUNC_PTR(env,SetLongField)(env, object, field, value.j);
111 break;
112
113 case JDWP_TAG(SHORT):
114 value.s = inStream_readShort(in);
115 JNI_FUNC_PTR(env,SetShortField)(env, object, field, value.s);
116 break;
117
118 case JDWP_TAG(BOOLEAN):
119 value.z = inStream_readBoolean(in);
120 JNI_FUNC_PTR(env,SetBooleanField)(env, object, field, value.z);
121 break;
122 }
123
124 error = JVMTI_ERROR_NONE;
125 if (JNI_FUNC_PTR(env,ExceptionOccurred)(env)) {
126 error = AGENT_ERROR_JNI_EXCEPTION;
127 }
128
129 return error;
130 }
131
132 static jboolean
setValues(PacketInputStream * in,PacketOutputStream * out)133 setValues(PacketInputStream *in, PacketOutputStream *out)
134 {
135 JNIEnv *env;
136 jint count;
137 jvmtiError error;
138 jobject object;
139
140 env = getEnv();
141
142 object = inStream_readObjectRef(env, in);
143 if (inStream_error(in)) {
144 return JNI_TRUE;
145 }
146 count = inStream_readInt(in);
147 if (inStream_error(in)) {
148 return JNI_TRUE;
149 }
150
151 error = JVMTI_ERROR_NONE;
152
153 WITH_LOCAL_REFS(env, count + 1) {
154
155 jclass clazz;
156
157 clazz = JNI_FUNC_PTR(env,GetObjectClass)(env, object);
158
159 if (clazz != NULL ) {
160
161 int i;
162
163 for (i = 0; (i < count) && !inStream_error(in); i++) {
164
165 jfieldID field;
166 char *signature = NULL;
167
168 field = inStream_readFieldID(in);
169 if (inStream_error(in))
170 break;
171
172 error = fieldSignature(clazz, field, NULL, &signature, NULL);
173 if (error != JVMTI_ERROR_NONE) {
174 break;
175 }
176
177 error = readFieldValue(env, in, clazz, object, field, signature);
178 jvmtiDeallocate(signature);
179
180 if (error != JVMTI_ERROR_NONE) {
181 break;
182 }
183 }
184 }
185
186 if (error != JVMTI_ERROR_NONE) {
187 outStream_setError(out, map2jdwpError(error));
188 }
189
190 } END_WITH_LOCAL_REFS(env);
191
192 return JNI_TRUE;
193 }
194
195 static jboolean
monitorInfo(PacketInputStream * in,PacketOutputStream * out)196 monitorInfo(PacketInputStream *in, PacketOutputStream *out)
197 {
198 JNIEnv *env;
199 jobject object;
200
201 env = getEnv();
202
203 object = inStream_readObjectRef(env, in);
204 if (inStream_error(in)) {
205 return JNI_TRUE;
206 }
207
208 WITH_LOCAL_REFS(env, 1) {
209
210 jvmtiError error;
211 jvmtiMonitorUsage info;
212
213 (void)memset(&info, 0, sizeof(info));
214 error = JVMTI_FUNC_PTR(gdata->jvmti,GetObjectMonitorUsage)
215 (gdata->jvmti, object, &info);
216 if (error != JVMTI_ERROR_NONE) {
217 outStream_setError(out, map2jdwpError(error));
218 } else {
219 int i;
220 (void)outStream_writeObjectRef(env, out, info.owner);
221 (void)outStream_writeInt(out, info.entry_count);
222 (void)outStream_writeInt(out, info.waiter_count);
223 for (i = 0; i < info.waiter_count; i++) {
224 (void)outStream_writeObjectRef(env, out, info.waiters[i]);
225 }
226 }
227
228 if (info.waiters != NULL )
229 jvmtiDeallocate(info.waiters);
230
231 } END_WITH_LOCAL_REFS(env);
232
233 return JNI_TRUE;
234 }
235
236 static jboolean
invokeInstance(PacketInputStream * in,PacketOutputStream * out)237 invokeInstance(PacketInputStream *in, PacketOutputStream *out)
238 {
239 return sharedInvoke(in, out);
240 }
241
242 static jboolean
disableCollection(PacketInputStream * in,PacketOutputStream * out)243 disableCollection(PacketInputStream *in, PacketOutputStream *out)
244 {
245 jlong id;
246 jvmtiError error;
247
248 id = inStream_readObjectID(in);
249 if (inStream_error(in)) {
250 return JNI_TRUE;
251 }
252
253 error = commonRef_pin(id);
254 if (error != JVMTI_ERROR_NONE) {
255 outStream_setError(out, map2jdwpError(error));
256 }
257
258 return JNI_TRUE;
259 }
260
261 static jboolean
enableCollection(PacketInputStream * in,PacketOutputStream * out)262 enableCollection(PacketInputStream *in, PacketOutputStream *out)
263 {
264 jvmtiError error;
265 jlong id;
266
267 id = inStream_readObjectID(in);
268 if (inStream_error(in)) {
269 return JNI_TRUE;
270 }
271
272 error = commonRef_unpin(id);
273 if (error != JVMTI_ERROR_NONE) {
274 outStream_setError(out, map2jdwpError(error));
275 }
276
277 return JNI_TRUE;
278 }
279
280 static jboolean
isCollected(PacketInputStream * in,PacketOutputStream * out)281 isCollected(PacketInputStream *in, PacketOutputStream *out)
282 {
283 jobject ref;
284 jlong id;
285 JNIEnv *env;
286
287 env = getEnv();
288 id = inStream_readObjectID(in);
289 if (inStream_error(in)) {
290 return JNI_TRUE;
291 }
292
293 if (id == NULL_OBJECT_ID) {
294 outStream_setError(out, JDWP_ERROR(INVALID_OBJECT));
295 return JNI_TRUE;
296 }
297
298 ref = commonRef_idToRef(env, id);
299 (void)outStream_writeBoolean(out, (jboolean)(ref == NULL));
300
301 commonRef_idToRef_delete(env, ref);
302
303 return JNI_TRUE;
304 }
305
306
307 static jboolean
referringObjects(PacketInputStream * in,PacketOutputStream * out)308 referringObjects(PacketInputStream *in, PacketOutputStream *out)
309 {
310 jobject object;
311 jint maxReferrers;
312 JNIEnv *env;
313
314 env = getEnv();
315
316 if (gdata->vmDead) {
317 outStream_setError(out, JDWP_ERROR(VM_DEAD));
318 return JNI_TRUE;
319 }
320
321 object = inStream_readObjectRef(env,in);
322 if (inStream_error(in)) {
323 return JNI_TRUE;
324 }
325
326 maxReferrers = inStream_readInt(in);
327 if (inStream_error(in)) {
328 return JNI_TRUE;
329 }
330
331 WITH_LOCAL_REFS(env, 1) {
332 jvmtiError error;
333 ObjectBatch referrerBatch;
334
335 error = objectReferrers(object, &referrerBatch, maxReferrers);
336 if (error != JVMTI_ERROR_NONE) {
337 outStream_setError(out, map2jdwpError(error));
338 } else {
339 int kk;
340
341 (void)outStream_writeInt(out, referrerBatch.count);
342 for (kk = 0; kk < referrerBatch.count; kk++) {
343 jobject ref;
344
345 ref = referrerBatch.objects[kk];
346 (void)outStream_writeByte(out, specificTypeKey(env, ref));
347 (void)outStream_writeObjectRef(env, out, ref);
348 }
349 jvmtiDeallocate(referrerBatch.objects);
350 }
351 } END_WITH_LOCAL_REFS(env);
352 return JNI_TRUE;
353 }
354
355 void *ObjectReference_Cmds[] = { (void *)10
356 ,(void *)referenceType
357 ,(void *)getValues
358 ,(void *)setValues
359 ,(void *)NULL /* no longer used */
360 ,(void *)monitorInfo
361 ,(void *)invokeInstance
362 ,(void *)disableCollection
363 ,(void *)enableCollection
364 ,(void *)isCollected
365 ,(void *)referringObjects
366 };
367