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