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