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