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