1 /*
   2  * Copyright (c) 1997, 2021, Oracle and/or its affiliates. All rights reserved.
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * This code is free software; you can redistribute it and/or modify it
   6  * under the terms of the GNU General Public License version 2 only, as
   7  * published by the Free Software Foundation.
   8  *
   9  * This code is distributed in the hope that it will be useful, but WITHOUT
  10  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  11  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  12  * version 2 for more details (a copy is included in the LICENSE file that
  13  * accompanied this code).
  14  *
  15  * You should have received a copy of the GNU General Public License version
  16  * 2 along with this work; if not, write to the Free Software Foundation,
  17  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
  18  *
  19  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
  20  * or visit www.oracle.com if you need additional information or have any
  21  * questions.
  22  *
  23  */
  24 
  25 #include "precompiled.hpp"
  26 #include "jvm.h"
  27 #include "classfile/javaClasses.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 "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/reflection.hpp"
  51 #include "runtime/reflectionUtils.hpp"
  52 #include "runtime/signature.hpp"
  53 #include "runtime/thread.inline.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 == NULL || 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 = NULL;
  66   Klass* caller = NULL;
  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 != NULL) {
  81         source_file = s->as_C_string();
  82       }
  83     }
  84   }
  85   if (caller != NULL) {
  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 != NULL) {
  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 NULL;
 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 == NULL) {
 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 == NULL) {
 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 != NULL) {
 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 == NULL) {
 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_flatArray(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 == NULL) {
 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)->null_free_inline_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 == NULL) ||
 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/MagicAccessorImpl subclasses to
 462   // succeed trivially.
 463   if (vmClasses::reflect_MagicAccessorImpl_klass_is_loaded() &&
 464       current_class->is_subclass_of(vmClasses::reflect_MagicAccessorImpl_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 != NULL, "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 = NULL;
 544   if (result != OTHER_PROBLEM && new_class != NULL && current_class != NULL) {
 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 = NULL;
 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 != NULL, "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_HEX ") because module %s does not read unnamed module @" SIZE_FORMAT_HEX,
 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() != NULL,
 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 != NULL, "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_HEX ") cannot access class %s (in module %s) because module %s does not export %s to unnamed module @" SIZE_FORMAT_HEX,
 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 == NULL) ||
 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/MagicAccessorImpl subclasses to
 678   // succeed trivially.
 679   if (current_class->is_subclass_of(vmClasses::reflect_MagicAccessorImpl_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   // Allocate array holding parameter types (java.lang.Class instances)
 742   objArrayOop m = oopFactory::new_objArray(vmClasses::Class_klass(), parameter_count, CHECK_(objArrayHandle()));
 743   objArrayHandle mirrors(THREAD, m);
 744   int index = 0;
 745   // Collect parameter types
 746   ResourceMark rm(THREAD);
 747   for (ResolvingSignatureStream ss(method()); !ss.is_done(); ss.next()) {
 748     oop mirror = ss.as_java_mirror(SignatureStream::NCDFError, CHECK_(objArrayHandle()));
 749     if (log_is_enabled(Debug, class, resolve)) {
 750       trace_class_resolution(mirror);
 751     }
 752     if (!ss.at_return_type()) {
 753       mirrors->obj_at_put(index++, mirror);
 754     } else if (return_type != NULL) {
 755       // Collect return type as well
 756       assert(ss.at_return_type(), "return type should be present");
 757       *return_type = mirror;
 758     }
 759   }
 760   assert(index == parameter_count, "invalid parameter count");
 761   return mirrors;
 762 }
 763 
 764 static objArrayHandle get_exception_types(const methodHandle& method, TRAPS) {
 765   return method->resolved_checked_exceptions(THREAD);
 766 }
 767 
 768 static Handle new_type(Symbol* signature, Klass* k, TRAPS) {
 769   ResolvingSignatureStream ss(signature, k, false);
 770   oop nt = ss.as_java_mirror(SignatureStream::NCDFError, CHECK_NH);
 771   return Handle(THREAD, nt);
 772 }
 773 
 774 oop Reflection::new_method(const methodHandle& method, bool for_constant_pool_access, TRAPS) {
 775   // Allow sun.reflect.ConstantPool to refer to <clinit> methods as java.lang.reflect.Methods.
 776   assert(!method()->name()->starts_with('<') || for_constant_pool_access,
 777          "should call new_constructor instead");
 778   InstanceKlass* holder = method->method_holder();
 779   int slot = method->method_idnum();
 780 
 781   Symbol*  signature  = method->signature();
 782   int parameter_count = ArgumentCount(signature).size();
 783   oop return_type_oop = NULL;
 784   objArrayHandle parameter_types = get_parameter_types(method, parameter_count, &return_type_oop, CHECK_NULL);
 785   if (parameter_types.is_null() || return_type_oop == NULL) return NULL;
 786 
 787   Handle return_type(THREAD, return_type_oop);
 788 
 789   objArrayHandle exception_types = get_exception_types(method, CHECK_NULL);
 790   assert(!exception_types.is_null(), "cannot return null");
 791 
 792   Symbol*  method_name = method->name();
 793   oop name_oop = StringTable::intern(method_name, CHECK_NULL);
 794   Handle name = Handle(THREAD, name_oop);
 795   if (name == NULL) return NULL;
 796 
 797   const int modifiers = method->access_flags().as_int() & JVM_RECOGNIZED_METHOD_MODIFIERS;
 798 
 799   Handle mh = java_lang_reflect_Method::create(CHECK_NULL);
 800 
 801   java_lang_reflect_Method::set_clazz(mh(), holder->java_mirror());
 802   java_lang_reflect_Method::set_slot(mh(), slot);
 803   java_lang_reflect_Method::set_name(mh(), name());
 804   java_lang_reflect_Method::set_return_type(mh(), return_type());
 805   java_lang_reflect_Method::set_parameter_types(mh(), parameter_types());
 806   java_lang_reflect_Method::set_exception_types(mh(), exception_types());
 807   java_lang_reflect_Method::set_modifiers(mh(), modifiers);
 808   java_lang_reflect_Method::set_override(mh(), false);
 809   if (method->generic_signature() != NULL) {
 810     Symbol*  gs = method->generic_signature();
 811     Handle sig = java_lang_String::create_from_symbol(gs, CHECK_NULL);
 812     java_lang_reflect_Method::set_signature(mh(), sig());
 813   }
 814   typeArrayOop an_oop = Annotations::make_java_array(method->annotations(), CHECK_NULL);
 815   java_lang_reflect_Method::set_annotations(mh(), an_oop);
 816   an_oop = Annotations::make_java_array(method->parameter_annotations(), CHECK_NULL);
 817   java_lang_reflect_Method::set_parameter_annotations(mh(), an_oop);
 818   an_oop = Annotations::make_java_array(method->annotation_default(), CHECK_NULL);
 819   java_lang_reflect_Method::set_annotation_default(mh(), an_oop);
 820   return mh();
 821 }
 822 
 823 
 824 oop Reflection::new_constructor(const methodHandle& method, TRAPS) {
 825   assert(method()->is_object_constructor() ||
 826          method()->is_static_init_factory(),
 827          "should call new_method instead");
 828 
 829   InstanceKlass* holder = method->method_holder();
 830   int slot = method->method_idnum();
 831 
 832   Symbol*  signature  = method->signature();
 833   int parameter_count = ArgumentCount(signature).size();
 834   objArrayHandle parameter_types = get_parameter_types(method, parameter_count, NULL, CHECK_NULL);
 835   if (parameter_types.is_null()) return NULL;
 836 
 837   objArrayHandle exception_types = get_exception_types(method, CHECK_NULL);
 838   assert(!exception_types.is_null(), "cannot return null");
 839 
 840   const int modifiers = method->access_flags().as_int() & JVM_RECOGNIZED_METHOD_MODIFIERS;
 841 
 842   Handle ch = java_lang_reflect_Constructor::create(CHECK_NULL);
 843 
 844   java_lang_reflect_Constructor::set_clazz(ch(), holder->java_mirror());
 845   java_lang_reflect_Constructor::set_slot(ch(), slot);
 846   java_lang_reflect_Constructor::set_parameter_types(ch(), parameter_types());
 847   java_lang_reflect_Constructor::set_exception_types(ch(), exception_types());
 848   java_lang_reflect_Constructor::set_modifiers(ch(), modifiers);
 849   java_lang_reflect_Constructor::set_override(ch(), false);
 850   if (method->generic_signature() != NULL) {
 851     Symbol*  gs = method->generic_signature();
 852     Handle sig = java_lang_String::create_from_symbol(gs, CHECK_NULL);
 853     java_lang_reflect_Constructor::set_signature(ch(), sig());
 854   }
 855   typeArrayOop an_oop = Annotations::make_java_array(method->annotations(), CHECK_NULL);
 856   java_lang_reflect_Constructor::set_annotations(ch(), an_oop);
 857   an_oop = Annotations::make_java_array(method->parameter_annotations(), CHECK_NULL);
 858   java_lang_reflect_Constructor::set_parameter_annotations(ch(), an_oop);
 859   return ch();
 860 }
 861 
 862 
 863 oop Reflection::new_field(fieldDescriptor* fd, TRAPS) {
 864   Symbol*  field_name = fd->name();
 865   oop name_oop = StringTable::intern(field_name, CHECK_NULL);
 866   Handle name = Handle(THREAD, name_oop);
 867   Symbol*  signature  = fd->signature();
 868   InstanceKlass* holder = fd->field_holder();
 869   Handle type = new_type(signature, holder, CHECK_NULL);
 870   Handle rh  = java_lang_reflect_Field::create(CHECK_NULL);
 871 
 872   java_lang_reflect_Field::set_clazz(rh(), fd->field_holder()->java_mirror());
 873   java_lang_reflect_Field::set_slot(rh(), fd->index());
 874   java_lang_reflect_Field::set_name(rh(), name());
 875   java_lang_reflect_Field::set_type(rh(), type());
 876   if (fd->is_trusted_final()) {
 877     java_lang_reflect_Field::set_trusted_final(rh());
 878   }
 879   // Note the ACC_ANNOTATION bit, which is a per-class access flag, is never set here.
 880   int modifiers = fd->access_flags().as_int() & JVM_RECOGNIZED_FIELD_MODIFIERS;
 881   if (fd->is_inlined()) {
 882     modifiers |= JVM_ACC_FIELD_INLINED;
 883   }
 884   java_lang_reflect_Field::set_modifiers(rh(), modifiers);
 885   java_lang_reflect_Field::set_override(rh(), false);
 886   if (fd->has_generic_signature()) {
 887     Symbol*  gs = fd->generic_signature();
 888     Handle sig = java_lang_String::create_from_symbol(gs, CHECK_NULL);
 889     java_lang_reflect_Field::set_signature(rh(), sig());
 890   }
 891   typeArrayOop an_oop = Annotations::make_java_array(fd->annotations(), CHECK_NULL);
 892   java_lang_reflect_Field::set_annotations(rh(), an_oop);
 893   return rh();
 894 }
 895 
 896 oop Reflection::new_parameter(Handle method, int index, Symbol* sym,
 897                               int flags, TRAPS) {
 898 
 899   Handle rh = java_lang_reflect_Parameter::create(CHECK_NULL);
 900 
 901   if(NULL != sym) {
 902     Handle name = java_lang_String::create_from_symbol(sym, CHECK_NULL);
 903     java_lang_reflect_Parameter::set_name(rh(), name());
 904   } else {
 905     java_lang_reflect_Parameter::set_name(rh(), NULL);
 906   }
 907 
 908   java_lang_reflect_Parameter::set_modifiers(rh(), flags);
 909   java_lang_reflect_Parameter::set_executable(rh(), method());
 910   java_lang_reflect_Parameter::set_index(rh(), index);
 911   return rh();
 912 }
 913 
 914 
 915 static methodHandle resolve_interface_call(InstanceKlass* klass,
 916                                            const methodHandle& method,
 917                                            Klass* recv_klass,
 918                                            Handle receiver,
 919                                            TRAPS) {
 920 
 921   assert(!method.is_null() , "method should not be null");
 922 
 923   CallInfo info;
 924   Symbol*  signature  = method->signature();
 925   Symbol*  name       = method->name();
 926   LinkResolver::resolve_interface_call(info, receiver, recv_klass,
 927                                        LinkInfo(klass, name, signature),
 928                                        true,
 929                                        CHECK_(methodHandle()));
 930   return methodHandle(THREAD, info.selected_method());
 931 }
 932 
 933 // Conversion
 934 static BasicType basic_type_mirror_to_basic_type(oop basic_type_mirror) {
 935   assert(java_lang_Class::is_primitive(basic_type_mirror),
 936     "just checking");
 937   return java_lang_Class::primitive_type(basic_type_mirror);
 938 }
 939 
 940 // Narrowing of basic types. Used to create correct jvalues for
 941 // boolean, byte, char and short return return values from interpreter
 942 // which are returned as ints. Throws IllegalArgumentException.
 943 static void narrow(jvalue* value, BasicType narrow_type, TRAPS) {
 944   switch (narrow_type) {
 945   case T_BOOLEAN:
 946     value->z = (jboolean) (value->i & 1);
 947     return;
 948   case T_BYTE:
 949     value->b = (jbyte)value->i;
 950     return;
 951   case T_CHAR:
 952     value->c = (jchar)value->i;
 953     return;
 954   case T_SHORT:
 955     value->s = (jshort)value->i;
 956     return;
 957   default:
 958     break; // fail
 959   }
 960   THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(), "argument type mismatch");
 961 }
 962 
 963 
 964 // Method call (shared by invoke_method and invoke_constructor)
 965 static oop invoke(InstanceKlass* klass,
 966                   const methodHandle& reflected_method,
 967                   Handle receiver,
 968                   bool override,
 969                   objArrayHandle ptypes,
 970                   BasicType rtype,
 971                   objArrayHandle args,
 972                   bool is_method_invoke,
 973                   TRAPS) {
 974 
 975   ResourceMark rm(THREAD);
 976 
 977   methodHandle method;      // actual method to invoke
 978   Klass* target_klass;      // target klass, receiver's klass for non-static
 979 
 980   // Ensure klass is initialized
 981   klass->initialize(CHECK_NULL);
 982 
 983   bool is_static = reflected_method->is_static();
 984   if (is_static) {
 985     // ignore receiver argument
 986     method = reflected_method;
 987     target_klass = klass;
 988   } else {
 989     // check for null receiver
 990     if (receiver.is_null()) {
 991       THROW_0(vmSymbols::java_lang_NullPointerException());
 992     }
 993     // Check class of receiver against class declaring method
 994     if (!receiver->is_a(klass)) {
 995       THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), "object is not an instance of declaring class");
 996     }
 997     // target klass is receiver's klass
 998     target_klass = receiver->klass();
 999     // no need to resolve if method is private or <init>
