1 /*
2 * Copyright (c) 1997, 2017, 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.
8 *
9 * This code is distributed in the hope that it will be useful, but WITHOUT
10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
12 * version 2 for more details (a copy is included in the LICENSE file that
13 * accompanied this code).
14 *
15 * You should have received a copy of the GNU General Public License version
16 * 2 along with this work; if not, write to the Free Software Foundation,
17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
18 *
19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
20 * or visit www.oracle.com if you need additional information or have any
21 * questions.
22 *
23 */
24
25 #include "precompiled.hpp"
26 #include "classfile/javaClasses.hpp"
27 #include "classfile/moduleEntry.hpp"
28 #include "classfile/packageEntry.hpp"
29 #include "classfile/stringTable.hpp"
30 #include "classfile/systemDictionary.hpp"
31 #include "classfile/verifier.hpp"
32 #include "classfile/vmSymbols.hpp"
33 #include "interpreter/linkResolver.hpp"
34 #include "memory/oopFactory.hpp"
35 #include "memory/resourceArea.hpp"
36 #include "memory/universe.inline.hpp"
37 #include "oops/instanceKlass.hpp"
38 #include "oops/objArrayKlass.hpp"
39 #include "oops/objArrayOop.inline.hpp"
40 #include "oops/oop.inline.hpp"
41 #include "prims/jvm.h"
42 #include "prims/jvmtiExport.hpp"
43 #include "runtime/arguments.hpp"
44 #include "runtime/handles.inline.hpp"
45 #include "runtime/javaCalls.hpp"
46 #include "runtime/reflection.hpp"
47 #include "runtime/reflectionUtils.hpp"
48 #include "runtime/signature.hpp"
49 #include "runtime/vframe.hpp"
50
51 static void trace_class_resolution(const Klass* to_class) {
52 ResourceMark rm;
53 int line_number = -1;
54 const char * source_file = NULL;
55 Klass* caller = NULL;
56 JavaThread* jthread = JavaThread::current();
57 if (jthread->has_last_Java_frame()) {
58 vframeStream vfst(jthread);
59 // skip over any frames belonging to java.lang.Class
60 while (!vfst.at_end() &&
61 vfst.method()->method_holder()->name() == vmSymbols::java_lang_Class()) {
62 vfst.next();
63 }
64 if (!vfst.at_end()) {
65 // this frame is a likely suspect
66 caller = vfst.method()->method_holder();
67 line_number = vfst.method()->line_number_from_bci(vfst.bci());
68 Symbol* s = vfst.method()->method_holder()->source_file_name();
69 if (s != NULL) {
70 source_file = s->as_C_string();
71 }
72 }
73 }
74 if (caller != NULL) {
75 const char * from = caller->external_name();
76 const char * to = to_class->external_name();
77 // print in a single call to reduce interleaving between threads
78 if (source_file != NULL) {
79 log_debug(class, resolve)("%s %s %s:%d (reflection)", from, to, source_file, line_number);
80 } else {
81 log_debug(class, resolve)("%s %s (reflection)", from, to);
82 }
83 }
84 }
85
86
87 oop Reflection::box(jvalue* value, BasicType type, TRAPS) {
88 if (type == T_VOID) {
89 return NULL;
90 }
91 if (type == T_OBJECT || type == T_ARRAY) {
92 // regular objects are not boxed
93 return (oop) value->l;
94 }
95 oop result = java_lang_boxing_object::create(type, value, CHECK_NULL);
96 if (result == NULL) {
97 THROW_(vmSymbols::java_lang_IllegalArgumentException(), result);
98 }
99 return result;
100 }
101
102
103 BasicType Reflection::unbox_for_primitive(oop box, jvalue* value, TRAPS) {
104 if (box == NULL) {
105 THROW_(vmSymbols::java_lang_IllegalArgumentException(), T_ILLEGAL);
106 }
107 return java_lang_boxing_object::get_value(box, value);
108 }
109
110 BasicType Reflection::unbox_for_regular_object(oop box, jvalue* value) {
111 // Note: box is really the unboxed oop. It might even be a Short, etc.!
112 value->l = (jobject) box;
113 return T_OBJECT;
114 }
115
116
117 void Reflection::widen(jvalue* value, BasicType current_type, BasicType wide_type, TRAPS) {
118 assert(wide_type != current_type, "widen should not be called with identical types");
119 switch (wide_type) {
120 case T_BOOLEAN:
121 case T_BYTE:
122 case T_CHAR:
123 break; // fail
124 case T_SHORT:
125 switch (current_type) {
126 case T_BYTE:
127 value->s = (jshort) value->b;
128 return;
129 }
130 break; // fail
131 case T_INT:
132 switch (current_type) {
133 case T_BYTE:
134 value->i = (jint) value->b;
135 return;
136 case T_CHAR:
137 value->i = (jint) value->c;
138 return;
139 case T_SHORT:
140 value->i = (jint) value->s;
141 return;
142 }
143 break; // fail
144 case T_LONG:
145 switch (current_type) {
146 case T_BYTE:
147 value->j = (jlong) value->b;
148 return;
149 case T_CHAR:
150 value->j = (jlong) value->c;
151 return;
152 case T_SHORT:
153 value->j = (jlong) value->s;
154 return;
155 case T_INT:
156 value->j = (jlong) value->i;
157 return;
158 }
159 break; // fail
160 case T_FLOAT:
161 switch (current_type) {
162 case T_BYTE:
163 value->f = (jfloat) value->b;
164 return;
165 case T_CHAR:
166 value->f = (jfloat) value->c;
167 return;
168 case T_SHORT:
169 value->f = (jfloat) value->s;
170 return;
171 case T_INT:
172 value->f = (jfloat) value->i;
173 return;
174 case T_LONG:
175 value->f = (jfloat) value->j;
176 return;
177 }
178 break; // fail
179 case T_DOUBLE:
180 switch (current_type) {
181 case T_BYTE:
182 value->d = (jdouble) value->b;
183 return;
184 case T_CHAR:
185 value->d = (jdouble) value->c;
186 return;
187 case T_SHORT:
188 value->d = (jdouble) value->s;
189 return;
190 case T_INT:
191 value->d = (jdouble) value->i;
192 return;
193 case T_FLOAT:
194 value->d = (jdouble) value->f;
195 return;
196 case T_LONG:
197 value->d = (jdouble) value->j;
198 return;
199 }
200 break; // fail
201 default:
202 break; // fail
203 }
204 THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(), "argument type mismatch");
205 }
206
207
208 BasicType Reflection::array_get(jvalue* value, arrayOop a, int index, TRAPS) {
209 if (!a->is_within_bounds(index)) {
210 THROW_(vmSymbols::java_lang_ArrayIndexOutOfBoundsException(), T_ILLEGAL);
211 }
212 if (a->is_objArray()) {
213 value->l = (jobject) objArrayOop(a)->obj_at(index);
214 return T_OBJECT;
215 } else {
216 assert(a->is_typeArray(), "just checking");
217 BasicType type = TypeArrayKlass::cast(a->klass())->element_type();
218 switch (type) {
219 case T_BOOLEAN:
220 value->z = typeArrayOop(a)->bool_at(index);
221 break;
222 case T_CHAR:
223 value->c = typeArrayOop(a)->char_at(index);
224 break;
225 case T_FLOAT:
226 value->f = typeArrayOop(a)->float_at(index);
227 break;
228 case T_DOUBLE:
229 value->d = typeArrayOop(a)->double_at(index);
230 break;
231 case T_BYTE:
232 value->b = typeArrayOop(a)->byte_at(index);
233 break;
234 case T_SHORT:
235 value->s = typeArrayOop(a)->short_at(index);
236 break;
237 case T_INT:
238 value->i = typeArrayOop(a)->int_at(index);
239 break;
240 case T_LONG:
241 value->j = typeArrayOop(a)->long_at(index);
242 break;
243 default:
244 return T_ILLEGAL;
245 }
246 return type;
247 }
248 }
249
250
251 void Reflection::array_set(jvalue* value, arrayOop a, int index, BasicType value_type, TRAPS) {
252 if (!a->is_within_bounds(index)) {
253 THROW(vmSymbols::java_lang_ArrayIndexOutOfBoundsException());
254 }
255 if (a->is_objArray()) {
256 if (value_type == T_OBJECT) {
257 oop obj = (oop) value->l;
258 if (obj != NULL) {
259 Klass* element_klass = ObjArrayKlass::cast(a->klass())->element_klass();
260 if (!obj->is_a(element_klass)) {
261 THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(), "array element type mismatch");
262 }
263 }
264 objArrayOop(a)->obj_at_put(index, obj);
265 }
266 } else {
267 assert(a->is_typeArray(), "just checking");
268 BasicType array_type = TypeArrayKlass::cast(a->klass())->element_type();
269 if (array_type != value_type) {
270 // The widen operation can potentially throw an exception, but cannot block,
271 // so typeArrayOop a is safe if the call succeeds.
272 widen(value, value_type, array_type, CHECK);
273 }
274 switch (array_type) {
275 case T_BOOLEAN:
276 typeArrayOop(a)->bool_at_put(index, value->z);
277 break;
278 case T_CHAR:
279 typeArrayOop(a)->char_at_put(index, value->c);
280 break;
281 case T_FLOAT:
282 typeArrayOop(a)->float_at_put(index, value->f);
283 break;
284 case T_DOUBLE:
285 typeArrayOop(a)->double_at_put(index, value->d);
286 break;
287 case T_BYTE:
288 typeArrayOop(a)->byte_at_put(index, value->b);
289 break;
290 case T_SHORT:
291 typeArrayOop(a)->short_at_put(index, value->s);
292 break;
293 case T_INT:
294 typeArrayOop(a)->int_at_put(index, value->i);
295 break;
296 case T_LONG:
297 typeArrayOop(a)->long_at_put(index, value->j);
298 break;
299 default:
300 THROW(vmSymbols::java_lang_IllegalArgumentException());
301 }
302 }
303 }
304
305 static Klass* basic_type_mirror_to_arrayklass(oop basic_type_mirror, TRAPS) {
306 assert(java_lang_Class::is_primitive(basic_type_mirror), "just checking");
307 BasicType type = java_lang_Class::primitive_type(basic_type_mirror);
308 if (type == T_VOID) {
309 THROW_0(vmSymbols::java_lang_IllegalArgumentException());
310 }
311 else {
312 return Universe::typeArrayKlassObj(type);
313 }
314 }
315
316 #ifdef ASSERT
317 static oop basic_type_arrayklass_to_mirror(Klass* basic_type_arrayklass, TRAPS) {
318 BasicType type = TypeArrayKlass::cast(basic_type_arrayklass)->element_type();
319 return Universe::java_mirror(type);
320 }
321 #endif
322
323 arrayOop Reflection::reflect_new_array(oop element_mirror, jint length, TRAPS) {
324 if (element_mirror == NULL) {
325 THROW_0(vmSymbols::java_lang_NullPointerException());
326 }
327 if (length < 0) {
328 THROW_0(vmSymbols::java_lang_NegativeArraySizeException());
329 }
330 if (java_lang_Class::is_primitive(element_mirror)) {
331 Klass* tak = basic_type_mirror_to_arrayklass(element_mirror, CHECK_NULL);
332 return TypeArrayKlass::cast(tak)->allocate(length, THREAD);
333 } else {
334 Klass* k = java_lang_Class::as_Klass(element_mirror);
335 if (k->is_array_klass() && ArrayKlass::cast(k)->dimension() >= MAX_DIM) {
336 THROW_0(vmSymbols::java_lang_IllegalArgumentException());
337 }
338 return oopFactory::new_objArray(k, length, THREAD);
339 }
340 }
341
342
343 arrayOop Reflection::reflect_new_multi_array(oop element_mirror, typeArrayOop dim_array, TRAPS) {
344 assert(dim_array->is_typeArray(), "just checking");
345 assert(TypeArrayKlass::cast(dim_array->klass())->element_type() == T_INT, "just checking");
346
347 if (element_mirror == NULL) {
348 THROW_0(vmSymbols::java_lang_NullPointerException());
349 }
350
351 int len = dim_array->length();
352 if (len <= 0 || len > MAX_DIM) {
353 THROW_0(vmSymbols::java_lang_IllegalArgumentException());
354 }
355
356 jint dimensions[MAX_DIM]; // C array copy of intArrayOop
357 for (int i = 0; i < len; i++) {
358 int d = dim_array->int_at(i);
359 if (d < 0) {
360 THROW_0(vmSymbols::java_lang_NegativeArraySizeException());
361 }
362 dimensions[i] = d;
363 }
364
365 Klass* klass;
366 int dim = len;
367 if (java_lang_Class::is_primitive(element_mirror)) {
368 klass = basic_type_mirror_to_arrayklass(element_mirror, CHECK_NULL);
369 } else {
370 klass = java_lang_Class::as_Klass(element_mirror);
371 if (klass->is_array_klass()) {
372 int k_dim = ArrayKlass::cast(klass)->dimension();
373 if (k_dim + len > MAX_DIM) {
374 THROW_0(vmSymbols::java_lang_IllegalArgumentException());
375 }
376 dim += k_dim;
377 }
378 }
379 klass = klass->array_klass(dim, CHECK_NULL);
380 oop obj = ArrayKlass::cast(klass)->multi_allocate(len, dimensions, CHECK_NULL);
381 assert(obj->is_array(), "just checking");
382 return arrayOop(obj);
383 }
384
385
386 oop Reflection::array_component_type(oop mirror, TRAPS) {
387 if (java_lang_Class::is_primitive(mirror)) {
388 return NULL;
389 }
390
391 Klass* klass = java_lang_Class::as_Klass(mirror);
392 if (!klass->is_array_klass()) {
393 return NULL;
394 }
395
396 oop result = java_lang_Class::component_mirror(mirror);
397 #ifdef ASSERT
398 oop result2 = NULL;
399 if (ArrayKlass::cast(klass)->dimension() == 1) {
400 if (klass->is_typeArray_klass()) {
401 result2 = basic_type_arrayklass_to_mirror(klass, CHECK_NULL);
402 } else {
403 result2 = ObjArrayKlass::cast(klass)->element_klass()->java_mirror();
404 }
405 } else {
406 Klass* lower_dim = ArrayKlass::cast(klass)->lower_dimension();
407 assert(lower_dim->is_array_klass(), "just checking");
408 result2 = lower_dim->java_mirror();
409 }
410 assert(result == result2, "results must be consistent");
411 #endif //ASSERT
412 return result;
413 }
414
415 static bool under_host_klass(const InstanceKlass* ik, const InstanceKlass* host_klass) {
416 DEBUG_ONLY(int inf_loop_check = 1000 * 1000 * 1000);
417 for (;;) {
418 const InstanceKlass* hc = ik->host_klass();
419 if (hc == NULL) return false;
420 if (hc == host_klass) return true;
421 ik = hc;
422
423 // There's no way to make a host class loop short of patching memory.
424 // Therefore there cannot be a loop here unless there's another bug.
425 // Still, let's check for it.
426 assert(--inf_loop_check > 0, "no host_klass loop");
427 }
428 }
429
430 static bool can_relax_access_check_for(const Klass* accessor,
431 const Klass* accessee,
432 bool classloader_only) {
433
434 const InstanceKlass* accessor_ik = InstanceKlass::cast(accessor);
435 const InstanceKlass* accessee_ik = InstanceKlass::cast(accessee);
436
437 // If either is on the other's host_klass chain, access is OK,
438 // because one is inside the other.
439 if (under_host_klass(accessor_ik, accessee_ik) ||
440 under_host_klass(accessee_ik, accessor_ik))
441 return true;
442
443 if ((RelaxAccessControlCheck &&
444 accessor_ik->major_version() < Verifier::NO_RELAX_ACCESS_CTRL_CHECK_VERSION &&
445 accessee_ik->major_version() < Verifier::NO_RELAX_ACCESS_CTRL_CHECK_VERSION) ||
446 (accessor_ik->major_version() < Verifier::STRICTER_ACCESS_CTRL_CHECK_VERSION &&
447 accessee_ik->major_version() < Verifier::STRICTER_ACCESS_CTRL_CHECK_VERSION)) {
448 return classloader_only &&
449 Verifier::relax_access_for(accessor_ik->class_loader()) &&
450 accessor_ik->protection_domain() == accessee_ik->protection_domain() &&
451 accessor_ik->class_loader() == accessee_ik->class_loader();
452 }
453
454 return false;
455 }
456
457 /*
458 Type Accessibility check for public types: Callee Type T is accessible to Caller Type S if:
459
460 Callee T in Callee T in package PT,
461 unnamed module runtime module MT
462 ------------------------------------------------------------------------------------------------
463
464 Caller S in package If MS is loose: YES If same classloader/package (PS == PT): YES
465 PS, runtime module MS If MS can read T's If same runtime module: (MS == MT): YES
466 unnamed module: YES
467 Else if (MS can read MT (establish readability) &&
468 ((MT exports PT to MS or to all modules) ||
469 (MT is open))): YES
470
471 ------------------------------------------------------------------------------------------------
472 Caller S in unnamed YES Readability exists because unnamed module
473 module UM "reads" all modules
474 if (MT exports PT to UM or to all modules): YES
475
476 ------------------------------------------------------------------------------------------------
477
478 Note: a loose module is a module that can read all current and future unnamed modules.
479 */
480 Reflection::VerifyClassAccessResults Reflection::verify_class_access(
481 const Klass* current_class, const Klass* new_class, bool classloader_only) {
482
483 // Verify that current_class can access new_class. If the classloader_only
484 // flag is set, we automatically allow any accesses in which current_class
485 // doesn't have a classloader.
486 if ((current_class == NULL) ||
487 (current_class == new_class) ||
488 is_same_class_package(current_class, new_class)) {
489 return ACCESS_OK;
490 }
491 // Allow all accesses from jdk/internal/reflect/MagicAccessorImpl subclasses to
492 // succeed trivially.
493 if (current_class->is_subclass_of(SystemDictionary::reflect_MagicAccessorImpl_klass())) {
494 return ACCESS_OK;
495 }
496
497 // module boundaries
498 if (new_class->is_public()) {
499 // Ignore modules for DumpSharedSpaces because we do not have any package
500 // or module information for modules other than java.base.
501 if (DumpSharedSpaces) {
502 return ACCESS_OK;
503 }
504
505 // Find the module entry for current_class, the accessor
506 ModuleEntry* module_from = current_class->module();
507 // Find the module entry for new_class, the accessee
508 if (new_class->is_objArray_klass()) {
509 new_class = ObjArrayKlass::cast(new_class)->bottom_klass();
510 }
511 if (new_class->is_typeArray_klass()) {
512 // A TypeArray's defining module is java.base, access to the TypeArray is allowed
513 return ACCESS_OK;
514 }
515 ModuleEntry* module_to = new_class->module();
516
517 // both in same (possibly unnamed) module
518 if (module_from == module_to) {
519 return ACCESS_OK;
520 }
521
522 // Acceptable access to a type in an unnamed module. Note that since
523 // unnamed modules can read all unnamed modules, this also handles the
524 // case where module_from is also unnamed but in a different class loader.
525 if (!module_to->is_named() &&
526 (module_from->can_read_all_unnamed() || module_from->can_read(module_to))) {
527 return ACCESS_OK;
528 }
529
530 // Establish readability, check if module_from is allowed to read module_to.
531 if (!module_from->can_read(module_to)) {
532 return MODULE_NOT_READABLE;
533 }
534
535 // Access is allowed if module_to is open, i.e. all its packages are unqualifiedly exported
536 if (module_to->is_open()) {
537 return ACCESS_OK;
538 }
539
540 PackageEntry* package_to = new_class->package();
541 assert(package_to != NULL, "can not obtain new_class' package");
542
543 {
544 MutexLocker m1(Module_lock);
545
546 // Once readability is established, if module_to exports T unqualifiedly,
547 // (to all modules), than whether module_from is in the unnamed module
548 // or not does not matter, access is allowed.
549 if (package_to->is_unqual_exported()) {
550 return ACCESS_OK;
551 }
552
553 // Access is allowed if both 1 & 2 hold:
554 // 1. Readability, module_from can read module_to (established above).
555 // 2. Either module_to exports T to module_from qualifiedly.
556 // or
557 // module_to exports T to all unnamed modules and module_from is unnamed.
558 // or
559 // module_to exports T unqualifiedly to all modules (checked above).
560 if (!package_to->is_qexported_to(module_from)) {
561 return TYPE_NOT_EXPORTED;
562 }
563 }
564 return ACCESS_OK;
565 }
566
567 if (can_relax_access_check_for(current_class, new_class, classloader_only)) {
568 return ACCESS_OK;
569 }
570 return OTHER_PROBLEM;
571 }
572
573 // Return an error message specific to the specified Klass*'s and result.
574 // This function must be called from within a block containing a ResourceMark.
575 char* Reflection::verify_class_access_msg(const Klass* current_class,
576 const Klass* new_class,
577 VerifyClassAccessResults result) {
578 assert(result != ACCESS_OK, "must be failure result");
579 char * msg = NULL;
580 if (result != OTHER_PROBLEM && new_class != NULL && current_class != NULL) {
581 // Find the module entry for current_class, the accessor
582 ModuleEntry* module_from = current_class->module();
583 const char * module_from_name = module_from->is_named() ? module_from->name()->as_C_string() : UNNAMED_MODULE;
584 const char * current_class_name = current_class->external_name();
585
586 // Find the module entry for new_class, the accessee
587 ModuleEntry* module_to = NULL;
588 module_to = new_class->module();
589 const char * module_to_name = module_to->is_named() ? module_to->name()->as_C_string() : UNNAMED_MODULE;
590 const char * new_class_name = new_class->external_name();
591
592 if (result == MODULE_NOT_READABLE) {
593 assert(module_from->is_named(), "Unnamed modules can read all modules");
594 if (module_to->is_named()) {
595 size_t len = 100 + strlen(current_class_name) + 2*strlen(module_from_name) +
596 strlen(new_class_name) + 2*strlen(module_to_name);
597 msg = NEW_RESOURCE_ARRAY(char, len);
598 jio_snprintf(msg, len - 1,
599 "class %s (in module %s) cannot access class %s (in module %s) because module %s does not read module %s",
600 current_class_name, module_from_name, new_class_name,
601 module_to_name, module_from_name, module_to_name);
602 } else {
603 jobject jlrm = module_to->module();
604 assert(jlrm != NULL, "Null jlrm in module_to ModuleEntry");
605 intptr_t identity_hash = JNIHandles::resolve(jlrm)->identity_hash();
606 size_t len = 160 + strlen(current_class_name) + 2*strlen(module_from_name) +
607 strlen(new_class_name) + 2*sizeof(uintx);
608 msg = NEW_RESOURCE_ARRAY(char, len);
609 jio_snprintf(msg, len - 1,
610 "class %s (in module %s) cannot access class %s (in unnamed module @" SIZE_FORMAT_HEX ") because module %s does not read unnamed module @" SIZE_FORMAT_HEX,
611 current_class_name, module_from_name, new_class_name, uintx(identity_hash),
612 module_from_name, uintx(identity_hash));
613 }
614
615 } else if (result == TYPE_NOT_EXPORTED) {
616 assert(new_class->package() != NULL,
617 "Unnamed packages are always exported");
618 const char * package_name =
619 new_class->package()->name()->as_klass_external_name();
620 assert(module_to->is_named(), "Unnamed modules export all packages");
621 if (module_from->is_named()) {
622 size_t len = 118 + strlen(current_class_name) + 2*strlen(module_from_name) +
623 strlen(new_class_name) + 2*strlen(module_to_name) + strlen(package_name);
624 msg = NEW_RESOURCE_ARRAY(char, len);
625 jio_snprintf(msg, len - 1,
626 "class %s (in module %s) cannot access class %s (in module %s) because module %s does not export %s to module %s",
627 current_class_name, module_from_name, new_class_name,
628 module_to_name, module_to_name, package_name, module_from_name);
629 } else {
630 jobject jlrm = module_from->module();
631 assert(jlrm != NULL, "Null jlrm in module_from ModuleEntry");
632 intptr_t identity_hash = JNIHandles::resolve(jlrm)->identity_hash();
633 size_t len = 170 + strlen(current_class_name) + strlen(new_class_name) +
634 2*strlen(module_to_name) + strlen(package_name) + 2*sizeof(uintx);
635 msg = NEW_RESOURCE_ARRAY(char, len);
636 jio_snprintf(msg, len - 1,
637 "class %s (in unnamed module @" SIZE_FORMAT_HEX ") cannot access class %s (in module %s) because module %s does not export %s to unnamed module @" SIZE_FORMAT_HEX,
638 current_class_name, uintx(identity_hash), new_class_name, module_to_name,
639 module_to_name, package_name, uintx(identity_hash));
640 }
641 } else {
642 ShouldNotReachHere();
643 }
644 } // result != OTHER_PROBLEM...
645 return msg;
646 }
647
648 bool Reflection::verify_field_access(const Klass* current_class,
649 const Klass* resolved_class,
650 const Klass* field_class,
651 AccessFlags access,
652 bool classloader_only,
653 bool protected_restriction) {
654 // Verify that current_class can access a field of field_class, where that
655 // field's access bits are "access". We assume that we've already verified
656 // that current_class can access field_class.
657 //
658 // If the classloader_only flag is set, we automatically allow any accesses
659 // in which current_class doesn't have a classloader.
660 //
661 // "resolved_class" is the runtime type of "field_class". Sometimes we don't
662 // need this distinction (e.g. if all we have is the runtime type, or during
663 // class file parsing when we only care about the static type); in that case
664 // callers should ensure that resolved_class == field_class.
665 //
666 if ((current_class == NULL) ||
667 (current_class == field_class) ||
668 access.is_public()) {
669 return true;
670 }
671
672 const Klass* host_class = current_class;
673 if (host_class->is_instance_klass() &&
674 InstanceKlass::cast(host_class)->is_anonymous()) {
675 host_class = InstanceKlass::cast(host_class)->host_klass();
676 assert(host_class != NULL, "Anonymous class has null host class");
677 assert(!(host_class->is_instance_klass() &&
678 InstanceKlass::cast(host_class)->is_anonymous()),
679 "host_class should not be anonymous");
680 }
681 if (host_class == field_class) {
682 return true;
683 }
684
685 if (access.is_protected()) {
686 if (!protected_restriction) {
687 // See if current_class (or outermost host class) is a subclass of field_class
688 // An interface may not access protected members of j.l.Object
689 if (!host_class->is_interface() && host_class->is_subclass_of(field_class)) {
690 if (access.is_static() || // static fields are ok, see 6622385
691 current_class == resolved_class ||
692 field_class == resolved_class ||
693 host_class->is_subclass_of(resolved_class) ||
694 resolved_class->is_subclass_of(host_class)) {
695 return true;
696 }
697 }
698 }
699 }
700
701 if (!access.is_private() && is_same_class_package(current_class, field_class)) {
702 return true;
703 }
704
705 // Allow all accesses from jdk/internal/reflect/MagicAccessorImpl subclasses to
706 // succeed trivially.
707 if (current_class->is_subclass_of(SystemDictionary::reflect_MagicAccessorImpl_klass())) {
708 return true;
709 }
710
711 return can_relax_access_check_for(
712 current_class, field_class, classloader_only);
713 }
714
715 bool Reflection::is_same_class_package(const Klass* class1, const Klass* class2) {
716 return InstanceKlass::cast(class1)->is_same_class_package(class2);
717 }
718
719 // Checks that the 'outer' klass has declared 'inner' as being an inner klass. If not,
720 // throw an incompatible class change exception
721 // If inner_is_member, require the inner to be a member of the outer.
722 // If !inner_is_member, require the inner to be anonymous (a non-member).
723 // Caller is responsible for figuring out in advance which case must be true.
724 void Reflection::check_for_inner_class(instanceKlassHandle outer, instanceKlassHandle inner,
725 bool inner_is_member, TRAPS) {
726 InnerClassesIterator iter(outer);
727 constantPoolHandle cp (THREAD, outer->constants());
728 for (; !iter.done(); iter.next()) {
729 int ioff = iter.inner_class_info_index();
730 int ooff = iter.outer_class_info_index();
731
732 if (inner_is_member && ioff != 0 && ooff != 0) {
733 Klass* o = cp->klass_at(ooff, CHECK);
734 if (o == outer()) {
735 Klass* i = cp->klass_at(ioff, CHECK);
736 if (i == inner()) {
737 return;
738 }
739 }
740 }
741 if (!inner_is_member && ioff != 0 && ooff == 0 &&
742 cp->klass_name_at_matches(inner, ioff)) {
743 Klass* i = cp->klass_at(ioff, CHECK);
744 if (i == inner()) {
745 return;
746 }
747 }
748 }
749
750 // 'inner' not declared as an inner klass in outer
751 ResourceMark rm(THREAD);
752 Exceptions::fthrow(
753 THREAD_AND_LOCATION,
754 vmSymbols::java_lang_IncompatibleClassChangeError(),
755 "%s and %s disagree on InnerClasses attribute",
756 outer->external_name(),
757 inner->external_name()
758 );
759 }
760
761 // Utility method converting a single SignatureStream element into java.lang.Class instance
762 static oop get_mirror_from_signature(methodHandle method,
763 SignatureStream* ss,
764 TRAPS) {
765
766
767 if (T_OBJECT == ss->type() || T_ARRAY == ss->type()) {
768 Symbol* name = ss->as_symbol(CHECK_NULL);
769 oop loader = method->method_holder()->class_loader();
770 oop protection_domain = method->method_holder()->protection_domain();
771 const Klass* k = SystemDictionary::resolve_or_fail(name,
772 Handle(THREAD, loader),
773 Handle(THREAD, protection_domain),
774 true,
775 CHECK_NULL);
776 if (log_is_enabled(Debug, class, resolve)) {
777 trace_class_resolution(k);
778 }
779 return k->java_mirror();
780 }
781
782 assert(ss->type() != T_VOID || ss->at_return_type(),
783 "T_VOID should only appear as return type");
784
785 return java_lang_Class::primitive_mirror(ss->type());
786 }
787
788 static objArrayHandle get_parameter_types(methodHandle method,
789 int parameter_count,
790 oop* return_type,
791 TRAPS) {
792 // Allocate array holding parameter types (java.lang.Class instances)
793 objArrayOop m = oopFactory::new_objArray(SystemDictionary::Class_klass(), parameter_count, CHECK_(objArrayHandle()));
794 objArrayHandle mirrors(THREAD, m);
795 int index = 0;
796 // Collect parameter types
797 ResourceMark rm(THREAD);
798 Symbol* signature = method->signature();
799 SignatureStream ss(signature);
800 while (!ss.at_return_type()) {
801 oop mirror = get_mirror_from_signature(method, &ss, CHECK_(objArrayHandle()));
802 mirrors->obj_at_put(index++, mirror);
803 ss.next();
804 }
805 assert(index == parameter_count, "invalid parameter count");
806 if (return_type != NULL) {
807 // Collect return type as well
808 assert(ss.at_return_type(), "return type should be present");
809 *return_type = get_mirror_from_signature(method, &ss, CHECK_(objArrayHandle()));
810 }
811 return mirrors;
812 }
813
814 static objArrayHandle get_exception_types(methodHandle method, TRAPS) {
815 return method->resolved_checked_exceptions(THREAD);
816 }
817
818 static Handle new_type(Symbol* signature, KlassHandle k, TRAPS) {
819 // Basic types
820 BasicType type = vmSymbols::signature_type(signature);
821 if (type != T_OBJECT) {
822 return Handle(THREAD, Universe::java_mirror(type));
823 }
824
825 Klass* result =
826 SystemDictionary::resolve_or_fail(signature,
827 Handle(THREAD, k->class_loader()),
828 Handle(THREAD, k->protection_domain()),
829 true, CHECK_(Handle()));
830
831 if (log_is_enabled(Debug, class, resolve)) {
832 trace_class_resolution(result);
833 }
834
835 oop nt = result->java_mirror();
836 return Handle(THREAD, nt);
837 }
838
839
840 oop Reflection::new_method(const methodHandle& method, bool for_constant_pool_access, TRAPS) {
841 // Allow sun.reflect.ConstantPool to refer to <clinit> methods as java.lang.reflect.Methods.
842 assert(!method()->is_initializer() ||
843 (for_constant_pool_access && method()->is_static()),
844 "should call new_constructor instead");
845 instanceKlassHandle holder (THREAD, method->method_holder());
846 int slot = method->method_idnum();
847
848 Symbol* signature = method->signature();
849 int parameter_count = ArgumentCount(signature).size();
850 oop return_type_oop = NULL;
851 objArrayHandle parameter_types = get_parameter_types(method, parameter_count, &return_type_oop, CHECK_NULL);
852 if (parameter_types.is_null() || return_type_oop == NULL) return NULL;
853
854 Handle return_type(THREAD, return_type_oop);
855
856 objArrayHandle exception_types = get_exception_types(method, CHECK_NULL);
857
858 if (exception_types.is_null()) return NULL;
859
860 Symbol* method_name = method->name();
861 oop name_oop = StringTable::intern(method_name, CHECK_NULL);
862 Handle name = Handle(THREAD, name_oop);
863 if (name == NULL) return NULL;
864
865 const int modifiers = method->access_flags().as_int() & JVM_RECOGNIZED_METHOD_MODIFIERS;
866
867 Handle mh = java_lang_reflect_Method::create(CHECK_NULL);
868
869 java_lang_reflect_Method::set_clazz(mh(), holder->java_mirror());
870 java_lang_reflect_Method::set_slot(mh(), slot);
871 java_lang_reflect_Method::set_name(mh(), name());
872 java_lang_reflect_Method::set_return_type(mh(), return_type());
873 java_lang_reflect_Method::set_parameter_types(mh(), parameter_types());
874 java_lang_reflect_Method::set_exception_types(mh(), exception_types());
875 java_lang_reflect_Method::set_modifiers(mh(), modifiers);
876 java_lang_reflect_Method::set_override(mh(), false);
877 if (java_lang_reflect_Method::has_signature_field() &&
878 method->generic_signature() != NULL) {
879 Symbol* gs = method->generic_signature();
880 Handle sig = java_lang_String::create_from_symbol(gs, CHECK_NULL);
881 java_lang_reflect_Method::set_signature(mh(), sig());
882 }
883 if (java_lang_reflect_Method::has_annotations_field()) {
884 typeArrayOop an_oop = Annotations::make_java_array(method->annotations(), CHECK_NULL);
885 java_lang_reflect_Method::set_annotations(mh(), an_oop);
886 }
887 if (java_lang_reflect_Method::has_parameter_annotations_field()) {
888 typeArrayOop an_oop = Annotations::make_java_array(method->parameter_annotations(), CHECK_NULL);
889 java_lang_reflect_Method::set_parameter_annotations(mh(), an_oop);
890 }
891 if (java_lang_reflect_Method::has_annotation_default_field()) {
892 typeArrayOop an_oop = Annotations::make_java_array(method->annotation_default(), CHECK_NULL);
893 java_lang_reflect_Method::set_annotation_default(mh(), an_oop);
894 }
895 if (java_lang_reflect_Method::has_type_annotations_field()) {
896 typeArrayOop an_oop = Annotations::make_java_array(method->type_annotations(), CHECK_NULL);
897 java_lang_reflect_Method::set_type_annotations(mh(), an_oop);
898 }
899 return mh();
900 }
901
902
903 oop Reflection::new_constructor(const methodHandle& method, TRAPS) {
904 assert(method()->is_initializer(), "should call new_method instead");
905
906 instanceKlassHandle holder (THREAD, method->method_holder());
907 int slot = method->method_idnum();
908
909 Symbol* signature = method->signature();
910 int parameter_count = ArgumentCount(signature).size();
911 objArrayHandle parameter_types = get_parameter_types(method, parameter_count, NULL, CHECK_NULL);
912 if (parameter_types.is_null()) return NULL;
913
914 objArrayHandle exception_types = get_exception_types(method, CHECK_NULL);
915 if (exception_types.is_null()) return NULL;
916
917 const int modifiers = method->access_flags().as_int() & JVM_RECOGNIZED_METHOD_MODIFIERS;
918
919 Handle ch = java_lang_reflect_Constructor::create(CHECK_NULL);
920
921 java_lang_reflect_Constructor::set_clazz(ch(), holder->java_mirror());
922 java_lang_reflect_Constructor::set_slot(ch(), slot);
923 java_lang_reflect_Constructor::set_parameter_types(ch(), parameter_types());
924 java_lang_reflect_Constructor::set_exception_types(ch(), exception_types());
925 java_lang_reflect_Constructor::set_modifiers(ch(), modifiers);
926 java_lang_reflect_Constructor::set_override(ch(), false);
927 if (java_lang_reflect_Constructor::has_signature_field() &&
928 method->generic_signature() != NULL) {
929 Symbol* gs = method->generic_signature();
930 Handle sig = java_lang_String::create_from_symbol(gs, CHECK_NULL);
931 java_lang_reflect_Constructor::set_signature(ch(), sig());
932 }
933 if (java_lang_reflect_Constructor::has_annotations_field()) {
934 typeArrayOop an_oop = Annotations::make_java_array(method->annotations(), CHECK_NULL);
935 java_lang_reflect_Constructor::set_annotations(ch(), an_oop);
936 }
937 if (java_lang_reflect_Constructor::has_parameter_annotations_field()) {
938 typeArrayOop an_oop = Annotations::make_java_array(method->parameter_annotations(), CHECK_NULL);
939 java_lang_reflect_Constructor::set_parameter_annotations(ch(), an_oop);
940 }
941 if (java_lang_reflect_Constructor::has_type_annotations_field()) {
942 typeArrayOop an_oop = Annotations::make_java_array(method->type_annotations(), CHECK_NULL);
943 java_lang_reflect_Constructor::set_type_annotations(ch(), an_oop);
944 }
945 return ch();
946 }
947
948
949 oop Reflection::new_field(fieldDescriptor* fd, TRAPS) {
950 Symbol* field_name = fd->name();
951 oop name_oop = StringTable::intern(field_name, CHECK_NULL);
952 Handle name = Handle(THREAD, name_oop);
953 Symbol* signature = fd->signature();
954 instanceKlassHandle holder (THREAD, fd->field_holder());
955 Handle type = new_type(signature, holder, CHECK_NULL);
956 Handle rh = java_lang_reflect_Field::create(CHECK_NULL);
957
958 java_lang_reflect_Field::set_clazz(rh(), fd->field_holder()->java_mirror());
959 java_lang_reflect_Field::set_slot(rh(), fd->index());
960 java_lang_reflect_Field::set_name(rh(), name());
961 java_lang_reflect_Field::set_type(rh(), type());
962 // Note the ACC_ANNOTATION bit, which is a per-class access flag, is never set here.
963 java_lang_reflect_Field::set_modifiers(rh(), fd->access_flags().as_int() & JVM_RECOGNIZED_FIELD_MODIFIERS);
964 java_lang_reflect_Field::set_override(rh(), false);
965 if (java_lang_reflect_Field::has_signature_field() &&
966 fd->has_generic_signature()) {
967 Symbol* gs = fd->generic_signature();
968 Handle sig = java_lang_String::create_from_symbol(gs, CHECK_NULL);
969 java_lang_reflect_Field::set_signature(rh(), sig());
970 }
971 if (java_lang_reflect_Field::has_annotations_field()) {
972 typeArrayOop an_oop = Annotations::make_java_array(fd->annotations(), CHECK_NULL);
973 java_lang_reflect_Field::set_annotations(rh(), an_oop);
974 }
975 if (java_lang_reflect_Field::has_type_annotations_field()) {
976 typeArrayOop an_oop = Annotations::make_java_array(fd->type_annotations(), CHECK_NULL);
977 java_lang_reflect_Field::set_type_annotations(rh(), an_oop);
978 }
979 return rh();
980 }
981
982 oop Reflection::new_parameter(Handle method, int index, Symbol* sym,
983 int flags, TRAPS) {
984
985 Handle rh = java_lang_reflect_Parameter::create(CHECK_NULL);
986
987 if(NULL != sym) {
988 Handle name = java_lang_String::create_from_symbol(sym, CHECK_NULL);
989 java_lang_reflect_Parameter::set_name(rh(), name());
990 } else {
991 java_lang_reflect_Parameter::set_name(rh(), NULL);
992 }
993
994 java_lang_reflect_Parameter::set_modifiers(rh(), flags);
995 java_lang_reflect_Parameter::set_executable(rh(), method());
996 java_lang_reflect_Parameter::set_index(rh(), index);
997 return rh();
998 }
999
1000
1001 static methodHandle resolve_interface_call(instanceKlassHandle klass,
1002 const methodHandle& method,
1003 KlassHandle recv_klass,
1004 Handle receiver,
1005 TRAPS) {
1006
1007 assert(!method.is_null() , "method should not be null");
1008
1009 CallInfo info;
1010 Symbol* signature = method->signature();
1011 Symbol* name = method->name();
1012 LinkResolver::resolve_interface_call(info, receiver, recv_klass,
1013 LinkInfo(klass, name, signature),
1014 true,
1015 CHECK_(methodHandle()));
1016 return info.selected_method();
1017 }
1018
1019 // Conversion
1020 static BasicType basic_type_mirror_to_basic_type(oop basic_type_mirror, TRAPS) {
1021 assert(java_lang_Class::is_primitive(basic_type_mirror),
1022 "just checking");
1023 return java_lang_Class::primitive_type(basic_type_mirror);
1024 }
1025
1026 // Narrowing of basic types. Used to create correct jvalues for
1027 // boolean, byte, char and short return return values from interpreter
1028 // which are returned as ints. Throws IllegalArgumentException.
1029 static void narrow(jvalue* value, BasicType narrow_type, TRAPS) {
1030 switch (narrow_type) {
1031 case T_BOOLEAN:
1032 value->z = (jboolean) (value->i & 1);
1033 return;
1034 case T_BYTE:
1035 value->b = (jbyte)value->i;
1036 return;
1037 case T_CHAR:
1038 value->c = (jchar)value->i;
1039 return;
1040 case T_SHORT:
1041 value->s = (jshort)value->i;
1042 return;
1043 default:
1044 break; // fail
1045 }
1046 THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(), "argument type mismatch");
1047 }
1048
1049
1050 // Method call (shared by invoke_method and invoke_constructor)
1051 static oop invoke(instanceKlassHandle klass,
1052 methodHandle reflected_method,
1053 Handle receiver,
1054 bool override,
1055 objArrayHandle ptypes,
1056 BasicType rtype,
1057 objArrayHandle args,
1058 bool is_method_invoke,
1059 TRAPS) {
1060
1061 ResourceMark rm(THREAD);
1062
1063 methodHandle method; // actual method to invoke
1064 KlassHandle target_klass; // target klass, receiver's klass for non-static
1065
1066 // Ensure klass is initialized
1067 klass->initialize(CHECK_NULL);
1068
1069 bool is_static = reflected_method->is_static();
1070 if (is_static) {
1071 // ignore receiver argument
1072 method = reflected_method;
1073 target_klass = klass;
1074 } else {
1075 // check for null receiver
1076 if (receiver.is_null()) {
1077 THROW_0(vmSymbols::java_lang_NullPointerException());
1078 }
1079 // Check class of receiver against class declaring method
1080 if (!receiver->is_a(klass())) {
1081 THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), "object is not an instance of declaring class");
1082 }
1083 // target klass is receiver's klass
1084 target_klass = KlassHandle(THREAD, receiver->klass());
1085 // no need to resolve if method is private or <init>
1086 if (reflected_method->is_private() || reflected_method->name() == vmSymbols::object_initializer_name()) {
1087 method = reflected_method;
1088 } else {
1089 // resolve based on the receiver
1090 if (reflected_method->method_holder()->is_interface()) {
1091 // resolve interface call
1092 //
1093 // Match resolution errors with those thrown due to reflection inlining
1094 // Linktime resolution & IllegalAccessCheck already done by Class.getMethod()
1095 method = resolve_interface_call(klass, reflected_method, target_klass, receiver, THREAD);
1096 if (HAS_PENDING_EXCEPTION) {
1097 // Method resolution threw an exception; wrap it in an InvocationTargetException
1098 oop resolution_exception = PENDING_EXCEPTION;
1099 CLEAR_PENDING_EXCEPTION;
1100 // JVMTI has already reported the pending exception
1101 // JVMTI internal flag reset is needed in order to report InvocationTargetException
1102 if (THREAD->is_Java_thread()) {
1103 JvmtiExport::clear_detected_exception((JavaThread*)THREAD);
1104 }
1105 JavaCallArguments args(Handle(THREAD, resolution_exception));
1106 THROW_ARG_0(vmSymbols::java_lang_reflect_InvocationTargetException(),
1107 vmSymbols::throwable_void_signature(),
1108 &args);
1109 }
1110 } else {
1111 // if the method can be overridden, we resolve using the vtable index.
1112 assert(!reflected_method->has_itable_index(), "");
1113 int index = reflected_method->vtable_index();
1114 method = reflected_method;
1115 if (index != Method::nonvirtual_vtable_index) {
1116 method = methodHandle(THREAD, target_klass->method_at_vtable(index));
1117 }
1118 if (!method.is_null()) {
1119 // Check for abstract methods as well
1120 if (method->is_abstract()) {
1121 // new default: 6531596
1122 ResourceMark rm(THREAD);
1123 Handle h_origexception = Exceptions::new_exception(THREAD,
1124 vmSymbols::java_lang_AbstractMethodError(),
1125 Method::name_and_sig_as_C_string(target_klass(),
1126 method->name(),
1127 method->signature()));
1128 JavaCallArguments args(h_origexception);
1129 THROW_ARG_0(vmSymbols::java_lang_reflect_InvocationTargetException(),
1130 vmSymbols::throwable_void_signature(),
1131 &args);
1132 }
1133 }
1134 }
1135 }
1136 }
1137
1138 // I believe this is a ShouldNotGetHere case which requires
1139 // an internal vtable bug. If you ever get this please let Karen know.
1140 if (method.is_null()) {
1141 ResourceMark rm(THREAD);
1142 THROW_MSG_0(vmSymbols::java_lang_NoSuchMethodError(),
1143 Method::name_and_sig_as_C_string(klass(),
1144 reflected_method->name(),
1145 reflected_method->signature()));
1146 }
1147
1148 assert(ptypes->is_objArray(), "just checking");
1149 int args_len = args.is_null() ? 0 : args->length();
1150 // Check number of arguments
1151 if (ptypes->length() != args_len) {
1152 THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(),
1153 "wrong number of arguments");
1154 }
1155
1156 // Create object to contain parameters for the JavaCall
1157 JavaCallArguments java_args(method->size_of_parameters());
1158
1159 if (!is_static) {
1160 java_args.push_oop(receiver);
1161 }
1162
1163 for (int i = 0; i < args_len; i++) {
1164 oop type_mirror = ptypes->obj_at(i);
1165 oop arg = args->obj_at(i);
1166 if (java_lang_Class::is_primitive(type_mirror)) {
1167 jvalue value;
1168 BasicType ptype = basic_type_mirror_to_basic_type(type_mirror, CHECK_NULL);
1169 BasicType atype = Reflection::unbox_for_primitive(arg, &value, CHECK_NULL);
1170 if (ptype != atype) {
1171 Reflection::widen(&value, atype, ptype, CHECK_NULL);
1172 }
1173 switch (ptype) {
1174 case T_BOOLEAN: java_args.push_int(value.z); break;
1175 case T_CHAR: java_args.push_int(value.c); break;
1176 case T_BYTE: java_args.push_int(value.b); break;
1177 case T_SHORT: java_args.push_int(value.s); break;
1178 case T_INT: java_args.push_int(value.i); break;
1179 case T_LONG: java_args.push_long(value.j); break;
1180 case T_FLOAT: java_args.push_float(value.f); break;
1181 case T_DOUBLE: java_args.push_double(value.d); break;
1182 default:
1183 THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), "argument type mismatch");
1184 }
1185 } else {
1186 if (arg != NULL) {
1187 Klass* k = java_lang_Class::as_Klass(type_mirror);
1188 if (!arg->is_a(k)) {
1189 THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(),
1190 "argument type mismatch");
1191 }
1192 }
1193 Handle arg_handle(THREAD, arg); // Create handle for argument
1194 java_args.push_oop(arg_handle); // Push handle
1195 }
1196 }
1197
1198 assert(java_args.size_of_parameters() == method->size_of_parameters(),
1199 "just checking");
1200
1201 // All oops (including receiver) is passed in as Handles. An potential oop is returned as an
1202 // oop (i.e., NOT as an handle)
1203 JavaValue result(rtype);
1204 JavaCalls::call(&result, method, &java_args, THREAD);
1205
1206 if (HAS_PENDING_EXCEPTION) {
1207 // Method threw an exception; wrap it in an InvocationTargetException
1208 oop target_exception = PENDING_EXCEPTION;
1209 CLEAR_PENDING_EXCEPTION;
1210 // JVMTI has already reported the pending exception
1211 // JVMTI internal flag reset is needed in order to report InvocationTargetException
1212 if (THREAD->is_Java_thread()) {
1213 JvmtiExport::clear_detected_exception((JavaThread*)THREAD);
1214 }
1215
1216 JavaCallArguments args(Handle(THREAD, target_exception));
1217 THROW_ARG_0(vmSymbols::java_lang_reflect_InvocationTargetException(),
1218 vmSymbols::throwable_void_signature(),
1219 &args);
1220 } else {
1221 if (rtype == T_BOOLEAN || rtype == T_BYTE || rtype == T_CHAR || rtype == T_SHORT) {
1222 narrow((jvalue*)result.get_value_addr(), rtype, CHECK_NULL);
1223 }
1224 return Reflection::box((jvalue*)result.get_value_addr(), rtype, THREAD);
1225 }
1226 }
1227
1228 // This would be nicer if, say, java.lang.reflect.Method was a subclass
1229 // of java.lang.reflect.Constructor
1230
1231 oop Reflection::invoke_method(oop method_mirror, Handle receiver, objArrayHandle args, TRAPS) {
1232 oop mirror = java_lang_reflect_Method::clazz(method_mirror);
1233 int slot = java_lang_reflect_Method::slot(method_mirror);
1234 bool override = java_lang_reflect_Method::override(method_mirror) != 0;
1235 objArrayHandle ptypes(THREAD, objArrayOop(java_lang_reflect_Method::parameter_types(method_mirror)));
1236
1237 oop return_type_mirror = java_lang_reflect_Method::return_type(method_mirror);
1238 BasicType rtype;
1239 if (java_lang_Class::is_primitive(return_type_mirror)) {
1240 rtype = basic_type_mirror_to_basic_type(return_type_mirror, CHECK_NULL);
1241 } else {
1242 rtype = T_OBJECT;
1243 }
1244
1245 instanceKlassHandle klass(THREAD, java_lang_Class::as_Klass(mirror));
1246 Method* m = klass->method_with_idnum(slot);
1247 if (m == NULL) {
1248 THROW_MSG_0(vmSymbols::java_lang_InternalError(), "invoke");
1249 }
1250 methodHandle method(THREAD, m);
1251
1252 return invoke(klass, method, receiver, override, ptypes, rtype, args, true, THREAD);
1253 }
1254
1255
1256 oop Reflection::invoke_constructor(oop constructor_mirror, objArrayHandle args, TRAPS) {
1257 oop mirror = java_lang_reflect_Constructor::clazz(constructor_mirror);
1258 int slot = java_lang_reflect_Constructor::slot(constructor_mirror);
1259 bool override = java_lang_reflect_Constructor::override(constructor_mirror) != 0;
1260 objArrayHandle ptypes(THREAD, objArrayOop(java_lang_reflect_Constructor::parameter_types(constructor_mirror)));
1261
1262 instanceKlassHandle klass(THREAD, java_lang_Class::as_Klass(mirror));
1263 Method* m = klass->method_with_idnum(slot);
1264 if (m == NULL) {
1265 THROW_MSG_0(vmSymbols::java_lang_InternalError(), "invoke");
1266 }
1267 methodHandle method(THREAD, m);
1268 assert(method->name() == vmSymbols::object_initializer_name(), "invalid constructor");
1269
1270 // Make sure klass gets initialize
1271 klass->initialize(CHECK_NULL);
1272
1273 // Create new instance (the receiver)
1274 klass->check_valid_for_instantiation(false, CHECK_NULL);
1275 Handle receiver = klass->allocate_instance_handle(CHECK_NULL);
1276
1277 // Ignore result from call and return receiver
1278 invoke(klass, method, receiver, override, ptypes, T_VOID, args, false, CHECK_NULL);
1279 return receiver();
1280 }