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