1000     if (reflected_method->is_private() || reflected_method->name() == vmSymbols::object_initializer_name()) {
1001       method = reflected_method;
1002     } else {
1003       // resolve based on the receiver
1004       if (reflected_method->method_holder()->is_interface()) {
1005         // resolve interface call
1006         //
1007         // Match resolution errors with those thrown due to reflection inlining
1008         // Linktime resolution & IllegalAccessCheck already done by Class.getMethod()
1009         method = resolve_interface_call(klass, reflected_method, target_klass, receiver, THREAD);
1010         if (HAS_PENDING_EXCEPTION) {
1011           // Method resolution threw an exception; wrap it in an InvocationTargetException
1012           oop resolution_exception = PENDING_EXCEPTION;
1013           CLEAR_PENDING_EXCEPTION;
1014           // JVMTI has already reported the pending exception
1015           // JVMTI internal flag reset is needed in order to report InvocationTargetException
1016           JvmtiExport::clear_detected_exception(THREAD);
1017           JavaCallArguments args(Handle(THREAD, resolution_exception));
1018           THROW_ARG_0(vmSymbols::java_lang_reflect_InvocationTargetException(),
1019                       vmSymbols::throwable_void_signature(),
1020                       &args);
1021         }
1022       }  else {
1023         // if the method can be overridden, we resolve using the vtable index.
1024         assert(!reflected_method->has_itable_index(), "");
1025         int index = reflected_method->vtable_index();
1026         method = reflected_method;
1027         if (index != Method::nonvirtual_vtable_index) {
1028           method = methodHandle(THREAD, target_klass->method_at_vtable(index));
1029         }
1030         if (!method.is_null()) {
1031           // Check for abstract methods as well
1032           if (method->is_abstract()) {
1033             // new default: 6531596
1034             ResourceMark rm(THREAD);
1035             stringStream ss;
1036             ss.print("'");
1037             Method::print_external_name(&ss, target_klass, method->name(), method->signature());
1038             ss.print("'");
1039             Handle h_origexception = Exceptions::new_exception(THREAD,
1040               vmSymbols::java_lang_AbstractMethodError(), ss.as_string());
1041             JavaCallArguments args(h_origexception);
1042             THROW_ARG_0(vmSymbols::java_lang_reflect_InvocationTargetException(),
1043               vmSymbols::throwable_void_signature(),
1044               &args);
1045           }
1046         }
1047       }
1048     }
1049   }
1050 
1051   // I believe this is a ShouldNotGetHere case which requires
1052   // an internal vtable bug. If you ever get this please let Karen know.
1053   if (method.is_null()) {
1054     ResourceMark rm(THREAD);
1055     stringStream ss;
1056     ss.print("'");
1057     Method::print_external_name(&ss, klass,
1058                                      reflected_method->name(),
1059                                      reflected_method->signature());
1060     ss.print("'");
1061     THROW_MSG_0(vmSymbols::java_lang_NoSuchMethodError(), ss.as_string());
1062   }
1063 
1064   assert(ptypes->is_objArray(), "just checking");
1065   int args_len = args.is_null() ? 0 : args->length();
1066   // Check number of arguments
1067   if (ptypes->length() != args_len) {
1068     THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(),
1069                 "wrong number of arguments");
1070   }
1071 
1072   // Create object to contain parameters for the JavaCall
1073   JavaCallArguments java_args(method->size_of_parameters());
1074 
1075   if (!is_static) {
1076     java_args.push_oop(receiver);
1077   }
1078 
1079   for (int i = 0; i < args_len; i++) {
1080     oop type_mirror = ptypes->obj_at(i);
1081     oop arg = args->obj_at(i);
1082     if (java_lang_Class::is_primitive(type_mirror)) {
1083       jvalue value;
1084       BasicType ptype = basic_type_mirror_to_basic_type(type_mirror);
1085       BasicType atype = Reflection::unbox_for_primitive(arg, &value, CHECK_NULL);
1086       if (ptype != atype) {
1087         Reflection::widen(&value, atype, ptype, CHECK_NULL);
1088       }
1089       switch (ptype) {
1090         case T_BOOLEAN:     java_args.push_int(value.z);    break;
1091         case T_CHAR:        java_args.push_int(value.c);    break;
1092         case T_BYTE:        java_args.push_int(value.b);    break;
1093         case T_SHORT:       java_args.push_int(value.s);    break;
1094         case T_INT:         java_args.push_int(value.i);    break;
1095         case T_LONG:        java_args.push_long(value.j);   break;
1096         case T_FLOAT:       java_args.push_float(value.f);  break;
1097         case T_DOUBLE:      java_args.push_double(value.d); break;
1098         default:
1099           THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), "argument type mismatch");
1100       }
1101     } else {
1102       if (arg != NULL) {
1103         Klass* k = java_lang_Class::as_Klass(type_mirror);
1104         if (!arg->is_a(k)) {
1105           THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(),
1106                       "argument type mismatch");
1107         }
1108       }
1109       Handle arg_handle(THREAD, arg);         // Create handle for argument
1110       java_args.push_oop(arg_handle); // Push handle
1111     }
1112   }
1113 
1114   assert(java_args.size_of_parameters() == method->size_of_parameters(),
1115     "just checking");
1116 
1117   // All oops (including receiver) is passed in as Handles. An potential oop is returned as an
1118   // oop (i.e., NOT as an handle)
1119   JavaValue result(rtype);
1120   JavaCalls::call(&result, method, &java_args, THREAD);
1121 
1122   if (HAS_PENDING_EXCEPTION) {
1123     // Method threw an exception; wrap it in an InvocationTargetException
1124     oop target_exception = PENDING_EXCEPTION;
1125     CLEAR_PENDING_EXCEPTION;
1126     // JVMTI has already reported the pending exception
1127     // JVMTI internal flag reset is needed in order to report InvocationTargetException
1128     JvmtiExport::clear_detected_exception(THREAD);
1129 
1130     JavaCallArguments args(Handle(THREAD, target_exception));
1131     THROW_ARG_0(vmSymbols::java_lang_reflect_InvocationTargetException(),
1132                 vmSymbols::throwable_void_signature(),
1133                 &args);
1134   } else {
1135     if (rtype == T_BOOLEAN || rtype == T_BYTE || rtype == T_CHAR || rtype == T_SHORT) {
1136       narrow((jvalue*)result.get_value_addr(), rtype, CHECK_NULL);
1137     }
1138     return Reflection::box((jvalue*)result.get_value_addr(), rtype, THREAD);
1139   }
1140 }
1141 
1142 // This would be nicer if, say, java.lang.reflect.Method was a subclass
1143 // of java.lang.reflect.Constructor
1144 
1145 oop Reflection::invoke_method(oop method_mirror, Handle receiver, objArrayHandle args, TRAPS) {
1146   oop mirror             = java_lang_reflect_Method::clazz(method_mirror);
1147   int slot               = java_lang_reflect_Method::slot(method_mirror);
1148   bool override          = java_lang_reflect_Method::override(method_mirror) != 0;
1149   objArrayHandle ptypes(THREAD, objArrayOop(java_lang_reflect_Method::parameter_types(method_mirror)));
1150 
1151   oop return_type_mirror = java_lang_reflect_Method::return_type(method_mirror);
1152   BasicType rtype;
1153   if (java_lang_Class::is_primitive(return_type_mirror)) {
1154     rtype = basic_type_mirror_to_basic_type(return_type_mirror);
1155   } else if (java_lang_Class::as_Klass(return_type_mirror)->is_inline_klass()) {
1156     rtype = java_lang_Class::is_primary_mirror(return_type_mirror) ? T_OBJECT : T_INLINE_TYPE;
1157   } else {
1158     rtype = T_OBJECT;
1159   }
1160 
1161   InstanceKlass* klass = InstanceKlass::cast(java_lang_Class::as_Klass(mirror));
1162   Method* m = klass->method_with_idnum(slot);
1163   if (m == NULL) {
1164     THROW_MSG_0(vmSymbols::java_lang_InternalError(), "invoke");
1165   }
1166   methodHandle method(THREAD, m);
1167 
1168   return invoke(klass, method, receiver, override, ptypes, rtype, args, true, THREAD);
1169 }
1170 
1171 
1172 oop Reflection::invoke_constructor(oop constructor_mirror, objArrayHandle args, TRAPS) {
1173   oop mirror             = java_lang_reflect_Constructor::clazz(constructor_mirror);
1174   int slot               = java_lang_reflect_Constructor::slot(constructor_mirror);
1175   bool override          = java_lang_reflect_Constructor::override(constructor_mirror) != 0;
1176   objArrayHandle ptypes(THREAD, objArrayOop(java_lang_reflect_Constructor::parameter_types(constructor_mirror)));
1177 
1178   InstanceKlass* klass = InstanceKlass::cast(java_lang_Class::as_Klass(mirror));
1179   Method* m = klass->method_with_idnum(slot);
1180   if (m == NULL) {
1181     THROW_MSG_0(vmSymbols::java_lang_InternalError(), "invoke");
1182   }
1183   methodHandle method(THREAD, m);
1184   assert(method->name() == vmSymbols::object_initializer_name(), "invalid constructor");
1185 
1186   // Make sure klass gets initialize
1187   klass->initialize(CHECK_NULL);
1188 
1189   // Create new instance (the receiver)
1190   klass->check_valid_for_instantiation(false, CHECK_NULL);
1191 
1192   // Special case for factory methods
1193   if (!method->signature()->is_void_method_signature()) {
1194     assert(klass->is_inline_klass(), "inline classes must use factory methods");
1195     Handle no_receiver; // null instead of receiver
1196     BasicType rtype;
1197     if (klass->is_hidden()) {
1198       rtype = T_OBJECT;
1199     } else {
1200       rtype = T_INLINE_TYPE;
1201     }
1202     return invoke(klass, method, no_receiver, override, ptypes, rtype, args, false, CHECK_NULL);
1203   }
1204 
1205   // main branch of code creates a non-inline object:
1206   assert(!klass->is_inline_klass(), "classic constructors are only for non-inline classes");
1207   Handle receiver = klass->allocate_instance_handle(CHECK_NULL);
1208 
1209   // Ignore result from call and return receiver
1210   invoke(klass, method, receiver, override, ptypes, T_VOID, args, false, CHECK_NULL);
1211   return receiver();
1212 }